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