src/rsn_supp/tdls.c

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