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