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