contrib/wpa/src/rsn_supp/tdls.c

   1 /*
   2  * wpa_supplicant - TDLS
   3  * Copyright (c) 2010-2011, Atheros Communications
   4  *
   5  * This software may be distributed under the terms of the BSD license.
   6  * See README for more details.
   7  */
   8
   9 #include "utils/includes.h"
  10
  11 #include "utils/common.h"
  12 #include "utils/eloop.h"
  13 #include "utils/os.h"
  14 #include "common/ieee802_11_defs.h"
  15 #include "common/ieee802_11_common.h"
  16 #include "crypto/sha256.h"
  17 #include "crypto/crypto.h"
  18 #include "crypto/aes_wrap.h"
  19 #include "rsn_supp/wpa.h"
  20 #include "rsn_supp/wpa_ie.h"
  21 #include "rsn_supp/wpa_i.h"
  22 #include "drivers/driver.h"
  23 #include "l2_packet/l2_packet.h"
  24
  25 #ifdef CONFIG_TDLS_TESTING
  26 #define TDLS_TESTING_LONG_FRAME BIT(0)
  27 #define TDLS_TESTING_ALT_RSN_IE BIT(1)
  28 #define TDLS_TESTING_DIFF_BSSID BIT(2)
  29 #define TDLS_TESTING_SHORT_LIFETIME BIT(3)
  30 #define TDLS_TESTING_WRONG_LIFETIME_RESP BIT(4)
  31 #define TDLS_TESTING_WRONG_LIFETIME_CONF BIT(5)
  32 #define TDLS_TESTING_LONG_LIFETIME BIT(6)
  33 #define TDLS_TESTING_CONCURRENT_INIT BIT(7)
  34 #define TDLS_TESTING_NO_TPK_EXPIRATION BIT(8)
  35 #define TDLS_TESTING_DECLINE_RESP BIT(9)
  36 #define TDLS_TESTING_IGNORE_AP_PROHIBIT BIT(10)
  37 #define TDLS_TESTING_WRONG_MIC BIT(11)
  38 #define TDLS_TESTING_DOUBLE_TPK_M2 BIT(12)
  39 unsigned int tdls_testing = 0;
  40 #endif /* CONFIG_TDLS_TESTING */
  41
  42 #define TPK_LIFETIME 43200 /* 12 hours */
  43 #define TPK_M1_RETRY_COUNT 3
  44 #define TPK_M1_TIMEOUT 5000 /* in milliseconds */
  45 #define TPK_M2_RETRY_COUNT 10
  46 #define TPK_M2_TIMEOUT 500 /* in milliseconds */
  47
  48 #define TDLS_MIC_LEN            16
  49
  50 #define TDLS_TIMEOUT_LEN        4
  51
  52 struct wpa_tdls_ftie {
  53         u8 ie_type; /* FTIE */
  54         u8 ie_len;
  55         u8 mic_ctrl[2];
  56         u8 mic[TDLS_MIC_LEN];
  57         u8 Anonce[WPA_NONCE_LEN]; /* Responder Nonce in TDLS */
  58         u8 Snonce[WPA_NONCE_LEN]; /* Initiator Nonce in TDLS */
  59         /* followed by optional elements */
  60 } STRUCT_PACKED;
  61
  62 struct wpa_tdls_timeoutie {
  63         u8 ie_type; /* Timeout IE */
  64         u8 ie_len;
  65         u8 interval_type;
  66         u8 value[TDLS_TIMEOUT_LEN];
  67 } STRUCT_PACKED;
  68
  69 struct wpa_tdls_lnkid {
  70         u8 ie_type; /* Link Identifier IE */
  71         u8 ie_len;
  72         u8 bssid[ETH_ALEN];
  73         u8 init_sta[ETH_ALEN];
  74         u8 resp_sta[ETH_ALEN];
  75 } STRUCT_PACKED;
  76
  77 /* TDLS frame headers as per IEEE Std 802.11z-2010 */
  78 struct wpa_tdls_frame {
  79         u8 payloadtype; /* IEEE80211_TDLS_RFTYPE */
  80         u8 category; /* Category */
  81         u8 action; /* Action (enum tdls_frame_type) */
  82 } STRUCT_PACKED;
  83
  84 static u8 * wpa_add_tdls_timeoutie(u8 *pos, u8 *ie, size_t ie_len, u32 tsecs);
  85 static void wpa_tdls_tpk_retry_timeout(void *eloop_ctx, void *timeout_ctx);
  86 static void wpa_tdls_peer_free(struct wpa_sm *sm, struct wpa_tdls_peer *peer);
  87 static void wpa_tdls_disable_peer_link(struct wpa_sm *sm,
  88                                        struct wpa_tdls_peer *peer);
  89 static int wpa_tdls_send_teardown(struct wpa_sm *sm, const u8 *addr,
  90                                   u16 reason_code);
  91
  92
  93 #define TDLS_MAX_IE_LEN 80
  94 #define IEEE80211_MAX_SUPP_RATES 32
  95
  96 struct wpa_tdls_peer {
  97         struct wpa_tdls_peer *next;
  98         unsigned int reconfig_key:1;
  99         int initiator; /* whether this end was initiator for TDLS setup */
 100         u8 addr[ETH_ALEN]; /* other end MAC address */
 101         u8 inonce[WPA_NONCE_LEN]; /* Initiator Nonce */
 102         u8 rnonce[WPA_NONCE_LEN]; /* Responder Nonce */
 103         u8 rsnie_i[TDLS_MAX_IE_LEN]; /* Initiator RSN IE */
 104         size_t rsnie_i_len;
 105         u8 rsnie_p[TDLS_MAX_IE_LEN]; /* Peer RSN IE */
 106         size_t rsnie_p_len;
 107         u32 lifetime;
 108         int cipher; /* Selected cipher (WPA_CIPHER_*) */
 109         u8 dtoken;
 110
 111         struct tpk {
 112                 u8 kck[16]; /* TPK-KCK */
 113                 u8 tk[16]; /* TPK-TK; assuming only CCMP will be used */
 114         } tpk;
 115         int tpk_set;
 116         int tk_set; /* TPK-TK configured to the driver */
 117         int tpk_success;
 118         int tpk_in_progress;
 119
 120         struct tpk_timer {
 121                 u8 dest[ETH_ALEN];
 122                 int count;      /* Retry Count */
 123                 int timer;      /* Timeout in milliseconds */
 124                 u8 action_code; /* TDLS frame type */
 125                 u8 dialog_token;
 126                 u16 status_code;
 127                 u32 peer_capab;
 128                 int buf_len;    /* length of TPK message for retransmission */
 129                 u8 *buf;        /* buffer for TPK message */
 130         } sm_tmr;
 131
 132         u16 capability;
 133
 134         u8 supp_rates[IEEE80211_MAX_SUPP_RATES];
 135         size_t supp_rates_len;
 136
 137         struct ieee80211_ht_capabilities *ht_capabilities;
 138         struct ieee80211_vht_capabilities *vht_capabilities;
 139
 140         u8 qos_info;
 141
 142         u16 aid;
 143
 144         u8 *ext_capab;
 145         size_t ext_capab_len;
 146
 147         u8 *supp_channels;
 148         size_t supp_channels_len;
 149
 150         u8 *supp_oper_classes;
 151         size_t supp_oper_classes_len;
 152
 153         u8 wmm_capable;
 154
 155         /* channel switch currently enabled */
 156         int chan_switch_enabled;
 157 };
 158
 159
 160 static int wpa_tdls_get_privacy(struct wpa_sm *sm)
 161 {
 162         /*
 163          * Get info needed from supplicant to check if the current BSS supports
 164          * security. Other than OPEN mode, rest are considered secured
 165          * WEP/WPA/WPA2 hence TDLS frames are processed for TPK handshake.
 166          */
 167         return sm->pairwise_cipher != WPA_CIPHER_NONE;
 168 }
 169
 170
 171 static u8 * wpa_add_ie(u8 *pos, const u8 *ie, size_t ie_len)
 172 {
 173         os_memcpy(pos, ie, ie_len);
 174         return pos + ie_len;
 175 }
 176
 177
 178 static int wpa_tdls_del_key(struct wpa_sm *sm, struct wpa_tdls_peer *peer)
 179 {
 180         if (wpa_sm_set_key(sm, WPA_ALG_NONE, peer->addr,
 181                            0, 0, NULL, 0, NULL, 0) < 0) {
 182                 wpa_printf(MSG_WARNING, "TDLS: Failed to delete TPK-TK from "
 183                            "the driver");
 184                 return -1;
 185         }
 186
 187         return 0;
 188 }
 189
 190
 191 static int wpa_tdls_set_key(struct wpa_sm *sm, struct wpa_tdls_peer *peer)
 192 {
 193         u8 key_len;
 194         u8 rsc[6];
 195         enum wpa_alg alg;
 196
 197         if (peer->tk_set) {
 198                 /*
 199                  * This same TPK-TK has already been configured to the driver
 200                  * and this new configuration attempt (likely due to an
 201                  * unexpected retransmitted frame) would result in clearing
 202                  * the TX/RX sequence number which can break security, so must
 203                  * not allow that to happen.
 204                  */
 205                 wpa_printf(MSG_INFO, "TDLS: TPK-TK for the peer " MACSTR
 206                            " has already been configured to the driver - do not reconfigure",
 207                            MAC2STR(peer->addr));
 208                 return -1;
 209         }
 210
 211         os_memset(rsc, 0, 6);
 212
 213         switch (peer->cipher) {
 214         case WPA_CIPHER_CCMP:
 215                 alg = WPA_ALG_CCMP;
 216                 key_len = 16;
 217                 break;
 218         case WPA_CIPHER_NONE:
 219                 wpa_printf(MSG_DEBUG, "TDLS: Pairwise Cipher Suite: "
 220                            "NONE - do not use pairwise keys");
 221                 return -1;
 222         default:
 223                 wpa_printf(MSG_WARNING, "TDLS: Unsupported pairwise cipher %d",
 224                            sm->pairwise_cipher);
 225                 return -1;
 226         }
 227
 228         wpa_printf(MSG_DEBUG, "TDLS: Configure pairwise key for peer " MACSTR,
 229                    MAC2STR(peer->addr));
 230         if (wpa_sm_set_key(sm, alg, peer->addr, -1, 1,
 231                            rsc, sizeof(rsc), peer->tpk.tk, key_len) < 0) {
 232                 wpa_printf(MSG_WARNING, "TDLS: Failed to set TPK to the "
 233                            "driver");
 234                 return -1;
 235         }
 236         peer->tk_set = 1;
 237         return 0;
 238 }
 239
 240
 241 static int wpa_tdls_send_tpk_msg(struct wpa_sm *sm, const u8 *dst,
 242                                  u8 action_code, u8 dialog_token,
 243                                  u16 status_code, u32 peer_capab,
 244                                  int initiator, const u8 *buf, size_t len)
 245 {
 246         return wpa_sm_send_tdls_mgmt(sm, dst, action_code, dialog_token,
 247                                      status_code, peer_capab, initiator, buf,
 248                                      len);
 249 }
 250
 251
 252 static int wpa_tdls_tpk_send(struct wpa_sm *sm, const u8 *dest, u8 action_code,
 253                              u8 dialog_token, u16 status_code, u32 peer_capab,
 254                              int initiator, const u8 *msg, size_t msg_len)
 255 {
 256         struct wpa_tdls_peer *peer;
 257
 258         wpa_printf(MSG_DEBUG, "TDLS: TPK send dest=" MACSTR " action_code=%u "
 259                    "dialog_token=%u status_code=%u peer_capab=%u initiator=%d "
 260                    "msg_len=%u",
 261                    MAC2STR(dest), action_code, dialog_token, status_code,
 262                    peer_capab, initiator, (unsigned int) msg_len);
 263
 264         if (wpa_tdls_send_tpk_msg(sm, dest, action_code, dialog_token,
 265                                   status_code, peer_capab, initiator, msg,
 266                                   msg_len)) {
 267                 wpa_printf(MSG_INFO, "TDLS: Failed to send message "
 268                            "(action_code=%u)", action_code);
 269                 return -1;
 270         }
 271
 272         if (action_code == WLAN_TDLS_SETUP_CONFIRM ||
 273             action_code == WLAN_TDLS_TEARDOWN ||
 274             action_code == WLAN_TDLS_DISCOVERY_REQUEST ||
 275             action_code == WLAN_TDLS_DISCOVERY_RESPONSE)
 276                 return 0; /* No retries */
 277
 278         for (peer = sm->tdls; peer; peer = peer->next) {
 279                 if (os_memcmp(peer->addr, dest, ETH_ALEN) == 0)
 280                         break;
 281         }
 282
 283         if (peer == NULL) {
 284                 wpa_printf(MSG_INFO, "TDLS: No matching entry found for "
 285                            "retry " MACSTR, MAC2STR(dest));
 286                 return 0;
 287         }
 288
 289         eloop_cancel_timeout(wpa_tdls_tpk_retry_timeout, sm, peer);
 290
 291         if (action_code == WLAN_TDLS_SETUP_RESPONSE) {
 292                 peer->sm_tmr.count = TPK_M2_RETRY_COUNT;
 293                 peer->sm_tmr.timer = TPK_M2_TIMEOUT;
 294         } else {
 295                 peer->sm_tmr.count = TPK_M1_RETRY_COUNT;
 296                 peer->sm_tmr.timer = TPK_M1_TIMEOUT;
 297         }
 298
 299         /* Copy message to resend on timeout */
 300         os_memcpy(peer->sm_tmr.dest, dest, ETH_ALEN);
 301         peer->sm_tmr.action_code = action_code;
 302         peer->sm_tmr.dialog_token = dialog_token;
 303         peer->sm_tmr.status_code = status_code;
 304         peer->sm_tmr.peer_capab = peer_capab;
 305         peer->sm_tmr.buf_len = msg_len;
 306         os_free(peer->sm_tmr.buf);
 307         peer->sm_tmr.buf = os_memdup(msg, msg_len);
 308         if (peer->sm_tmr.buf == NULL)
 309                 return -1;
 310
 311         wpa_printf(MSG_DEBUG, "TDLS: Retry timeout registered "
 312                    "(action_code=%u)", action_code);
 313         eloop_register_timeout(peer->sm_tmr.timer / 1000,
 314                                (peer->sm_tmr.timer % 1000) * 1000,
 315                                wpa_tdls_tpk_retry_timeout, sm, peer);
 316         return 0;
 317 }
 318
 319
 320 static int wpa_tdls_do_teardown(struct wpa_sm *sm, struct wpa_tdls_peer *peer,
 321                                 u16 reason_code)
 322 {
 323         int ret;
 324
 325         ret = wpa_tdls_send_teardown(sm, peer->addr, reason_code);
 326         /* disable the link after teardown was sent */
 327         wpa_tdls_disable_peer_link(sm, peer);
 328
 329         return ret;
 330 }
 331
 332
 333 static void wpa_tdls_tpk_retry_timeout(void *eloop_ctx, void *timeout_ctx)
 334 {
 335
 336         struct wpa_sm *sm = eloop_ctx;
 337         struct wpa_tdls_peer *peer = timeout_ctx;
 338
 339         if (peer->sm_tmr.count) {
 340                 peer->sm_tmr.count--;
 341
 342                 wpa_printf(MSG_INFO, "TDLS: Retrying sending of message "
 343                            "(action_code=%u)",
 344                            peer->sm_tmr.action_code);
 345
 346                 if (peer->sm_tmr.buf == NULL) {
 347                         wpa_printf(MSG_INFO, "TDLS: No retry buffer available "
 348                                    "for action_code=%u",
 349                                    peer->sm_tmr.action_code);
 350                         eloop_cancel_timeout(wpa_tdls_tpk_retry_timeout, sm,
 351                                              peer);
 352                         return;
 353                 }
 354
 355                 /* resend TPK Handshake Message to Peer */
 356                 if (wpa_tdls_send_tpk_msg(sm, peer->sm_tmr.dest,
 357                                           peer->sm_tmr.action_code,
 358                                           peer->sm_tmr.dialog_token,
 359                                           peer->sm_tmr.status_code,
 360                                           peer->sm_tmr.peer_capab,
 361                                           peer->initiator,
 362                                           peer->sm_tmr.buf,
 363                                           peer->sm_tmr.buf_len)) {
 364                         wpa_printf(MSG_INFO, "TDLS: Failed to retry "
 365                                    "transmission");
 366                 }
 367
 368                 eloop_cancel_timeout(wpa_tdls_tpk_retry_timeout, sm, peer);
 369                 eloop_register_timeout(peer->sm_tmr.timer / 1000,
 370                                        (peer->sm_tmr.timer % 1000) * 1000,
 371                                        wpa_tdls_tpk_retry_timeout, sm, peer);
 372         } else {
 373                 eloop_cancel_timeout(wpa_tdls_tpk_retry_timeout, sm, peer);
 374
 375                 wpa_printf(MSG_DEBUG, "TDLS: Sending Teardown Request");
 376                 wpa_tdls_do_teardown(sm, peer,
 377                                      WLAN_REASON_TDLS_TEARDOWN_UNSPECIFIED);
 378         }
 379 }
 380
 381
 382 static void wpa_tdls_tpk_retry_timeout_cancel(struct wpa_sm *sm,
 383                                               struct wpa_tdls_peer *peer,
 384                                               u8 action_code)
 385 {
 386         if (action_code == peer->sm_tmr.action_code) {
 387                 wpa_printf(MSG_DEBUG, "TDLS: Retry timeout cancelled for "
 388                            "action_code=%u", action_code);
 389
 390                 /* Cancel Timeout registered */
 391                 eloop_cancel_timeout(wpa_tdls_tpk_retry_timeout, sm, peer);
 392
 393                 /* free all resources meant for retry */
 394                 os_free(peer->sm_tmr.buf);
 395                 peer->sm_tmr.buf = NULL;
 396
 397                 peer->sm_tmr.count = 0;
 398                 peer->sm_tmr.timer = 0;
 399                 peer->sm_tmr.buf_len = 0;
 400                 peer->sm_tmr.action_code = 0xff;
 401         } else {
 402                 wpa_printf(MSG_INFO, "TDLS: Error in cancelling retry timeout "
 403                            "(Unknown action_code=%u)", action_code);
 404         }
 405 }
 406
 407
 408 static void wpa_tdls_generate_tpk(struct wpa_tdls_peer *peer,
 409                                   const u8 *own_addr, const u8 *bssid)
 410 {
 411         u8 key_input[SHA256_MAC_LEN];
 412         const u8 *nonce[2];
 413         size_t len[2];
 414         u8 data[3 * ETH_ALEN];
 415
 416         /* IEEE Std 802.11-2016 12.7.9.2:
 417          * TPK-Key-Input = Hash(min(SNonce, ANonce) || max(SNonce, ANonce))
 418          * Hash = SHA-256 for TDLS
 419          */
 420         len[0] = WPA_NONCE_LEN;
 421         len[1] = WPA_NONCE_LEN;
 422         if (os_memcmp(peer->inonce, peer->rnonce, WPA_NONCE_LEN) < 0) {
 423                 nonce[0] = peer->inonce;
 424                 nonce[1] = peer->rnonce;
 425         } else {
 426                 nonce[0] = peer->rnonce;
 427                 nonce[1] = peer->inonce;
 428         }
 429         wpa_hexdump(MSG_DEBUG, "TDLS: min(Nonce)", nonce[0], WPA_NONCE_LEN);
 430         wpa_hexdump(MSG_DEBUG, "TDLS: max(Nonce)", nonce[1], WPA_NONCE_LEN);
 431         sha256_vector(2, nonce, len, key_input);
 432         wpa_hexdump_key(MSG_DEBUG, "TDLS: TPK-Key-Input",
 433                         key_input, SHA256_MAC_LEN);
 434
 435         /*
 436          * TPK = KDF-Hash-Length(TPK-Key-Input, "TDLS PMK",
 437          *      min(MAC_I, MAC_R) || max(MAC_I, MAC_R) || BSSID)
 438          */
 439
 440         if (os_memcmp(own_addr, peer->addr, ETH_ALEN) < 0) {
 441                 os_memcpy(data, own_addr, ETH_ALEN);
 442                 os_memcpy(data + ETH_ALEN, peer->addr, ETH_ALEN);
 443         } else {
 444                 os_memcpy(data, peer->addr, ETH_ALEN);
 445                 os_memcpy(data + ETH_ALEN, own_addr, ETH_ALEN);
 446         }
 447         os_memcpy(data + 2 * ETH_ALEN, bssid, ETH_ALEN);
 448         wpa_hexdump(MSG_DEBUG, "TDLS: KDF Context", data, sizeof(data));
 449
 450         sha256_prf(key_input, SHA256_MAC_LEN, "TDLS PMK", data, sizeof(data),
 451                    (u8 *) &peer->tpk, sizeof(peer->tpk));
 452         wpa_hexdump_key(MSG_DEBUG, "TDLS: TPK-KCK",
 453                         peer->tpk.kck, sizeof(peer->tpk.kck));
 454         wpa_hexdump_key(MSG_DEBUG, "TDLS: TPK-TK",
 455                         peer->tpk.tk, sizeof(peer->tpk.tk));
 456         peer->tpk_set = 1;
 457 }
 458
 459
 460 /**
 461  * wpa_tdls_ftie_mic - Calculate TDLS FTIE MIC
 462  * @kck: TPK-KCK
 463  * @lnkid: Pointer to the beginning of Link Identifier IE
 464  * @rsnie: Pointer to the beginning of RSN IE used for handshake
 465  * @timeoutie: Pointer to the beginning of Timeout IE used for handshake
 466  * @ftie: Pointer to the beginning of FT IE
 467  * @mic: Pointer for writing MIC
 468  *
 469  * Calculate MIC for TDLS frame.
 470  */
 471 static int wpa_tdls_ftie_mic(const u8 *kck, u8 trans_seq, const u8 *lnkid,
 472                              const u8 *rsnie, const u8 *timeoutie,
 473                              const u8 *ftie, u8 *mic)
 474 {
 475         u8 *buf, *pos;
 476         struct wpa_tdls_ftie *_ftie;
 477         const struct wpa_tdls_lnkid *_lnkid;
 478         int ret;
 479         int len = 2 * ETH_ALEN + 1 + 2 + lnkid[1] + 2 + rsnie[1] +
 480                 2 + timeoutie[1] + 2 + ftie[1];
 481         buf = os_zalloc(len);
 482         if (!buf) {
 483                 wpa_printf(MSG_WARNING, "TDLS: No memory for MIC calculation");
 484                 return -1;
 485         }
 486
 487         pos = buf;
 488         _lnkid = (const struct wpa_tdls_lnkid *) lnkid;
 489         /* 1) TDLS initiator STA MAC address */
 490         os_memcpy(pos, _lnkid->init_sta, ETH_ALEN);
 491         pos += ETH_ALEN;
 492         /* 2) TDLS responder STA MAC address */
 493         os_memcpy(pos, _lnkid->resp_sta, ETH_ALEN);
 494         pos += ETH_ALEN;
 495         /* 3) Transaction Sequence number */
 496         *pos++ = trans_seq;
 497         /* 4) Link Identifier IE */
 498         os_memcpy(pos, lnkid, 2 + lnkid[1]);
 499         pos += 2 + lnkid[1];
 500         /* 5) RSN IE */
 501         os_memcpy(pos, rsnie, 2 + rsnie[1]);
 502         pos += 2 + rsnie[1];
 503         /* 6) Timeout Interval IE */
 504         os_memcpy(pos, timeoutie, 2 + timeoutie[1]);
 505         pos += 2 + timeoutie[1];
 506         /* 7) FTIE, with the MIC field of the FTIE set to 0 */
 507         os_memcpy(pos, ftie, 2 + ftie[1]);
 508         _ftie = (struct wpa_tdls_ftie *) pos;
 509         os_memset(_ftie->mic, 0, TDLS_MIC_LEN);
 510         pos += 2 + ftie[1];
 511
 512         wpa_hexdump(MSG_DEBUG, "TDLS: Data for FTIE MIC", buf, pos - buf);
 513         wpa_hexdump_key(MSG_DEBUG, "TDLS: KCK", kck, 16);
 514         ret = omac1_aes_128(kck, buf, pos - buf, mic);
 515         os_free(buf);
 516         wpa_hexdump(MSG_DEBUG, "TDLS: FTIE MIC", mic, 16);
 517         return ret;
 518 }
 519
 520
 521 /**
 522  * wpa_tdls_key_mic_teardown - Calculate TDLS FTIE MIC for Teardown frame
 523  * @kck: TPK-KCK
 524  * @trans_seq: Transaction Sequence Number (4 - Teardown)
 525  * @rcode: Reason code for Teardown
 526  * @dtoken: Dialog Token used for that particular link
 527  * @lnkid: Pointer to the beginning of Link Identifier IE
 528  * @ftie: Pointer to the beginning of FT IE
 529  * @mic: Pointer for writing MIC
 530  *
 531  * Calculate MIC for TDLS frame.
 532  */
 533 static int wpa_tdls_key_mic_teardown(const u8 *kck, u8 trans_seq, u16 rcode,
 534                                      u8 dtoken, const u8 *lnkid,
 535                                      const u8 *ftie, u8 *mic)
 536 {
 537         u8 *buf, *pos;
 538         struct wpa_tdls_ftie *_ftie;
 539         int ret;
 540         int len;
 541
 542         if (lnkid == NULL)
 543                 return -1;
 544
 545         len = 2 + lnkid[1] + sizeof(rcode) + sizeof(dtoken) +
 546                 sizeof(trans_seq) + 2 + ftie[1];
 547
 548         buf = os_zalloc(len);
 549         if (!buf) {
 550                 wpa_printf(MSG_WARNING, "TDLS: No memory for MIC calculation");
 551                 return -1;
 552         }
 553
 554         pos = buf;
 555         /* 1) Link Identifier IE */
 556         os_memcpy(pos, lnkid, 2 + lnkid[1]);
 557         pos += 2 + lnkid[1];
 558         /* 2) Reason Code */
 559         WPA_PUT_LE16(pos, rcode);
 560         pos += sizeof(rcode);
 561         /* 3) Dialog token */
 562         *pos++ = dtoken;
 563         /* 4) Transaction Sequence number */
 564         *pos++ = trans_seq;
 565         /* 7) FTIE, with the MIC field of the FTIE set to 0 */
 566         os_memcpy(pos, ftie, 2 + ftie[1]);
 567         _ftie = (struct wpa_tdls_ftie *) pos;
 568         os_memset(_ftie->mic, 0, TDLS_MIC_LEN);
 569         pos += 2 + ftie[1];
 570
 571         wpa_hexdump(MSG_DEBUG, "TDLS: Data for FTIE MIC", buf, pos - buf);
 572         wpa_hexdump_key(MSG_DEBUG, "TDLS: KCK", kck, 16);
 573         ret = omac1_aes_128(kck, buf, pos - buf, mic);
 574         os_free(buf);
 575         wpa_hexdump(MSG_DEBUG, "TDLS: FTIE MIC", mic, 16);
 576         return ret;
 577 }
 578
 579
 580 static int wpa_supplicant_verify_tdls_mic(u8 trans_seq,
 581                                           struct wpa_tdls_peer *peer,
 582                                           const u8 *lnkid, const u8 *timeoutie,
 583                                           const struct wpa_tdls_ftie *ftie)
 584 {
 585         u8 mic[16];
 586
 587         if (peer->tpk_set) {
 588                 wpa_tdls_ftie_mic(peer->tpk.kck, trans_seq, lnkid,
 589                                   peer->rsnie_p, timeoutie, (u8 *) ftie,
 590                                   mic);
 591                 if (os_memcmp_const(mic, ftie->mic, 16) != 0) {
 592                         wpa_printf(MSG_INFO, "TDLS: Invalid MIC in FTIE - "
 593                                    "dropping packet");
 594                         wpa_hexdump(MSG_DEBUG, "TDLS: Received MIC",
 595                                     ftie->mic, 16);
 596                         wpa_hexdump(MSG_DEBUG, "TDLS: Calculated MIC",
 597                                     mic, 16);
 598                         return -1;
 599                 }
 600         } else {
 601                 wpa_printf(MSG_WARNING, "TDLS: Could not verify TDLS MIC, "
 602                            "TPK not set - dropping packet");
 603                 return -1;
 604         }
 605         return 0;
 606 }
 607
 608
 609 static int wpa_supplicant_verify_tdls_mic_teardown(
 610         u8 trans_seq, u16 rcode, u8 dtoken, struct wpa_tdls_peer *peer,
 611         const u8 *lnkid, const struct wpa_tdls_ftie *ftie)
 612 {
 613         u8 mic[16];
 614
 615         if (peer->tpk_set) {
 616                 wpa_tdls_key_mic_teardown(peer->tpk.kck, trans_seq, rcode,
 617                                           dtoken, lnkid, (u8 *) ftie, mic);
 618                 if (os_memcmp_const(mic, ftie->mic, 16) != 0) {
 619                         wpa_printf(MSG_INFO, "TDLS: Invalid MIC in Teardown - "
 620                                    "dropping packet");
 621                         return -1;
 622                 }
 623         } else {
 624                 wpa_printf(MSG_INFO, "TDLS: Could not verify TDLS Teardown "
 625                            "MIC, TPK not set - dropping packet");
 626                 return -1;
 627         }
 628         return 0;
 629 }
 630
 631
 632 static void wpa_tdls_tpk_timeout(void *eloop_ctx, void *timeout_ctx)
 633 {
 634         struct wpa_sm *sm = eloop_ctx;
 635         struct wpa_tdls_peer *peer = timeout_ctx;
 636
 637         /*
 638          * On TPK lifetime expiration, we have an option of either tearing down
 639          * the direct link or trying to re-initiate it. The selection of what
 640          * to do is not strictly speaking controlled by our role in the expired
 641          * link, but for now, use that to select whether to renew or tear down
 642          * the link.
 643          */
 644
 645         if (peer->initiator) {
 646                 u8 addr[ETH_ALEN];
 647
 648                 wpa_printf(MSG_DEBUG, "TDLS: TPK lifetime expired for " MACSTR
 649                            " - try to renew", MAC2STR(peer->addr));
 650                 /* cache the peer address before do_teardown */
 651                 os_memcpy(addr, peer->addr, ETH_ALEN);
 652                 wpa_tdls_do_teardown(sm, peer,
 653                                      WLAN_REASON_TDLS_TEARDOWN_UNSPECIFIED);
 654                 wpa_tdls_start(sm, addr);
 655         } else {
 656                 wpa_printf(MSG_DEBUG, "TDLS: TPK lifetime expired for " MACSTR
 657                            " - tear down", MAC2STR(peer->addr));
 658                 wpa_tdls_do_teardown(sm, peer,
 659                                      WLAN_REASON_TDLS_TEARDOWN_UNSPECIFIED);
 660         }
 661 }
 662
 663
 664 static void wpa_tdls_peer_remove_from_list(struct wpa_sm *sm,
 665                                            struct wpa_tdls_peer *peer)
 666 {
 667         struct wpa_tdls_peer *cur, *prev;
 668
 669         cur = sm->tdls;
 670         prev = NULL;
 671         while (cur && cur != peer) {
 672                 prev = cur;
 673                 cur = cur->next;
 674         }
 675
 676         if (cur != peer) {
 677                 wpa_printf(MSG_ERROR, "TDLS: Could not find peer " MACSTR
 678                            " to remove it from the list",
 679                            MAC2STR(peer->addr));
 680                 return;
 681         }
 682
 683         if (prev)
 684                 prev->next = peer->next;
 685         else
 686                 sm->tdls = peer->next;
 687 }
 688
 689
 690 static void wpa_tdls_peer_clear(struct wpa_sm *sm, struct wpa_tdls_peer *peer)
 691 {
 692         wpa_printf(MSG_DEBUG, "TDLS: Clear state for peer " MACSTR,
 693                    MAC2STR(peer->addr));
 694         eloop_cancel_timeout(wpa_tdls_tpk_timeout, sm, peer);
 695         eloop_cancel_timeout(wpa_tdls_tpk_retry_timeout, sm, peer);
 696         peer->reconfig_key = 0;
 697         peer->initiator = 0;
 698         peer->tpk_in_progress = 0;
 699         os_free(peer->sm_tmr.buf);
 700         peer->sm_tmr.buf = NULL;
 701         os_free(peer->ht_capabilities);
 702         peer->ht_capabilities = NULL;
 703         os_free(peer->vht_capabilities);
 704         peer->vht_capabilities = NULL;
 705         os_free(peer->ext_capab);
 706         peer->ext_capab = NULL;
 707         os_free(peer->supp_channels);
 708         peer->supp_channels = NULL;
 709         os_free(peer->supp_oper_classes);
 710         peer->supp_oper_classes = NULL;
 711         peer->rsnie_i_len = peer->rsnie_p_len = 0;
 712         peer->cipher = 0;
 713         peer->qos_info = 0;
 714         peer->wmm_capable = 0;
 715         peer->tk_set = peer->tpk_set = peer->tpk_success = 0;
 716         peer->chan_switch_enabled = 0;
 717         os_memset(&peer->tpk, 0, sizeof(peer->tpk));
 718         os_memset(peer->inonce, 0, WPA_NONCE_LEN);
 719         os_memset(peer->rnonce, 0, WPA_NONCE_LEN);
 720 }
 721
 722
 723 static void wpa_tdls_peer_free(struct wpa_sm *sm, struct wpa_tdls_peer *peer)
 724 {
 725         wpa_tdls_peer_clear(sm, peer);
 726         wpa_tdls_peer_remove_from_list(sm, peer);
 727         os_free(peer);
 728 }
 729
 730
 731 static void wpa_tdls_linkid(struct wpa_sm *sm, struct wpa_tdls_peer *peer,
 732                             struct wpa_tdls_lnkid *lnkid)
 733 {
 734         lnkid->ie_type = WLAN_EID_LINK_ID;
 735         lnkid->ie_len = 3 * ETH_ALEN;
 736         os_memcpy(lnkid->bssid, sm->bssid, ETH_ALEN);
 737         if (peer->initiator) {
 738                 os_memcpy(lnkid->init_sta, sm->own_addr, ETH_ALEN);
 739                 os_memcpy(lnkid->resp_sta, peer->addr, ETH_ALEN);
 740         } else {
 741                 os_memcpy(lnkid->init_sta, peer->addr, ETH_ALEN);
 742                 os_memcpy(lnkid->resp_sta, sm->own_addr, ETH_ALEN);
 743         }
 744 }
 745
 746
 747 static int wpa_tdls_send_teardown(struct wpa_sm *sm, const u8 *addr,
 748                                   u16 reason_code)
 749 {
 750         struct wpa_tdls_peer *peer;
 751         struct wpa_tdls_ftie *ftie;
 752         struct wpa_tdls_lnkid lnkid;
 753         u8 dialog_token;
 754         u8 *rbuf, *pos;
 755         int ielen;
 756
 757         if (sm->tdls_disabled || !sm->tdls_supported)
 758                 return -1;
 759
 760         /* Find the node and free from the list */
 761         for (peer = sm->tdls; peer; peer = peer->next) {
 762                 if (os_memcmp(peer->addr, addr, ETH_ALEN) == 0)
 763                         break;
 764         }
 765
 766         if (peer == NULL) {
 767                 wpa_printf(MSG_INFO, "TDLS: No matching entry found for "
 768                            "Teardown " MACSTR, MAC2STR(addr));
 769                 return 0;
 770         }
 771
 772         /* Cancel active channel switch before teardown */
 773         if (peer->chan_switch_enabled) {
 774                 wpa_printf(MSG_DEBUG, "TDLS: First returning link with " MACSTR
 775                            " to base channel", MAC2STR(addr));
 776                 wpa_sm_tdls_disable_channel_switch(sm, peer->addr);
 777         }
 778
 779         dialog_token = peer->dtoken;
 780
 781         wpa_printf(MSG_DEBUG, "TDLS: TDLS Teardown for " MACSTR,
 782                    MAC2STR(addr));
 783
 784         ielen = 0;
 785         if (wpa_tdls_get_privacy(sm) && peer->tpk_set && peer->tpk_success) {
 786                 /* To add FTIE for Teardown request and compute MIC */
 787                 ielen += sizeof(*ftie);
 788 #ifdef CONFIG_TDLS_TESTING
 789                 if (tdls_testing & TDLS_TESTING_LONG_FRAME)
 790                         ielen += 170;
 791 #endif /* CONFIG_TDLS_TESTING */
 792         }
 793
 794         rbuf = os_zalloc(ielen + 1);
 795         if (rbuf == NULL)
 796                 return -1;
 797         pos = rbuf;
 798
 799         if (!wpa_tdls_get_privacy(sm) || !peer->tpk_set || !peer->tpk_success)
 800                 goto skip_ies;
 801
 802         ftie = (struct wpa_tdls_ftie *) pos;
 803         ftie->ie_type = WLAN_EID_FAST_BSS_TRANSITION;
 804         /* Using the recent nonce which should be for CONFIRM frame */
 805         os_memcpy(ftie->Anonce, peer->rnonce, WPA_NONCE_LEN);
 806         os_memcpy(ftie->Snonce, peer->inonce, WPA_NONCE_LEN);
 807         ftie->ie_len = sizeof(struct wpa_tdls_ftie) - 2;
 808         pos = (u8 *) (ftie + 1);
 809 #ifdef CONFIG_TDLS_TESTING
 810         if (tdls_testing & TDLS_TESTING_LONG_FRAME) {
 811                 wpa_printf(MSG_DEBUG, "TDLS: Testing - add extra subelem to "
 812                            "FTIE");
 813                 ftie->ie_len += 170;
 814                 *pos++ = 255; /* FTIE subelem */
 815                 *pos++ = 168; /* FTIE subelem length */
 816                 pos += 168;
 817         }
 818 #endif /* CONFIG_TDLS_TESTING */
 819         wpa_hexdump(MSG_DEBUG, "TDLS: FTIE for TDLS Teardown handshake",
 820                     (u8 *) ftie, pos - (u8 *) ftie);
 821
 822         /* compute MIC before sending */
 823         wpa_tdls_linkid(sm, peer, &lnkid);
 824         wpa_tdls_key_mic_teardown(peer->tpk.kck, 4, reason_code,
 825                                   dialog_token, (u8 *) &lnkid, (u8 *) ftie,
 826                                   ftie->mic);
 827
 828 skip_ies:
 829         /* TODO: register for a Timeout handler, if Teardown is not received at
 830          * the other end, then try again another time */
 831
 832         /* request driver to send Teardown using this FTIE */
 833         wpa_tdls_tpk_send(sm, addr, WLAN_TDLS_TEARDOWN, 0,
 834                           reason_code, 0, peer->initiator, rbuf, pos - rbuf);
 835         os_free(rbuf);
 836
 837         return 0;
 838 }
 839
 840
 841 int wpa_tdls_teardown_link(struct wpa_sm *sm, const u8 *addr, u16 reason_code)
 842 {
 843         struct wpa_tdls_peer *peer;
 844
 845         if (sm->tdls_disabled || !sm->tdls_supported)
 846                 return -1;
 847
 848         for (peer = sm->tdls; peer; peer = peer->next) {
 849                 if (os_memcmp(peer->addr, addr, ETH_ALEN) == 0)
 850                         break;
 851         }
 852
 853         if (peer == NULL) {
 854                 wpa_printf(MSG_DEBUG, "TDLS: Could not find peer " MACSTR
 855                    " for link Teardown", MAC2STR(addr));
 856                 return -1;
 857         }
 858
 859         if (!peer->tpk_success) {
 860                 wpa_printf(MSG_DEBUG, "TDLS: Peer " MACSTR
 861                    " not connected - cannot Teardown link", MAC2STR(addr));
 862                 return -1;
 863         }
 864
 865         return wpa_tdls_do_teardown(sm, peer, reason_code);
 866 }
 867
 868
 869 static void wpa_tdls_disable_peer_link(struct wpa_sm *sm,
 870                                        struct wpa_tdls_peer *peer)
 871 {
 872         wpa_sm_tdls_oper(sm, TDLS_DISABLE_LINK, peer->addr);
 873         wpa_tdls_peer_free(sm, peer);
 874 }
 875
 876
 877 void wpa_tdls_disable_unreachable_link(struct wpa_sm *sm, const u8 *addr)
 878 {
 879         struct wpa_tdls_peer *peer;
 880
 881         for (peer = sm->tdls; peer; peer = peer->next) {
 882                 if (os_memcmp(peer->addr, addr, ETH_ALEN) == 0)
 883                         break;
 884         }
 885
 886         if (!peer || !peer->tpk_success) {
 887                 wpa_printf(MSG_DEBUG, "TDLS: Peer " MACSTR
 888                            " not connected - cannot teardown unreachable link",
 889                            MAC2STR(addr));
 890                 return;
 891         }
 892
 893         if (wpa_tdls_is_external_setup(sm)) {
 894                 /*
 895                  * Get us on the base channel, disable the link, send a
 896                  * teardown packet through the AP, and then reset link data.
 897                  */
 898                 if (peer->chan_switch_enabled)
 899                         wpa_sm_tdls_disable_channel_switch(sm, peer->addr);
 900                 wpa_sm_tdls_oper(sm, TDLS_DISABLE_LINK, addr);
 901                 wpa_tdls_send_teardown(sm, addr,
 902                                        WLAN_REASON_TDLS_TEARDOWN_UNREACHABLE);
 903                 wpa_tdls_peer_free(sm, peer);
 904         } else {
 905                 wpa_tdls_disable_peer_link(sm, peer);
 906         }
 907 }
 908
 909
 910 const char * wpa_tdls_get_link_status(struct wpa_sm *sm, const u8 *addr)
 911 {
 912         struct wpa_tdls_peer *peer;
 913
 914         if (sm->tdls_disabled || !sm->tdls_supported)
 915                 return "disabled";
 916
 917         for (peer = sm->tdls; peer; peer = peer->next) {
 918                 if (os_memcmp(peer->addr, addr, ETH_ALEN) == 0)
 919                         break;
 920         }
 921
 922         if (peer == NULL)
 923                 return "peer does not exist";
 924
 925         if (!peer->tpk_success)
 926                 return "peer not connected";
 927
 928         return "connected";
 929 }
 930
 931
 932 static int wpa_tdls_recv_teardown(struct wpa_sm *sm, const u8 *src_addr,
 933                                   const u8 *buf, size_t len)
 934 {
 935         struct wpa_tdls_peer *peer = NULL;
 936         struct wpa_tdls_ftie *ftie;
 937         struct wpa_tdls_lnkid *lnkid;
 938         struct wpa_eapol_ie_parse kde;
 939         u16 reason_code;
 940         const u8 *pos;
 941         int ielen;
 942
 943         /* Find the node and free from the list */
 944         for (peer = sm->tdls; peer; peer = peer->next) {
 945                 if (os_memcmp(peer->addr, src_addr, ETH_ALEN) == 0)
 946                         break;
 947         }
 948
 949         if (peer == NULL) {
 950                 wpa_printf(MSG_INFO, "TDLS: No matching entry found for "
 951                            "Teardown " MACSTR, MAC2STR(src_addr));
 952                 return 0;
 953         }
 954
 955         pos = buf;
 956         pos += 1 /* pkt_type */ + 1 /* Category */ + 1 /* Action */;
 957
 958         reason_code = WPA_GET_LE16(pos);
 959         pos += 2;
 960
 961         wpa_printf(MSG_DEBUG, "TDLS: TDLS Teardown Request from " MACSTR
 962                    " (reason code %u)", MAC2STR(src_addr), reason_code);
 963
 964         ielen = len - (pos - buf); /* start of IE in buf */
 965
 966         /*
 967          * Don't reject the message if failing to parse IEs. The IEs we need are
 968          * explicitly checked below. Some APs may add arbitrary padding to the
 969          * end of short TDLS frames and that would look like invalid IEs.
 970          */
 971         if (wpa_supplicant_parse_ies((const u8 *) pos, ielen, &kde) < 0)
 972                 wpa_printf(MSG_DEBUG,
 973                            "TDLS: Failed to parse IEs in Teardown - ignore as an interop workaround");
 974
 975         if (kde.lnkid == NULL || kde.lnkid_len < 3 * ETH_ALEN) {
 976                 wpa_printf(MSG_INFO, "TDLS: No Link Identifier IE in TDLS "
 977                            "Teardown");
 978                 return -1;
 979         }
 980         lnkid = (struct wpa_tdls_lnkid *) kde.lnkid;
 981
 982         if (!wpa_tdls_get_privacy(sm) || !peer->tpk_set || !peer->tpk_success)
 983                 goto skip_ftie;
 984
 985         if (kde.ftie == NULL || kde.ftie_len < sizeof(*ftie)) {
 986                 wpa_printf(MSG_INFO, "TDLS: No FTIE in TDLS Teardown");
 987                 return -1;
 988         }
 989
 990         ftie = (struct wpa_tdls_ftie *) kde.ftie;
 991
 992         /* Process MIC check to see if TDLS Teardown is right */
 993         if (wpa_supplicant_verify_tdls_mic_teardown(4, reason_code,
 994                                                     peer->dtoken, peer,
 995                                                     (u8 *) lnkid, ftie) < 0) {
 996                 wpa_printf(MSG_DEBUG, "TDLS: MIC failure for TDLS "
 997                            "Teardown Request from " MACSTR, MAC2STR(src_addr));
 998                 return -1;
 999         }
1000
1001 skip_ftie:
1002         /*
1003          * Request the driver to disable the direct link and clear associated
1004          * keys.
1005          */
1006         wpa_tdls_disable_peer_link(sm, peer);
1007         return 0;
1008 }
1009
1010
1011 /**
1012  * wpa_tdls_send_error - To send suitable TDLS status response with
1013  *      appropriate status code mentioning reason for error/failure.
1014  * @dst         - MAC addr of Peer station
1015  * @tdls_action - TDLS frame type for which error code is sent
1016  * @initiator   - was this end the initiator of the connection
1017  * @status      - status code mentioning reason
1018  */
1019
1020 static int wpa_tdls_send_error(struct wpa_sm *sm, const u8 *dst,
1021                                u8 tdls_action, u8 dialog_token, int initiator,
1022                                u16 status)
1023 {
1024         wpa_printf(MSG_DEBUG, "TDLS: Sending error to " MACSTR
1025                    " (action=%u status=%u)",
1026                    MAC2STR(dst), tdls_action, status);
1027         return wpa_tdls_tpk_send(sm, dst, tdls_action, dialog_token, status,
1028                                  0, initiator, NULL, 0);
1029 }
1030
1031
1032 static struct wpa_tdls_peer *
1033 wpa_tdls_add_peer(struct wpa_sm *sm, const u8 *addr, int *existing)
1034 {
1035         struct wpa_tdls_peer *peer;
1036
1037         if (existing)
1038                 *existing = 0;
1039         for (peer = sm->tdls; peer; peer = peer->next) {
1040                 if (os_memcmp(peer->addr, addr, ETH_ALEN) == 0) {
1041                         if (existing)
1042                                 *existing = 1;
1043                         return peer; /* re-use existing entry */
1044                 }
1045         }
1046
1047         wpa_printf(MSG_INFO, "TDLS: Creating peer entry for " MACSTR,
1048                    MAC2STR(addr));
1049
1050         peer = os_zalloc(sizeof(*peer));
1051         if (peer == NULL)
1052                 return NULL;
1053
1054         os_memcpy(peer->addr, addr, ETH_ALEN);
1055         peer->next = sm->tdls;
1056         sm->tdls = peer;
1057
1058         return peer;
1059 }
1060
1061
1062 static int wpa_tdls_send_tpk_m1(struct wpa_sm *sm,
1063                                 struct wpa_tdls_peer *peer)
1064 {
1065         size_t buf_len;
1066         struct wpa_tdls_timeoutie timeoutie;
1067         u16 rsn_capab;
1068         struct wpa_tdls_ftie *ftie;
1069         u8 *rbuf, *pos, *count_pos;
1070         u16 count;
1071         struct rsn_ie_hdr *hdr;
1072         int status;
1073
1074         if (!wpa_tdls_get_privacy(sm)) {
1075                 wpa_printf(MSG_DEBUG, "TDLS: No security used on the link");
1076                 peer->rsnie_i_len = 0;
1077                 goto skip_rsnie;
1078         }
1079
1080         /*
1081          * TPK Handshake Message 1:
1082          * FTIE: ANonce=0, SNonce=initiator nonce MIC=0, DataKDs=(RSNIE_I,
1083          * Timeout Interval IE))
1084          */
1085
1086         /* Filling RSN IE */
1087         hdr = (struct rsn_ie_hdr *) peer->rsnie_i;
1088         hdr->elem_id = WLAN_EID_RSN;
1089         WPA_PUT_LE16(hdr->version, RSN_VERSION);
1090
1091         pos = (u8 *) (hdr + 1);
1092         RSN_SELECTOR_PUT(pos, RSN_CIPHER_SUITE_NO_GROUP_ADDRESSED);
1093         pos += RSN_SELECTOR_LEN;
1094         count_pos = pos;
1095         pos += 2;
1096
1097         count = 0;
1098
1099         /*
1100          * AES-CCMP is the default Encryption preferred for TDLS, so
1101          * RSN IE is filled only with CCMP CIPHER
1102          * Note: TKIP is not used to encrypt TDLS link.
1103          *
1104          * Regardless of the cipher used on the AP connection, select CCMP
1105          * here.
1106          */
1107         RSN_SELECTOR_PUT(pos, RSN_CIPHER_SUITE_CCMP);
1108         pos += RSN_SELECTOR_LEN;
1109         count++;
1110
1111         WPA_PUT_LE16(count_pos, count);
1112
1113         WPA_PUT_LE16(pos, 1);
1114         pos += 2;
1115         RSN_SELECTOR_PUT(pos, RSN_AUTH_KEY_MGMT_TPK_HANDSHAKE);
1116         pos += RSN_SELECTOR_LEN;
1117
1118         rsn_capab = WPA_CAPABILITY_PEERKEY_ENABLED;
1119         rsn_capab |= RSN_NUM_REPLAY_COUNTERS_16 << 2;
1120 #ifdef CONFIG_TDLS_TESTING
1121         if (tdls_testing & TDLS_TESTING_ALT_RSN_IE) {
1122                 wpa_printf(MSG_DEBUG, "TDLS: Use alternative RSN IE for "
1123                            "testing");
1124                 rsn_capab = WPA_CAPABILITY_PEERKEY_ENABLED;
1125         }
1126 #endif /* CONFIG_TDLS_TESTING */
1127         WPA_PUT_LE16(pos, rsn_capab);
1128         pos += 2;
1129 #ifdef CONFIG_TDLS_TESTING
1130         if (tdls_testing & TDLS_TESTING_ALT_RSN_IE) {
1131                 /* Number of PMKIDs */
1132                 *pos++ = 0x00;
1133                 *pos++ = 0x00;
1134         }
1135 #endif /* CONFIG_TDLS_TESTING */
1136
1137         hdr->len = (pos - peer->rsnie_i) - 2;
1138         peer->rsnie_i_len = pos - peer->rsnie_i;
1139         wpa_hexdump(MSG_DEBUG, "TDLS: RSN IE for TPK handshake",
1140                     peer->rsnie_i, peer->rsnie_i_len);
1141
1142 skip_rsnie:
1143         buf_len = 0;
1144         if (wpa_tdls_get_privacy(sm))
1145                 buf_len += peer->rsnie_i_len + sizeof(struct wpa_tdls_ftie) +
1146                         sizeof(struct wpa_tdls_timeoutie);
1147 #ifdef CONFIG_TDLS_TESTING
1148         if (wpa_tdls_get_privacy(sm) &&
1149             (tdls_testing & TDLS_TESTING_LONG_FRAME))
1150                 buf_len += 170;
1151         if (tdls_testing & TDLS_TESTING_DIFF_BSSID)
1152                 buf_len += sizeof(struct wpa_tdls_lnkid);
1153 #endif /* CONFIG_TDLS_TESTING */
1154         rbuf = os_zalloc(buf_len + 1);
1155         if (rbuf == NULL) {
1156                 wpa_tdls_peer_free(sm, peer);
1157                 return -1;
1158         }
1159         pos = rbuf;
1160
1161         if (!wpa_tdls_get_privacy(sm))
1162                 goto skip_ies;
1163
1164         /* Initiator RSN IE */
1165         pos = wpa_add_ie(pos, peer->rsnie_i, peer->rsnie_i_len);
1166
1167         ftie = (struct wpa_tdls_ftie *) pos;
1168         ftie->ie_type = WLAN_EID_FAST_BSS_TRANSITION;
1169         ftie->ie_len = sizeof(struct wpa_tdls_ftie) - 2;
1170
1171         if (os_get_random(peer->inonce, WPA_NONCE_LEN)) {
1172                 wpa_msg(sm->ctx->msg_ctx, MSG_WARNING,
1173                         "TDLS: Failed to get random data for initiator Nonce");
1174                 os_free(rbuf);
1175                 wpa_tdls_peer_free(sm, peer);
1176                 return -1;
1177         }
1178         peer->tk_set = 0; /* A new nonce results in a new TK */
1179         wpa_hexdump(MSG_DEBUG, "TDLS: Initiator Nonce for TPK handshake",
1180                     peer->inonce, WPA_NONCE_LEN);
1181         os_memcpy(ftie->Snonce, peer->inonce, WPA_NONCE_LEN);
1182
1183         wpa_hexdump(MSG_DEBUG, "TDLS: FTIE for TPK Handshake M1",
1184                     (u8 *) ftie, sizeof(struct wpa_tdls_ftie));
1185
1186         pos = (u8 *) (ftie + 1);
1187
1188 #ifdef CONFIG_TDLS_TESTING
1189         if (tdls_testing & TDLS_TESTING_LONG_FRAME) {
1190                 wpa_printf(MSG_DEBUG, "TDLS: Testing - add extra subelem to "
1191                            "FTIE");
1192                 ftie->ie_len += 170;
1193                 *pos++ = 255; /* FTIE subelem */
1194                 *pos++ = 168; /* FTIE subelem length */
1195                 pos += 168;
1196         }
1197 #endif /* CONFIG_TDLS_TESTING */
1198
1199         /* Lifetime */
1200         peer->lifetime = TPK_LIFETIME;
1201 #ifdef CONFIG_TDLS_TESTING
1202         if (tdls_testing & TDLS_TESTING_SHORT_LIFETIME) {
1203                 wpa_printf(MSG_DEBUG, "TDLS: Testing - use short TPK "
1204                            "lifetime");
1205                 peer->lifetime = 301;
1206         }
1207         if (tdls_testing & TDLS_TESTING_LONG_LIFETIME) {
1208                 wpa_printf(MSG_DEBUG, "TDLS: Testing - use long TPK "
1209                            "lifetime");
1210                 peer->lifetime = 0xffffffff;
1211         }
1212 #endif /* CONFIG_TDLS_TESTING */
1213         pos = wpa_add_tdls_timeoutie(pos, (u8 *) &timeoutie,
1214                                      sizeof(timeoutie), peer->lifetime);
1215         wpa_printf(MSG_DEBUG, "TDLS: TPK lifetime %u seconds", peer->lifetime);
1216
1217 skip_ies:
1218
1219 #ifdef CONFIG_TDLS_TESTING
1220         if (tdls_testing & TDLS_TESTING_DIFF_BSSID) {
1221                 struct wpa_tdls_lnkid *l = (struct wpa_tdls_lnkid *) pos;
1222
1223                 wpa_printf(MSG_DEBUG, "TDLS: Testing - use incorrect BSSID in "
1224                            "Link Identifier");
1225                 wpa_tdls_linkid(sm, peer, l);
1226                 l->bssid[5] ^= 0x01;
1227                 pos += sizeof(*l);
1228         }
1229 #endif /* CONFIG_TDLS_TESTING */
1230
1231         wpa_printf(MSG_DEBUG, "TDLS: Sending TDLS Setup Request / TPK "
1232                    "Handshake Message 1 (peer " MACSTR ")",
1233                    MAC2STR(peer->addr));
1234
1235         status = wpa_tdls_tpk_send(sm, peer->addr, WLAN_TDLS_SETUP_REQUEST,
1236                                    1, 0, 0, peer->initiator, rbuf, pos - rbuf);
1237         os_free(rbuf);
1238
1239         return status;
1240 }
1241
1242
1243 static int wpa_tdls_send_tpk_m2(struct wpa_sm *sm,
1244                                 const unsigned char *src_addr, u8 dtoken,
1245                                 struct wpa_tdls_lnkid *lnkid,
1246                                 const struct wpa_tdls_peer *peer)
1247 {
1248         u8 *rbuf, *pos;
1249         size_t buf_len;
1250         u32 lifetime;
1251         struct wpa_tdls_timeoutie timeoutie;
1252         struct wpa_tdls_ftie *ftie;
1253         int status;
1254
1255         buf_len = 0;
1256         if (wpa_tdls_get_privacy(sm)) {
1257                 /* Peer RSN IE, FTIE(Initiator Nonce, Responder Nonce),
1258                  * Lifetime */
1259                 buf_len += peer->rsnie_i_len + sizeof(struct wpa_tdls_ftie) +
1260                         sizeof(struct wpa_tdls_timeoutie);
1261 #ifdef CONFIG_TDLS_TESTING
1262                 if (tdls_testing & TDLS_TESTING_LONG_FRAME)
1263                         buf_len += 170;
1264 #endif /* CONFIG_TDLS_TESTING */
1265         }
1266
1267         rbuf = os_zalloc(buf_len + 1);
1268         if (rbuf == NULL)
1269                 return -1;
1270         pos = rbuf;
1271
1272         if (!wpa_tdls_get_privacy(sm))
1273                 goto skip_ies;
1274
1275         /* Peer RSN IE */
1276         pos = wpa_add_ie(pos, peer->rsnie_p, peer->rsnie_p_len);
1277
1278         ftie = (struct wpa_tdls_ftie *) pos;
1279         ftie->ie_type = WLAN_EID_FAST_BSS_TRANSITION;
1280         /* TODO: ftie->mic_control to set 2-RESPONSE */
1281         os_memcpy(ftie->Anonce, peer->rnonce, WPA_NONCE_LEN);
1282         os_memcpy(ftie->Snonce, peer->inonce, WPA_NONCE_LEN);
1283         ftie->ie_len = sizeof(struct wpa_tdls_ftie) - 2;
1284         wpa_hexdump(MSG_DEBUG, "TDLS: FTIE for TPK M2",
1285                     (u8 *) ftie, sizeof(*ftie));
1286
1287         pos = (u8 *) (ftie + 1);
1288
1289 #ifdef CONFIG_TDLS_TESTING
1290         if (tdls_testing & TDLS_TESTING_LONG_FRAME) {
1291                 wpa_printf(MSG_DEBUG, "TDLS: Testing - add extra subelem to "
1292                            "FTIE");
1293                 ftie->ie_len += 170;
1294                 *pos++ = 255; /* FTIE subelem */
1295                 *pos++ = 168; /* FTIE subelem length */
1296                 pos += 168;
1297         }
1298 #endif /* CONFIG_TDLS_TESTING */
1299
1300         /* Lifetime */
1301         lifetime = peer->lifetime;
1302 #ifdef CONFIG_TDLS_TESTING
1303         if (tdls_testing & TDLS_TESTING_WRONG_LIFETIME_RESP) {
1304                 wpa_printf(MSG_DEBUG, "TDLS: Testing - use wrong TPK "
1305                            "lifetime in response");
1306                 lifetime++;
1307         }
1308 #endif /* CONFIG_TDLS_TESTING */
1309         pos = wpa_add_tdls_timeoutie(pos, (u8 *) &timeoutie,
1310                                      sizeof(timeoutie), lifetime);
1311         wpa_printf(MSG_DEBUG, "TDLS: TPK lifetime %u seconds from initiator",
1312                    lifetime);
1313
1314         /* compute MIC before sending */
1315         wpa_tdls_ftie_mic(peer->tpk.kck, 2, (u8 *) lnkid, peer->rsnie_p,
1316                           (u8 *) &timeoutie, (u8 *) ftie, ftie->mic);
1317 #ifdef CONFIG_TDLS_TESTING
1318         if (tdls_testing & TDLS_TESTING_WRONG_MIC) {
1319                 wpa_printf(MSG_DEBUG, "TDLS: Testing - use wrong MIC");
1320                 ftie->mic[0] ^= 0x01;
1321         }
1322 #endif /* CONFIG_TDLS_TESTING */
1323
1324 skip_ies:
1325         status = wpa_tdls_tpk_send(sm, src_addr, WLAN_TDLS_SETUP_RESPONSE,
1326                                    dtoken, 0, 0, peer->initiator, rbuf,
1327                                    pos - rbuf);
1328         os_free(rbuf);
1329
1330         return status;
1331 }
1332
1333
1334 static int wpa_tdls_send_tpk_m3(struct wpa_sm *sm,
1335                                 const unsigned char *src_addr, u8 dtoken,
1336                                 struct wpa_tdls_lnkid *lnkid,
1337                                 const struct wpa_tdls_peer *peer)
1338 {
1339         u8 *rbuf, *pos;
1340         size_t buf_len;
1341         struct wpa_tdls_ftie *ftie;
1342         struct wpa_tdls_timeoutie timeoutie;
1343         u32 lifetime;
1344         int status;
1345         u32 peer_capab = 0;
1346
1347         buf_len = 0;
1348         if (wpa_tdls_get_privacy(sm)) {
1349                 /* Peer RSN IE, FTIE(Initiator Nonce, Responder Nonce),
1350                  * Lifetime */
1351                 buf_len += peer->rsnie_i_len + sizeof(struct wpa_tdls_ftie) +
1352                         sizeof(struct wpa_tdls_timeoutie);
1353 #ifdef CONFIG_TDLS_TESTING
1354                 if (tdls_testing & TDLS_TESTING_LONG_FRAME)
1355                         buf_len += 170;
1356 #endif /* CONFIG_TDLS_TESTING */
1357         }
1358
1359         rbuf = os_zalloc(buf_len + 1);
1360         if (rbuf == NULL)
1361                 return -1;
1362         pos = rbuf;
1363
1364         if (!wpa_tdls_get_privacy(sm))
1365                 goto skip_ies;
1366
1367         /* Peer RSN IE */
1368         pos = wpa_add_ie(pos, peer->rsnie_p, peer->rsnie_p_len);
1369
1370         ftie = (struct wpa_tdls_ftie *) pos;
1371         ftie->ie_type = WLAN_EID_FAST_BSS_TRANSITION;
1372         /*TODO: ftie->mic_control to set 3-CONFIRM */
1373         os_memcpy(ftie->Anonce, peer->rnonce, WPA_NONCE_LEN);
1374         os_memcpy(ftie->Snonce, peer->inonce, WPA_NONCE_LEN);
1375         ftie->ie_len = sizeof(struct wpa_tdls_ftie) - 2;
1376
1377         pos = (u8 *) (ftie + 1);
1378
1379 #ifdef CONFIG_TDLS_TESTING
1380         if (tdls_testing & TDLS_TESTING_LONG_FRAME) {
1381                 wpa_printf(MSG_DEBUG, "TDLS: Testing - add extra subelem to "
1382                            "FTIE");
1383                 ftie->ie_len += 170;
1384                 *pos++ = 255; /* FTIE subelem */
1385                 *pos++ = 168; /* FTIE subelem length */
1386                 pos += 168;
1387         }
1388 #endif /* CONFIG_TDLS_TESTING */
1389
1390         /* Lifetime */
1391         lifetime = peer->lifetime;
1392 #ifdef CONFIG_TDLS_TESTING
1393         if (tdls_testing & TDLS_TESTING_WRONG_LIFETIME_CONF) {
1394                 wpa_printf(MSG_DEBUG, "TDLS: Testing - use wrong TPK "
1395                            "lifetime in confirm");
1396                 lifetime++;
1397         }
1398 #endif /* CONFIG_TDLS_TESTING */
1399         pos = wpa_add_tdls_timeoutie(pos, (u8 *) &timeoutie,
1400                                      sizeof(timeoutie), lifetime);
1401         wpa_printf(MSG_DEBUG, "TDLS: TPK lifetime %u seconds",
1402                    lifetime);
1403
1404         /* compute MIC before sending */
1405         wpa_tdls_ftie_mic(peer->tpk.kck, 3, (u8 *) lnkid, peer->rsnie_p,
1406                           (u8 *) &timeoutie, (u8 *) ftie, ftie->mic);
1407 #ifdef CONFIG_TDLS_TESTING
1408         if (tdls_testing & TDLS_TESTING_WRONG_MIC) {
1409                 wpa_printf(MSG_DEBUG, "TDLS: Testing - use wrong MIC");
1410                 ftie->mic[0] ^= 0x01;
1411         }
1412 #endif /* CONFIG_TDLS_TESTING */
1413
1414 skip_ies:
1415
1416         if (peer->vht_capabilities)
1417                 peer_capab |= TDLS_PEER_VHT;
1418         if (peer->ht_capabilities)
1419                 peer_capab |= TDLS_PEER_HT;
1420         if (peer->wmm_capable)
1421                 peer_capab |= TDLS_PEER_WMM;
1422
1423         status = wpa_tdls_tpk_send(sm, src_addr, WLAN_TDLS_SETUP_CONFIRM,
1424                                    dtoken, 0, peer_capab, peer->initiator,
1425                                    rbuf, pos - rbuf);
1426         os_free(rbuf);
1427
1428         return status;
1429 }
1430
1431
1432 static int wpa_tdls_send_discovery_response(struct wpa_sm *sm,
1433                                             struct wpa_tdls_peer *peer,
1434                                             u8 dialog_token)
1435 {
1436         size_t buf_len = 0;
1437         struct wpa_tdls_timeoutie timeoutie;
1438         u16 rsn_capab;
1439         u8 *rbuf, *pos, *count_pos;
1440         u16 count;
1441         struct rsn_ie_hdr *hdr;
1442         int status;
1443
1444         wpa_printf(MSG_DEBUG, "TDLS: Sending TDLS Discovery Response "
1445                    "(peer " MACSTR ")", MAC2STR(peer->addr));
1446         if (!wpa_tdls_get_privacy(sm))
1447                 goto skip_rsn_ies;
1448
1449         /* Filling RSN IE */
1450         hdr = (struct rsn_ie_hdr *) peer->rsnie_i;
1451         hdr->elem_id = WLAN_EID_RSN;
1452         WPA_PUT_LE16(hdr->version, RSN_VERSION);
1453         pos = (u8 *) (hdr + 1);
1454         RSN_SELECTOR_PUT(pos, RSN_CIPHER_SUITE_NO_GROUP_ADDRESSED);
1455         pos += RSN_SELECTOR_LEN;
1456         count_pos = pos;
1457         pos += 2;
1458         count = 0;
1459
1460         /*
1461         * AES-CCMP is the default encryption preferred for TDLS, so
1462         * RSN IE is filled only with CCMP cipher suite.
1463         * Note: TKIP is not used to encrypt TDLS link.
1464         *
1465         * Regardless of the cipher used on the AP connection, select CCMP
1466         * here.
1467         */
1468         RSN_SELECTOR_PUT(pos, RSN_CIPHER_SUITE_CCMP);
1469         pos += RSN_SELECTOR_LEN;
1470         count++;
1471         WPA_PUT_LE16(count_pos, count);
1472         WPA_PUT_LE16(pos, 1);
1473         pos += 2;
1474         RSN_SELECTOR_PUT(pos, RSN_AUTH_KEY_MGMT_TPK_HANDSHAKE);
1475         pos += RSN_SELECTOR_LEN;
1476
1477         rsn_capab = WPA_CAPABILITY_PEERKEY_ENABLED;
1478         rsn_capab |= RSN_NUM_REPLAY_COUNTERS_16 << 2;
1479         WPA_PUT_LE16(pos, rsn_capab);
1480         pos += 2;
1481         hdr->len = (pos - (u8 *) hdr) - 2;
1482         peer->rsnie_i_len = pos - peer->rsnie_i;
1483
1484         wpa_hexdump(MSG_DEBUG, "TDLS: RSN IE for Discovery Response",
1485                     (u8 *) hdr, hdr->len + 2);
1486 skip_rsn_ies:
1487         buf_len = 0;
1488         if (wpa_tdls_get_privacy(sm)) {
1489                 /* Peer RSN IE, Lifetime */
1490                 buf_len += peer->rsnie_i_len +
1491                         sizeof(struct wpa_tdls_timeoutie);
1492         }
1493         rbuf = os_zalloc(buf_len + 1);
1494         if (rbuf == NULL) {
1495                 wpa_tdls_peer_free(sm, peer);
1496                 return -1;
1497         }
1498         pos = rbuf;
1499
1500         if (!wpa_tdls_get_privacy(sm))
1501                 goto skip_ies;
1502         /* Initiator RSN IE */
1503         pos = wpa_add_ie(pos, peer->rsnie_i, peer->rsnie_i_len);
1504         /* Lifetime */
1505         peer->lifetime = TPK_LIFETIME;
1506         pos = wpa_add_tdls_timeoutie(pos, (u8 *) &timeoutie,
1507                                      sizeof(timeoutie), peer->lifetime);
1508         wpa_printf(MSG_DEBUG, "TDLS: TPK lifetime %u seconds", peer->lifetime);
1509 skip_ies:
1510         status = wpa_tdls_tpk_send(sm, peer->addr, WLAN_TDLS_DISCOVERY_RESPONSE,
1511                                    dialog_token, 0, 0, 0, rbuf, pos - rbuf);
1512         os_free(rbuf);
1513
1514         return status;
1515 }
1516
1517
1518 static int
1519 wpa_tdls_process_discovery_request(struct wpa_sm *sm, const u8 *addr,
1520                                    const u8 *buf, size_t len)
1521 {
1522         struct wpa_eapol_ie_parse kde;
1523         const struct wpa_tdls_lnkid *lnkid;
1524         struct wpa_tdls_peer *peer;
1525         size_t min_req_len = sizeof(struct wpa_tdls_frame) +
1526                 1 /* dialog token */ + sizeof(struct wpa_tdls_lnkid);
1527         u8 dialog_token;
1528
1529         wpa_printf(MSG_DEBUG, "TDLS: Discovery Request from " MACSTR,
1530                    MAC2STR(addr));
1531
1532         if (len < min_req_len) {
1533                 wpa_printf(MSG_DEBUG, "TDLS Discovery Request is too short: "
1534                            "%d", (int) len);
1535                 return -1;
1536         }
1537
1538         dialog_token = buf[sizeof(struct wpa_tdls_frame)];
1539
1540         /*
1541          * Some APs will tack on a weird IE to the end of a TDLS
1542          * discovery request packet. This needn't fail the response,
1543          * since the required IE are verified separately.
1544          */
1545         if (wpa_supplicant_parse_ies(buf + sizeof(struct wpa_tdls_frame) + 1,
1546                                      len - (sizeof(struct wpa_tdls_frame) + 1),
1547                                      &kde) < 0) {
1548                 wpa_printf(MSG_DEBUG,
1549                            "TDLS: Failed to parse IEs in Discovery Request - ignore as an interop workaround");
1550         }
1551
1552         if (!kde.lnkid) {
1553                 wpa_printf(MSG_DEBUG, "TDLS: Link ID not found in Discovery "
1554                            "Request");
1555                 return -1;
1556         }
1557
1558         lnkid = (const struct wpa_tdls_lnkid *) kde.lnkid;
1559
1560         if (os_memcmp(sm->bssid, lnkid->bssid, ETH_ALEN) != 0) {
1561                 wpa_printf(MSG_DEBUG, "TDLS: Discovery Request from different "
1562                            " BSS " MACSTR, MAC2STR(lnkid->bssid));
1563                 return -1;
1564         }
1565
1566         peer = wpa_tdls_add_peer(sm, addr, NULL);
1567         if (peer == NULL)
1568                 return -1;
1569
1570         return wpa_tdls_send_discovery_response(sm, peer, dialog_token);
1571 }
1572
1573
1574 int wpa_tdls_send_discovery_request(struct wpa_sm *sm, const u8 *addr)
1575 {
1576         if (sm->tdls_disabled || !sm->tdls_supported)
1577                 return -1;
1578
1579         wpa_printf(MSG_DEBUG, "TDLS: Sending Discovery Request to peer "
1580                    MACSTR, MAC2STR(addr));
1581         return wpa_tdls_tpk_send(sm, addr, WLAN_TDLS_DISCOVERY_REQUEST,
1582                                  1, 0, 0, 1, NULL, 0);
1583 }
1584
1585
1586 static int copy_supp_rates(const struct wpa_eapol_ie_parse *kde,
1587                            struct wpa_tdls_peer *peer)
1588 {
1589         if (!kde->supp_rates) {
1590                 wpa_printf(MSG_DEBUG, "TDLS: No supported rates received");
1591                 return -1;
1592         }
1593         peer->supp_rates_len = merge_byte_arrays(
1594                 peer->supp_rates, sizeof(peer->supp_rates),
1595                 kde->supp_rates + 2, kde->supp_rates_len - 2,
1596                 kde->ext_supp_rates ? kde->ext_supp_rates + 2 : NULL,
1597                 kde->ext_supp_rates ? kde->ext_supp_rates_len - 2 : 0);
1598         return 0;
1599 }
1600
1601
1602 static int copy_peer_ht_capab(const struct wpa_eapol_ie_parse *kde,
1603                               struct wpa_tdls_peer *peer)
1604 {
1605         if (!kde->ht_capabilities) {
1606                 wpa_printf(MSG_DEBUG, "TDLS: No supported ht capabilities "
1607                            "received");
1608                 return 0;
1609         }
1610
1611         if (!peer->ht_capabilities) {
1612                 peer->ht_capabilities =
1613                         os_zalloc(sizeof(struct ieee80211_ht_capabilities));
1614                 if (peer->ht_capabilities == NULL)
1615                         return -1;
1616         }
1617
1618         os_memcpy(peer->ht_capabilities, kde->ht_capabilities,
1619                   sizeof(struct ieee80211_ht_capabilities));
1620         wpa_hexdump(MSG_DEBUG, "TDLS: Peer HT capabilities",
1621                     (u8 *) peer->ht_capabilities,
1622                     sizeof(struct ieee80211_ht_capabilities));
1623
1624         return 0;
1625 }
1626
1627
1628 static int copy_peer_vht_capab(const struct wpa_eapol_ie_parse *kde,
1629                               struct wpa_tdls_peer *peer)
1630 {
1631         if (!kde->vht_capabilities) {
1632                 wpa_printf(MSG_DEBUG, "TDLS: No supported vht capabilities "
1633                            "received");
1634                 return 0;
1635         }
1636
1637         if (!peer->vht_capabilities) {
1638                 peer->vht_capabilities =
1639                         os_zalloc(sizeof(struct ieee80211_vht_capabilities));
1640                 if (peer->vht_capabilities == NULL)
1641                         return -1;
1642         }
1643
1644         os_memcpy(peer->vht_capabilities, kde->vht_capabilities,
1645                   sizeof(struct ieee80211_vht_capabilities));
1646         wpa_hexdump(MSG_DEBUG, "TDLS: Peer VHT capabilities",
1647                     (u8 *) peer->vht_capabilities,
1648                     sizeof(struct ieee80211_vht_capabilities));
1649
1650         return 0;
1651 }
1652
1653
1654 static int copy_peer_ext_capab(const struct wpa_eapol_ie_parse *kde,
1655                                struct wpa_tdls_peer *peer)
1656 {
1657         if (!kde->ext_capab) {
1658                 wpa_printf(MSG_DEBUG, "TDLS: No extended capabilities "
1659                            "received");
1660                 return 0;
1661         }
1662
1663         if (!peer->ext_capab || peer->ext_capab_len < kde->ext_capab_len - 2) {
1664                 /* Need to allocate buffer to fit the new information */
1665                 os_free(peer->ext_capab);
1666                 peer->ext_capab = os_zalloc(kde->ext_capab_len - 2);
1667                 if (peer->ext_capab == NULL)
1668                         return -1;
1669         }
1670
1671         peer->ext_capab_len = kde->ext_capab_len - 2;
1672         os_memcpy(peer->ext_capab, kde->ext_capab + 2, peer->ext_capab_len);
1673
1674         return 0;
1675 }
1676
1677
1678 static int copy_peer_wmm_capab(const struct wpa_eapol_ie_parse *kde,
1679                                struct wpa_tdls_peer *peer)
1680 {
1681         struct wmm_information_element *wmm;
1682
1683         if (!kde->wmm) {
1684                 wpa_printf(MSG_DEBUG, "TDLS: No supported WMM capabilities received");
1685                 return 0;
1686         }
1687
1688         if (kde->wmm_len < sizeof(struct wmm_information_element)) {
1689                 wpa_printf(MSG_DEBUG, "TDLS: Invalid supported WMM capabilities received");
1690                 return -1;
1691         }
1692
1693         wmm = (struct wmm_information_element *) kde->wmm;
1694         peer->qos_info = wmm->qos_info;
1695
1696         peer->wmm_capable = 1;
1697
1698         wpa_printf(MSG_DEBUG, "TDLS: Peer WMM QOS Info 0x%x", peer->qos_info);
1699         return 0;
1700 }
1701
1702
1703 static int copy_peer_supp_channels(const struct wpa_eapol_ie_parse *kde,
1704                                    struct wpa_tdls_peer *peer)
1705 {
1706         if (!kde->supp_channels) {
1707                 wpa_printf(MSG_DEBUG, "TDLS: No supported channels received");
1708                 return 0;
1709         }
1710
1711         if (!peer->supp_channels ||
1712             peer->supp_channels_len < kde->supp_channels_len) {
1713                 os_free(peer->supp_channels);
1714                 peer->supp_channels = os_zalloc(kde->supp_channels_len);
1715                 if (peer->supp_channels == NULL)
1716                         return -1;
1717         }
1718
1719         peer->supp_channels_len = kde->supp_channels_len;
1720
1721         os_memcpy(peer->supp_channels, kde->supp_channels,
1722                   peer->supp_channels_len);
1723         wpa_hexdump(MSG_DEBUG, "TDLS: Peer Supported Channels",
1724                     (u8 *) peer->supp_channels, peer->supp_channels_len);
1725         return 0;
1726 }
1727
1728
1729 static int copy_peer_supp_oper_classes(const struct wpa_eapol_ie_parse *kde,
1730                                        struct wpa_tdls_peer *peer)
1731 {
1732         if (!kde->supp_oper_classes) {
1733                 wpa_printf(MSG_DEBUG, "TDLS: No supported operating classes received");
1734                 return 0;
1735         }
1736
1737         if (!peer->supp_oper_classes ||
1738             peer->supp_oper_classes_len < kde->supp_oper_classes_len) {
1739                 os_free(peer->supp_oper_classes);
1740                 peer->supp_oper_classes = os_zalloc(kde->supp_oper_classes_len);
1741                 if (peer->supp_oper_classes == NULL)
1742                         return -1;
1743         }
1744
1745         peer->supp_oper_classes_len = kde->supp_oper_classes_len;
1746         os_memcpy(peer->supp_oper_classes, kde->supp_oper_classes,
1747                   peer->supp_oper_classes_len);
1748         wpa_hexdump(MSG_DEBUG, "TDLS: Peer Supported Operating Classes",
1749                     (u8 *) peer->supp_oper_classes,
1750                     peer->supp_oper_classes_len);
1751         return 0;
1752 }
1753
1754
1755 static int wpa_tdls_addset_peer(struct wpa_sm *sm, struct wpa_tdls_peer *peer,
1756                                 int add)
1757 {
1758         return wpa_sm_tdls_peer_addset(sm, peer->addr, add, peer->aid,
1759                                        peer->capability,
1760                                        peer->supp_rates, peer->supp_rates_len,
1761                                        peer->ht_capabilities,
1762                                        peer->vht_capabilities,
1763                                        peer->qos_info, peer->wmm_capable,
1764                                        peer->ext_capab, peer->ext_capab_len,
1765                                        peer->supp_channels,
1766                                        peer->supp_channels_len,
1767                                        peer->supp_oper_classes,
1768                                        peer->supp_oper_classes_len);
1769 }
1770
1771
1772 static int tdls_nonce_set(const u8 *nonce)
1773 {
1774         int i;
1775
1776         for (i = 0; i < WPA_NONCE_LEN; i++) {
1777                 if (nonce[i])
1778                         return 1;
1779         }
1780
1781         return 0;
1782 }
1783
1784
1785 static int wpa_tdls_process_tpk_m1(struct wpa_sm *sm, const u8 *src_addr,
1786                                    const u8 *buf, size_t len)
1787 {
1788         struct wpa_tdls_peer *peer;
1789         struct wpa_eapol_ie_parse kde;
1790         struct wpa_ie_data ie;
1791         int cipher;
1792         const u8 *cpos;
1793         struct wpa_tdls_ftie *ftie = NULL;
1794         struct wpa_tdls_timeoutie *timeoutie;
1795         struct wpa_tdls_lnkid *lnkid;
1796         u32 lifetime = 0;
1797 #if 0
1798         struct rsn_ie_hdr *hdr;
1799         u8 *pos;
1800         u16 rsn_capab;
1801         u16 rsn_ver;
1802 #endif
1803         u8 dtoken;
1804         u16 ielen;
1805         u16 status = WLAN_STATUS_UNSPECIFIED_FAILURE;
1806         int tdls_prohibited = sm->tdls_prohibited;
1807         int existing_peer = 0;
1808
1809         if (len < 3 + 3)
1810                 return -1;
1811
1812         cpos = buf;
1813         cpos += 1 /* pkt_type */ + 1 /* Category */ + 1 /* Action */;
1814
1815         /* driver had already verified the frame format */
1816         dtoken = *cpos++; /* dialog token */
1817
1818         wpa_printf(MSG_INFO, "TDLS: Dialog Token in TPK M1 %d", dtoken);
1819
1820         peer = wpa_tdls_add_peer(sm, src_addr, &existing_peer);
1821         if (peer == NULL)
1822                 goto error;
1823
1824         /* If found, use existing entry instead of adding a new one;
1825          * how to handle the case where both ends initiate at the
1826          * same time? */
1827         if (existing_peer) {
1828                 if (peer->tpk_success) {
1829                         wpa_printf(MSG_DEBUG, "TDLS: TDLS Setup Request while "
1830                                    "direct link is enabled - tear down the "
1831                                    "old link first");
1832                         wpa_sm_tdls_oper(sm, TDLS_DISABLE_LINK, peer->addr);
1833                         wpa_tdls_peer_clear(sm, peer);
1834                 } else if (peer->initiator) {
1835                         /*
1836                          * An entry is already present, so check if we already
1837                          * sent a TDLS Setup Request. If so, compare MAC
1838                          * addresses and let the STA with the lower MAC address
1839                          * continue as the initiator. The other negotiation is
1840                          * terminated.
1841                          */
1842                         if (os_memcmp(sm->own_addr, src_addr, ETH_ALEN) < 0) {
1843                                 wpa_printf(MSG_DEBUG, "TDLS: Discard request "
1844                                            "from peer with higher address "
1845                                            MACSTR, MAC2STR(src_addr));
1846                                 return -1;
1847                         } else {
1848                                 wpa_printf(MSG_DEBUG, "TDLS: Accept request "
1849                                            "from peer with lower address "
1850                                            MACSTR " (terminate previously "
1851                                            "initiated negotiation",
1852                                            MAC2STR(src_addr));
1853                                 wpa_sm_tdls_oper(sm, TDLS_DISABLE_LINK,
1854                                                  peer->addr);
1855                                 wpa_tdls_peer_clear(sm, peer);
1856                         }
1857                 }
1858         }
1859
1860         /* capability information */
1861         peer->capability = WPA_GET_LE16(cpos);
1862         cpos += 2;
1863
1864         ielen = len - (cpos - buf); /* start of IE in buf */
1865
1866         /*
1867          * Don't reject the message if failing to parse IEs. The IEs we need are
1868          * explicitly checked below. Some APs may add arbitrary padding to the
1869          * end of short TDLS frames and that would look like invalid IEs.
1870          */
1871         if (wpa_supplicant_parse_ies(cpos, ielen, &kde) < 0)
1872                 wpa_printf(MSG_DEBUG,
1873                            "TDLS: Failed to parse IEs in TPK M1 - ignore as an interop workaround");
1874
1875         if (kde.lnkid == NULL || kde.lnkid_len < 3 * ETH_ALEN) {
1876                 wpa_printf(MSG_INFO, "TDLS: No valid Link Identifier IE in "
1877                            "TPK M1");
1878                 goto error;
1879         }
1880         wpa_hexdump(MSG_DEBUG, "TDLS: Link ID Received from TPK M1",
1881                     kde.lnkid, kde.lnkid_len);
1882         lnkid = (struct wpa_tdls_lnkid *) kde.lnkid;
1883         if (os_memcmp(sm->bssid, lnkid->bssid, ETH_ALEN) != 0) {
1884                 wpa_printf(MSG_INFO, "TDLS: TPK M1 from diff BSS");
1885                 status = WLAN_STATUS_REQUEST_DECLINED;
1886                 goto error;
1887         }
1888
1889         wpa_printf(MSG_DEBUG, "TDLS: TPK M1 - TPK initiator " MACSTR,
1890                    MAC2STR(src_addr));
1891
1892         if (copy_supp_rates(&kde, peer) < 0)
1893                 goto error;
1894
1895         if (copy_peer_ht_capab(&kde, peer) < 0)
1896                 goto error;
1897
1898         if (copy_peer_vht_capab(&kde, peer) < 0)
1899                 goto error;
1900
1901         if (copy_peer_ext_capab(&kde, peer) < 0)
1902                 goto error;
1903
1904         if (copy_peer_supp_channels(&kde, peer) < 0)
1905                 goto error;
1906
1907         if (copy_peer_supp_oper_classes(&kde, peer) < 0)
1908                 goto error;
1909
1910         peer->qos_info = kde.qosinfo;
1911
1912         /* Overwrite with the qos_info obtained in WMM IE */
1913         if (copy_peer_wmm_capab(&kde, peer) < 0)
1914                 goto error;
1915
1916         peer->aid = kde.aid;
1917
1918 #ifdef CONFIG_TDLS_TESTING
1919         if (tdls_testing & TDLS_TESTING_CONCURRENT_INIT) {
1920                 peer = wpa_tdls_add_peer(sm, src_addr, NULL);
1921                 if (peer == NULL)
1922                         goto error;
1923                 wpa_printf(MSG_DEBUG, "TDLS: Testing concurrent initiation of "
1924                            "TDLS setup - send own request");
1925                 peer->initiator = 1;
1926                 wpa_sm_tdls_peer_addset(sm, peer->addr, 1, 0, 0, NULL, 0, NULL,
1927                                         NULL, 0, 0, NULL, 0, NULL, 0, NULL, 0);
1928                 wpa_tdls_send_tpk_m1(sm, peer);
1929         }
1930
1931         if ((tdls_testing & TDLS_TESTING_IGNORE_AP_PROHIBIT) &&
1932             tdls_prohibited) {
1933                 wpa_printf(MSG_DEBUG, "TDLS: Testing - ignore AP prohibition "
1934                            "on TDLS");
1935                 tdls_prohibited = 0;
1936         }
1937 #endif /* CONFIG_TDLS_TESTING */
1938
1939         if (tdls_prohibited) {
1940                 wpa_printf(MSG_INFO, "TDLS: TDLS prohibited in this BSS");
1941                 status = WLAN_STATUS_REQUEST_DECLINED;
1942                 goto error;
1943         }
1944
1945         if (!wpa_tdls_get_privacy(sm)) {
1946                 if (kde.rsn_ie) {
1947                         wpa_printf(MSG_INFO, "TDLS: RSN IE in TPK M1 while "
1948                                    "security is disabled");
1949                         status = WLAN_STATUS_SECURITY_DISABLED;
1950                         goto error;
1951                 }
1952                 goto skip_rsn;
1953         }
1954
1955         if (kde.ftie == NULL || kde.ftie_len < sizeof(*ftie) ||
1956             kde.rsn_ie == NULL) {
1957                 wpa_printf(MSG_INFO, "TDLS: No FTIE or RSN IE in TPK M1");
1958                 status = WLAN_STATUS_INVALID_PARAMETERS;
1959                 goto error;
1960         }
1961
1962         if (kde.rsn_ie_len > TDLS_MAX_IE_LEN) {
1963                 wpa_printf(MSG_INFO, "TDLS: Too long Initiator RSN IE in "
1964                            "TPK M1");
1965                 status = WLAN_STATUS_INVALID_RSNIE;
1966                 goto error;
1967         }
1968
1969         if (wpa_parse_wpa_ie_rsn(kde.rsn_ie, kde.rsn_ie_len, &ie) < 0) {
1970                 wpa_printf(MSG_INFO, "TDLS: Failed to parse RSN IE in TPK M1");
1971                 status = WLAN_STATUS_INVALID_RSNIE;
1972                 goto error;
1973         }
1974
1975         cipher = ie.pairwise_cipher;
1976         if (cipher & WPA_CIPHER_CCMP) {
1977                 wpa_printf(MSG_DEBUG, "TDLS: Using CCMP for direct link");
1978                 cipher = WPA_CIPHER_CCMP;
1979         } else {
1980                 wpa_printf(MSG_INFO, "TDLS: No acceptable cipher in TPK M1");
1981                 status = WLAN_STATUS_PAIRWISE_CIPHER_NOT_VALID;
1982                 goto error;
1983         }
1984
1985         if ((ie.capabilities &
1986              (WPA_CAPABILITY_NO_PAIRWISE | WPA_CAPABILITY_PEERKEY_ENABLED)) !=
1987             WPA_CAPABILITY_PEERKEY_ENABLED) {
1988                 wpa_printf(MSG_INFO, "TDLS: Invalid RSN Capabilities in "
1989                            "TPK M1");
1990                 status = WLAN_STATUS_INVALID_RSN_IE_CAPAB;
1991                 goto error;
1992         }
1993
1994         /* Lifetime */
1995         if (kde.key_lifetime == NULL) {
1996                 wpa_printf(MSG_INFO, "TDLS: No Key Lifetime IE in TPK M1");
1997                 status = WLAN_STATUS_UNACCEPTABLE_LIFETIME;
1998                 goto error;
1999         }
2000         timeoutie = (struct wpa_tdls_timeoutie *) kde.key_lifetime;
2001         lifetime = WPA_GET_LE32(timeoutie->value);
2002         wpa_printf(MSG_DEBUG, "TDLS: TPK lifetime %u seconds", lifetime);
2003         if (lifetime < 300) {
2004                 wpa_printf(MSG_INFO, "TDLS: Too short TPK lifetime");
2005                 status = WLAN_STATUS_UNACCEPTABLE_LIFETIME;
2006                 goto error;
2007         }
2008
2009 skip_rsn:
2010 #ifdef CONFIG_TDLS_TESTING
2011         if (tdls_testing & TDLS_TESTING_CONCURRENT_INIT) {
2012                 if (os_memcmp(sm->own_addr, peer->addr, ETH_ALEN) < 0) {
2013                         /*
2014                          * The request frame from us is going to win, so do not
2015                          * replace information based on this request frame from
2016                          * the peer.
2017                          */
2018                         goto skip_rsn_check;
2019                 }
2020         }
2021 #endif /* CONFIG_TDLS_TESTING */
2022
2023         peer->initiator = 0; /* Need to check */
2024         peer->dtoken = dtoken;
2025
2026         if (!wpa_tdls_get_privacy(sm)) {
2027                 peer->rsnie_i_len = 0;
2028                 peer->rsnie_p_len = 0;
2029                 peer->cipher = WPA_CIPHER_NONE;
2030                 goto skip_rsn_check;
2031         }
2032
2033         ftie = (struct wpa_tdls_ftie *) kde.ftie;
2034         os_memcpy(peer->rsnie_i, kde.rsn_ie, kde.rsn_ie_len);
2035         peer->rsnie_i_len = kde.rsn_ie_len;
2036         peer->cipher = cipher;
2037
2038         if (os_memcmp(peer->inonce, ftie->Snonce, WPA_NONCE_LEN) != 0 ||
2039             !tdls_nonce_set(peer->inonce)) {
2040                 /*
2041                  * There is no point in updating the RNonce for every obtained
2042                  * TPK M1 frame (e.g., retransmission due to timeout) with the
2043                  * same INonce (SNonce in FTIE). However, if the TPK M1 is
2044                  * retransmitted with a different INonce, update the RNonce
2045                  * since this is for a new TDLS session.
2046                  */
2047                 wpa_printf(MSG_DEBUG,
2048                            "TDLS: New TPK M1 INonce - generate new RNonce");
2049                 os_memcpy(peer->inonce, ftie->Snonce, WPA_NONCE_LEN);
2050                 if (os_get_random(peer->rnonce, WPA_NONCE_LEN)) {
2051                         wpa_msg(sm->ctx->ctx, MSG_WARNING,
2052                                 "TDLS: Failed to get random data for responder nonce");
2053                         goto error;
2054                 }
2055                 peer->tk_set = 0; /* A new nonce results in a new TK */
2056         }
2057
2058 #if 0
2059         /* get version info from RSNIE received from Peer */
2060         hdr = (struct rsn_ie_hdr *) kde.rsn_ie;
2061         rsn_ver = WPA_GET_LE16(hdr->version);
2062
2063         /* use min(peer's version, out version) */
2064         if (rsn_ver > RSN_VERSION)
2065                 rsn_ver = RSN_VERSION;
2066
2067         hdr = (struct rsn_ie_hdr *) peer->rsnie_p;
2068
2069         hdr->elem_id = WLAN_EID_RSN;
2070         WPA_PUT_LE16(hdr->version, rsn_ver);
2071         pos = (u8 *) (hdr + 1);
2072
2073         RSN_SELECTOR_PUT(pos, RSN_CIPHER_SUITE_NO_GROUP_ADDRESSED);
2074         pos += RSN_SELECTOR_LEN;
2075         /* Include only the selected cipher in pairwise cipher suite */
2076         WPA_PUT_LE16(pos, 1);
2077         pos += 2;
2078         if (cipher == WPA_CIPHER_CCMP)
2079                 RSN_SELECTOR_PUT(pos, RSN_CIPHER_SUITE_CCMP);
2080         pos += RSN_SELECTOR_LEN;
2081
2082         WPA_PUT_LE16(pos, 1);
2083         pos += 2;
2084         RSN_SELECTOR_PUT(pos, RSN_AUTH_KEY_MGMT_TPK_HANDSHAKE);
2085         pos += RSN_SELECTOR_LEN;
2086
2087         rsn_capab = WPA_CAPABILITY_PEERKEY_ENABLED;
2088         rsn_capab |= RSN_NUM_REPLAY_COUNTERS_16 << 2;
2089         WPA_PUT_LE16(pos, rsn_capab);
2090         pos += 2;
2091
2092         hdr->len = (pos - peer->rsnie_p) - 2;
2093         peer->rsnie_p_len = pos - peer->rsnie_p;
2094 #endif
2095
2096         /* temp fix: validation of RSNIE later */
2097         os_memcpy(peer->rsnie_p, peer->rsnie_i, peer->rsnie_i_len);
2098         peer->rsnie_p_len = peer->rsnie_i_len;
2099
2100         wpa_hexdump(MSG_DEBUG, "TDLS: RSN IE for TPK handshake",
2101                     peer->rsnie_p, peer->rsnie_p_len);
2102
2103         peer->lifetime = lifetime;
2104
2105         wpa_tdls_generate_tpk(peer, sm->own_addr, sm->bssid);
2106
2107 skip_rsn_check:
2108 #ifdef CONFIG_TDLS_TESTING
2109         if (tdls_testing & TDLS_TESTING_CONCURRENT_INIT)
2110                 goto skip_add_peer;
2111 #endif /* CONFIG_TDLS_TESTING */
2112
2113         /* add supported rates, capabilities, and qos_info to the TDLS peer */
2114         if (wpa_tdls_addset_peer(sm, peer, 1) < 0)
2115                 goto error;
2116
2117 #ifdef CONFIG_TDLS_TESTING
2118 skip_add_peer:
2119 #endif /* CONFIG_TDLS_TESTING */
2120         peer->tpk_in_progress = 1;
2121
2122         wpa_printf(MSG_DEBUG, "TDLS: Sending TDLS Setup Response / TPK M2");
2123         if (wpa_tdls_send_tpk_m2(sm, src_addr, dtoken, lnkid, peer) < 0) {
2124                 wpa_sm_tdls_oper(sm, TDLS_DISABLE_LINK, peer->addr);
2125                 goto error;
2126         }
2127
2128 #ifdef CONFIG_TDLS_TESTING
2129         if (tdls_testing & TDLS_TESTING_DOUBLE_TPK_M2) {
2130                 wpa_printf(MSG_INFO, "TDLS: Testing - Send another TPK M2");
2131                 wpa_tdls_send_tpk_m2(sm, src_addr, dtoken, lnkid, peer);
2132         }
2133 #endif /* CONFIG_TDLS_TESTING */
2134
2135         return 0;
2136
2137 error:
2138         wpa_tdls_send_error(sm, src_addr, WLAN_TDLS_SETUP_RESPONSE, dtoken, 0,
2139                             status);
2140         if (peer)
2141                 wpa_tdls_peer_free(sm, peer);
2142         return -1;
2143 }
2144
2145
2146 static int wpa_tdls_enable_link(struct wpa_sm *sm, struct wpa_tdls_peer *peer)
2147 {
2148         peer->tpk_success = 1;
2149         peer->tpk_in_progress = 0;
2150         eloop_cancel_timeout(wpa_tdls_tpk_timeout, sm, peer);
2151         if (wpa_tdls_get_privacy(sm)) {
2152                 u32 lifetime = peer->lifetime;
2153                 /*
2154                  * Start the initiator process a bit earlier to avoid race
2155                  * condition with the responder sending teardown request.
2156                  */
2157                 if (lifetime > 3 && peer->initiator)
2158                         lifetime -= 3;
2159                 eloop_register_timeout(lifetime, 0, wpa_tdls_tpk_timeout,
2160                                        sm, peer);
2161 #ifdef CONFIG_TDLS_TESTING
2162                 if (tdls_testing & TDLS_TESTING_NO_TPK_EXPIRATION) {
2163                         wpa_printf(MSG_DEBUG,
2164                                    "TDLS: Testing - disable TPK expiration");
2165                         eloop_cancel_timeout(wpa_tdls_tpk_timeout, sm, peer);
2166                 }
2167 #endif /* CONFIG_TDLS_TESTING */
2168         }
2169
2170         if (peer->reconfig_key && wpa_tdls_set_key(sm, peer) < 0) {
2171                 wpa_printf(MSG_INFO, "TDLS: Could not configure key to the "
2172                            "driver");
2173                 return -1;
2174         }
2175         peer->reconfig_key = 0;
2176
2177         return wpa_sm_tdls_oper(sm, TDLS_ENABLE_LINK, peer->addr);
2178 }
2179
2180
2181 static int wpa_tdls_process_tpk_m2(struct wpa_sm *sm, const u8 *src_addr,
2182                                    const u8 *buf, size_t len)
2183 {
2184         struct wpa_tdls_peer *peer;
2185         struct wpa_eapol_ie_parse kde;
2186         struct wpa_ie_data ie;
2187         int cipher;
2188         struct wpa_tdls_ftie *ftie;
2189         struct wpa_tdls_timeoutie *timeoutie;
2190         struct wpa_tdls_lnkid *lnkid;
2191         u32 lifetime;
2192         u8 dtoken;
2193         int ielen;
2194         u16 status;
2195         const u8 *pos;
2196         int ret = 0;
2197
2198         wpa_printf(MSG_DEBUG, "TDLS: Received TDLS Setup Response / TPK M2 "
2199                    "(Peer " MACSTR ")", MAC2STR(src_addr));
2200         for (peer = sm->tdls; peer; peer = peer->next) {
2201                 if (os_memcmp(peer->addr, src_addr, ETH_ALEN) == 0)
2202                         break;
2203         }
2204         if (peer == NULL) {
2205                 wpa_printf(MSG_INFO, "TDLS: No matching peer found for "
2206                            "TPK M2: " MACSTR, MAC2STR(src_addr));
2207                 return -1;
2208         }
2209         if (!peer->initiator) {
2210                 /*
2211                  * This may happen if both devices try to initiate TDLS at the
2212                  * same time and we accept the TPK M1 from the peer in
2213                  * wpa_tdls_process_tpk_m1() and clear our previous state.
2214                  */
2215                 wpa_printf(MSG_INFO, "TDLS: We were not the initiator, so "
2216                            "ignore TPK M2 from " MACSTR, MAC2STR(src_addr));
2217                 return -1;
2218         }
2219
2220         if (peer->tpk_success) {
2221                 wpa_printf(MSG_INFO, "TDLS: Ignore incoming TPK M2 retry, from "
2222                            MACSTR " as TPK M3 was already sent",
2223                            MAC2STR(src_addr));
2224                 return 0;
2225         }
2226
2227         wpa_tdls_tpk_retry_timeout_cancel(sm, peer, WLAN_TDLS_SETUP_REQUEST);
2228
2229         if (len < 3 + 2 + 1) {
2230                 wpa_tdls_disable_peer_link(sm, peer);
2231                 return -1;
2232         }
2233
2234         pos = buf;
2235         pos += 1 /* pkt_type */ + 1 /* Category */ + 1 /* Action */;
2236         status = WPA_GET_LE16(pos);
2237         pos += 2 /* status code */;
2238
2239         if (status != WLAN_STATUS_SUCCESS) {
2240                 wpa_printf(MSG_INFO, "TDLS: Status code in TPK M2: %u",
2241                            status);
2242                 wpa_tdls_disable_peer_link(sm, peer);
2243                 return -1;
2244         }
2245
2246         status = WLAN_STATUS_UNSPECIFIED_FAILURE;
2247
2248         /* TODO: need to verify dialog token matches here or in kernel */
2249         dtoken = *pos++; /* dialog token */
2250
2251         wpa_printf(MSG_DEBUG, "TDLS: Dialog Token in TPK M2 %d", dtoken);
2252
2253         if (len < 3 + 2 + 1 + 2) {
2254                 wpa_tdls_disable_peer_link(sm, peer);
2255                 return -1;
2256         }
2257
2258         /* capability information */
2259         peer->capability = WPA_GET_LE16(pos);
2260         pos += 2;
2261
2262         ielen = len - (pos - buf); /* start of IE in buf */
2263
2264         /*
2265          * Don't reject the message if failing to parse IEs. The IEs we need are
2266          * explicitly checked below. Some APs may add arbitrary padding to the
2267          * end of short TDLS frames and that would look like invalid IEs.
2268          */
2269         if (wpa_supplicant_parse_ies(pos, ielen, &kde) < 0)
2270                 wpa_printf(MSG_DEBUG,
2271                            "TDLS: Failed to parse IEs in TPK M2 - ignore as an interop workaround");
2272
2273 #ifdef CONFIG_TDLS_TESTING
2274         if (tdls_testing & TDLS_TESTING_DECLINE_RESP) {
2275                 wpa_printf(MSG_DEBUG, "TDLS: Testing - decline response");
2276                 status = WLAN_STATUS_REQUEST_DECLINED;
2277                 goto error;
2278         }
2279 #endif /* CONFIG_TDLS_TESTING */
2280
2281         if (kde.lnkid == NULL || kde.lnkid_len < 3 * ETH_ALEN) {
2282                 wpa_printf(MSG_INFO, "TDLS: No valid Link Identifier IE in "
2283                            "TPK M2");
2284                 goto error;
2285         }
2286         wpa_hexdump(MSG_DEBUG, "TDLS: Link ID Received from TPK M2",
2287                     kde.lnkid, kde.lnkid_len);
2288         lnkid = (struct wpa_tdls_lnkid *) kde.lnkid;
2289
2290         if (os_memcmp(sm->bssid, lnkid->bssid, ETH_ALEN) != 0) {
2291                 wpa_printf(MSG_INFO, "TDLS: TPK M2 from different BSS");
2292                 status = WLAN_STATUS_NOT_IN_SAME_BSS;
2293                 goto error;
2294         }
2295
2296         if (copy_supp_rates(&kde, peer) < 0)
2297                 goto error;
2298
2299         if (copy_peer_ht_capab(&kde, peer) < 0)
2300                 goto error;
2301
2302         if (copy_peer_vht_capab(&kde, peer) < 0)
2303                 goto error;
2304
2305         if (copy_peer_ext_capab(&kde, peer) < 0)
2306                 goto error;
2307
2308         if (copy_peer_supp_channels(&kde, peer) < 0)
2309                 goto error;
2310
2311         if (copy_peer_supp_oper_classes(&kde, peer) < 0)
2312                 goto error;
2313
2314         peer->qos_info = kde.qosinfo;
2315
2316         /* Overwrite with the qos_info obtained in WMM IE */
2317         if (copy_peer_wmm_capab(&kde, peer) < 0)
2318                 goto error;
2319
2320         peer->aid = kde.aid;
2321
2322         if (!wpa_tdls_get_privacy(sm)) {
2323                 peer->rsnie_p_len = 0;
2324                 peer->cipher = WPA_CIPHER_NONE;
2325                 goto skip_rsn;
2326         }
2327
2328         if (kde.ftie == NULL || kde.ftie_len < sizeof(*ftie) ||
2329             kde.rsn_ie == NULL) {
2330                 wpa_printf(MSG_INFO, "TDLS: No FTIE or RSN IE in TPK M2");
2331                 status = WLAN_STATUS_INVALID_PARAMETERS;
2332                 goto error;
2333         }
2334         wpa_hexdump(MSG_DEBUG, "TDLS: RSN IE Received from TPK M2",
2335                     kde.rsn_ie, kde.rsn_ie_len);
2336
2337         if (kde.rsn_ie_len > TDLS_MAX_IE_LEN) {
2338                 wpa_printf(MSG_INFO,
2339                            "TDLS: Too long Responder RSN IE in TPK M2");
2340                 status = WLAN_STATUS_INVALID_RSNIE;
2341                 goto error;
2342         }
2343
2344         /*
2345          * FIX: bitwise comparison of RSN IE is not the correct way of
2346          * validation this. It can be different, but certain fields must
2347          * match. Since we list only a single pairwise cipher in TPK M1, the
2348          * memcmp is likely to work in most cases, though.
2349          */
2350         if (kde.rsn_ie_len != peer->rsnie_i_len ||
2351             os_memcmp(peer->rsnie_i, kde.rsn_ie, peer->rsnie_i_len) != 0) {
2352                 wpa_printf(MSG_INFO, "TDLS: RSN IE in TPK M2 does "
2353                            "not match with RSN IE used in TPK M1");
2354                 wpa_hexdump(MSG_DEBUG, "TDLS: RSN IE Sent in TPK M1",
2355                             peer->rsnie_i, peer->rsnie_i_len);
2356                 wpa_hexdump(MSG_DEBUG, "TDLS: RSN IE Received from TPK M2",
2357                             kde.rsn_ie, kde.rsn_ie_len);
2358                 status = WLAN_STATUS_INVALID_RSNIE;
2359                 goto error;
2360         }
2361
2362         if (wpa_parse_wpa_ie_rsn(kde.rsn_ie, kde.rsn_ie_len, &ie) < 0) {
2363                 wpa_printf(MSG_INFO, "TDLS: Failed to parse RSN IE in TPK M2");
2364                 status = WLAN_STATUS_INVALID_RSNIE;
2365                 goto error;
2366         }
2367
2368         cipher = ie.pairwise_cipher;
2369         if (cipher == WPA_CIPHER_CCMP) {
2370                 wpa_printf(MSG_DEBUG, "TDLS: Using CCMP for direct link");
2371                 cipher = WPA_CIPHER_CCMP;
2372         } else {
2373                 wpa_printf(MSG_INFO, "TDLS: No acceptable cipher in TPK M2");
2374                 status = WLAN_STATUS_PAIRWISE_CIPHER_NOT_VALID;
2375                 goto error;
2376         }
2377
2378         wpa_hexdump(MSG_DEBUG, "TDLS: FTIE Received from TPK M2",
2379                     kde.ftie, sizeof(*ftie));
2380         ftie = (struct wpa_tdls_ftie *) kde.ftie;
2381
2382         if (os_memcmp(peer->inonce, ftie->Snonce, WPA_NONCE_LEN) != 0) {
2383                 wpa_printf(MSG_INFO, "TDLS: FTIE SNonce in TPK M2 does "
2384                            "not match with FTIE SNonce used in TPK M1");
2385                 /* Silently discard the frame */
2386                 return -1;
2387         }
2388
2389         /* Responder Nonce and RSN IE */
2390         os_memcpy(peer->rnonce, ftie->Anonce, WPA_NONCE_LEN);
2391         os_memcpy(peer->rsnie_p, kde.rsn_ie, kde.rsn_ie_len);
2392         peer->rsnie_p_len = kde.rsn_ie_len;
2393         peer->cipher = cipher;
2394
2395         /* Lifetime */
2396         if (kde.key_lifetime == NULL) {
2397                 wpa_printf(MSG_INFO, "TDLS: No Key Lifetime IE in TPK M2");
2398                 status = WLAN_STATUS_UNACCEPTABLE_LIFETIME;
2399                 goto error;
2400         }
2401         timeoutie = (struct wpa_tdls_timeoutie *) kde.key_lifetime;
2402         lifetime = WPA_GET_LE32(timeoutie->value);
2403         wpa_printf(MSG_DEBUG, "TDLS: TPK lifetime %u seconds in TPK M2",
2404                    lifetime);
2405         if (lifetime != peer->lifetime) {
2406                 wpa_printf(MSG_INFO, "TDLS: Unexpected TPK lifetime %u in "
2407                            "TPK M2 (expected %u)", lifetime, peer->lifetime);
2408                 status = WLAN_STATUS_UNACCEPTABLE_LIFETIME;
2409                 goto error;
2410         }
2411
2412         wpa_tdls_generate_tpk(peer, sm->own_addr, sm->bssid);
2413
2414         /* Process MIC check to see if TPK M2 is right */
2415         if (wpa_supplicant_verify_tdls_mic(2, peer, (u8 *) lnkid,
2416                                            (u8 *) timeoutie, ftie) < 0) {
2417                 /* Discard the frame */
2418                 wpa_tdls_del_key(sm, peer);
2419                 wpa_tdls_disable_peer_link(sm, peer);
2420                 return -1;
2421         }
2422
2423         if (wpa_tdls_set_key(sm, peer) < 0) {
2424                 /*
2425                  * Some drivers may not be able to config the key prior to full
2426                  * STA entry having been configured.
2427                  */
2428                 wpa_printf(MSG_DEBUG, "TDLS: Try to configure TPK again after "
2429                            "STA entry is complete");
2430                 peer->reconfig_key = 1;
2431         }
2432
2433 skip_rsn:
2434         peer->dtoken = dtoken;
2435
2436         /* add supported rates, capabilities, and qos_info to the TDLS peer */
2437         if (wpa_tdls_addset_peer(sm, peer, 0) < 0)
2438                 goto error;
2439
2440         wpa_printf(MSG_DEBUG, "TDLS: Sending TDLS Setup Confirm / "
2441                    "TPK Handshake Message 3");
2442         if (wpa_tdls_send_tpk_m3(sm, src_addr, dtoken, lnkid, peer) < 0)
2443                 goto error_no_msg;
2444
2445         if (!peer->tpk_success) {
2446                 /*
2447                  * Enable Link only when tpk_success is 0, signifying that this
2448                  * processing of TPK M2 frame is not because of a retransmission
2449                  * during TDLS setup handshake.
2450                  */
2451                 ret = wpa_tdls_enable_link(sm, peer);
2452                 if (ret < 0) {
2453                         wpa_printf(MSG_DEBUG, "TDLS: Could not enable link");
2454                         wpa_tdls_do_teardown(
2455                                 sm, peer,
2456                                 WLAN_REASON_TDLS_TEARDOWN_UNSPECIFIED);
2457                 }
2458         }
2459         return ret;
2460
2461 error:
2462         wpa_tdls_send_error(sm, src_addr, WLAN_TDLS_SETUP_CONFIRM, dtoken, 1,
2463                             status);
2464 error_no_msg:
2465         wpa_tdls_disable_peer_link(sm, peer);
2466         return -1;
2467 }
2468
2469
2470 static int wpa_tdls_process_tpk_m3(struct wpa_sm *sm, const u8 *src_addr,
2471                                    const u8 *buf, size_t len)
2472 {
2473         struct wpa_tdls_peer *peer;
2474         struct wpa_eapol_ie_parse kde;
2475         struct wpa_tdls_ftie *ftie;
2476         struct wpa_tdls_timeoutie *timeoutie;
2477         struct wpa_tdls_lnkid *lnkid;
2478         int ielen;
2479         u16 status;
2480         const u8 *pos;
2481         u32 lifetime;
2482         int ret = 0;
2483
2484         wpa_printf(MSG_DEBUG, "TDLS: Received TDLS Setup Confirm / TPK M3 "
2485                    "(Peer " MACSTR ")", MAC2STR(src_addr));
2486         for (peer = sm->tdls; peer; peer = peer->next) {
2487                 if (os_memcmp(peer->addr, src_addr, ETH_ALEN) == 0)
2488                         break;
2489         }
2490         if (peer == NULL) {
2491                 wpa_printf(MSG_INFO, "TDLS: No matching peer found for "
2492                            "TPK M3: " MACSTR, MAC2STR(src_addr));
2493                 return -1;
2494         }
2495         wpa_tdls_tpk_retry_timeout_cancel(sm, peer, WLAN_TDLS_SETUP_RESPONSE);
2496
2497         if (len < 3 + 3)
2498                 goto error;
2499         pos = buf;
2500         pos += 1 /* pkt_type */ + 1 /* Category */ + 1 /* Action */;
2501
2502         status = WPA_GET_LE16(pos);
2503
2504         if (status != 0) {
2505                 wpa_printf(MSG_INFO, "TDLS: Status code in TPK M3: %u",
2506                            status);
2507                 goto error;
2508         }
2509         pos += 2 /* status code */ + 1 /* dialog token */;
2510
2511         ielen = len - (pos - buf); /* start of IE in buf */
2512
2513         /*
2514          * Don't reject the message if failing to parse IEs. The IEs we need are
2515          * explicitly checked below. Some APs piggy-back broken IEs to the end
2516          * of a TDLS Confirm packet, which will fail the link if we don't ignore
2517          * this error.
2518          */
2519         if (wpa_supplicant_parse_ies((const u8 *) pos, ielen, &kde) < 0) {
2520                 wpa_printf(MSG_DEBUG,
2521                            "TDLS: Failed to parse KDEs in TPK M3 - ignore as an interop workaround");
2522         }
2523
2524         if (kde.lnkid == NULL || kde.lnkid_len < 3 * ETH_ALEN) {
2525                 wpa_printf(MSG_INFO, "TDLS: No Link Identifier IE in TPK M3");
2526                 goto error;
2527         }
2528         wpa_hexdump(MSG_DEBUG, "TDLS: Link ID Received from TPK M3",
2529                     (u8 *) kde.lnkid, kde.lnkid_len);
2530         lnkid = (struct wpa_tdls_lnkid *) kde.lnkid;
2531
2532         if (os_memcmp(sm->bssid, lnkid->bssid, ETH_ALEN) != 0) {
2533                 wpa_printf(MSG_INFO, "TDLS: TPK M3 from diff BSS");
2534                 goto error;
2535         }
2536
2537         if (!wpa_tdls_get_privacy(sm))
2538                 goto skip_rsn;
2539
2540         if (kde.ftie == NULL || kde.ftie_len < sizeof(*ftie)) {
2541                 wpa_printf(MSG_INFO, "TDLS: No FTIE in TPK M3");
2542                 goto error;
2543         }
2544         wpa_hexdump(MSG_DEBUG, "TDLS: FTIE Received from TPK M3",
2545                     kde.ftie, sizeof(*ftie));
2546         ftie = (struct wpa_tdls_ftie *) kde.ftie;
2547
2548         if (kde.rsn_ie == NULL) {
2549                 wpa_printf(MSG_INFO, "TDLS: No RSN IE in TPK M3");
2550                 goto error;
2551         }
2552         wpa_hexdump(MSG_DEBUG, "TDLS: RSN IE Received from TPK M3",
2553                     kde.rsn_ie, kde.rsn_ie_len);
2554         if (kde.rsn_ie_len != peer->rsnie_p_len ||
2555             os_memcmp(kde.rsn_ie, peer->rsnie_p, peer->rsnie_p_len) != 0) {
2556                 wpa_printf(MSG_INFO, "TDLS: RSN IE in TPK M3 does not match "
2557                            "with the one sent in TPK M2");
2558                 goto error;
2559         }
2560
2561         if (os_memcmp(peer->rnonce, ftie->Anonce, WPA_NONCE_LEN) != 0) {
2562                 wpa_printf(MSG_INFO, "TDLS: FTIE ANonce in TPK M3 does "
2563                            "not match with FTIE ANonce used in TPK M2");
2564                 goto error;
2565         }
2566
2567         if (os_memcmp(peer->inonce, ftie->Snonce, WPA_NONCE_LEN) != 0) {
2568                 wpa_printf(MSG_INFO, "TDLS: FTIE SNonce in TPK M3 does not "
2569                            "match with FTIE SNonce used in TPK M1");
2570                 goto error;
2571         }
2572
2573         if (kde.key_lifetime == NULL) {
2574                 wpa_printf(MSG_INFO, "TDLS: No Key Lifetime IE in TPK M3");
2575                 goto error;
2576         }
2577         timeoutie = (struct wpa_tdls_timeoutie *) kde.key_lifetime;
2578         wpa_hexdump(MSG_DEBUG, "TDLS: Timeout IE Received from TPK M3",
2579                     (u8 *) timeoutie, sizeof(*timeoutie));
2580         lifetime = WPA_GET_LE32(timeoutie->value);
2581         wpa_printf(MSG_DEBUG, "TDLS: TPK lifetime %u seconds in TPK M3",
2582                    lifetime);
2583         if (lifetime != peer->lifetime) {
2584                 wpa_printf(MSG_INFO, "TDLS: Unexpected TPK lifetime %u in "
2585                            "TPK M3 (expected %u)", lifetime, peer->lifetime);
2586                 goto error;
2587         }
2588
2589         if (wpa_supplicant_verify_tdls_mic(3, peer, (u8 *) lnkid,
2590                                            (u8 *) timeoutie, ftie) < 0) {
2591                 wpa_tdls_del_key(sm, peer);
2592                 goto error;
2593         }
2594
2595         if (wpa_tdls_set_key(sm, peer) < 0) {
2596                 /*
2597                  * Some drivers may not be able to config the key prior to full
2598                  * STA entry having been configured.
2599                  */
2600                 wpa_printf(MSG_DEBUG, "TDLS: Try to configure TPK again after "
2601                            "STA entry is complete");
2602                 peer->reconfig_key = 1;
2603         }
2604
2605 skip_rsn:
2606         /* add supported rates, capabilities, and qos_info to the TDLS peer */
2607         if (wpa_tdls_addset_peer(sm, peer, 0) < 0)
2608                 goto error;
2609
2610         if (!peer->tpk_success) {
2611                 /*
2612                  * Enable Link only when tpk_success is 0, signifying that this
2613                  * processing of TPK M3 frame is not because of a retransmission
2614                  * during TDLS setup handshake.
2615                  */
2616                 ret = wpa_tdls_enable_link(sm, peer);
2617                 if (ret < 0) {
2618                         wpa_printf(MSG_DEBUG, "TDLS: Could not enable link");
2619                         goto error;
2620                 }
2621         }
2622         return ret;
2623 error:
2624         wpa_tdls_do_teardown(sm, peer, WLAN_REASON_TDLS_TEARDOWN_UNSPECIFIED);
2625         return -1;
2626 }
2627
2628
2629 static u8 * wpa_add_tdls_timeoutie(u8 *pos, u8 *ie, size_t ie_len, u32 tsecs)
2630 {
2631         struct wpa_tdls_timeoutie *lifetime = (struct wpa_tdls_timeoutie *) ie;
2632
2633         os_memset(lifetime, 0, ie_len);
2634         lifetime->ie_type = WLAN_EID_TIMEOUT_INTERVAL;
2635         lifetime->ie_len = sizeof(struct wpa_tdls_timeoutie) - 2;
2636         lifetime->interval_type = WLAN_TIMEOUT_KEY_LIFETIME;
2637         WPA_PUT_LE32(lifetime->value, tsecs);
2638         os_memcpy(pos, ie, ie_len);
2639         return pos + ie_len;
2640 }
2641
2642
2643 /**
2644  * wpa_tdls_start - Initiate TDLS handshake (send TPK Handshake Message 1)
2645  * @sm: Pointer to WPA state machine data from wpa_sm_init()
2646  * @peer: MAC address of the peer STA
2647  * Returns: 0 on success, or -1 on failure
2648  *
2649  * Send TPK Handshake Message 1 info to driver to start TDLS
2650  * handshake with the peer.
2651  */
2652 int wpa_tdls_start(struct wpa_sm *sm, const u8 *addr)
2653 {
2654         struct wpa_tdls_peer *peer;
2655         int tdls_prohibited = sm->tdls_prohibited;
2656
2657         if (sm->tdls_disabled || !sm->tdls_supported)
2658                 return -1;
2659
2660 #ifdef CONFIG_TDLS_TESTING
2661         if ((tdls_testing & TDLS_TESTING_IGNORE_AP_PROHIBIT) &&
2662             tdls_prohibited) {
2663                 wpa_printf(MSG_DEBUG, "TDLS: Testing - ignore AP prohibition "
2664                            "on TDLS");
2665                 tdls_prohibited = 0;
2666         }
2667 #endif /* CONFIG_TDLS_TESTING */
2668
2669         if (tdls_prohibited) {
2670                 wpa_printf(MSG_DEBUG, "TDLS: TDLS is prohibited in this BSS - "
2671                            "reject request to start setup");
2672                 return -1;
2673         }
2674
2675         peer = wpa_tdls_add_peer(sm, addr, NULL);
2676         if (peer == NULL)
2677                 return -1;
2678
2679         if (peer->tpk_in_progress) {
2680                 wpa_printf(MSG_DEBUG, "TDLS: Setup is already in progress with the peer");
2681                 return 0;
2682         }
2683
2684         peer->initiator = 1;
2685
2686         /* add the peer to the driver as a "setup in progress" peer */
2687         if (wpa_sm_tdls_peer_addset(sm, peer->addr, 1, 0, 0, NULL, 0, NULL,
2688                                     NULL, 0, 0, NULL, 0, NULL, 0, NULL, 0)) {
2689                 wpa_tdls_disable_peer_link(sm, peer);
2690                 return -1;
2691         }
2692
2693         peer->tpk_in_progress = 1;
2694
2695         if (wpa_tdls_send_tpk_m1(sm, peer) < 0) {
2696                 wpa_tdls_disable_peer_link(sm, peer);
2697                 return -1;
2698         }
2699
2700         return 0;
2701 }
2702
2703
2704 void wpa_tdls_remove(struct wpa_sm *sm, const u8 *addr)
2705 {
2706         struct wpa_tdls_peer *peer;
2707
2708         if (sm->tdls_disabled || !sm->tdls_supported)
2709                 return;
2710
2711         for (peer = sm->tdls; peer; peer = peer->next) {
2712                 if (os_memcmp(peer->addr, addr, ETH_ALEN) == 0)
2713                         break;
2714         }
2715
2716         if (peer == NULL || !peer->tpk_success)
2717                 return;
2718
2719         if (sm->tdls_external_setup) {
2720                 /*
2721                  * Disable previous link to allow renegotiation to be completed
2722                  * on AP path.
2723                  */
2724                 wpa_tdls_do_teardown(sm, peer,
2725                                      WLAN_REASON_TDLS_TEARDOWN_UNSPECIFIED);
2726         }
2727 }
2728
2729
2730 /**
2731  * wpa_supplicant_rx_tdls - Receive TDLS data frame
2732  *
2733  * This function is called to receive TDLS (ethertype = 0x890d) data frames.
2734  */
2735 static void wpa_supplicant_rx_tdls(void *ctx, const u8 *src_addr,
2736                                    const u8 *buf, size_t len)
2737 {
2738         struct wpa_sm *sm = ctx;
2739         struct wpa_tdls_frame *tf;
2740
2741         wpa_hexdump(MSG_DEBUG, "TDLS: Received Data frame encapsulation",
2742                     buf, len);
2743
2744         if (sm->tdls_disabled || !sm->tdls_supported) {
2745                 wpa_printf(MSG_DEBUG, "TDLS: Discard message - TDLS disabled "
2746                            "or unsupported by driver");
2747                 return;
2748         }
2749
2750         if (os_memcmp(src_addr, sm->own_addr, ETH_ALEN) == 0) {
2751                 wpa_printf(MSG_DEBUG, "TDLS: Discard copy of own message");
2752                 return;
2753         }
2754
2755         if (len < sizeof(*tf)) {
2756                 wpa_printf(MSG_INFO, "TDLS: Drop too short frame");
2757                 return;
2758         }
2759
2760         /* Check to make sure its a valid encapsulated TDLS frame */
2761         tf = (struct wpa_tdls_frame *) buf;
2762         if (tf->payloadtype != 2 /* TDLS_RFTYPE */ ||
2763             tf->category != WLAN_ACTION_TDLS) {
2764                 wpa_printf(MSG_INFO, "TDLS: Invalid frame - payloadtype=%u "
2765                            "category=%u action=%u",
2766                            tf->payloadtype, tf->category, tf->action);
2767                 return;
2768         }
2769
2770         switch (tf->action) {
2771         case WLAN_TDLS_SETUP_REQUEST:
2772                 wpa_tdls_process_tpk_m1(sm, src_addr, buf, len);
2773                 break;
2774         case WLAN_TDLS_SETUP_RESPONSE:
2775                 wpa_tdls_process_tpk_m2(sm, src_addr, buf, len);
2776                 break;
2777         case WLAN_TDLS_SETUP_CONFIRM:
2778                 wpa_tdls_process_tpk_m3(sm, src_addr, buf, len);
2779                 break;
2780         case WLAN_TDLS_TEARDOWN:
2781                 wpa_tdls_recv_teardown(sm, src_addr, buf, len);
2782                 break;
2783         case WLAN_TDLS_DISCOVERY_REQUEST:
2784                 wpa_tdls_process_discovery_request(sm, src_addr, buf, len);
2785                 break;
2786         default:
2787                 /* Kernel code will process remaining frames */
2788                 wpa_printf(MSG_DEBUG, "TDLS: Ignore TDLS frame action code %u",
2789                            tf->action);
2790                 break;
2791         }
2792 }
2793
2794
2795 /**
2796  * wpa_tdls_init - Initialize driver interface parameters for TDLS
2797  * @wpa_s: Pointer to wpa_supplicant data
2798  * Returns: 0 on success, -1 on failure
2799  *
2800  * This function is called to initialize driver interface parameters for TDLS.
2801  * wpa_drv_init() must have been called before this function to initialize the
2802  * driver interface.
2803  */
2804 int wpa_tdls_init(struct wpa_sm *sm)
2805 {
2806         if (sm == NULL)
2807                 return -1;
2808
2809         sm->l2_tdls = l2_packet_init(sm->bridge_ifname ? sm->bridge_ifname :
2810                                      sm->ifname,
2811                                      sm->own_addr,
2812                                      ETH_P_80211_ENCAP, wpa_supplicant_rx_tdls,
2813                                      sm, 0);
2814         if (sm->l2_tdls == NULL) {
2815                 wpa_printf(MSG_ERROR, "TDLS: Failed to open l2_packet "
2816                            "connection");
2817                 return -1;
2818         }
2819
2820         /*
2821          * Drivers that support TDLS but don't implement the get_capa callback
2822          * are assumed to perform everything internally
2823          */
2824         if (wpa_sm_tdls_get_capa(sm, &sm->tdls_supported,
2825                                  &sm->tdls_external_setup,
2826                                  &sm->tdls_chan_switch) < 0) {
2827                 sm->tdls_supported = 1;
2828                 sm->tdls_external_setup = 0;
2829         }
2830
2831         wpa_printf(MSG_DEBUG, "TDLS: TDLS operation%s supported by "
2832                    "driver", sm->tdls_supported ? "" : " not");
2833         wpa_printf(MSG_DEBUG, "TDLS: Driver uses %s link setup",
2834                    sm->tdls_external_setup ? "external" : "internal");
2835         wpa_printf(MSG_DEBUG, "TDLS: Driver %s TDLS channel switching",
2836                    sm->tdls_chan_switch ? "supports" : "does not support");
2837
2838         return 0;
2839 }
2840
2841
2842 void wpa_tdls_teardown_peers(struct wpa_sm *sm)
2843 {
2844         struct wpa_tdls_peer *peer, *tmp;
2845
2846         if (!sm)
2847                 return;
2848         peer = sm->tdls;
2849
2850         wpa_printf(MSG_DEBUG, "TDLS: Tear down peers");
2851
2852         while (peer) {
2853                 tmp = peer->next;
2854                 wpa_printf(MSG_DEBUG, "TDLS: Tear down peer " MACSTR,
2855                            MAC2STR(peer->addr));
2856                 if (sm->tdls_external_setup)
2857                         wpa_tdls_do_teardown(sm, peer,
2858                                              WLAN_REASON_DEAUTH_LEAVING);
2859                 else
2860                         wpa_sm_tdls_oper(sm, TDLS_TEARDOWN, peer->addr);
2861
2862                 peer = tmp;
2863         }
2864 }
2865
2866
2867 static void wpa_tdls_remove_peers(struct wpa_sm *sm)
2868 {
2869         struct wpa_tdls_peer *peer, *tmp;
2870
2871         peer = sm->tdls;
2872
2873         while (peer) {
2874                 int res;
2875                 tmp = peer->next;
2876                 res = wpa_sm_tdls_oper(sm, TDLS_DISABLE_LINK, peer->addr);
2877                 wpa_printf(MSG_DEBUG, "TDLS: Remove peer " MACSTR " (res=%d)",
2878                            MAC2STR(peer->addr), res);
2879                 wpa_tdls_peer_free(sm, peer);
2880                 peer = tmp;
2881         }
2882 }
2883
2884
2885 /**
2886  * wpa_tdls_deinit - Deinitialize driver interface parameters for TDLS
2887  *
2888  * This function is called to recover driver interface parameters for TDLS
2889  * and frees resources allocated for it.
2890  */
2891 void wpa_tdls_deinit(struct wpa_sm *sm)
2892 {
2893         if (sm == NULL)
2894                 return;
2895
2896         if (sm->l2_tdls)
2897                 l2_packet_deinit(sm->l2_tdls);
2898         sm->l2_tdls = NULL;
2899
2900         wpa_tdls_remove_peers(sm);
2901 }
2902
2903
2904 void wpa_tdls_assoc(struct wpa_sm *sm)
2905 {
2906         wpa_printf(MSG_DEBUG, "TDLS: Remove peers on association");
2907         wpa_tdls_remove_peers(sm);
2908 }
2909
2910
2911 void wpa_tdls_disassoc(struct wpa_sm *sm)
2912 {
2913         wpa_printf(MSG_DEBUG, "TDLS: Remove peers on disassociation");
2914         wpa_tdls_remove_peers(sm);
2915 }
2916
2917
2918 static int wpa_tdls_prohibited(struct ieee802_11_elems *elems)
2919 {
2920         /* bit 38 - TDLS Prohibited */
2921         return !!(elems->ext_capab[4] & 0x40);
2922 }
2923
2924
2925 static int wpa_tdls_chan_switch_prohibited(struct ieee802_11_elems *elems)
2926 {
2927         /* bit 39 - TDLS Channel Switch Prohibited */
2928         return !!(elems->ext_capab[4] & 0x80);
2929 }
2930
2931
2932 void wpa_tdls_ap_ies(struct wpa_sm *sm, const u8 *ies, size_t len)
2933 {
2934         struct ieee802_11_elems elems;
2935
2936         sm->tdls_prohibited = 0;
2937         sm->tdls_chan_switch_prohibited = 0;
2938
2939         if (ies == NULL ||
2940             ieee802_11_parse_elems(ies, len, &elems, 0) == ParseFailed ||
2941             elems.ext_capab == NULL || elems.ext_capab_len < 5)
2942                 return;
2943
2944         sm->tdls_prohibited = wpa_tdls_prohibited(&elems);
2945         wpa_printf(MSG_DEBUG, "TDLS: TDLS is %s in the target BSS",
2946                    sm->tdls_prohibited ? "prohibited" : "allowed");
2947         sm->tdls_chan_switch_prohibited =
2948                 wpa_tdls_chan_switch_prohibited(&elems);
2949         wpa_printf(MSG_DEBUG, "TDLS: TDLS channel switch %s in the target BSS",
2950                    sm->tdls_chan_switch_prohibited ? "prohibited" : "allowed");
2951 }
2952
2953
2954 void wpa_tdls_assoc_resp_ies(struct wpa_sm *sm, const u8 *ies, size_t len)
2955 {
2956         struct ieee802_11_elems elems;
2957
2958         if (ies == NULL ||
2959             ieee802_11_parse_elems(ies, len, &elems, 0) == ParseFailed ||
2960             elems.ext_capab == NULL || elems.ext_capab_len < 5)
2961                 return;
2962
2963         if (!sm->tdls_prohibited && wpa_tdls_prohibited(&elems)) {
2964                 wpa_printf(MSG_DEBUG, "TDLS: TDLS prohibited based on "
2965                            "(Re)Association Response IEs");
2966                 sm->tdls_prohibited = 1;
2967         }
2968
2969         if (!sm->tdls_chan_switch_prohibited &&
2970             wpa_tdls_chan_switch_prohibited(&elems)) {
2971                 wpa_printf(MSG_DEBUG,
2972                            "TDLS: TDLS channel switch prohibited based on (Re)Association Response IEs");
2973                 sm->tdls_chan_switch_prohibited = 1;
2974         }
2975 }
2976
2977
2978 void wpa_tdls_enable(struct wpa_sm *sm, int enabled)
2979 {
2980         wpa_printf(MSG_DEBUG, "TDLS: %s", enabled ? "enabled" : "disabled");
2981         sm->tdls_disabled = !enabled;
2982 }
2983
2984
2985 int wpa_tdls_is_external_setup(struct wpa_sm *sm)
2986 {
2987         return sm->tdls_external_setup;
2988 }
2989
2990
2991 int wpa_tdls_enable_chan_switch(struct wpa_sm *sm, const u8 *addr,
2992                                 u8 oper_class,
2993                                 struct hostapd_freq_params *freq_params)
2994 {
2995         struct wpa_tdls_peer *peer;
2996         int ret;
2997
2998         if (sm->tdls_disabled || !sm->tdls_supported)
2999                 return -1;
3000
3001         if (!sm->tdls_chan_switch) {
3002                 wpa_printf(MSG_DEBUG,
3003                            "TDLS: Channel switching not supported by the driver");
3004                 return -1;
3005         }
3006
3007         if (sm->tdls_chan_switch_prohibited) {
3008                 wpa_printf(MSG_DEBUG,
3009                            "TDLS: Channel switching is prohibited in this BSS - reject request to switch channel");
3010                 return -1;
3011         }
3012
3013         for (peer = sm->tdls; peer; peer = peer->next) {
3014                 if (os_memcmp(peer->addr, addr, ETH_ALEN) == 0)
3015                         break;
3016         }
3017
3018         if (peer == NULL || !peer->tpk_success) {
3019                 wpa_printf(MSG_ERROR, "TDLS: Peer " MACSTR
3020                            " not found for channel switching", MAC2STR(addr));
3021                 return -1;
3022         }
3023
3024         if (peer->chan_switch_enabled) {
3025                 wpa_printf(MSG_DEBUG, "TDLS: Peer " MACSTR
3026                            " already has channel switching enabled",
3027                            MAC2STR(addr));
3028                 return 0;
3029         }
3030
3031         ret = wpa_sm_tdls_enable_channel_switch(sm, peer->addr,
3032                                                 oper_class, freq_params);
3033         if (!ret)
3034                 peer->chan_switch_enabled = 1;
3035
3036         return ret;
3037 }
3038
3039
3040 int wpa_tdls_disable_chan_switch(struct wpa_sm *sm, const u8 *addr)
3041 {
3042         struct wpa_tdls_peer *peer;
3043
3044         if (sm->tdls_disabled || !sm->tdls_supported)
3045                 return -1;
3046
3047         for (peer = sm->tdls; peer; peer = peer->next) {
3048                 if (os_memcmp(peer->addr, addr, ETH_ALEN) == 0)
3049                         break;
3050         }
3051
3052         if (!peer || !peer->chan_switch_enabled) {
3053                 wpa_printf(MSG_ERROR, "TDLS: Channel switching not enabled for "
3054                            MACSTR, MAC2STR(addr));
3055                 return -1;
3056         }
3057
3058         /* ignore the return value */
3059         wpa_sm_tdls_disable_channel_switch(sm, peer->addr);
3060
3061         peer->chan_switch_enabled = 0;
3062         return 0;
3063 }