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