contrib/wpa/src/rsn_supp/tdls.c

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