1/*
2 * WPA Supplicant - Mesh RSN routines
3 * Copyright (c) 2013-2014, cozybit, Inc.  All rights reserved.
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 "crypto/sha256.h"
14#include "crypto/random.h"
15#include "crypto/aes.h"
16#include "crypto/aes_siv.h"
17#include "rsn_supp/wpa.h"
18#include "ap/hostapd.h"
19#include "ap/wpa_auth.h"
20#include "ap/sta_info.h"
21#include "ap/ieee802_11.h"
22#include "wpa_supplicant_i.h"
23#include "driver_i.h"
24#include "wpas_glue.h"
25#include "mesh_mpm.h"
26#include "mesh_rsn.h"
27
28#define MESH_AUTH_TIMEOUT 10
29#define MESH_AUTH_RETRY 3
30
31void mesh_auth_timer(void *eloop_ctx, void *user_data)
32{
33	struct wpa_supplicant *wpa_s = eloop_ctx;
34	struct sta_info *sta = user_data;
35	struct hostapd_data *hapd;
36
37	if (sta->sae->state != SAE_ACCEPTED) {
38		wpa_printf(MSG_DEBUG, "AUTH: Re-authenticate with " MACSTR
39			   " (attempt %d) ",
40			   MAC2STR(sta->addr), sta->sae_auth_retry);
41		wpa_msg(wpa_s, MSG_INFO, MESH_SAE_AUTH_FAILURE "addr=" MACSTR,
42			MAC2STR(sta->addr));
43		if (sta->sae_auth_retry < MESH_AUTH_RETRY) {
44			mesh_rsn_auth_sae_sta(wpa_s, sta);
45		} else {
46			hapd = wpa_s->ifmsh->bss[0];
47
48			if (sta->sae_auth_retry > MESH_AUTH_RETRY) {
49				ap_free_sta(hapd, sta);
50				return;
51			}
52
53			/* block the STA if exceeded the number of attempts */
54			wpa_mesh_set_plink_state(wpa_s, sta, PLINK_BLOCKED);
55			sta->sae->state = SAE_NOTHING;
56			wpa_msg(wpa_s, MSG_INFO, MESH_SAE_AUTH_BLOCKED "addr="
57				MACSTR " duration=%d",
58				MAC2STR(sta->addr),
59				hapd->conf->ap_max_inactivity);
60		}
61		sta->sae_auth_retry++;
62	}
63}
64
65
66static void auth_logger(void *ctx, const u8 *addr, logger_level level,
67			const char *txt)
68{
69	if (addr)
70		wpa_printf(MSG_DEBUG, "AUTH: " MACSTR " - %s",
71			   MAC2STR(addr), txt);
72	else
73		wpa_printf(MSG_DEBUG, "AUTH: %s", txt);
74}
75
76
77static const u8 *auth_get_psk(void *ctx, const u8 *addr,
78			      const u8 *p2p_dev_addr, const u8 *prev_psk,
79			      size_t *psk_len, int *vlan_id)
80{
81	struct mesh_rsn *mesh_rsn = ctx;
82	struct hostapd_data *hapd = mesh_rsn->wpa_s->ifmsh->bss[0];
83	struct sta_info *sta = ap_get_sta(hapd, addr);
84
85	if (psk_len)
86		*psk_len = PMK_LEN;
87	if (vlan_id)
88		*vlan_id = 0;
89	wpa_printf(MSG_DEBUG, "AUTH: %s (addr=" MACSTR " prev_psk=%p)",
90		   __func__, MAC2STR(addr), prev_psk);
91
92	if (sta && sta->auth_alg == WLAN_AUTH_SAE) {
93		if (!sta->sae || prev_psk)
94			return NULL;
95		return sta->sae->pmk;
96	}
97
98	return NULL;
99}
100
101
102static int auth_set_key(void *ctx, int vlan_id, enum wpa_alg alg,
103			const u8 *addr, int idx, u8 *key, size_t key_len)
104{
105	struct mesh_rsn *mesh_rsn = ctx;
106	u8 seq[6];
107
108	os_memset(seq, 0, sizeof(seq));
109
110	if (addr) {
111		wpa_printf(MSG_DEBUG, "AUTH: %s(alg=%d addr=" MACSTR
112			   " key_idx=%d)",
113			   __func__, alg, MAC2STR(addr), idx);
114	} else {
115		wpa_printf(MSG_DEBUG, "AUTH: %s(alg=%d key_idx=%d)",
116			   __func__, alg, idx);
117	}
118	wpa_hexdump_key(MSG_DEBUG, "AUTH: set_key - key", key, key_len);
119
120	return wpa_drv_set_key(mesh_rsn->wpa_s, alg, addr, idx,
121			       1, seq, 6, key, key_len);
122}
123
124
125static int auth_start_ampe(void *ctx, const u8 *addr)
126{
127	struct mesh_rsn *mesh_rsn = ctx;
128	struct hostapd_data *hapd;
129	struct sta_info *sta;
130
131	if (mesh_rsn->wpa_s->current_ssid->mode != WPAS_MODE_MESH)
132		return -1;
133
134	hapd = mesh_rsn->wpa_s->ifmsh->bss[0];
135	sta = ap_get_sta(hapd, addr);
136	if (sta)
137		eloop_cancel_timeout(mesh_auth_timer, mesh_rsn->wpa_s, sta);
138
139	mesh_mpm_auth_peer(mesh_rsn->wpa_s, addr);
140	return 0;
141}
142
143
144static int __mesh_rsn_auth_init(struct mesh_rsn *rsn, const u8 *addr,
145				enum mfp_options ieee80211w, int ocv)
146{
147	struct wpa_auth_config conf;
148	static const struct wpa_auth_callbacks cb = {
149		.logger = auth_logger,
150		.get_psk = auth_get_psk,
151		.set_key = auth_set_key,
152		.start_ampe = auth_start_ampe,
153	};
154	u8 seq[6] = {};
155
156	wpa_printf(MSG_DEBUG, "AUTH: Initializing group state machine");
157
158	os_memset(&conf, 0, sizeof(conf));
159	conf.wpa = WPA_PROTO_RSN;
160	conf.wpa_key_mgmt = WPA_KEY_MGMT_SAE;
161	conf.wpa_pairwise = rsn->pairwise_cipher;
162	conf.rsn_pairwise = rsn->pairwise_cipher;
163	conf.wpa_group = rsn->group_cipher;
164	conf.eapol_version = 0;
165	conf.wpa_group_rekey = -1;
166	conf.wpa_group_update_count = 4;
167	conf.wpa_pairwise_update_count = 4;
168#ifdef CONFIG_IEEE80211W
169	conf.ieee80211w = ieee80211w;
170	if (ieee80211w != NO_MGMT_FRAME_PROTECTION)
171		conf.group_mgmt_cipher = rsn->mgmt_group_cipher;
172#endif /* CONFIG_IEEE80211W */
173#ifdef CONFIG_OCV
174	conf.ocv = ocv;
175#endif /* CONFIG_OCV */
176
177	rsn->auth = wpa_init(addr, &conf, &cb, rsn);
178	if (rsn->auth == NULL) {
179		wpa_printf(MSG_DEBUG, "AUTH: wpa_init() failed");
180		return -1;
181	}
182
183	/* TODO: support rekeying */
184	rsn->mgtk_len = wpa_cipher_key_len(conf.wpa_group);
185	if (random_get_bytes(rsn->mgtk, rsn->mgtk_len) < 0)
186		return -1;
187	rsn->mgtk_key_id = 1;
188
189#ifdef CONFIG_IEEE80211W
190	if (ieee80211w != NO_MGMT_FRAME_PROTECTION) {
191		rsn->igtk_len = wpa_cipher_key_len(conf.group_mgmt_cipher);
192		if (random_get_bytes(rsn->igtk, rsn->igtk_len) < 0)
193			return -1;
194		rsn->igtk_key_id = 4;
195
196		/* group mgmt */
197		wpa_hexdump_key(MSG_DEBUG, "mesh: Own TX IGTK",
198				rsn->igtk, rsn->igtk_len);
199		wpa_drv_set_key(rsn->wpa_s,
200				wpa_cipher_to_alg(rsn->mgmt_group_cipher), NULL,
201				rsn->igtk_key_id, 1,
202				seq, sizeof(seq), rsn->igtk, rsn->igtk_len);
203	}
204#endif /* CONFIG_IEEE80211W */
205
206	/* group privacy / data frames */
207	wpa_hexdump_key(MSG_DEBUG, "mesh: Own TX MGTK",
208			rsn->mgtk, rsn->mgtk_len);
209	wpa_drv_set_key(rsn->wpa_s, wpa_cipher_to_alg(rsn->group_cipher), NULL,
210			rsn->mgtk_key_id, 1, seq, sizeof(seq),
211			rsn->mgtk, rsn->mgtk_len);
212
213	return 0;
214}
215
216
217static void mesh_rsn_deinit(struct mesh_rsn *rsn)
218{
219	os_memset(rsn->mgtk, 0, sizeof(rsn->mgtk));
220	rsn->mgtk_len = 0;
221	os_memset(rsn->igtk, 0, sizeof(rsn->igtk));
222	rsn->igtk_len = 0;
223	if (rsn->auth)
224		wpa_deinit(rsn->auth);
225}
226
227
228struct mesh_rsn *mesh_rsn_auth_init(struct wpa_supplicant *wpa_s,
229				    struct mesh_conf *conf)
230{
231	struct mesh_rsn *mesh_rsn;
232	struct hostapd_data *bss = wpa_s->ifmsh->bss[0];
233	const u8 *ie;
234	size_t ie_len;
235#ifdef CONFIG_PMKSA_CACHE_EXTERNAL
236	struct external_pmksa_cache *entry;
237#endif /* CONFIG_PMKSA_CACHE_EXTERNAL */
238
239	mesh_rsn = os_zalloc(sizeof(*mesh_rsn));
240	if (mesh_rsn == NULL)
241		return NULL;
242	mesh_rsn->wpa_s = wpa_s;
243	mesh_rsn->pairwise_cipher = conf->pairwise_cipher;
244	mesh_rsn->group_cipher = conf->group_cipher;
245	mesh_rsn->mgmt_group_cipher = conf->mgmt_group_cipher;
246
247	if (__mesh_rsn_auth_init(mesh_rsn, wpa_s->own_addr,
248				 conf->ieee80211w, conf->ocv) < 0) {
249		mesh_rsn_deinit(mesh_rsn);
250		os_free(mesh_rsn);
251		return NULL;
252	}
253
254	bss->wpa_auth = mesh_rsn->auth;
255
256#ifdef CONFIG_PMKSA_CACHE_EXTERNAL
257	while ((entry = dl_list_last(&wpa_s->mesh_external_pmksa_cache,
258				     struct external_pmksa_cache,
259				     list)) != NULL) {
260		int ret;
261
262		ret = wpa_auth_pmksa_add_entry(bss->wpa_auth,
263					       entry->pmksa_cache);
264		dl_list_del(&entry->list);
265		os_free(entry);
266
267		if (ret < 0)
268			return NULL;
269	}
270#endif /* CONFIG_PMKSA_CACHE_EXTERNAL */
271
272	ie = wpa_auth_get_wpa_ie(mesh_rsn->auth, &ie_len);
273	conf->rsn_ie = (u8 *) ie;
274	conf->rsn_ie_len = ie_len;
275
276	wpa_supplicant_rsn_supp_set_config(wpa_s, wpa_s->current_ssid);
277
278	return mesh_rsn;
279}
280
281
282static int index_within_array(const int *array, int idx)
283{
284	int i;
285
286	for (i = 0; i < idx; i++) {
287		if (array[i] == -1)
288			return 0;
289	}
290
291	return 1;
292}
293
294
295static int mesh_rsn_sae_group(struct wpa_supplicant *wpa_s,
296			      struct sae_data *sae)
297{
298	int *groups = wpa_s->ifmsh->bss[0]->conf->sae_groups;
299
300	/* Configuration may have changed, so validate current index */
301	if (!index_within_array(groups, wpa_s->mesh_rsn->sae_group_index))
302		return -1;
303
304	for (;;) {
305		int group = groups[wpa_s->mesh_rsn->sae_group_index];
306
307		if (group <= 0)
308			break;
309		if (sae_set_group(sae, group) == 0) {
310			wpa_dbg(wpa_s, MSG_DEBUG, "SME: Selected SAE group %d",
311				sae->group);
312			return 0;
313		}
314		wpa_s->mesh_rsn->sae_group_index++;
315	}
316
317	return -1;
318}
319
320
321static int mesh_rsn_build_sae_commit(struct wpa_supplicant *wpa_s,
322				     struct wpa_ssid *ssid,
323				     struct sta_info *sta)
324{
325	const char *password;
326
327	password = ssid->sae_password;
328	if (!password)
329		password = ssid->passphrase;
330	if (!password) {
331		wpa_msg(wpa_s, MSG_DEBUG, "SAE: No password available");
332		return -1;
333	}
334
335	if (mesh_rsn_sae_group(wpa_s, sta->sae) < 0) {
336		wpa_msg(wpa_s, MSG_DEBUG, "SAE: Failed to select group");
337		return -1;
338	}
339
340	if (sta->sae->tmp && !sta->sae->tmp->pw_id && ssid->sae_password_id) {
341		sta->sae->tmp->pw_id = os_strdup(ssid->sae_password_id);
342		if (!sta->sae->tmp->pw_id)
343			return -1;
344	}
345	return sae_prepare_commit(wpa_s->own_addr, sta->addr,
346				  (u8 *) password, os_strlen(password),
347				  ssid->sae_password_id,
348				  sta->sae);
349}
350
351
352/* initiate new SAE authentication with sta */
353int mesh_rsn_auth_sae_sta(struct wpa_supplicant *wpa_s,
354			  struct sta_info *sta)
355{
356	struct hostapd_data *hapd = wpa_s->ifmsh->bss[0];
357	struct wpa_ssid *ssid = wpa_s->current_ssid;
358	struct rsn_pmksa_cache_entry *pmksa;
359	unsigned int rnd;
360	int ret;
361
362	if (!ssid) {
363		wpa_msg(wpa_s, MSG_DEBUG,
364			"AUTH: No current_ssid known to initiate new SAE");
365		return -1;
366	}
367
368	if (!sta->sae) {
369		sta->sae = os_zalloc(sizeof(*sta->sae));
370		if (sta->sae == NULL)
371			return -1;
372	}
373
374	pmksa = wpa_auth_pmksa_get(hapd->wpa_auth, sta->addr, NULL);
375	if (pmksa) {
376		if (!sta->wpa_sm)
377			sta->wpa_sm = wpa_auth_sta_init(hapd->wpa_auth,
378							sta->addr, NULL);
379		if (!sta->wpa_sm) {
380			wpa_printf(MSG_ERROR,
381				   "mesh: Failed to initialize RSN state machine");
382			return -1;
383		}
384
385		wpa_printf(MSG_DEBUG,
386			   "AUTH: Mesh PMKSA cache entry found for " MACSTR
387			   " - try to use PMKSA caching instead of new SAE authentication",
388			   MAC2STR(sta->addr));
389		wpa_auth_pmksa_set_to_sm(pmksa, sta->wpa_sm, hapd->wpa_auth,
390					 sta->sae->pmkid, sta->sae->pmk);
391		sae_accept_sta(hapd, sta);
392		sta->mesh_sae_pmksa_caching = 1;
393		return 0;
394	}
395	sta->mesh_sae_pmksa_caching = 0;
396
397	if (mesh_rsn_build_sae_commit(wpa_s, ssid, sta))
398		return -1;
399
400	wpa_msg(wpa_s, MSG_DEBUG,
401		"AUTH: started authentication with SAE peer: " MACSTR,
402		MAC2STR(sta->addr));
403
404	ret = auth_sae_init_committed(hapd, sta);
405	if (ret)
406		return ret;
407
408	eloop_cancel_timeout(mesh_auth_timer, wpa_s, sta);
409	rnd = rand() % MESH_AUTH_TIMEOUT;
410	eloop_register_timeout(MESH_AUTH_TIMEOUT + rnd, 0, mesh_auth_timer,
411			       wpa_s, sta);
412	return 0;
413}
414
415
416void mesh_rsn_get_pmkid(struct mesh_rsn *rsn, struct sta_info *sta, u8 *pmkid)
417{
418	os_memcpy(pmkid, sta->sae->pmkid, SAE_PMKID_LEN);
419}
420
421
422static void
423mesh_rsn_derive_aek(struct mesh_rsn *rsn, struct sta_info *sta)
424{
425	u8 *myaddr = rsn->wpa_s->own_addr;
426	u8 *peer = sta->addr;
427	u8 *addr1, *addr2;
428	u8 context[RSN_SELECTOR_LEN + 2 * ETH_ALEN], *ptr = context;
429
430	/*
431	 * AEK = KDF-Hash-256(PMK, "AEK Derivation", Selected AKM Suite ||
432	 *       min(localMAC, peerMAC) || max(localMAC, peerMAC))
433	 */
434	/* Selected AKM Suite: SAE */
435	RSN_SELECTOR_PUT(ptr, RSN_AUTH_KEY_MGMT_SAE);
436	ptr += RSN_SELECTOR_LEN;
437
438	if (os_memcmp(myaddr, peer, ETH_ALEN) < 0) {
439		addr1 = myaddr;
440		addr2 = peer;
441	} else {
442		addr1 = peer;
443		addr2 = myaddr;
444	}
445	os_memcpy(ptr, addr1, ETH_ALEN);
446	ptr += ETH_ALEN;
447	os_memcpy(ptr, addr2, ETH_ALEN);
448
449	sha256_prf(sta->sae->pmk, sizeof(sta->sae->pmk), "AEK Derivation",
450		   context, sizeof(context), sta->aek, sizeof(sta->aek));
451}
452
453
454/* derive mesh temporal key from pmk */
455int mesh_rsn_derive_mtk(struct wpa_supplicant *wpa_s, struct sta_info *sta)
456{
457	u8 *ptr;
458	u8 *min, *max;
459	u8 *myaddr = wpa_s->own_addr;
460	u8 *peer = sta->addr;
461	u8 context[2 * WPA_NONCE_LEN + 2 * 2 + RSN_SELECTOR_LEN + 2 * ETH_ALEN];
462
463	/*
464	 * MTK = KDF-Hash-Length(PMK, "Temporal Key Derivation", min(localNonce,
465	 *  peerNonce) || max(localNonce, peerNonce) || min(localLinkID,
466	 *  peerLinkID) || max(localLinkID, peerLinkID) || Selected AKM Suite ||
467	 *  min(localMAC, peerMAC) || max(localMAC, peerMAC))
468	 */
469	ptr = context;
470	if (os_memcmp(sta->my_nonce, sta->peer_nonce, WPA_NONCE_LEN) < 0) {
471		min = sta->my_nonce;
472		max = sta->peer_nonce;
473	} else {
474		min = sta->peer_nonce;
475		max = sta->my_nonce;
476	}
477	os_memcpy(ptr, min, WPA_NONCE_LEN);
478	ptr += WPA_NONCE_LEN;
479	os_memcpy(ptr, max, WPA_NONCE_LEN);
480	ptr += WPA_NONCE_LEN;
481
482	if (sta->my_lid < sta->peer_lid) {
483		WPA_PUT_LE16(ptr, sta->my_lid);
484		ptr += 2;
485		WPA_PUT_LE16(ptr, sta->peer_lid);
486		ptr += 2;
487	} else {
488		WPA_PUT_LE16(ptr, sta->peer_lid);
489		ptr += 2;
490		WPA_PUT_LE16(ptr, sta->my_lid);
491		ptr += 2;
492	}
493
494	/* Selected AKM Suite: SAE */
495	RSN_SELECTOR_PUT(ptr, RSN_AUTH_KEY_MGMT_SAE);
496	ptr += RSN_SELECTOR_LEN;
497
498	if (os_memcmp(myaddr, peer, ETH_ALEN) < 0) {
499		min = myaddr;
500		max = peer;
501	} else {
502		min = peer;
503		max = myaddr;
504	}
505	os_memcpy(ptr, min, ETH_ALEN);
506	ptr += ETH_ALEN;
507	os_memcpy(ptr, max, ETH_ALEN);
508
509	sta->mtk_len = wpa_cipher_key_len(wpa_s->mesh_rsn->pairwise_cipher);
510	sha256_prf(sta->sae->pmk, SAE_PMK_LEN,
511		   "Temporal Key Derivation", context, sizeof(context),
512		   sta->mtk, sta->mtk_len);
513	return 0;
514}
515
516
517void mesh_rsn_init_ampe_sta(struct wpa_supplicant *wpa_s, struct sta_info *sta)
518{
519	if (random_get_bytes(sta->my_nonce, WPA_NONCE_LEN) < 0) {
520		wpa_printf(MSG_INFO, "mesh: Failed to derive random nonce");
521		/* TODO: How to handle this more cleanly? */
522	}
523	os_memset(sta->peer_nonce, 0, WPA_NONCE_LEN);
524	mesh_rsn_derive_aek(wpa_s->mesh_rsn, sta);
525}
526
527
528/* insert AMPE and encrypted MIC at @ie.
529 * @mesh_rsn: mesh RSN context
530 * @sta: STA we're sending to
531 * @cat: pointer to category code in frame header.
532 * @buf: wpabuf to add encrypted AMPE and MIC to.
533 * */
534int mesh_rsn_protect_frame(struct mesh_rsn *rsn, struct sta_info *sta,
535			   const u8 *cat, struct wpabuf *buf)
536{
537	struct ieee80211_ampe_ie *ampe;
538	u8 const *ie = wpabuf_head_u8(buf) + wpabuf_len(buf);
539	u8 *ampe_ie, *pos, *mic_payload;
540	const u8 *aad[] = { rsn->wpa_s->own_addr, sta->addr, cat };
541	const size_t aad_len[] = { ETH_ALEN, ETH_ALEN, ie - cat };
542	int ret = 0;
543	size_t len;
544
545	len = sizeof(*ampe);
546	if (cat[1] == PLINK_OPEN)
547		len += rsn->mgtk_len + WPA_KEY_RSC_LEN + 4;
548#ifdef CONFIG_IEEE80211W
549	if (cat[1] == PLINK_OPEN && rsn->igtk_len)
550		len += 2 + 6 + rsn->igtk_len;
551#endif /* CONFIG_IEEE80211W */
552
553	if (2 + AES_BLOCK_SIZE + 2 + len > wpabuf_tailroom(buf)) {
554		wpa_printf(MSG_ERROR, "protect frame: buffer too small");
555		return -EINVAL;
556	}
557
558	ampe_ie = os_zalloc(2 + len);
559	if (!ampe_ie) {
560		wpa_printf(MSG_ERROR, "protect frame: out of memory");
561		return -ENOMEM;
562	}
563
564	/*  IE: AMPE */
565	ampe_ie[0] = WLAN_EID_AMPE;
566	ampe_ie[1] = len;
567	ampe = (struct ieee80211_ampe_ie *) (ampe_ie + 2);
568
569	RSN_SELECTOR_PUT(ampe->selected_pairwise_suite,
570			 RSN_CIPHER_SUITE_CCMP);
571	os_memcpy(ampe->local_nonce, sta->my_nonce, WPA_NONCE_LEN);
572	os_memcpy(ampe->peer_nonce, sta->peer_nonce, WPA_NONCE_LEN);
573
574	pos = (u8 *) (ampe + 1);
575	if (cat[1] != PLINK_OPEN)
576		goto skip_keys;
577
578	/* TODO: Key Replay Counter[8] optionally for
579	 * Mesh Group Key Inform/Acknowledge frames */
580
581	/* TODO: static mgtk for now since we don't support rekeying! */
582	/*
583	 * GTKdata[variable]:
584	 * MGTK[variable] || Key RSC[8] || GTKExpirationTime[4]
585	 */
586	os_memcpy(pos, rsn->mgtk, rsn->mgtk_len);
587	pos += rsn->mgtk_len;
588	wpa_drv_get_seqnum(rsn->wpa_s, NULL, rsn->mgtk_key_id, pos);
589	pos += WPA_KEY_RSC_LEN;
590	/* Use fixed GTKExpirationTime for now */
591	WPA_PUT_LE32(pos, 0xffffffff);
592	pos += 4;
593
594#ifdef CONFIG_IEEE80211W
595	/*
596	 * IGTKdata[variable]:
597	 * Key ID[2], IPN[6], IGTK[variable]
598	 */
599	if (rsn->igtk_len) {
600		WPA_PUT_LE16(pos, rsn->igtk_key_id);
601		pos += 2;
602		wpa_drv_get_seqnum(rsn->wpa_s, NULL, rsn->igtk_key_id, pos);
603		pos += 6;
604		os_memcpy(pos, rsn->igtk, rsn->igtk_len);
605	}
606#endif /* CONFIG_IEEE80211W */
607
608skip_keys:
609	wpa_hexdump_key(MSG_DEBUG, "mesh: Plaintext AMPE element",
610			ampe_ie, 2 + len);
611
612	/* IE: MIC */
613	wpabuf_put_u8(buf, WLAN_EID_MIC);
614	wpabuf_put_u8(buf, AES_BLOCK_SIZE);
615	/* MIC field is output ciphertext */
616
617	/* encrypt after MIC */
618	mic_payload = wpabuf_put(buf, 2 + len + AES_BLOCK_SIZE);
619
620	if (aes_siv_encrypt(sta->aek, sizeof(sta->aek), ampe_ie, 2 + len, 3,
621			    aad, aad_len, mic_payload)) {
622		wpa_printf(MSG_ERROR, "protect frame: failed to encrypt");
623		ret = -ENOMEM;
624	}
625
626	os_free(ampe_ie);
627
628	return ret;
629}
630
631
632int mesh_rsn_process_ampe(struct wpa_supplicant *wpa_s, struct sta_info *sta,
633			  struct ieee802_11_elems *elems, const u8 *cat,
634			  const u8 *chosen_pmk,
635			  const u8 *start, size_t elems_len)
636{
637	int ret = 0;
638	struct ieee80211_ampe_ie *ampe;
639	u8 null_nonce[WPA_NONCE_LEN] = {};
640	u8 ampe_eid;
641	u8 ampe_ie_len;
642	u8 *ampe_buf, *crypt = NULL, *pos, *end;
643	size_t crypt_len;
644	const u8 *aad[] = { sta->addr, wpa_s->own_addr, cat };
645	const size_t aad_len[] = { ETH_ALEN, ETH_ALEN,
646				   elems->mic ? (elems->mic - 2) - cat : 0 };
647	size_t key_len;
648
649	if (!sta->sae) {
650		struct hostapd_data *hapd = wpa_s->ifmsh->bss[0];
651
652		if (!wpa_auth_pmksa_get(hapd->wpa_auth, sta->addr, NULL)) {
653			wpa_printf(MSG_INFO,
654				   "Mesh RSN: SAE is not prepared yet");
655			return -1;
656		}
657		mesh_rsn_auth_sae_sta(wpa_s, sta);
658	}
659
660	if (chosen_pmk &&
661	    (!sta->sae ||
662	     os_memcmp(chosen_pmk, sta->sae->pmkid, PMKID_LEN) != 0)) {
663		wpa_msg(wpa_s, MSG_DEBUG,
664			"Mesh RSN: Invalid PMKID (Chosen PMK did not match calculated PMKID)");
665		return -1;
666	}
667
668	if (!elems->mic || elems->mic_len < AES_BLOCK_SIZE) {
669		wpa_msg(wpa_s, MSG_DEBUG, "Mesh RSN: missing mic ie");
670		return -1;
671	}
672
673	ampe_buf = (u8 *) elems->mic + elems->mic_len;
674	if ((int) elems_len < ampe_buf - start)
675		return -1;
676
677	crypt_len = elems_len - (elems->mic - start);
678	if (crypt_len < 2 + AES_BLOCK_SIZE) {
679		wpa_msg(wpa_s, MSG_DEBUG, "Mesh RSN: missing ampe ie");
680		return -1;
681	}
682
683	/* crypt is modified by siv_decrypt */
684	crypt = os_zalloc(crypt_len);
685	if (!crypt) {
686		wpa_printf(MSG_ERROR, "Mesh RSN: out of memory");
687		ret = -ENOMEM;
688		goto free;
689	}
690
691	os_memcpy(crypt, elems->mic, crypt_len);
692
693	if (aes_siv_decrypt(sta->aek, sizeof(sta->aek), crypt, crypt_len, 3,
694			    aad, aad_len, ampe_buf)) {
695		wpa_printf(MSG_ERROR, "Mesh RSN: frame verification failed!");
696		ret = -2;
697		goto free;
698	}
699
700	crypt_len -= AES_BLOCK_SIZE;
701	wpa_hexdump_key(MSG_DEBUG, "mesh: Decrypted AMPE element",
702			ampe_buf, crypt_len);
703
704	ampe_eid = *ampe_buf++;
705	ampe_ie_len = *ampe_buf++;
706
707	if (ampe_eid != WLAN_EID_AMPE ||
708	    (size_t) 2 + ampe_ie_len > crypt_len ||
709	    ampe_ie_len < sizeof(struct ieee80211_ampe_ie)) {
710		wpa_msg(wpa_s, MSG_DEBUG, "Mesh RSN: invalid ampe ie");
711		ret = -1;
712		goto free;
713	}
714
715	ampe = (struct ieee80211_ampe_ie *) ampe_buf;
716	pos = (u8 *) (ampe + 1);
717	end = ampe_buf + ampe_ie_len;
718	if (os_memcmp(ampe->peer_nonce, null_nonce, WPA_NONCE_LEN) != 0 &&
719	    os_memcmp(ampe->peer_nonce, sta->my_nonce, WPA_NONCE_LEN) != 0) {
720		wpa_msg(wpa_s, MSG_DEBUG, "Mesh RSN: invalid peer nonce");
721		ret = -1;
722		goto free;
723	}
724	os_memcpy(sta->peer_nonce, ampe->local_nonce,
725		  sizeof(ampe->local_nonce));
726
727	/* TODO: Key Replay Counter[8] in Mesh Group Key Inform/Acknowledge
728	 * frames */
729
730	/*
731	 * GTKdata shall not be included in Mesh Peering Confirm. While the
732	 * standard does not state the same about IGTKdata, that same constraint
733	 * needs to apply for it. It makes no sense to include the keys in Mesh
734	 * Peering Close frames either, so while the standard does not seem to
735	 * have a shall statement for these, they are described without
736	 * mentioning GTKdata.
737	 *
738	 * An earlier implementation used to add GTKdata to both Mesh Peering
739	 * Open and Mesh Peering Confirm frames, so ignore the possibly present
740	 * GTKdata frame without rejecting the frame as a backwards
741	 * compatibility mechanism.
742	 */
743	if (cat[1] != PLINK_OPEN) {
744		if (end > pos) {
745			wpa_hexdump_key(MSG_DEBUG,
746					"mesh: Ignore unexpected GTKdata(etc.) fields in the end of AMPE element in Mesh Peering Confirm/Close",
747					pos, end - pos);
748		}
749		goto free;
750	}
751
752	/*
753	 * GTKdata[variable]:
754	 * MGTK[variable] || Key RSC[8] || GTKExpirationTime[4]
755	 */
756	sta->mgtk_key_id = 1; /* FIX: Where to get Key ID? */
757	key_len = wpa_cipher_key_len(wpa_s->mesh_rsn->group_cipher);
758	if ((int) key_len + WPA_KEY_RSC_LEN + 4 > end - pos) {
759		wpa_dbg(wpa_s, MSG_DEBUG, "mesh: Truncated AMPE element");
760		ret = -1;
761		goto free;
762	}
763	sta->mgtk_len = key_len;
764	os_memcpy(sta->mgtk, pos, sta->mgtk_len);
765	wpa_hexdump_key(MSG_DEBUG, "mesh: GTKdata - MGTK",
766			sta->mgtk, sta->mgtk_len);
767	pos += sta->mgtk_len;
768	wpa_hexdump(MSG_DEBUG, "mesh: GTKdata - MGTK - Key RSC",
769		    pos, WPA_KEY_RSC_LEN);
770	os_memcpy(sta->mgtk_rsc, pos, sizeof(sta->mgtk_rsc));
771	pos += WPA_KEY_RSC_LEN;
772	wpa_printf(MSG_DEBUG,
773		   "mesh: GTKdata - MGTK - GTKExpirationTime: %u seconds",
774		   WPA_GET_LE32(pos));
775	pos += 4;
776
777#ifdef CONFIG_IEEE80211W
778	/*
779	 * IGTKdata[variable]:
780	 * Key ID[2], IPN[6], IGTK[variable]
781	 */
782	key_len = wpa_cipher_key_len(wpa_s->mesh_rsn->mgmt_group_cipher);
783	if (end - pos >= (int) (2 + 6 + key_len)) {
784		sta->igtk_key_id = WPA_GET_LE16(pos);
785		wpa_printf(MSG_DEBUG, "mesh: IGTKdata - Key ID %u",
786			   sta->igtk_key_id);
787		pos += 2;
788		os_memcpy(sta->igtk_rsc, pos, sizeof(sta->igtk_rsc));
789		wpa_hexdump(MSG_DEBUG, "mesh: IGTKdata - IPN",
790			    sta->igtk_rsc, sizeof(sta->igtk_rsc));
791		pos += 6;
792		os_memcpy(sta->igtk, pos, key_len);
793		sta->igtk_len = key_len;
794		wpa_hexdump_key(MSG_DEBUG, "mesh: IGTKdata - IGTK",
795				sta->igtk, sta->igtk_len);
796	}
797#endif /* CONFIG_IEEE80211W */
798
799free:
800	os_free(crypt);
801	return ret;
802}
803