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