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(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(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_free(struct wpa_sm *sm, struct wpa_tdls_peer *peer)
 635 {
 636         wpa_printf(MSG_DEBUG, "TDLS: Clear state for peer " MACSTR,
 637                    MAC2STR(peer->addr));
 638         eloop_cancel_timeout(wpa_tdls_tpk_timeout, sm, peer);
 639         eloop_cancel_timeout(wpa_tdls_tpk_retry_timeout, sm, peer);
 640         peer->reconfig_key = 0;
 641         peer->initiator = 0;
 642         peer->tpk_in_progress = 0;
 643         os_free(peer->sm_tmr.buf);
 644         peer->sm_tmr.buf = NULL;
 645         os_free(peer->ht_capabilities);
 646         peer->ht_capabilities = NULL;
 647         os_free(peer->vht_capabilities);
 648         peer->vht_capabilities = NULL;
 649         os_free(peer->ext_capab);
 650         peer->ext_capab = NULL;
 651         os_free(peer->supp_channels);
 652         peer->supp_channels = NULL;
 653         os_free(peer->supp_oper_classes);
 654         peer->supp_oper_classes = NULL;
 655         peer->rsnie_i_len = peer->rsnie_p_len = 0;
 656         peer->cipher = 0;
 657         peer->qos_info = 0;
 658         peer->wmm_capable = 0;
 659         peer->tpk_set = peer->tpk_success = 0;
 660         os_memset(&peer->tpk, 0, sizeof(peer->tpk));
 661         os_memset(peer->inonce, 0, WPA_NONCE_LEN);
 662         os_memset(peer->rnonce, 0, WPA_NONCE_LEN);
 663 }
 664
 665
 666 static void wpa_tdls_linkid(struct wpa_sm *sm, struct wpa_tdls_peer *peer,
 667                             struct wpa_tdls_lnkid *lnkid)
 668 {
 669         lnkid->ie_type = WLAN_EID_LINK_ID;
 670         lnkid->ie_len = 3 * ETH_ALEN;
 671         os_memcpy(lnkid->bssid, sm->bssid, ETH_ALEN);
 672         if (peer->initiator) {
 673                 os_memcpy(lnkid->init_sta, sm->own_addr, ETH_ALEN);
 674                 os_memcpy(lnkid->resp_sta, peer->addr, ETH_ALEN);
 675         } else {
 676                 os_memcpy(lnkid->init_sta, peer->addr, ETH_ALEN);
 677                 os_memcpy(lnkid->resp_sta, sm->own_addr, ETH_ALEN);
 678         }
 679 }
 680
 681
 682 static int wpa_tdls_send_teardown(struct wpa_sm *sm, const u8 *addr,
 683                                   u16 reason_code)
 684 {
 685         struct wpa_tdls_peer *peer;
 686         struct wpa_tdls_ftie *ftie;
 687         struct wpa_tdls_lnkid lnkid;
 688         u8 dialog_token;
 689         u8 *rbuf, *pos;
 690         int ielen;
 691
 692         if (sm->tdls_disabled || !sm->tdls_supported)
 693                 return -1;
 694
 695         /* Find the node and free from the list */
 696         for (peer = sm->tdls; peer; peer = peer->next) {
 697                 if (os_memcmp(peer->addr, addr, ETH_ALEN) == 0)
 698                         break;
 699         }
 700
 701         if (peer == NULL) {
 702                 wpa_printf(MSG_INFO, "TDLS: No matching entry found for "
 703                            "Teardown " MACSTR, MAC2STR(addr));
 704                 return 0;
 705         }
 706
 707         dialog_token = peer->dtoken;
 708
 709         wpa_printf(MSG_DEBUG, "TDLS: TDLS Teardown for " MACSTR,
 710                    MAC2STR(addr));
 711
 712         ielen = 0;
 713         if (wpa_tdls_get_privacy(sm) && peer->tpk_set && peer->tpk_success) {
 714                 /* To add FTIE for Teardown request and compute MIC */
 715                 ielen += sizeof(*ftie);
 716 #ifdef CONFIG_TDLS_TESTING
 717                 if (tdls_testing & TDLS_TESTING_LONG_FRAME)
 718                         ielen += 170;
 719 #endif /* CONFIG_TDLS_TESTING */
 720         }
 721
 722         rbuf = os_zalloc(ielen + 1);
 723         if (rbuf == NULL)
 724                 return -1;
 725         pos = rbuf;
 726
 727         if (!wpa_tdls_get_privacy(sm) || !peer->tpk_set || !peer->tpk_success)
 728                 goto skip_ies;
 729
 730         ftie = (struct wpa_tdls_ftie *) pos;
 731         ftie->ie_type = WLAN_EID_FAST_BSS_TRANSITION;
 732         /* Using the recent nonce which should be for CONFIRM frame */
 733         os_memcpy(ftie->Anonce, peer->rnonce, WPA_NONCE_LEN);
 734         os_memcpy(ftie->Snonce, peer->inonce, WPA_NONCE_LEN);
 735         ftie->ie_len = sizeof(struct wpa_tdls_ftie) - 2;
 736         pos = (u8 *) (ftie + 1);
 737 #ifdef CONFIG_TDLS_TESTING
 738         if (tdls_testing & TDLS_TESTING_LONG_FRAME) {
 739                 wpa_printf(MSG_DEBUG, "TDLS: Testing - add extra subelem to "
 740                            "FTIE");
 741                 ftie->ie_len += 170;
 742                 *pos++ = 255; /* FTIE subelem */
 743                 *pos++ = 168; /* FTIE subelem length */
 744                 pos += 168;
 745         }
 746 #endif /* CONFIG_TDLS_TESTING */
 747         wpa_hexdump(MSG_DEBUG, "TDLS: FTIE for TDLS Teardown handshake",
 748                     (u8 *) ftie, pos - (u8 *) ftie);
 749
 750         /* compute MIC before sending */
 751         wpa_tdls_linkid(sm, peer, &lnkid);
 752         wpa_tdls_key_mic_teardown(peer->tpk.kck, 4, reason_code,
 753                                   dialog_token, (u8 *) &lnkid, (u8 *) ftie,
 754                                   ftie->mic);
 755
 756 skip_ies:
 757         /* TODO: register for a Timeout handler, if Teardown is not received at
 758          * the other end, then try again another time */
 759
 760         /* request driver to send Teardown using this FTIE */
 761         wpa_tdls_tpk_send(sm, addr, WLAN_TDLS_TEARDOWN, 0,
 762                           reason_code, 0, rbuf, pos - rbuf);
 763         os_free(rbuf);
 764
 765         return 0;
 766 }
 767
 768
 769 int wpa_tdls_teardown_link(struct wpa_sm *sm, const u8 *addr, u16 reason_code)
 770 {
 771         struct wpa_tdls_peer *peer;
 772
 773         if (sm->tdls_disabled || !sm->tdls_supported)
 774                 return -1;
 775
 776         for (peer = sm->tdls; peer; peer = peer->next) {
 777                 if (os_memcmp(peer->addr, addr, ETH_ALEN) == 0)
 778                         break;
 779         }
 780
 781         if (peer == NULL) {
 782                 wpa_printf(MSG_DEBUG, "TDLS: Could not find peer " MACSTR
 783                    " for link Teardown", MAC2STR(addr));
 784                 return -1;
 785         }
 786
 787         if (!peer->tpk_success) {
 788                 wpa_printf(MSG_DEBUG, "TDLS: Peer " MACSTR
 789                    " not connected - cannot Teardown link", MAC2STR(addr));
 790                 return -1;
 791         }
 792
 793         return wpa_tdls_do_teardown(sm, peer, reason_code);
 794 }
 795
 796
 797 static void wpa_tdls_disable_peer_link(struct wpa_sm *sm,
 798                                        struct wpa_tdls_peer *peer)
 799 {
 800         wpa_sm_tdls_oper(sm, TDLS_DISABLE_LINK, peer->addr);
 801         wpa_tdls_peer_free(sm, peer);
 802 }
 803
 804
 805 void wpa_tdls_disable_unreachable_link(struct wpa_sm *sm, const u8 *addr)
 806 {
 807         struct wpa_tdls_peer *peer;
 808
 809         for (peer = sm->tdls; peer; peer = peer->next) {
 810                 if (os_memcmp(peer->addr, addr, ETH_ALEN) == 0)
 811                         break;
 812         }
 813
 814         if (!peer || !peer->tpk_success) {
 815                 wpa_printf(MSG_DEBUG, "TDLS: Peer " MACSTR
 816                            " not connected - cannot teardown unreachable link",
 817                            MAC2STR(addr));
 818                 return;
 819         }
 820
 821         if (wpa_tdls_is_external_setup(sm)) {
 822                 /*
 823                  * Disable the link, send a teardown packet through the
 824                  * AP, and then reset link data.
 825                  */
 826                 wpa_sm_tdls_oper(sm, TDLS_DISABLE_LINK, addr);
 827                 wpa_tdls_send_teardown(sm, addr,
 828                                        WLAN_REASON_TDLS_TEARDOWN_UNREACHABLE);
 829                 wpa_tdls_peer_free(sm, peer);
 830         } else {
 831                 wpa_tdls_disable_peer_link(sm, peer);
 832         }
 833 }
 834
 835
 836 const char * wpa_tdls_get_link_status(struct wpa_sm *sm, const u8 *addr)
 837 {
 838         struct wpa_tdls_peer *peer;
 839
 840         if (sm->tdls_disabled || !sm->tdls_supported)
 841                 return "disabled";
 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 == NULL)
 849                 return "peer does not exist";
 850
 851         if (!peer->tpk_success)
 852                 return "peer not connected";
 853
 854         return "connected";
 855 }
 856
 857
 858 static int wpa_tdls_recv_teardown(struct wpa_sm *sm, const u8 *src_addr,
 859                                   const u8 *buf, size_t len)
 860 {
 861         struct wpa_tdls_peer *peer = NULL;
 862         struct wpa_tdls_ftie *ftie;
 863         struct wpa_tdls_lnkid *lnkid;
 864         struct wpa_eapol_ie_parse kde;
 865         u16 reason_code;
 866         const u8 *pos;
 867         int ielen;
 868
 869         /* Find the node and free from the list */
 870         for (peer = sm->tdls; peer; peer = peer->next) {
 871                 if (os_memcmp(peer->addr, src_addr, ETH_ALEN) == 0)
 872                         break;
 873         }
 874
 875         if (peer == NULL) {
 876                 wpa_printf(MSG_INFO, "TDLS: No matching entry found for "
 877                            "Teardown " MACSTR, MAC2STR(src_addr));
 878                 return 0;
 879         }
 880
 881         pos = buf;
 882         pos += 1 /* pkt_type */ + 1 /* Category */ + 1 /* Action */;
 883
 884         reason_code = WPA_GET_LE16(pos);
 885         pos += 2;
 886
 887         wpa_printf(MSG_DEBUG, "TDLS: TDLS Teardown Request from " MACSTR
 888                    " (reason code %u)", MAC2STR(src_addr), reason_code);
 889
 890         ielen = len - (pos - buf); /* start of IE in buf */
 891         if (wpa_supplicant_parse_ies((const u8 *) pos, ielen, &kde) < 0) {
 892                 wpa_printf(MSG_INFO, "TDLS: Failed to parse IEs in Teardown");
 893                 return -1;
 894         }
 895
 896         if (kde.lnkid == NULL || kde.lnkid_len < 3 * ETH_ALEN) {
 897                 wpa_printf(MSG_INFO, "TDLS: No Link Identifier IE in TDLS "
 898                            "Teardown");
 899                 return -1;
 900         }
 901         lnkid = (struct wpa_tdls_lnkid *) kde.lnkid;
 902
 903         if (!wpa_tdls_get_privacy(sm) || !peer->tpk_set || !peer->tpk_success)
 904                 goto skip_ftie;
 905
 906         if (kde.ftie == NULL || kde.ftie_len < sizeof(*ftie)) {
 907                 wpa_printf(MSG_INFO, "TDLS: No FTIE in TDLS Teardown");
 908                 return -1;
 909         }
 910
 911         ftie = (struct wpa_tdls_ftie *) kde.ftie;
 912
 913         /* Process MIC check to see if TDLS Teardown is right */
 914         if (wpa_supplicant_verify_tdls_mic_teardown(4, reason_code,
 915                                                     peer->dtoken, peer,
 916                                                     (u8 *) lnkid, ftie) < 0) {
 917                 wpa_printf(MSG_DEBUG, "TDLS: MIC failure for TDLS "
 918                            "Teardown Request from " MACSTR, MAC2STR(src_addr));
 919                 return -1;
 920         }
 921
 922 skip_ftie:
 923         /*
 924          * Request the driver to disable the direct link and clear associated
 925          * keys.
 926          */
 927         wpa_tdls_disable_peer_link(sm, peer);
 928         return 0;
 929 }
 930
 931
 932 /**
 933  * wpa_tdls_send_error - To send suitable TDLS status response with
 934  *      appropriate status code mentioning reason for error/failure.
 935  * @dst         - MAC addr of Peer station
 936  * @tdls_action - TDLS frame type for which error code is sent
 937  * @status      - status code mentioning reason
 938  */
 939
 940 static int wpa_tdls_send_error(struct wpa_sm *sm, const u8 *dst,
 941                                u8 tdls_action, u8 dialog_token, u16 status)
 942 {
 943         wpa_printf(MSG_DEBUG, "TDLS: Sending error to " MACSTR
 944                    " (action=%u status=%u)",
 945                    MAC2STR(dst), tdls_action, status);
 946         return wpa_tdls_tpk_send(sm, dst, tdls_action, dialog_token, status,
 947                                  0, NULL, 0);
 948 }
 949
 950
 951 static struct wpa_tdls_peer *
 952 wpa_tdls_add_peer(struct wpa_sm *sm, const u8 *addr, int *existing)
 953 {
 954         struct wpa_tdls_peer *peer;
 955
 956         if (existing)
 957                 *existing = 0;
 958         for (peer = sm->tdls; peer; peer = peer->next) {
 959                 if (os_memcmp(peer->addr, addr, ETH_ALEN) == 0) {
 960                         if (existing)
 961                                 *existing = 1;
 962                         return peer; /* re-use existing entry */
 963                 }
 964         }
 965
 966         wpa_printf(MSG_INFO, "TDLS: Creating peer entry for " MACSTR,
 967                    MAC2STR(addr));
 968
 969         peer = os_zalloc(sizeof(*peer));
 970         if (peer == NULL)
 971                 return NULL;
 972
 973         os_memcpy(peer->addr, addr, ETH_ALEN);
 974         peer->next = sm->tdls;
 975         sm->tdls = peer;
 976
 977         return peer;
 978 }
 979
 980
 981 static int wpa_tdls_send_tpk_m1(struct wpa_sm *sm,
 982                                 struct wpa_tdls_peer *peer)
 983 {
 984         size_t buf_len;
 985         struct wpa_tdls_timeoutie timeoutie;
 986         u16 rsn_capab;
 987         struct wpa_tdls_ftie *ftie;
 988         u8 *rbuf, *pos, *count_pos;
 989         u16 count;
 990         struct rsn_ie_hdr *hdr;
 991         int status;
 992
 993         if (!wpa_tdls_get_privacy(sm)) {
 994                 wpa_printf(MSG_DEBUG, "TDLS: No security used on the link");
 995                 peer->rsnie_i_len = 0;
 996                 goto skip_rsnie;
 997         }
 998
 999         /*
1000          * TPK Handshake Message 1:
1001          * FTIE: ANonce=0, SNonce=initiator nonce MIC=0, DataKDs=(RSNIE_I,
1002          * Timeout Interval IE))
1003          */
1004
1005         /* Filling RSN IE */
1006         hdr = (struct rsn_ie_hdr *) peer->rsnie_i;
1007         hdr->elem_id = WLAN_EID_RSN;
1008         WPA_PUT_LE16(hdr->version, RSN_VERSION);
1009
1010         pos = (u8 *) (hdr + 1);
1011         RSN_SELECTOR_PUT(pos, RSN_CIPHER_SUITE_NO_GROUP_ADDRESSED);
1012         pos += RSN_SELECTOR_LEN;
1013         count_pos = pos;
1014         pos += 2;
1015
1016         count = 0;
1017
1018         /*
1019          * AES-CCMP is the default Encryption preferred for TDLS, so
1020          * RSN IE is filled only with CCMP CIPHER
1021          * Note: TKIP is not used to encrypt TDLS link.
1022          *
1023          * Regardless of the cipher used on the AP connection, select CCMP
1024          * here.
1025          */
1026         RSN_SELECTOR_PUT(pos, RSN_CIPHER_SUITE_CCMP);
1027         pos += RSN_SELECTOR_LEN;
1028         count++;
1029
1030         WPA_PUT_LE16(count_pos, count);
1031
1032         WPA_PUT_LE16(pos, 1);
1033         pos += 2;
1034         RSN_SELECTOR_PUT(pos, RSN_AUTH_KEY_MGMT_TPK_HANDSHAKE);
1035         pos += RSN_SELECTOR_LEN;
1036
1037         rsn_capab = WPA_CAPABILITY_PEERKEY_ENABLED;
1038         rsn_capab |= RSN_NUM_REPLAY_COUNTERS_16 << 2;
1039 #ifdef CONFIG_TDLS_TESTING
1040         if (tdls_testing & TDLS_TESTING_ALT_RSN_IE) {
1041                 wpa_printf(MSG_DEBUG, "TDLS: Use alternative RSN IE for "
1042                            "testing");
1043                 rsn_capab = WPA_CAPABILITY_PEERKEY_ENABLED;
1044         }
1045 #endif /* CONFIG_TDLS_TESTING */
1046         WPA_PUT_LE16(pos, rsn_capab);
1047         pos += 2;
1048 #ifdef CONFIG_TDLS_TESTING
1049         if (tdls_testing & TDLS_TESTING_ALT_RSN_IE) {
1050                 /* Number of PMKIDs */
1051                 *pos++ = 0x00;
1052                 *pos++ = 0x00;
1053         }
1054 #endif /* CONFIG_TDLS_TESTING */
1055
1056         hdr->len = (pos - peer->rsnie_i) - 2;
1057         peer->rsnie_i_len = pos - peer->rsnie_i;
1058         wpa_hexdump(MSG_DEBUG, "TDLS: RSN IE for TPK handshake",
1059                     peer->rsnie_i, peer->rsnie_i_len);
1060
1061 skip_rsnie:
1062         buf_len = 0;
1063         if (wpa_tdls_get_privacy(sm))
1064                 buf_len += peer->rsnie_i_len + sizeof(struct wpa_tdls_ftie) +
1065                         sizeof(struct wpa_tdls_timeoutie);
1066 #ifdef CONFIG_TDLS_TESTING
1067         if (wpa_tdls_get_privacy(sm) &&
1068             (tdls_testing & TDLS_TESTING_LONG_FRAME))
1069                 buf_len += 170;
1070         if (tdls_testing & TDLS_TESTING_DIFF_BSSID)
1071                 buf_len += sizeof(struct wpa_tdls_lnkid);
1072 #endif /* CONFIG_TDLS_TESTING */
1073         rbuf = os_zalloc(buf_len + 1);
1074         if (rbuf == NULL) {
1075                 wpa_tdls_peer_free(sm, peer);
1076                 return -1;
1077         }
1078         pos = rbuf;
1079
1080         if (!wpa_tdls_get_privacy(sm))
1081                 goto skip_ies;
1082
1083         /* Initiator RSN IE */
1084         pos = wpa_add_ie(pos, peer->rsnie_i, peer->rsnie_i_len);
1085
1086         ftie = (struct wpa_tdls_ftie *) pos;
1087         ftie->ie_type = WLAN_EID_FAST_BSS_TRANSITION;
1088         ftie->ie_len = sizeof(struct wpa_tdls_ftie) - 2;
1089
1090         if (os_get_random(peer->inonce, WPA_NONCE_LEN)) {
1091                 wpa_msg(sm->ctx->msg_ctx, MSG_WARNING,
1092                         "TDLS: Failed to get random data for initiator Nonce");
1093                 os_free(rbuf);
1094                 wpa_tdls_peer_free(sm, peer);
1095                 return -1;
1096         }
1097         wpa_hexdump(MSG_DEBUG, "TDLS: Initiator Nonce for TPK handshake",
1098                     peer->inonce, WPA_NONCE_LEN);
1099         os_memcpy(ftie->Snonce, peer->inonce, WPA_NONCE_LEN);
1100
1101         wpa_hexdump(MSG_DEBUG, "TDLS: FTIE for TPK Handshake M1",
1102                     (u8 *) ftie, sizeof(struct wpa_tdls_ftie));
1103
1104         pos = (u8 *) (ftie + 1);
1105
1106 #ifdef CONFIG_TDLS_TESTING
1107         if (tdls_testing & TDLS_TESTING_LONG_FRAME) {
1108                 wpa_printf(MSG_DEBUG, "TDLS: Testing - add extra subelem to "
1109                            "FTIE");
1110                 ftie->ie_len += 170;
1111                 *pos++ = 255; /* FTIE subelem */
1112                 *pos++ = 168; /* FTIE subelem length */
1113                 pos += 168;
1114         }
1115 #endif /* CONFIG_TDLS_TESTING */
1116
1117         /* Lifetime */
1118         peer->lifetime = TPK_LIFETIME;
1119 #ifdef CONFIG_TDLS_TESTING
1120         if (tdls_testing & TDLS_TESTING_SHORT_LIFETIME) {
1121                 wpa_printf(MSG_DEBUG, "TDLS: Testing - use short TPK "
1122                            "lifetime");
1123                 peer->lifetime = 301;
1124         }
1125         if (tdls_testing & TDLS_TESTING_LONG_LIFETIME) {
1126                 wpa_printf(MSG_DEBUG, "TDLS: Testing - use long TPK "
1127                            "lifetime");
1128                 peer->lifetime = 0xffffffff;
1129         }
1130 #endif /* CONFIG_TDLS_TESTING */
1131         pos = wpa_add_tdls_timeoutie(pos, (u8 *) &timeoutie,
1132                                      sizeof(timeoutie), peer->lifetime);
1133         wpa_printf(MSG_DEBUG, "TDLS: TPK lifetime %u seconds", peer->lifetime);
1134
1135 skip_ies:
1136
1137 #ifdef CONFIG_TDLS_TESTING
1138         if (tdls_testing & TDLS_TESTING_DIFF_BSSID) {
1139                 wpa_printf(MSG_DEBUG, "TDLS: Testing - use incorrect BSSID in "
1140                            "Link Identifier");
1141                 struct wpa_tdls_lnkid *l = (struct wpa_tdls_lnkid *) pos;
1142                 wpa_tdls_linkid(sm, peer, l);
1143                 l->bssid[5] ^= 0x01;
1144                 pos += sizeof(*l);
1145         }
1146 #endif /* CONFIG_TDLS_TESTING */
1147
1148         wpa_printf(MSG_DEBUG, "TDLS: Sending TDLS Setup Request / TPK "
1149                    "Handshake Message 1 (peer " MACSTR ")",
1150                    MAC2STR(peer->addr));
1151
1152         status = wpa_tdls_tpk_send(sm, peer->addr, WLAN_TDLS_SETUP_REQUEST,
1153                                    1, 0, 0, rbuf, pos - rbuf);
1154         os_free(rbuf);
1155
1156         return status;
1157 }
1158
1159
1160 static int wpa_tdls_send_tpk_m2(struct wpa_sm *sm,
1161                                 const unsigned char *src_addr, u8 dtoken,
1162                                 struct wpa_tdls_lnkid *lnkid,
1163                                 const struct wpa_tdls_peer *peer)
1164 {
1165         u8 *rbuf, *pos;
1166         size_t buf_len;
1167         u32 lifetime;
1168         struct wpa_tdls_timeoutie timeoutie;
1169         struct wpa_tdls_ftie *ftie;
1170         int status;
1171
1172         buf_len = 0;
1173         if (wpa_tdls_get_privacy(sm)) {
1174                 /* Peer RSN IE, FTIE(Initiator Nonce, Responder Nonce),
1175                  * Lifetime */
1176                 buf_len += peer->rsnie_i_len + sizeof(struct wpa_tdls_ftie) +
1177                         sizeof(struct wpa_tdls_timeoutie);
1178 #ifdef CONFIG_TDLS_TESTING
1179                 if (tdls_testing & TDLS_TESTING_LONG_FRAME)
1180                         buf_len += 170;
1181 #endif /* CONFIG_TDLS_TESTING */
1182         }
1183
1184         rbuf = os_zalloc(buf_len + 1);
1185         if (rbuf == NULL)
1186                 return -1;
1187         pos = rbuf;
1188
1189         if (!wpa_tdls_get_privacy(sm))
1190                 goto skip_ies;
1191
1192         /* Peer RSN IE */
1193         pos = wpa_add_ie(pos, peer->rsnie_p, peer->rsnie_p_len);
1194
1195         ftie = (struct wpa_tdls_ftie *) pos;
1196         ftie->ie_type = WLAN_EID_FAST_BSS_TRANSITION;
1197         /* TODO: ftie->mic_control to set 2-RESPONSE */
1198         os_memcpy(ftie->Anonce, peer->rnonce, WPA_NONCE_LEN);
1199         os_memcpy(ftie->Snonce, peer->inonce, WPA_NONCE_LEN);
1200         ftie->ie_len = sizeof(struct wpa_tdls_ftie) - 2;
1201         wpa_hexdump(MSG_DEBUG, "TDLS: FTIE for TPK M2",
1202                     (u8 *) ftie, sizeof(*ftie));
1203
1204         pos = (u8 *) (ftie + 1);
1205
1206 #ifdef CONFIG_TDLS_TESTING
1207         if (tdls_testing & TDLS_TESTING_LONG_FRAME) {
1208                 wpa_printf(MSG_DEBUG, "TDLS: Testing - add extra subelem to "
1209                            "FTIE");
1210                 ftie->ie_len += 170;
1211                 *pos++ = 255; /* FTIE subelem */
1212                 *pos++ = 168; /* FTIE subelem length */
1213                 pos += 168;
1214         }
1215 #endif /* CONFIG_TDLS_TESTING */
1216
1217         /* Lifetime */
1218         lifetime = peer->lifetime;
1219 #ifdef CONFIG_TDLS_TESTING
1220         if (tdls_testing & TDLS_TESTING_WRONG_LIFETIME_RESP) {
1221                 wpa_printf(MSG_DEBUG, "TDLS: Testing - use wrong TPK "
1222                            "lifetime in response");
1223                 lifetime++;
1224         }
1225 #endif /* CONFIG_TDLS_TESTING */
1226         pos = wpa_add_tdls_timeoutie(pos, (u8 *) &timeoutie,
1227                                      sizeof(timeoutie), lifetime);
1228         wpa_printf(MSG_DEBUG, "TDLS: TPK lifetime %u seconds from initiator",
1229                    lifetime);
1230
1231         /* compute MIC before sending */
1232         wpa_tdls_ftie_mic(peer->tpk.kck, 2, (u8 *) lnkid, peer->rsnie_p,
1233                           (u8 *) &timeoutie, (u8 *) ftie, ftie->mic);
1234 #ifdef CONFIG_TDLS_TESTING
1235         if (tdls_testing & TDLS_TESTING_WRONG_MIC) {
1236                 wpa_printf(MSG_DEBUG, "TDLS: Testing - use wrong MIC");
1237                 ftie->mic[0] ^= 0x01;
1238         }
1239 #endif /* CONFIG_TDLS_TESTING */
1240
1241 skip_ies:
1242         status = wpa_tdls_tpk_send(sm, src_addr, WLAN_TDLS_SETUP_RESPONSE,
1243                                    dtoken, 0, 0, rbuf, pos - rbuf);
1244         os_free(rbuf);
1245
1246         return status;
1247 }
1248
1249
1250 static int wpa_tdls_send_tpk_m3(struct wpa_sm *sm,
1251                                 const unsigned char *src_addr, u8 dtoken,
1252                                 struct wpa_tdls_lnkid *lnkid,
1253                                 const struct wpa_tdls_peer *peer)
1254 {
1255         u8 *rbuf, *pos;
1256         size_t buf_len;
1257         struct wpa_tdls_ftie *ftie;
1258         struct wpa_tdls_timeoutie timeoutie;
1259         u32 lifetime;
1260         int status;
1261         u32 peer_capab = 0;
1262
1263         buf_len = 0;
1264         if (wpa_tdls_get_privacy(sm)) {
1265                 /* Peer RSN IE, FTIE(Initiator Nonce, Responder Nonce),
1266                  * Lifetime */
1267                 buf_len += peer->rsnie_i_len + sizeof(struct wpa_tdls_ftie) +
1268                         sizeof(struct wpa_tdls_timeoutie);
1269 #ifdef CONFIG_TDLS_TESTING
1270                 if (tdls_testing & TDLS_TESTING_LONG_FRAME)
1271                         buf_len += 170;
1272 #endif /* CONFIG_TDLS_TESTING */
1273         }
1274
1275         rbuf = os_zalloc(buf_len + 1);
1276         if (rbuf == NULL)
1277                 return -1;
1278         pos = rbuf;
1279
1280         if (!wpa_tdls_get_privacy(sm))
1281                 goto skip_ies;
1282
1283         /* Peer RSN IE */
1284         pos = wpa_add_ie(pos, peer->rsnie_p, peer->rsnie_p_len);
1285
1286         ftie = (struct wpa_tdls_ftie *) pos;
1287         ftie->ie_type = WLAN_EID_FAST_BSS_TRANSITION;
1288         /*TODO: ftie->mic_control to set 3-CONFIRM */
1289         os_memcpy(ftie->Anonce, peer->rnonce, WPA_NONCE_LEN);
1290         os_memcpy(ftie->Snonce, peer->inonce, WPA_NONCE_LEN);
1291         ftie->ie_len = sizeof(struct wpa_tdls_ftie) - 2;
1292
1293         pos = (u8 *) (ftie + 1);
1294
1295 #ifdef CONFIG_TDLS_TESTING
1296         if (tdls_testing & TDLS_TESTING_LONG_FRAME) {
1297                 wpa_printf(MSG_DEBUG, "TDLS: Testing - add extra subelem to "
1298                            "FTIE");
1299                 ftie->ie_len += 170;
1300                 *pos++ = 255; /* FTIE subelem */
1301                 *pos++ = 168; /* FTIE subelem length */
1302                 pos += 168;
1303         }
1304 #endif /* CONFIG_TDLS_TESTING */
1305
1306         /* Lifetime */
1307         lifetime = peer->lifetime;
1308 #ifdef CONFIG_TDLS_TESTING
1309         if (tdls_testing & TDLS_TESTING_WRONG_LIFETIME_CONF) {
1310                 wpa_printf(MSG_DEBUG, "TDLS: Testing - use wrong TPK "
1311                            "lifetime in confirm");
1312                 lifetime++;
1313         }
1314 #endif /* CONFIG_TDLS_TESTING */
1315         pos = wpa_add_tdls_timeoutie(pos, (u8 *) &timeoutie,
1316                                      sizeof(timeoutie), lifetime);
1317         wpa_printf(MSG_DEBUG, "TDLS: TPK lifetime %u seconds",
1318                    lifetime);
1319
1320         /* compute MIC before sending */
1321         wpa_tdls_ftie_mic(peer->tpk.kck, 3, (u8 *) lnkid, peer->rsnie_p,
1322                           (u8 *) &timeoutie, (u8 *) ftie, ftie->mic);
1323 #ifdef CONFIG_TDLS_TESTING
1324         if (tdls_testing & TDLS_TESTING_WRONG_MIC) {
1325                 wpa_printf(MSG_DEBUG, "TDLS: Testing - use wrong MIC");
1326                 ftie->mic[0] ^= 0x01;
1327         }
1328 #endif /* CONFIG_TDLS_TESTING */
1329
1330 skip_ies:
1331
1332         if (peer->vht_capabilities)
1333                 peer_capab |= TDLS_PEER_VHT;
1334         if (peer->ht_capabilities)
1335                 peer_capab |= TDLS_PEER_HT;
1336         if (peer->wmm_capable)
1337                 peer_capab |= TDLS_PEER_WMM;
1338
1339         status = wpa_tdls_tpk_send(sm, src_addr, WLAN_TDLS_SETUP_CONFIRM,
1340                                    dtoken, 0, peer_capab, rbuf, pos - rbuf);
1341         os_free(rbuf);
1342
1343         return status;
1344 }
1345
1346
1347 static int wpa_tdls_send_discovery_response(struct wpa_sm *sm,
1348                                             struct wpa_tdls_peer *peer,
1349                                             u8 dialog_token)
1350 {
1351         wpa_printf(MSG_DEBUG, "TDLS: Sending TDLS Discovery Response "
1352                    "(peer " MACSTR ")", MAC2STR(peer->addr));
1353
1354         return wpa_tdls_tpk_send(sm, peer->addr, WLAN_TDLS_DISCOVERY_RESPONSE,
1355                                  dialog_token, 0, 0, NULL, 0);
1356 }
1357
1358
1359 static int
1360 wpa_tdls_process_discovery_request(struct wpa_sm *sm, const u8 *addr,
1361                                    const u8 *buf, size_t len)
1362 {
1363         struct wpa_eapol_ie_parse kde;
1364         const struct wpa_tdls_lnkid *lnkid;
1365         struct wpa_tdls_peer *peer;
1366         size_t min_req_len = sizeof(struct wpa_tdls_frame) +
1367                 1 /* dialog token */ + sizeof(struct wpa_tdls_lnkid);
1368         u8 dialog_token;
1369
1370         wpa_printf(MSG_DEBUG, "TDLS: Discovery Request from " MACSTR,
1371                    MAC2STR(addr));
1372
1373         if (len < min_req_len) {
1374                 wpa_printf(MSG_DEBUG, "TDLS Discovery Request is too short: "
1375                            "%d", (int) len);
1376                 return -1;
1377         }
1378
1379         dialog_token = buf[sizeof(struct wpa_tdls_frame)];
1380
1381         /*
1382          * Some APs will tack on a weird IE to the end of a TDLS
1383          * discovery request packet. This needn't fail the response,
1384          * since the required IE are verified separately.
1385          */
1386         if (wpa_supplicant_parse_ies(buf + sizeof(struct wpa_tdls_frame) + 1,
1387                                      len - (sizeof(struct wpa_tdls_frame) + 1),
1388                                      &kde) < 0) {
1389                 wpa_printf(MSG_DEBUG,
1390                            "TDLS: Failed to parse IEs in Discovery Request - ignore as an interop workaround");
1391         }
1392
1393         if (!kde.lnkid) {
1394                 wpa_printf(MSG_DEBUG, "TDLS: Link ID not found in Discovery "
1395                            "Request");
1396                 return -1;
1397         }
1398
1399         lnkid = (const struct wpa_tdls_lnkid *) kde.lnkid;
1400
1401         if (os_memcmp(sm->bssid, lnkid->bssid, ETH_ALEN) != 0) {
1402                 wpa_printf(MSG_DEBUG, "TDLS: Discovery Request from different "
1403                            " BSS " MACSTR, MAC2STR(lnkid->bssid));
1404                 return -1;
1405         }
1406
1407         peer = wpa_tdls_add_peer(sm, addr, NULL);
1408         if (peer == NULL)
1409                 return -1;
1410
1411         return wpa_tdls_send_discovery_response(sm, peer, dialog_token);
1412 }
1413
1414
1415 int wpa_tdls_send_discovery_request(struct wpa_sm *sm, const u8 *addr)
1416 {
1417         if (sm->tdls_disabled || !sm->tdls_supported)
1418                 return -1;
1419
1420         wpa_printf(MSG_DEBUG, "TDLS: Sending Discovery Request to peer "
1421                    MACSTR, MAC2STR(addr));
1422         return wpa_tdls_tpk_send(sm, addr, WLAN_TDLS_DISCOVERY_REQUEST,
1423                                  1, 0, 0, NULL, 0);
1424 }
1425
1426
1427 static int copy_supp_rates(const struct wpa_eapol_ie_parse *kde,
1428                            struct wpa_tdls_peer *peer)
1429 {
1430         if (!kde->supp_rates) {
1431                 wpa_printf(MSG_DEBUG, "TDLS: No supported rates received");
1432                 return -1;
1433         }
1434         peer->supp_rates_len = merge_byte_arrays(
1435                 peer->supp_rates, sizeof(peer->supp_rates),
1436                 kde->supp_rates + 2, kde->supp_rates_len - 2,
1437                 kde->ext_supp_rates ? kde->ext_supp_rates + 2 : NULL,
1438                 kde->ext_supp_rates_len - 2);
1439         return 0;
1440 }
1441
1442
1443 static int copy_peer_ht_capab(const struct wpa_eapol_ie_parse *kde,
1444                               struct wpa_tdls_peer *peer)
1445 {
1446         if (!kde->ht_capabilities ||
1447             kde->ht_capabilities_len <
1448             sizeof(struct ieee80211_ht_capabilities) ) {
1449                 wpa_printf(MSG_DEBUG, "TDLS: No supported ht capabilities "
1450                            "received");
1451                 return 0;
1452         }
1453
1454         if (!peer->ht_capabilities) {
1455                 peer->ht_capabilities =
1456                         os_zalloc(sizeof(struct ieee80211_ht_capabilities));
1457                 if (peer->ht_capabilities == NULL)
1458                         return -1;
1459         }
1460
1461         os_memcpy(peer->ht_capabilities, kde->ht_capabilities,
1462                   sizeof(struct ieee80211_ht_capabilities));
1463         wpa_hexdump(MSG_DEBUG, "TDLS: Peer HT capabilities",
1464                     (u8 *) peer->ht_capabilities,
1465                     sizeof(struct ieee80211_ht_capabilities));
1466
1467         return 0;
1468 }
1469
1470
1471 static int copy_peer_vht_capab(const struct wpa_eapol_ie_parse *kde,
1472                               struct wpa_tdls_peer *peer)
1473 {
1474         if (!kde->vht_capabilities ||
1475             kde->vht_capabilities_len <
1476             sizeof(struct ieee80211_vht_capabilities) ) {
1477                 wpa_printf(MSG_DEBUG, "TDLS: No supported vht capabilities "
1478                            "received");
1479                 return 0;
1480         }
1481
1482         if (!peer->vht_capabilities) {
1483                 peer->vht_capabilities =
1484                         os_zalloc(sizeof(struct ieee80211_vht_capabilities));
1485                 if (peer->vht_capabilities == NULL)
1486                         return -1;
1487         }
1488
1489         os_memcpy(peer->vht_capabilities, kde->vht_capabilities,
1490                   sizeof(struct ieee80211_vht_capabilities));
1491         wpa_hexdump(MSG_DEBUG, "TDLS: Peer VHT capabilities",
1492                     (u8 *) peer->vht_capabilities,
1493                     sizeof(struct ieee80211_vht_capabilities));
1494
1495         return 0;
1496 }
1497
1498
1499 static int copy_peer_ext_capab(const struct wpa_eapol_ie_parse *kde,
1500                                struct wpa_tdls_peer *peer)
1501 {
1502         if (!kde->ext_capab) {
1503                 wpa_printf(MSG_DEBUG, "TDLS: No extended capabilities "
1504                            "received");
1505                 return 0;
1506         }
1507
1508         if (!peer->ext_capab || peer->ext_capab_len < kde->ext_capab_len - 2) {
1509                 /* Need to allocate buffer to fit the new information */
1510                 os_free(peer->ext_capab);
1511                 peer->ext_capab = os_zalloc(kde->ext_capab_len - 2);
1512                 if (peer->ext_capab == NULL)
1513                         return -1;
1514         }
1515
1516         peer->ext_capab_len = kde->ext_capab_len - 2;
1517         os_memcpy(peer->ext_capab, kde->ext_capab + 2, peer->ext_capab_len);
1518
1519         return 0;
1520 }
1521
1522
1523 static int copy_peer_wmm_capab(const struct wpa_eapol_ie_parse *kde,
1524                                struct wpa_tdls_peer *peer)
1525 {
1526         struct wmm_information_element *wmm;
1527
1528         if (!kde->wmm) {
1529                 wpa_printf(MSG_DEBUG, "TDLS: No supported WMM capabilities received");
1530                 return 0;
1531         }
1532
1533         if (kde->wmm_len < sizeof(struct wmm_information_element)) {
1534                 wpa_printf(MSG_DEBUG, "TDLS: Invalid supported WMM capabilities received");
1535                 return -1;
1536         }
1537
1538         wmm = (struct wmm_information_element *) kde->wmm;
1539         peer->qos_info = wmm->qos_info;
1540
1541         peer->wmm_capable = 1;
1542
1543         wpa_printf(MSG_DEBUG, "TDLS: Peer WMM QOS Info 0x%x", peer->qos_info);
1544         return 0;
1545 }
1546
1547
1548 static int copy_peer_supp_channels(const struct wpa_eapol_ie_parse *kde,
1549                                    struct wpa_tdls_peer *peer)
1550 {
1551         if (!kde->supp_channels) {
1552                 wpa_printf(MSG_DEBUG, "TDLS: No supported channels received");
1553                 return 0;
1554         }
1555
1556         if (!peer->supp_channels ||
1557             peer->supp_channels_len < kde->supp_channels_len) {
1558                 os_free(peer->supp_channels);
1559                 peer->supp_channels = os_zalloc(kde->supp_channels_len);
1560                 if (peer->supp_channels == NULL)
1561                         return -1;
1562         }
1563
1564         peer->supp_channels_len = kde->supp_channels_len;
1565
1566         os_memcpy(peer->supp_channels, kde->supp_channels,
1567                   peer->supp_channels_len);
1568         wpa_hexdump(MSG_DEBUG, "TDLS: Peer Supported Channels",
1569                     (u8 *) peer->supp_channels, peer->supp_channels_len);
1570         return 0;
1571 }
1572
1573
1574 static int copy_peer_supp_oper_classes(const struct wpa_eapol_ie_parse *kde,
1575                                        struct wpa_tdls_peer *peer)
1576 {
1577         if (!kde->supp_oper_classes) {
1578                 wpa_printf(MSG_DEBUG, "TDLS: No supported operating classes received");
1579                 return 0;
1580         }
1581
1582         if (!peer->supp_oper_classes ||
1583             peer->supp_oper_classes_len < kde->supp_oper_classes_len) {
1584                 os_free(peer->supp_oper_classes);
1585                 peer->supp_oper_classes = os_zalloc(kde->supp_oper_classes_len);
1586                 if (peer->supp_oper_classes == NULL)
1587                         return -1;
1588         }
1589
1590         peer->supp_oper_classes_len = kde->supp_oper_classes_len;
1591         os_memcpy(peer->supp_oper_classes, kde->supp_oper_classes,
1592                   peer->supp_oper_classes_len);
1593         wpa_hexdump(MSG_DEBUG, "TDLS: Peer Supported Operating Classes",
1594                     (u8 *) peer->supp_oper_classes,
1595                     peer->supp_oper_classes_len);
1596         return 0;
1597 }
1598
1599
1600 static int wpa_tdls_process_tpk_m1(struct wpa_sm *sm, const u8 *src_addr,
1601                                    const u8 *buf, size_t len)
1602 {
1603         struct wpa_tdls_peer *peer;
1604         struct wpa_eapol_ie_parse kde;
1605         struct wpa_ie_data ie;
1606         int cipher;
1607         const u8 *cpos;
1608         struct wpa_tdls_ftie *ftie = NULL;
1609         struct wpa_tdls_timeoutie *timeoutie;
1610         struct wpa_tdls_lnkid *lnkid;
1611         u32 lifetime = 0;
1612 #if 0
1613         struct rsn_ie_hdr *hdr;
1614         u8 *pos;
1615         u16 rsn_capab;
1616         u16 rsn_ver;
1617 #endif
1618         u8 dtoken;
1619         u16 ielen;
1620         u16 status = WLAN_STATUS_UNSPECIFIED_FAILURE;
1621         int tdls_prohibited = sm->tdls_prohibited;
1622         int existing_peer = 0;
1623
1624         if (len < 3 + 3)
1625                 return -1;
1626
1627         cpos = buf;
1628         cpos += 1 /* pkt_type */ + 1 /* Category */ + 1 /* Action */;
1629
1630         /* driver had already verified the frame format */
1631         dtoken = *cpos++; /* dialog token */
1632
1633         wpa_printf(MSG_INFO, "TDLS: Dialog Token in TPK M1 %d", dtoken);
1634
1635         peer = wpa_tdls_add_peer(sm, src_addr, &existing_peer);
1636         if (peer == NULL)
1637                 goto error;
1638
1639         /* If found, use existing entry instead of adding a new one;
1640          * how to handle the case where both ends initiate at the
1641          * same time? */
1642         if (existing_peer) {
1643                 if (peer->tpk_success) {
1644                         wpa_printf(MSG_DEBUG, "TDLS: TDLS Setup Request while "
1645                                    "direct link is enabled - tear down the "
1646                                    "old link first");
1647                         wpa_tdls_disable_peer_link(sm, peer);
1648                 }
1649
1650                 /*
1651                  * An entry is already present, so check if we already sent a
1652                  * TDLS Setup Request. If so, compare MAC addresses and let the
1653                  * STA with the lower MAC address continue as the initiator.
1654                  * The other negotiation is terminated.
1655                  */
1656                 if (peer->initiator) {
1657                         if (os_memcmp(sm->own_addr, src_addr, ETH_ALEN) < 0) {
1658                                 wpa_printf(MSG_DEBUG, "TDLS: Discard request "
1659                                            "from peer with higher address "
1660                                            MACSTR, MAC2STR(src_addr));
1661                                 return -1;
1662                         } else {
1663                                 wpa_printf(MSG_DEBUG, "TDLS: Accept request "
1664                                            "from peer with lower address "
1665                                            MACSTR " (terminate previously "
1666                                            "initiated negotiation",
1667                                            MAC2STR(src_addr));
1668                                 wpa_tdls_disable_peer_link(sm, peer);
1669                         }
1670                 }
1671         }
1672
1673         /* capability information */
1674         peer->capability = WPA_GET_LE16(cpos);
1675         cpos += 2;
1676
1677         ielen = len - (cpos - buf); /* start of IE in buf */
1678         if (wpa_supplicant_parse_ies(cpos, ielen, &kde) < 0) {
1679                 wpa_printf(MSG_INFO, "TDLS: Failed to parse IEs in TPK M1");
1680                 goto error;
1681         }
1682
1683         if (kde.lnkid == NULL || kde.lnkid_len < 3 * ETH_ALEN) {
1684                 wpa_printf(MSG_INFO, "TDLS: No valid Link Identifier IE in "
1685                            "TPK M1");
1686                 goto error;
1687         }
1688         wpa_hexdump(MSG_DEBUG, "TDLS: Link ID Received from TPK M1",
1689                     kde.lnkid, kde.lnkid_len);
1690         lnkid = (struct wpa_tdls_lnkid *) kde.lnkid;
1691         if (os_memcmp(sm->bssid, lnkid->bssid, ETH_ALEN) != 0) {
1692                 wpa_printf(MSG_INFO, "TDLS: TPK M1 from diff BSS");
1693                 status = WLAN_STATUS_NOT_IN_SAME_BSS;
1694                 goto error;
1695         }
1696
1697         wpa_printf(MSG_DEBUG, "TDLS: TPK M1 - TPK initiator " MACSTR,
1698                    MAC2STR(src_addr));
1699
1700         if (copy_supp_rates(&kde, peer) < 0)
1701                 goto error;
1702
1703         if (copy_peer_ht_capab(&kde, peer) < 0)
1704                 goto error;
1705
1706         if (copy_peer_vht_capab(&kde, peer) < 0)
1707                 goto error;
1708
1709         if (copy_peer_ext_capab(&kde, peer) < 0)
1710                 goto error;
1711
1712         if (copy_peer_supp_channels(&kde, peer) < 0)
1713                 goto error;
1714
1715         if (copy_peer_supp_oper_classes(&kde, peer) < 0)
1716                 goto error;
1717
1718         peer->qos_info = kde.qosinfo;
1719
1720         /* Overwrite with the qos_info obtained in WMM IE */
1721         if (copy_peer_wmm_capab(&kde, peer) < 0)
1722                 goto error;
1723
1724         peer->aid = kde.aid;
1725
1726 #ifdef CONFIG_TDLS_TESTING
1727         if (tdls_testing & TDLS_TESTING_CONCURRENT_INIT) {
1728                 peer = wpa_tdls_add_peer(sm, src_addr, NULL);
1729                 if (peer == NULL)
1730                         goto error;
1731                 wpa_printf(MSG_DEBUG, "TDLS: Testing concurrent initiation of "
1732                            "TDLS setup - send own request");
1733                 peer->initiator = 1;
1734                 wpa_tdls_send_tpk_m1(sm, peer);
1735         }
1736
1737         if ((tdls_testing & TDLS_TESTING_IGNORE_AP_PROHIBIT) &&
1738             tdls_prohibited) {
1739                 wpa_printf(MSG_DEBUG, "TDLS: Testing - ignore AP prohibition "
1740                            "on TDLS");
1741                 tdls_prohibited = 0;
1742         }
1743 #endif /* CONFIG_TDLS_TESTING */
1744
1745         if (tdls_prohibited) {
1746                 wpa_printf(MSG_INFO, "TDLS: TDLS prohibited in this BSS");
1747                 status = WLAN_STATUS_REQUEST_DECLINED;
1748                 goto error;
1749         }
1750
1751         if (!wpa_tdls_get_privacy(sm)) {
1752                 if (kde.rsn_ie) {
1753                         wpa_printf(MSG_INFO, "TDLS: RSN IE in TPK M1 while "
1754                                    "security is disabled");
1755                         status = WLAN_STATUS_SECURITY_DISABLED;
1756                         goto error;
1757                 }
1758                 goto skip_rsn;
1759         }
1760
1761         if (kde.ftie == NULL || kde.ftie_len < sizeof(*ftie) ||
1762             kde.rsn_ie == NULL) {
1763                 wpa_printf(MSG_INFO, "TDLS: No FTIE or RSN IE in TPK M1");
1764                 status = WLAN_STATUS_INVALID_PARAMETERS;
1765                 goto error;
1766         }
1767
1768         if (kde.rsn_ie_len > TDLS_MAX_IE_LEN) {
1769                 wpa_printf(MSG_INFO, "TDLS: Too long Initiator RSN IE in "
1770                            "TPK M1");
1771                 status = WLAN_STATUS_INVALID_RSNIE;
1772                 goto error;
1773         }
1774
1775         if (wpa_parse_wpa_ie_rsn(kde.rsn_ie, kde.rsn_ie_len, &ie) < 0) {
1776                 wpa_printf(MSG_INFO, "TDLS: Failed to parse RSN IE in TPK M1");
1777                 status = WLAN_STATUS_INVALID_RSNIE;
1778                 goto error;
1779         }
1780
1781         cipher = ie.pairwise_cipher;
1782         if (cipher & WPA_CIPHER_CCMP) {
1783                 wpa_printf(MSG_DEBUG, "TDLS: Using CCMP for direct link");
1784                 cipher = WPA_CIPHER_CCMP;
1785         } else {
1786                 wpa_printf(MSG_INFO, "TDLS: No acceptable cipher in TPK M1");
1787                 status = WLAN_STATUS_PAIRWISE_CIPHER_NOT_VALID;
1788                 goto error;
1789         }
1790
1791         if ((ie.capabilities &
1792              (WPA_CAPABILITY_NO_PAIRWISE | WPA_CAPABILITY_PEERKEY_ENABLED)) !=
1793             WPA_CAPABILITY_PEERKEY_ENABLED) {
1794                 wpa_printf(MSG_INFO, "TDLS: Invalid RSN Capabilities in "
1795                            "TPK M1");
1796                 status = WLAN_STATUS_INVALID_RSN_IE_CAPAB;
1797                 goto error;
1798         }
1799
1800         /* Lifetime */
1801         if (kde.key_lifetime == NULL) {
1802                 wpa_printf(MSG_INFO, "TDLS: No Key Lifetime IE in TPK M1");
1803                 status = WLAN_STATUS_UNACCEPTABLE_LIFETIME;
1804                 goto error;
1805         }
1806         timeoutie = (struct wpa_tdls_timeoutie *) kde.key_lifetime;
1807         lifetime = WPA_GET_LE32(timeoutie->value);
1808         wpa_printf(MSG_DEBUG, "TDLS: TPK lifetime %u seconds", lifetime);
1809         if (lifetime < 300) {
1810                 wpa_printf(MSG_INFO, "TDLS: Too short TPK lifetime");
1811                 status = WLAN_STATUS_UNACCEPTABLE_LIFETIME;
1812                 goto error;
1813         }
1814
1815 skip_rsn:
1816 #ifdef CONFIG_TDLS_TESTING
1817         if (tdls_testing & TDLS_TESTING_CONCURRENT_INIT) {
1818                 if (os_memcmp(sm->own_addr, peer->addr, ETH_ALEN) < 0) {
1819                         /*
1820                          * The request frame from us is going to win, so do not
1821                          * replace information based on this request frame from
1822                          * the peer.
1823                          */
1824                         goto skip_rsn_check;
1825                 }
1826         }
1827 #endif /* CONFIG_TDLS_TESTING */
1828
1829         peer->initiator = 0; /* Need to check */
1830         peer->dtoken = dtoken;
1831
1832         if (!wpa_tdls_get_privacy(sm)) {
1833                 peer->rsnie_i_len = 0;
1834                 peer->rsnie_p_len = 0;
1835                 peer->cipher = WPA_CIPHER_NONE;
1836                 goto skip_rsn_check;
1837         }
1838
1839         ftie = (struct wpa_tdls_ftie *) kde.ftie;
1840         os_memcpy(peer->rsnie_i, kde.rsn_ie, kde.rsn_ie_len);
1841         peer->rsnie_i_len = kde.rsn_ie_len;
1842         peer->cipher = cipher;
1843
1844         if (os_memcmp(peer->inonce, ftie->Snonce, WPA_NONCE_LEN) != 0) {
1845                 /*
1846                  * There is no point in updating the RNonce for every obtained
1847                  * TPK M1 frame (e.g., retransmission due to timeout) with the
1848                  * same INonce (SNonce in FTIE). However, if the TPK M1 is
1849                  * retransmitted with a different INonce, update the RNonce
1850                  * since this is for a new TDLS session.
1851                  */
1852                 wpa_printf(MSG_DEBUG,
1853                            "TDLS: New TPK M1 INonce - generate new RNonce");
1854                 os_memcpy(peer->inonce, ftie->Snonce, WPA_NONCE_LEN);
1855                 if (os_get_random(peer->rnonce, WPA_NONCE_LEN)) {
1856                         wpa_msg(sm->ctx->ctx, MSG_WARNING,
1857                                 "TDLS: Failed to get random data for responder nonce");
1858                         goto error;
1859                 }
1860         }
1861
1862 #if 0
1863         /* get version info from RSNIE received from Peer */
1864         hdr = (struct rsn_ie_hdr *) kde.rsn_ie;
1865         rsn_ver = WPA_GET_LE16(hdr->version);
1866
1867         /* use min(peer's version, out version) */
1868         if (rsn_ver > RSN_VERSION)
1869                 rsn_ver = RSN_VERSION;
1870
1871         hdr = (struct rsn_ie_hdr *) peer->rsnie_p;
1872
1873         hdr->elem_id = WLAN_EID_RSN;
1874         WPA_PUT_LE16(hdr->version, rsn_ver);
1875         pos = (u8 *) (hdr + 1);
1876
1877         RSN_SELECTOR_PUT(pos, RSN_CIPHER_SUITE_NO_GROUP_ADDRESSED);
1878         pos += RSN_SELECTOR_LEN;
1879         /* Include only the selected cipher in pairwise cipher suite */
1880         WPA_PUT_LE16(pos, 1);
1881         pos += 2;
1882         if (cipher == WPA_CIPHER_CCMP)
1883                 RSN_SELECTOR_PUT(pos, RSN_CIPHER_SUITE_CCMP);
1884         pos += RSN_SELECTOR_LEN;
1885
1886         WPA_PUT_LE16(pos, 1);
1887         pos += 2;
1888         RSN_SELECTOR_PUT(pos, RSN_AUTH_KEY_MGMT_TPK_HANDSHAKE);
1889         pos += RSN_SELECTOR_LEN;
1890
1891         rsn_capab = WPA_CAPABILITY_PEERKEY_ENABLED;
1892         rsn_capab |= RSN_NUM_REPLAY_COUNTERS_16 << 2;
1893         WPA_PUT_LE16(pos, rsn_capab);
1894         pos += 2;
1895
1896         hdr->len = (pos - peer->rsnie_p) - 2;
1897         peer->rsnie_p_len = pos - peer->rsnie_p;
1898 #endif
1899
1900         /* temp fix: validation of RSNIE later */
1901         os_memcpy(peer->rsnie_p, peer->rsnie_i, peer->rsnie_i_len);
1902         peer->rsnie_p_len = peer->rsnie_i_len;
1903
1904         wpa_hexdump(MSG_DEBUG, "TDLS: RSN IE for TPK handshake",
1905                     peer->rsnie_p, peer->rsnie_p_len);
1906
1907         peer->lifetime = lifetime;
1908
1909         wpa_tdls_generate_tpk(peer, sm->own_addr, sm->bssid);
1910
1911 skip_rsn_check:
1912         /* add the peer to the driver as a "setup in progress" peer */
1913         if (wpa_sm_tdls_peer_addset(sm, peer->addr, 1, 0, 0, NULL, 0, NULL,
1914                                     NULL, 0, NULL, 0, NULL, 0, NULL, 0))
1915                 goto error;
1916
1917         peer->tpk_in_progress = 1;
1918
1919         wpa_printf(MSG_DEBUG, "TDLS: Sending TDLS Setup Response / TPK M2");
1920         if (wpa_tdls_send_tpk_m2(sm, src_addr, dtoken, lnkid, peer) < 0) {
1921                 wpa_tdls_disable_peer_link(sm, peer);
1922                 goto error;
1923         }
1924
1925         return 0;
1926
1927 error:
1928         wpa_tdls_send_error(sm, src_addr, WLAN_TDLS_SETUP_RESPONSE, dtoken,
1929                             status);
1930         if (peer)
1931                 wpa_tdls_peer_free(sm, peer);
1932         return -1;
1933 }
1934
1935
1936 static int wpa_tdls_enable_link(struct wpa_sm *sm, struct wpa_tdls_peer *peer)
1937 {
1938         peer->tpk_success = 1;
1939         peer->tpk_in_progress = 0;
1940         eloop_cancel_timeout(wpa_tdls_tpk_timeout, sm, peer);
1941         if (wpa_tdls_get_privacy(sm)) {
1942                 u32 lifetime = peer->lifetime;
1943                 /*
1944                  * Start the initiator process a bit earlier to avoid race
1945                  * condition with the responder sending teardown request.
1946                  */
1947                 if (lifetime > 3 && peer->initiator)
1948                         lifetime -= 3;
1949                 eloop_register_timeout(lifetime, 0, wpa_tdls_tpk_timeout,
1950                                        sm, peer);
1951 #ifdef CONFIG_TDLS_TESTING
1952         if (tdls_testing & TDLS_TESTING_NO_TPK_EXPIRATION) {
1953                 wpa_printf(MSG_DEBUG, "TDLS: Testing - disable TPK "
1954                            "expiration");
1955                 eloop_cancel_timeout(wpa_tdls_tpk_timeout, sm, peer);
1956         }
1957 #endif /* CONFIG_TDLS_TESTING */
1958         }
1959
1960         /* add supported rates, capabilities, and qos_info to the TDLS peer */
1961         if (wpa_sm_tdls_peer_addset(sm, peer->addr, 0, peer->aid,
1962                                     peer->capability,
1963                                     peer->supp_rates, peer->supp_rates_len,
1964                                     peer->ht_capabilities,
1965                                     peer->vht_capabilities,
1966                                     peer->qos_info, peer->ext_capab,
1967                                     peer->ext_capab_len,
1968                                     peer->supp_channels,
1969                                     peer->supp_channels_len,
1970                                     peer->supp_oper_classes,
1971                                     peer->supp_oper_classes_len) < 0)
1972                 return -1;
1973
1974         if (peer->reconfig_key && wpa_tdls_set_key(sm, peer) < 0) {
1975                 wpa_printf(MSG_INFO, "TDLS: Could not configure key to the "
1976                            "driver");
1977                 return -1;
1978         }
1979         peer->reconfig_key = 0;
1980
1981         return wpa_sm_tdls_oper(sm, TDLS_ENABLE_LINK, peer->addr);
1982 }
1983
1984
1985 static int wpa_tdls_process_tpk_m2(struct wpa_sm *sm, const u8 *src_addr,
1986                                    const u8 *buf, size_t len)
1987 {
1988         struct wpa_tdls_peer *peer;
1989         struct wpa_eapol_ie_parse kde;
1990         struct wpa_ie_data ie;
1991         int cipher;
1992         struct wpa_tdls_ftie *ftie;
1993         struct wpa_tdls_timeoutie *timeoutie;
1994         struct wpa_tdls_lnkid *lnkid;
1995         u32 lifetime;
1996         u8 dtoken;
1997         int ielen;
1998         u16 status;
1999         const u8 *pos;
2000         int ret = 0;
2001
2002         wpa_printf(MSG_DEBUG, "TDLS: Received TDLS Setup Response / TPK M2 "
2003                    "(Peer " MACSTR ")", MAC2STR(src_addr));
2004         for (peer = sm->tdls; peer; peer = peer->next) {
2005                 if (os_memcmp(peer->addr, src_addr, ETH_ALEN) == 0)
2006                         break;
2007         }
2008         if (peer == NULL) {
2009                 wpa_printf(MSG_INFO, "TDLS: No matching peer found for "
2010                            "TPK M2: " MACSTR, MAC2STR(src_addr));
2011                 return -1;
2012         }
2013         if (!peer->initiator) {
2014                 /*
2015                  * This may happen if both devices try to initiate TDLS at the
2016                  * same time and we accept the TPK M1 from the peer in
2017                  * wpa_tdls_process_tpk_m1() and clear our previous state.
2018                  */
2019                 wpa_printf(MSG_INFO, "TDLS: We were not the initiator, so "
2020                            "ignore TPK M2 from " MACSTR, MAC2STR(src_addr));
2021                 return -1;
2022         }
2023         wpa_tdls_tpk_retry_timeout_cancel(sm, peer, WLAN_TDLS_SETUP_REQUEST);
2024
2025         if (len < 3 + 2 + 1) {
2026                 wpa_tdls_disable_peer_link(sm, peer);
2027                 return -1;
2028         }
2029
2030         pos = buf;
2031         pos += 1 /* pkt_type */ + 1 /* Category */ + 1 /* Action */;
2032         status = WPA_GET_LE16(pos);
2033         pos += 2 /* status code */;
2034
2035         if (status != WLAN_STATUS_SUCCESS) {
2036                 wpa_printf(MSG_INFO, "TDLS: Status code in TPK M2: %u",
2037                            status);
2038                 wpa_tdls_disable_peer_link(sm, peer);
2039                 return -1;
2040         }
2041
2042         status = WLAN_STATUS_UNSPECIFIED_FAILURE;
2043
2044         /* TODO: need to verify dialog token matches here or in kernel */
2045         dtoken = *pos++; /* dialog token */
2046
2047         wpa_printf(MSG_DEBUG, "TDLS: Dialog Token in TPK M2 %d", dtoken);
2048
2049         if (len < 3 + 2 + 1 + 2) {
2050                 wpa_tdls_disable_peer_link(sm, peer);
2051                 return -1;
2052         }
2053
2054         /* capability information */
2055         peer->capability = WPA_GET_LE16(pos);
2056         pos += 2;
2057
2058         ielen = len - (pos - buf); /* start of IE in buf */
2059         if (wpa_supplicant_parse_ies(pos, ielen, &kde) < 0) {
2060                 wpa_printf(MSG_INFO, "TDLS: Failed to parse IEs in TPK M2");
2061                 goto error;
2062         }
2063
2064 #ifdef CONFIG_TDLS_TESTING
2065         if (tdls_testing & TDLS_TESTING_DECLINE_RESP) {
2066                 wpa_printf(MSG_DEBUG, "TDLS: Testing - decline response");
2067                 status = WLAN_STATUS_REQUEST_DECLINED;
2068                 goto error;
2069         }
2070 #endif /* CONFIG_TDLS_TESTING */
2071
2072         if (kde.lnkid == NULL || kde.lnkid_len < 3 * ETH_ALEN) {
2073                 wpa_printf(MSG_INFO, "TDLS: No valid Link Identifier IE in "
2074                            "TPK M2");
2075                 goto error;
2076         }
2077         wpa_hexdump(MSG_DEBUG, "TDLS: Link ID Received from TPK M2",
2078                     kde.lnkid, kde.lnkid_len);
2079         lnkid = (struct wpa_tdls_lnkid *) kde.lnkid;
2080
2081         if (os_memcmp(sm->bssid, lnkid->bssid, ETH_ALEN) != 0) {
2082                 wpa_printf(MSG_INFO, "TDLS: TPK M2 from different BSS");
2083                 status = WLAN_STATUS_NOT_IN_SAME_BSS;
2084                 goto error;
2085         }
2086
2087         if (copy_supp_rates(&kde, peer) < 0)
2088                 goto error;
2089
2090         if (copy_peer_ht_capab(&kde, peer) < 0)
2091                 goto error;
2092
2093         if (copy_peer_vht_capab(&kde, peer) < 0)
2094                 goto error;
2095
2096         if (copy_peer_ext_capab(&kde, peer) < 0)
2097                 goto error;
2098
2099         if (copy_peer_supp_channels(&kde, peer) < 0)
2100                 goto error;
2101
2102         if (copy_peer_supp_oper_classes(&kde, peer) < 0)
2103                 goto error;
2104
2105         peer->qos_info = kde.qosinfo;
2106
2107         /* Overwrite with the qos_info obtained in WMM IE */
2108         if (copy_peer_wmm_capab(&kde, peer) < 0)
2109                 goto error;
2110
2111         peer->aid = kde.aid;
2112
2113         if (!wpa_tdls_get_privacy(sm)) {
2114                 peer->rsnie_p_len = 0;
2115                 peer->cipher = WPA_CIPHER_NONE;
2116                 goto skip_rsn;
2117         }
2118
2119         if (kde.ftie == NULL || kde.ftie_len < sizeof(*ftie) ||
2120             kde.rsn_ie == NULL) {
2121                 wpa_printf(MSG_INFO, "TDLS: No FTIE or RSN IE in TPK M2");
2122                 status = WLAN_STATUS_INVALID_PARAMETERS;
2123                 goto error;
2124         }
2125         wpa_hexdump(MSG_DEBUG, "TDLS: RSN IE Received from TPK M2",
2126                     kde.rsn_ie, kde.rsn_ie_len);
2127
2128         if (kde.rsn_ie_len > TDLS_MAX_IE_LEN) {
2129                 wpa_printf(MSG_INFO,
2130                            "TDLS: Too long Responder RSN IE in TPK M2");
2131                 status = WLAN_STATUS_INVALID_RSNIE;
2132                 goto error;
2133         }
2134
2135         /*
2136          * FIX: bitwise comparison of RSN IE is not the correct way of
2137          * validation this. It can be different, but certain fields must
2138          * match. Since we list only a single pairwise cipher in TPK M1, the
2139          * memcmp is likely to work in most cases, though.
2140          */
2141         if (kde.rsn_ie_len != peer->rsnie_i_len ||
2142             os_memcmp(peer->rsnie_i, kde.rsn_ie, peer->rsnie_i_len) != 0) {
2143                 wpa_printf(MSG_INFO, "TDLS: RSN IE in TPK M2 does "
2144                            "not match with RSN IE used in TPK M1");
2145                 wpa_hexdump(MSG_DEBUG, "TDLS: RSN IE Sent in TPK M1",
2146                             peer->rsnie_i, peer->rsnie_i_len);
2147                 wpa_hexdump(MSG_DEBUG, "TDLS: RSN IE Received from TPK M2",
2148                             kde.rsn_ie, kde.rsn_ie_len);
2149                 status = WLAN_STATUS_INVALID_RSNIE;
2150                 goto error;
2151         }
2152
2153         if (wpa_parse_wpa_ie_rsn(kde.rsn_ie, kde.rsn_ie_len, &ie) < 0) {
2154                 wpa_printf(MSG_INFO, "TDLS: Failed to parse RSN IE in TPK M2");
2155                 status = WLAN_STATUS_INVALID_RSNIE;
2156                 goto error;
2157         }
2158
2159         cipher = ie.pairwise_cipher;
2160         if (cipher == WPA_CIPHER_CCMP) {
2161                 wpa_printf(MSG_DEBUG, "TDLS: Using CCMP for direct link");
2162                 cipher = WPA_CIPHER_CCMP;
2163         } else {
2164                 wpa_printf(MSG_INFO, "TDLS: No acceptable cipher in TPK M2");
2165                 status = WLAN_STATUS_PAIRWISE_CIPHER_NOT_VALID;
2166                 goto error;
2167         }
2168
2169         wpa_hexdump(MSG_DEBUG, "TDLS: FTIE Received from TPK M2",
2170                     kde.ftie, sizeof(*ftie));
2171         ftie = (struct wpa_tdls_ftie *) kde.ftie;
2172
2173         if (!os_memcmp(peer->inonce, ftie->Snonce, WPA_NONCE_LEN) == 0) {
2174                 wpa_printf(MSG_INFO, "TDLS: FTIE SNonce in TPK M2 does "
2175                            "not match with FTIE SNonce used in TPK M1");
2176                 /* Silently discard the frame */
2177                 return -1;
2178         }
2179
2180         /* Responder Nonce and RSN IE */
2181         os_memcpy(peer->rnonce, ftie->Anonce, WPA_NONCE_LEN);
2182         os_memcpy(peer->rsnie_p, kde.rsn_ie, kde.rsn_ie_len);
2183         peer->rsnie_p_len = kde.rsn_ie_len;
2184         peer->cipher = cipher;
2185
2186         /* Lifetime */
2187         if (kde.key_lifetime == NULL) {
2188                 wpa_printf(MSG_INFO, "TDLS: No Key Lifetime IE in TPK M2");
2189                 status = WLAN_STATUS_UNACCEPTABLE_LIFETIME;
2190                 goto error;
2191         }
2192         timeoutie = (struct wpa_tdls_timeoutie *) kde.key_lifetime;
2193         lifetime = WPA_GET_LE32(timeoutie->value);
2194         wpa_printf(MSG_DEBUG, "TDLS: TPK lifetime %u seconds in TPK M2",
2195                    lifetime);
2196         if (lifetime != peer->lifetime) {
2197                 wpa_printf(MSG_INFO, "TDLS: Unexpected TPK lifetime %u in "
2198                            "TPK M2 (expected %u)", lifetime, peer->lifetime);
2199                 status = WLAN_STATUS_UNACCEPTABLE_LIFETIME;
2200                 goto error;
2201         }
2202
2203         wpa_tdls_generate_tpk(peer, sm->own_addr, sm->bssid);
2204
2205         /* Process MIC check to see if TPK M2 is right */
2206         if (wpa_supplicant_verify_tdls_mic(2, peer, (u8 *) lnkid,
2207                                            (u8 *) timeoutie, ftie) < 0) {
2208                 /* Discard the frame */
2209                 wpa_tdls_del_key(sm, peer);
2210                 wpa_tdls_disable_peer_link(sm, peer);
2211                 return -1;
2212         }
2213
2214         if (wpa_tdls_set_key(sm, peer) < 0) {
2215                 /*
2216                  * Some drivers may not be able to config the key prior to full
2217                  * STA entry having been configured.
2218                  */
2219                 wpa_printf(MSG_DEBUG, "TDLS: Try to configure TPK again after "
2220                            "STA entry is complete");
2221                 peer->reconfig_key = 1;
2222         }
2223
2224 skip_rsn:
2225         peer->dtoken = dtoken;
2226
2227         wpa_printf(MSG_DEBUG, "TDLS: Sending TDLS Setup Confirm / "
2228                    "TPK Handshake Message 3");
2229         if (wpa_tdls_send_tpk_m3(sm, src_addr, dtoken, lnkid, peer) < 0) {
2230                 wpa_tdls_disable_peer_link(sm, peer);
2231                 return -1;
2232         }
2233
2234         if (!peer->tpk_success) {
2235                 /*
2236                  * Enable Link only when tpk_success is 0, signifying that this
2237                  * processing of TPK M2 frame is not because of a retransmission
2238                  * during TDLS setup handshake.
2239                  */
2240                 ret = wpa_tdls_enable_link(sm, peer);
2241                 if (ret < 0) {
2242                         wpa_printf(MSG_DEBUG, "TDLS: Could not enable link");
2243                         wpa_tdls_do_teardown(
2244                                 sm, peer,
2245                                 WLAN_REASON_TDLS_TEARDOWN_UNSPECIFIED);
2246                 }
2247         }
2248         return ret;
2249
2250 error:
2251         wpa_tdls_send_error(sm, src_addr, WLAN_TDLS_SETUP_CONFIRM, dtoken,
2252                             status);
2253         wpa_tdls_disable_peer_link(sm, peer);
2254         return -1;
2255 }
2256
2257
2258 static int wpa_tdls_process_tpk_m3(struct wpa_sm *sm, const u8 *src_addr,
2259                                    const u8 *buf, size_t len)
2260 {
2261         struct wpa_tdls_peer *peer;
2262         struct wpa_eapol_ie_parse kde;
2263         struct wpa_tdls_ftie *ftie;
2264         struct wpa_tdls_timeoutie *timeoutie;
2265         struct wpa_tdls_lnkid *lnkid;
2266         int ielen;
2267         u16 status;
2268         const u8 *pos;
2269         u32 lifetime;
2270         int ret = 0;
2271
2272         wpa_printf(MSG_DEBUG, "TDLS: Received TDLS Setup Confirm / TPK M3 "
2273                    "(Peer " MACSTR ")", MAC2STR(src_addr));
2274         for (peer = sm->tdls; peer; peer = peer->next) {
2275                 if (os_memcmp(peer->addr, src_addr, ETH_ALEN) == 0)
2276                         break;
2277         }
2278         if (peer == NULL) {
2279                 wpa_printf(MSG_INFO, "TDLS: No matching peer found for "
2280                            "TPK M3: " MACSTR, MAC2STR(src_addr));
2281                 return -1;
2282         }
2283         wpa_tdls_tpk_retry_timeout_cancel(sm, peer, WLAN_TDLS_SETUP_RESPONSE);
2284
2285         if (len < 3 + 3)
2286                 goto error;
2287         pos = buf;
2288         pos += 1 /* pkt_type */ + 1 /* Category */ + 1 /* Action */;
2289
2290         status = WPA_GET_LE16(pos);
2291
2292         if (status != 0) {
2293                 wpa_printf(MSG_INFO, "TDLS: Status code in TPK M3: %u",
2294                            status);
2295                 goto error;
2296         }
2297         pos += 2 /* status code */ + 1 /* dialog token */;
2298
2299         ielen = len - (pos - buf); /* start of IE in buf */
2300
2301         /*
2302          * Don't reject the message if failing to parse IEs. The IEs we need are
2303          * explicitly checked below. Some APs piggy-back broken IEs to the end
2304          * of a TDLS Confirm packet, which will fail the link if we don't ignore
2305          * this error.
2306          */
2307         if (wpa_supplicant_parse_ies((const u8 *) pos, ielen, &kde) < 0) {
2308                 wpa_printf(MSG_DEBUG,
2309                            "TDLS: Failed to parse KDEs in TPK M3 - ignore as an interop workaround");
2310         }
2311
2312         if (kde.lnkid == NULL || kde.lnkid_len < 3 * ETH_ALEN) {
2313                 wpa_printf(MSG_INFO, "TDLS: No Link Identifier IE in TPK M3");
2314                 goto error;
2315         }
2316         wpa_hexdump(MSG_DEBUG, "TDLS: Link ID Received from TPK M3",
2317                     (u8 *) kde.lnkid, kde.lnkid_len);
2318         lnkid = (struct wpa_tdls_lnkid *) kde.lnkid;
2319
2320         if (os_memcmp(sm->bssid, lnkid->bssid, ETH_ALEN) != 0) {
2321                 wpa_printf(MSG_INFO, "TDLS: TPK M3 from diff BSS");
2322                 goto error;
2323         }
2324
2325         if (!wpa_tdls_get_privacy(sm))
2326                 goto skip_rsn;
2327
2328         if (kde.ftie == NULL || kde.ftie_len < sizeof(*ftie)) {
2329                 wpa_printf(MSG_INFO, "TDLS: No FTIE in TPK M3");
2330                 goto error;
2331         }
2332         wpa_hexdump(MSG_DEBUG, "TDLS: FTIE Received from TPK M3",
2333                     kde.ftie, sizeof(*ftie));
2334         ftie = (struct wpa_tdls_ftie *) kde.ftie;
2335
2336         if (kde.rsn_ie == NULL) {
2337                 wpa_printf(MSG_INFO, "TDLS: No RSN IE in TPK M3");
2338                 goto error;
2339         }
2340         wpa_hexdump(MSG_DEBUG, "TDLS: RSN IE Received from TPK M3",
2341                     kde.rsn_ie, kde.rsn_ie_len);
2342         if (kde.rsn_ie_len != peer->rsnie_p_len ||
2343             os_memcmp(kde.rsn_ie, peer->rsnie_p, peer->rsnie_p_len) != 0) {
2344                 wpa_printf(MSG_INFO, "TDLS: RSN IE in TPK M3 does not match "
2345                            "with the one sent in TPK M2");
2346                 goto error;
2347         }
2348
2349         if (!os_memcmp(peer->rnonce, ftie->Anonce, WPA_NONCE_LEN) == 0) {
2350                 wpa_printf(MSG_INFO, "TDLS: FTIE ANonce in TPK M3 does "
2351                            "not match with FTIE ANonce used in TPK M2");
2352                 goto error;
2353         }
2354
2355         if (!os_memcmp(peer->inonce, ftie->Snonce, WPA_NONCE_LEN) == 0) {
2356                 wpa_printf(MSG_INFO, "TDLS: FTIE SNonce in TPK M3 does not "
2357                            "match with FTIE SNonce used in TPK M1");
2358                 goto error;
2359         }
2360
2361         if (kde.key_lifetime == NULL) {
2362                 wpa_printf(MSG_INFO, "TDLS: No Key Lifetime IE in TPK M3");
2363                 goto error;
2364         }
2365         timeoutie = (struct wpa_tdls_timeoutie *) kde.key_lifetime;
2366         wpa_hexdump(MSG_DEBUG, "TDLS: Timeout IE Received from TPK M3",
2367                     (u8 *) timeoutie, sizeof(*timeoutie));
2368         lifetime = WPA_GET_LE32(timeoutie->value);
2369         wpa_printf(MSG_DEBUG, "TDLS: TPK lifetime %u seconds in TPK M3",
2370                    lifetime);
2371         if (lifetime != peer->lifetime) {
2372                 wpa_printf(MSG_INFO, "TDLS: Unexpected TPK lifetime %u in "
2373                            "TPK M3 (expected %u)", lifetime, peer->lifetime);
2374                 goto error;
2375         }
2376
2377         if (wpa_supplicant_verify_tdls_mic(3, peer, (u8 *) lnkid,
2378                                            (u8 *) timeoutie, ftie) < 0) {
2379                 wpa_tdls_del_key(sm, peer);
2380                 goto error;
2381         }
2382
2383         if (wpa_tdls_set_key(sm, peer) < 0) {
2384                 /*
2385                  * Some drivers may not be able to config the key prior to full
2386                  * STA entry having been configured.
2387                  */
2388                 wpa_printf(MSG_DEBUG, "TDLS: Try to configure TPK again after "
2389                            "STA entry is complete");
2390                 peer->reconfig_key = 1;
2391         }
2392
2393 skip_rsn:
2394         if (!peer->tpk_success) {
2395                 /*
2396                  * Enable Link only when tpk_success is 0, signifying that this
2397                  * processing of TPK M3 frame is not because of a retransmission
2398                  * during TDLS setup handshake.
2399                  */
2400                 ret = wpa_tdls_enable_link(sm, peer);
2401                 if (ret < 0) {
2402                         wpa_printf(MSG_DEBUG, "TDLS: Could not enable link");
2403                         wpa_tdls_do_teardown(
2404                                 sm, peer,
2405                                 WLAN_REASON_TDLS_TEARDOWN_UNSPECIFIED);
2406                 }
2407         }
2408         return ret;
2409 error:
2410         wpa_tdls_disable_peer_link(sm, peer);
2411         return -1;
2412 }
2413
2414
2415 static u8 * wpa_add_tdls_timeoutie(u8 *pos, u8 *ie, size_t ie_len, u32 tsecs)
2416 {
2417         struct wpa_tdls_timeoutie *lifetime = (struct wpa_tdls_timeoutie *) ie;
2418
2419         os_memset(lifetime, 0, ie_len);
2420         lifetime->ie_type = WLAN_EID_TIMEOUT_INTERVAL;
2421         lifetime->ie_len = sizeof(struct wpa_tdls_timeoutie) - 2;
2422         lifetime->interval_type = WLAN_TIMEOUT_KEY_LIFETIME;
2423         WPA_PUT_LE32(lifetime->value, tsecs);
2424         os_memcpy(pos, ie, ie_len);
2425         return pos + ie_len;
2426 }
2427
2428
2429 /**
2430  * wpa_tdls_start - Initiate TDLS handshake (send TPK Handshake Message 1)
2431  * @sm: Pointer to WPA state machine data from wpa_sm_init()
2432  * @peer: MAC address of the peer STA
2433  * Returns: 0 on success, or -1 on failure
2434  *
2435  * Send TPK Handshake Message 1 info to driver to start TDLS
2436  * handshake with the peer.
2437  */
2438 int wpa_tdls_start(struct wpa_sm *sm, const u8 *addr)
2439 {
2440         struct wpa_tdls_peer *peer;
2441         int tdls_prohibited = sm->tdls_prohibited;
2442
2443         if (sm->tdls_disabled || !sm->tdls_supported)
2444                 return -1;
2445
2446 #ifdef CONFIG_TDLS_TESTING
2447         if ((tdls_testing & TDLS_TESTING_IGNORE_AP_PROHIBIT) &&
2448             tdls_prohibited) {
2449                 wpa_printf(MSG_DEBUG, "TDLS: Testing - ignore AP prohibition "
2450                            "on TDLS");
2451                 tdls_prohibited = 0;
2452         }
2453 #endif /* CONFIG_TDLS_TESTING */
2454
2455         if (tdls_prohibited) {
2456                 wpa_printf(MSG_DEBUG, "TDLS: TDLS is prohibited in this BSS - "
2457                            "reject request to start setup");
2458                 return -1;
2459         }
2460
2461         peer = wpa_tdls_add_peer(sm, addr, NULL);
2462         if (peer == NULL)
2463                 return -1;
2464
2465         if (peer->tpk_in_progress) {
2466                 wpa_printf(MSG_DEBUG, "TDLS: Setup is already in progress with the peer");
2467                 return 0;
2468         }
2469
2470         peer->initiator = 1;
2471
2472         /* add the peer to the driver as a "setup in progress" peer */
2473         wpa_sm_tdls_peer_addset(sm, peer->addr, 1, 0, 0, NULL, 0, NULL, NULL, 0,
2474                                 NULL, 0, NULL, 0, NULL, 0);
2475
2476         peer->tpk_in_progress = 1;
2477
2478         if (wpa_tdls_send_tpk_m1(sm, peer) < 0) {
2479                 wpa_tdls_disable_peer_link(sm, peer);
2480                 return -1;
2481         }
2482
2483         return 0;
2484 }
2485
2486
2487 void wpa_tdls_remove(struct wpa_sm *sm, const u8 *addr)
2488 {
2489         struct wpa_tdls_peer *peer;
2490
2491         if (sm->tdls_disabled || !sm->tdls_supported)
2492                 return;
2493
2494         for (peer = sm->tdls; peer; peer = peer->next) {
2495                 if (os_memcmp(peer->addr, addr, ETH_ALEN) == 0)
2496                         break;
2497         }
2498
2499         if (peer == NULL || !peer->tpk_success)
2500                 return;
2501
2502         if (sm->tdls_external_setup) {
2503                 /*
2504                  * Disable previous link to allow renegotiation to be completed
2505                  * on AP path.
2506                  */
2507                 wpa_tdls_do_teardown(sm, peer,
2508                                      WLAN_REASON_TDLS_TEARDOWN_UNSPECIFIED);
2509         }
2510 }
2511
2512
2513 /**
2514  * wpa_supplicant_rx_tdls - Receive TDLS data frame
2515  *
2516  * This function is called to receive TDLS (ethertype = 0x890d) data frames.
2517  */
2518 static void wpa_supplicant_rx_tdls(void *ctx, const u8 *src_addr,
2519                                    const u8 *buf, size_t len)
2520 {
2521         struct wpa_sm *sm = ctx;
2522         struct wpa_tdls_frame *tf;
2523
2524         wpa_hexdump(MSG_DEBUG, "TDLS: Received Data frame encapsulation",
2525                     buf, len);
2526
2527         if (sm->tdls_disabled || !sm->tdls_supported) {
2528                 wpa_printf(MSG_DEBUG, "TDLS: Discard message - TDLS disabled "
2529                            "or unsupported by driver");
2530                 return;
2531         }
2532
2533         if (os_memcmp(src_addr, sm->own_addr, ETH_ALEN) == 0) {
2534                 wpa_printf(MSG_DEBUG, "TDLS: Discard copy of own message");
2535                 return;
2536         }
2537
2538         if (len < sizeof(*tf)) {
2539                 wpa_printf(MSG_INFO, "TDLS: Drop too short frame");
2540                 return;
2541         }
2542
2543         /* Check to make sure its a valid encapsulated TDLS frame */
2544         tf = (struct wpa_tdls_frame *) buf;
2545         if (tf->payloadtype != 2 /* TDLS_RFTYPE */ ||
2546             tf->category != WLAN_ACTION_TDLS) {
2547                 wpa_printf(MSG_INFO, "TDLS: Invalid frame - payloadtype=%u "
2548                            "category=%u action=%u",
2549                            tf->payloadtype, tf->category, tf->action);
2550                 return;
2551         }
2552
2553         switch (tf->action) {
2554         case WLAN_TDLS_SETUP_REQUEST:
2555                 wpa_tdls_process_tpk_m1(sm, src_addr, buf, len);
2556                 break;
2557         case WLAN_TDLS_SETUP_RESPONSE:
2558                 wpa_tdls_process_tpk_m2(sm, src_addr, buf, len);
2559                 break;
2560         case WLAN_TDLS_SETUP_CONFIRM:
2561                 wpa_tdls_process_tpk_m3(sm, src_addr, buf, len);
2562                 break;
2563         case WLAN_TDLS_TEARDOWN:
2564                 wpa_tdls_recv_teardown(sm, src_addr, buf, len);
2565                 break;
2566         case WLAN_TDLS_DISCOVERY_REQUEST:
2567                 wpa_tdls_process_discovery_request(sm, src_addr, buf, len);
2568                 break;
2569         default:
2570                 /* Kernel code will process remaining frames */
2571                 wpa_printf(MSG_DEBUG, "TDLS: Ignore TDLS frame action code %u",
2572                            tf->action);
2573                 break;
2574         }
2575 }
2576
2577
2578 /**
2579  * wpa_tdls_init - Initialize driver interface parameters for TDLS
2580  * @wpa_s: Pointer to wpa_supplicant data
2581  * Returns: 0 on success, -1 on failure
2582  *
2583  * This function is called to initialize driver interface parameters for TDLS.
2584  * wpa_drv_init() must have been called before this function to initialize the
2585  * driver interface.
2586  */
2587 int wpa_tdls_init(struct wpa_sm *sm)
2588 {
2589         if (sm == NULL)
2590                 return -1;
2591
2592         sm->l2_tdls = l2_packet_init(sm->bridge_ifname ? sm->bridge_ifname :
2593                                      sm->ifname,
2594                                      sm->own_addr,
2595                                      ETH_P_80211_ENCAP, wpa_supplicant_rx_tdls,
2596                                      sm, 0);
2597         if (sm->l2_tdls == NULL) {
2598                 wpa_printf(MSG_ERROR, "TDLS: Failed to open l2_packet "
2599                            "connection");
2600                 return -1;
2601         }
2602
2603         /*
2604          * Drivers that support TDLS but don't implement the get_capa callback
2605          * are assumed to perform everything internally
2606          */
2607         if (wpa_sm_tdls_get_capa(sm, &sm->tdls_supported,
2608                                  &sm->tdls_external_setup) < 0) {
2609                 sm->tdls_supported = 1;
2610                 sm->tdls_external_setup = 0;
2611         }
2612
2613         wpa_printf(MSG_DEBUG, "TDLS: TDLS operation%s supported by "
2614                    "driver", sm->tdls_supported ? "" : " not");
2615         wpa_printf(MSG_DEBUG, "TDLS: Driver uses %s link setup",
2616                    sm->tdls_external_setup ? "external" : "internal");
2617
2618         return 0;
2619 }
2620
2621
2622 void wpa_tdls_teardown_peers(struct wpa_sm *sm)
2623 {
2624         struct wpa_tdls_peer *peer;
2625
2626         peer = sm->tdls;
2627
2628         wpa_printf(MSG_DEBUG, "TDLS: Tear down peers");
2629
2630         while (peer) {
2631                 wpa_printf(MSG_DEBUG, "TDLS: Tear down peer " MACSTR,
2632                            MAC2STR(peer->addr));
2633                 if (sm->tdls_external_setup)
2634                         wpa_tdls_do_teardown(sm, peer,
2635                                              WLAN_REASON_DEAUTH_LEAVING);
2636                 else
2637                         wpa_sm_tdls_oper(sm, TDLS_TEARDOWN, peer->addr);
2638
2639                 peer = peer->next;
2640         }
2641 }
2642
2643
2644 static void wpa_tdls_remove_peers(struct wpa_sm *sm)
2645 {
2646         struct wpa_tdls_peer *peer, *tmp;
2647
2648         peer = sm->tdls;
2649         sm->tdls = NULL;
2650
2651         while (peer) {
2652                 int res;
2653                 tmp = peer->next;
2654                 res = wpa_sm_tdls_oper(sm, TDLS_DISABLE_LINK, peer->addr);
2655                 wpa_printf(MSG_DEBUG, "TDLS: Remove peer " MACSTR " (res=%d)",
2656                            MAC2STR(peer->addr), res);
2657                 wpa_tdls_peer_free(sm, peer);
2658                 os_free(peer);
2659                 peer = tmp;
2660         }
2661 }
2662
2663
2664 /**
2665  * wpa_tdls_deinit - Deinitialize driver interface parameters for TDLS
2666  *
2667  * This function is called to recover driver interface parameters for TDLS
2668  * and frees resources allocated for it.
2669  */
2670 void wpa_tdls_deinit(struct wpa_sm *sm)
2671 {
2672         if (sm == NULL)
2673                 return;
2674
2675         if (sm->l2_tdls)
2676                 l2_packet_deinit(sm->l2_tdls);
2677         sm->l2_tdls = NULL;
2678
2679         wpa_tdls_remove_peers(sm);
2680 }
2681
2682
2683 void wpa_tdls_assoc(struct wpa_sm *sm)
2684 {
2685         wpa_printf(MSG_DEBUG, "TDLS: Remove peers on association");
2686         wpa_tdls_remove_peers(sm);
2687 }
2688
2689
2690 void wpa_tdls_disassoc(struct wpa_sm *sm)
2691 {
2692         wpa_printf(MSG_DEBUG, "TDLS: Remove peers on disassociation");
2693         wpa_tdls_remove_peers(sm);
2694 }
2695
2696
2697 static int wpa_tdls_prohibited(const u8 *ies, size_t len)
2698 {
2699         struct wpa_eapol_ie_parse elems;
2700
2701         if (ies == NULL)
2702                 return 0;
2703
2704         if (wpa_supplicant_parse_ies(ies, len, &elems) < 0)
2705                 return 0;
2706
2707         if (elems.ext_capab == NULL || elems.ext_capab_len < 2 + 5)
2708                 return 0;
2709
2710          /* bit 38 - TDLS Prohibited */
2711         return !!(elems.ext_capab[2 + 4] & 0x40);
2712 }
2713
2714
2715 void wpa_tdls_ap_ies(struct wpa_sm *sm, const u8 *ies, size_t len)
2716 {
2717         sm->tdls_prohibited = wpa_tdls_prohibited(ies, len);
2718         wpa_printf(MSG_DEBUG, "TDLS: TDLS is %s in the target BSS",
2719                    sm->tdls_prohibited ? "prohibited" : "allowed");
2720 }
2721
2722
2723 void wpa_tdls_assoc_resp_ies(struct wpa_sm *sm, const u8 *ies, size_t len)
2724 {
2725         if (!sm->tdls_prohibited && wpa_tdls_prohibited(ies, len)) {
2726                 wpa_printf(MSG_DEBUG, "TDLS: TDLS prohibited based on "
2727                            "(Re)Association Response IEs");
2728                 sm->tdls_prohibited = 1;
2729         }
2730 }
2731
2732
2733 void wpa_tdls_enable(struct wpa_sm *sm, int enabled)
2734 {
2735         wpa_printf(MSG_DEBUG, "TDLS: %s", enabled ? "enabled" : "disabled");
2736         sm->tdls_disabled = !enabled;
2737 }
2738
2739
2740 int wpa_tdls_is_external_setup(struct wpa_sm *sm)
2741 {
2742         return sm->tdls_external_setup;
2743 }