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