1 /*
2  * Copyright (c) 2009, Atheros Communications, Inc.
3  * Copyright (c) 2011-2013, Qualcomm Atheros, Inc.
4  *
5  * This software may be distributed under the terms of the BSD license.
6  * See README for more details.
7  */
8 
9 #include "includes.h"
10 #include <sys/stat.h>
11 
12 #include "common.h"
13 #include "eloop.h"
14 #include "common/ieee802_11_common.h"
15 #include "common/ieee802_11_defs.h"
16 #include "common/gas.h"
17 #include "common/wpa_ctrl.h"
18 #include "rsn_supp/wpa.h"
19 #include "wpa_supplicant_i.h"
20 #include "driver_i.h"
21 #include "config.h"
22 #include "scan.h"
23 #include "bss.h"
24 #include "bssid_ignore.h"
25 #include "gas_query.h"
26 #include "interworking.h"
27 #include "hs20_supplicant.h"
28 #include "base64.h"
29 #include "notify.h"
30 
31 
hs20_configure_frame_filters(struct wpa_supplicant * wpa_s)32 void hs20_configure_frame_filters(struct wpa_supplicant *wpa_s)
33 {
34 	struct wpa_bss *bss = wpa_s->current_bss;
35 	const u8 *ie;
36 	const u8 *ext_capa;
37 	u32 filter = 0;
38 
39 	if (!bss || !is_hs20_network(wpa_s, wpa_s->current_ssid, bss)) {
40 		/* Not configuring frame filtering - BSS is not a Hotspot 2.0
41 		 * network */
42 		return;
43 	}
44 
45 	ie = wpa_bss_get_vendor_ie(bss, HS20_IE_VENDOR_TYPE);
46 
47 	/* Check if DGAF disabled bit is zero (5th byte in the IE) */
48 	if (!ie || ie[1] < 5)
49 		wpa_printf(MSG_DEBUG,
50 			   "Not configuring frame filtering - Can't extract DGAF bit");
51 	else if (!(ie[6] & HS20_DGAF_DISABLED))
52 		filter |= WPA_DATA_FRAME_FILTER_FLAG_GTK;
53 
54 	ext_capa = wpa_bss_get_ie(bss, WLAN_EID_EXT_CAPAB);
55 	if (!ext_capa || ext_capa[1] < 2) {
56 		wpa_printf(MSG_DEBUG,
57 			   "Not configuring frame filtering - Can't extract Proxy ARP bit");
58 		return;
59 	}
60 
61 	if (wpa_bss_ext_capab(bss, WLAN_EXT_CAPAB_PROXY_ARP))
62 		filter |= WPA_DATA_FRAME_FILTER_FLAG_ARP |
63 			WPA_DATA_FRAME_FILTER_FLAG_NA;
64 
65 	wpa_drv_configure_frame_filters(wpa_s, filter);
66 }
67 
68 
wpas_hs20_add_indication(struct wpabuf * buf,int pps_mo_id,int ap_release)69 void wpas_hs20_add_indication(struct wpabuf *buf, int pps_mo_id, int ap_release)
70 {
71 	int release;
72 	u8 conf;
73 
74 	release = (HS20_VERSION >> 4) + 1;
75 	if (ap_release > 0 && release > ap_release)
76 		release = ap_release;
77 	if (release < 2)
78 		pps_mo_id = -1;
79 
80 	wpabuf_put_u8(buf, WLAN_EID_VENDOR_SPECIFIC);
81 	wpabuf_put_u8(buf, pps_mo_id >= 0 ? 7 : 5);
82 	wpabuf_put_be24(buf, OUI_WFA);
83 	wpabuf_put_u8(buf, HS20_INDICATION_OUI_TYPE);
84 	conf = (release - 1) << 4;
85 	if (pps_mo_id >= 0)
86 		conf |= HS20_PPS_MO_ID_PRESENT;
87 	wpabuf_put_u8(buf, conf);
88 	if (pps_mo_id >= 0)
89 		wpabuf_put_le16(buf, pps_mo_id);
90 }
91 
92 
wpas_hs20_add_roam_cons_sel(struct wpabuf * buf,const struct wpa_ssid * ssid)93 void wpas_hs20_add_roam_cons_sel(struct wpabuf *buf,
94 				 const struct wpa_ssid *ssid)
95 {
96 	if (!ssid->roaming_consortium_selection ||
97 	    !ssid->roaming_consortium_selection_len)
98 		return;
99 
100 	wpabuf_put_u8(buf, WLAN_EID_VENDOR_SPECIFIC);
101 	wpabuf_put_u8(buf, 4 + ssid->roaming_consortium_selection_len);
102 	wpabuf_put_be24(buf, OUI_WFA);
103 	wpabuf_put_u8(buf, HS20_ROAMING_CONS_SEL_OUI_TYPE);
104 	wpabuf_put_data(buf, ssid->roaming_consortium_selection,
105 			ssid->roaming_consortium_selection_len);
106 }
107 
108 
get_hs20_version(struct wpa_bss * bss)109 int get_hs20_version(struct wpa_bss *bss)
110 {
111 	const u8 *ie;
112 
113 	if (!bss)
114 		return 0;
115 
116 	ie = wpa_bss_get_vendor_ie(bss, HS20_IE_VENDOR_TYPE);
117 	if (!ie || ie[1] < 5)
118 		return 0;
119 
120 	return ((ie[6] >> 4) & 0x0f) + 1;
121 }
122 
123 
is_hs20_network(struct wpa_supplicant * wpa_s,struct wpa_ssid * ssid,struct wpa_bss * bss)124 int is_hs20_network(struct wpa_supplicant *wpa_s, struct wpa_ssid *ssid,
125 		    struct wpa_bss *bss)
126 {
127 	if (!wpa_s->conf->hs20 || !ssid)
128 		return 0;
129 
130 	if (ssid->parent_cred)
131 		return 1;
132 
133 	if (bss && !wpa_bss_get_vendor_ie(bss, HS20_IE_VENDOR_TYPE))
134 		return 0;
135 
136 	/*
137 	 * This may catch some non-Hotspot 2.0 cases, but it is safer to do that
138 	 * than cause Hotspot 2.0 connections without indication element getting
139 	 * added. Non-Hotspot 2.0 APs should ignore the unknown vendor element.
140 	 */
141 
142 	if (!(ssid->key_mgmt & WPA_KEY_MGMT_IEEE8021X))
143 		return 0;
144 	if (!(ssid->pairwise_cipher & WPA_CIPHER_CCMP))
145 		return 0;
146 	if (ssid->proto != WPA_PROTO_RSN)
147 		return 0;
148 
149 	return 1;
150 }
151 
152 
hs20_get_pps_mo_id(struct wpa_supplicant * wpa_s,struct wpa_ssid * ssid)153 int hs20_get_pps_mo_id(struct wpa_supplicant *wpa_s, struct wpa_ssid *ssid)
154 {
155 	struct wpa_cred *cred;
156 
157 	if (ssid == NULL)
158 		return 0;
159 
160 	if (ssid->update_identifier)
161 		return ssid->update_identifier;
162 
163 	if (ssid->parent_cred == NULL)
164 		return 0;
165 
166 	for (cred = wpa_s->conf->cred; cred; cred = cred->next) {
167 		if (ssid->parent_cred == cred)
168 			return cred->update_identifier;
169 	}
170 
171 	return 0;
172 }
173 
174 
hs20_put_anqp_req(u32 stypes,const u8 * payload,size_t payload_len,struct wpabuf * buf)175 void hs20_put_anqp_req(u32 stypes, const u8 *payload, size_t payload_len,
176 		       struct wpabuf *buf)
177 {
178 	u8 *len_pos;
179 
180 	if (buf == NULL)
181 		return;
182 
183 	len_pos = gas_anqp_add_element(buf, ANQP_VENDOR_SPECIFIC);
184 	wpabuf_put_be24(buf, OUI_WFA);
185 	wpabuf_put_u8(buf, HS20_ANQP_OUI_TYPE);
186 	if (stypes == BIT(HS20_STYPE_NAI_HOME_REALM_QUERY)) {
187 		wpabuf_put_u8(buf, HS20_STYPE_NAI_HOME_REALM_QUERY);
188 		wpabuf_put_u8(buf, 0); /* Reserved */
189 		if (payload)
190 			wpabuf_put_data(buf, payload, payload_len);
191 	} else {
192 		u8 i;
193 		wpabuf_put_u8(buf, HS20_STYPE_QUERY_LIST);
194 		wpabuf_put_u8(buf, 0); /* Reserved */
195 		for (i = 0; i < 32; i++) {
196 			if (stypes & BIT(i))
197 				wpabuf_put_u8(buf, i);
198 		}
199 	}
200 	gas_anqp_set_element_len(buf, len_pos);
201 
202 	gas_anqp_set_len(buf);
203 }
204 
205 
hs20_build_anqp_req(u32 stypes,const u8 * payload,size_t payload_len)206 static struct wpabuf * hs20_build_anqp_req(u32 stypes, const u8 *payload,
207 					   size_t payload_len)
208 {
209 	struct wpabuf *buf;
210 
211 	buf = gas_anqp_build_initial_req(0, 100 + payload_len);
212 	if (buf == NULL)
213 		return NULL;
214 
215 	hs20_put_anqp_req(stypes, payload, payload_len, buf);
216 
217 	return buf;
218 }
219 
220 
hs20_anqp_send_req(struct wpa_supplicant * wpa_s,const u8 * dst,u32 stypes,const u8 * payload,size_t payload_len)221 int hs20_anqp_send_req(struct wpa_supplicant *wpa_s, const u8 *dst, u32 stypes,
222 		       const u8 *payload, size_t payload_len)
223 {
224 	struct wpabuf *buf;
225 	int ret = 0;
226 	int freq;
227 	struct wpa_bss *bss;
228 	int res;
229 
230 	bss = wpa_bss_get_bssid(wpa_s, dst);
231 	if (!bss) {
232 		wpa_printf(MSG_WARNING,
233 			   "ANQP: Cannot send query to unknown BSS "
234 			   MACSTR, MAC2STR(dst));
235 		return -1;
236 	}
237 
238 	wpa_bss_anqp_unshare_alloc(bss);
239 	freq = bss->freq;
240 
241 	wpa_printf(MSG_DEBUG, "HS20: ANQP Query Request to " MACSTR " for "
242 		   "subtypes 0x%x", MAC2STR(dst), stypes);
243 
244 	buf = hs20_build_anqp_req(stypes, payload, payload_len);
245 	if (buf == NULL)
246 		return -1;
247 
248 	res = gas_query_req(wpa_s->gas, dst, freq, 0, 0, buf, anqp_resp_cb,
249 			    wpa_s);
250 	if (res < 0) {
251 		wpa_printf(MSG_DEBUG, "ANQP: Failed to send Query Request");
252 		wpabuf_free(buf);
253 		return -1;
254 	} else
255 		wpa_printf(MSG_DEBUG, "ANQP: Query started with dialog token "
256 			   "%u", res);
257 
258 	return ret;
259 }
260 
261 
hs20_parse_rx_hs20_anqp_resp(struct wpa_supplicant * wpa_s,struct wpa_bss * bss,const u8 * sa,const u8 * data,size_t slen,u8 dialog_token)262 void hs20_parse_rx_hs20_anqp_resp(struct wpa_supplicant *wpa_s,
263 				  struct wpa_bss *bss, const u8 *sa,
264 				  const u8 *data, size_t slen, u8 dialog_token)
265 {
266 	const u8 *pos = data;
267 	u8 subtype;
268 	struct wpa_bss_anqp *anqp = NULL;
269 
270 	if (slen < 2)
271 		return;
272 
273 	if (bss)
274 		anqp = bss->anqp;
275 
276 	subtype = *pos++;
277 	slen--;
278 
279 	pos++; /* Reserved */
280 	slen--;
281 
282 	switch (subtype) {
283 	case HS20_STYPE_CAPABILITY_LIST:
284 		wpa_msg(wpa_s, MSG_INFO, RX_HS20_ANQP MACSTR
285 			" HS Capability List", MAC2STR(sa));
286 		wpa_hexdump_ascii(MSG_DEBUG, "HS Capability List", pos, slen);
287 		if (anqp) {
288 			wpabuf_free(anqp->hs20_capability_list);
289 			anqp->hs20_capability_list =
290 				wpabuf_alloc_copy(pos, slen);
291 		}
292 		break;
293 	case HS20_STYPE_OPERATOR_FRIENDLY_NAME:
294 		wpa_msg(wpa_s, MSG_INFO, RX_HS20_ANQP MACSTR
295 			" Operator Friendly Name", MAC2STR(sa));
296 		wpa_hexdump_ascii(MSG_DEBUG, "oper friendly name", pos, slen);
297 		if (anqp) {
298 			wpabuf_free(anqp->hs20_operator_friendly_name);
299 			anqp->hs20_operator_friendly_name =
300 				wpabuf_alloc_copy(pos, slen);
301 		}
302 		break;
303 	case HS20_STYPE_WAN_METRICS:
304 		wpa_hexdump(MSG_DEBUG, "WAN Metrics", pos, slen);
305 		if (slen < 13) {
306 			wpa_dbg(wpa_s, MSG_DEBUG, "HS 2.0: Too short WAN "
307 				"Metrics value from " MACSTR, MAC2STR(sa));
308 			break;
309 		}
310 		wpa_msg(wpa_s, MSG_INFO, RX_HS20_ANQP MACSTR
311 			" WAN Metrics %02x:%u:%u:%u:%u:%u", MAC2STR(sa),
312 			pos[0], WPA_GET_LE32(pos + 1), WPA_GET_LE32(pos + 5),
313 			pos[9], pos[10], WPA_GET_LE16(pos + 11));
314 		if (anqp) {
315 			wpabuf_free(anqp->hs20_wan_metrics);
316 			anqp->hs20_wan_metrics = wpabuf_alloc_copy(pos, slen);
317 		}
318 		break;
319 	case HS20_STYPE_CONNECTION_CAPABILITY:
320 		wpa_msg(wpa_s, MSG_INFO, RX_HS20_ANQP MACSTR
321 			" Connection Capability", MAC2STR(sa));
322 		wpa_hexdump_ascii(MSG_DEBUG, "conn capability", pos, slen);
323 		if (anqp) {
324 			wpabuf_free(anqp->hs20_connection_capability);
325 			anqp->hs20_connection_capability =
326 				wpabuf_alloc_copy(pos, slen);
327 		}
328 		break;
329 	case HS20_STYPE_OPERATING_CLASS:
330 		wpa_msg(wpa_s, MSG_INFO, RX_HS20_ANQP MACSTR
331 			" Operating Class", MAC2STR(sa));
332 		wpa_hexdump_ascii(MSG_DEBUG, "Operating Class", pos, slen);
333 		if (anqp) {
334 			wpabuf_free(anqp->hs20_operating_class);
335 			anqp->hs20_operating_class =
336 				wpabuf_alloc_copy(pos, slen);
337 		}
338 		break;
339 	default:
340 		wpa_printf(MSG_DEBUG, "HS20: Unsupported subtype %u", subtype);
341 		break;
342 	}
343 }
344 
345 
hs20_rx_deauth_imminent_notice(struct wpa_supplicant * wpa_s,u8 code,u16 reauth_delay,const char * url)346 void hs20_rx_deauth_imminent_notice(struct wpa_supplicant *wpa_s, u8 code,
347 				    u16 reauth_delay, const char *url)
348 {
349 	if (!wpa_sm_pmf_enabled(wpa_s->wpa)) {
350 		wpa_printf(MSG_DEBUG, "HS 2.0: Ignore deauthentication imminent notice since PMF was not enabled");
351 		return;
352 	}
353 
354 	wpa_msg(wpa_s, MSG_INFO, HS20_DEAUTH_IMMINENT_NOTICE "%u %u %s",
355 		code, reauth_delay, url);
356 
357 	if (code == HS20_DEAUTH_REASON_CODE_BSS) {
358 		wpa_printf(MSG_DEBUG, "HS 2.0: Add BSS to ignore list");
359 		wpa_bssid_ignore_add(wpa_s, wpa_s->bssid);
360 		/* TODO: For now, disable full ESS since some drivers may not
361 		 * support disabling per BSS. */
362 		if (wpa_s->current_ssid) {
363 			struct os_reltime now;
364 			os_get_reltime(&now);
365 			if (now.sec + reauth_delay <=
366 			    wpa_s->current_ssid->disabled_until.sec)
367 				return;
368 			wpa_printf(MSG_DEBUG, "HS 2.0: Disable network for %u seconds (BSS)",
369 				   reauth_delay);
370 			wpa_s->current_ssid->disabled_until.sec =
371 				now.sec + reauth_delay;
372 		}
373 	}
374 
375 	if (code == HS20_DEAUTH_REASON_CODE_ESS && wpa_s->current_ssid) {
376 		struct os_reltime now;
377 		os_get_reltime(&now);
378 		if (now.sec + reauth_delay <=
379 		    wpa_s->current_ssid->disabled_until.sec)
380 			return;
381 		wpa_printf(MSG_DEBUG, "HS 2.0: Disable network for %u seconds",
382 			   reauth_delay);
383 		wpa_s->current_ssid->disabled_until.sec =
384 			now.sec + reauth_delay;
385 	}
386 }
387 
388 
hs20_rx_t_c_acceptance(struct wpa_supplicant * wpa_s,const char * url)389 void hs20_rx_t_c_acceptance(struct wpa_supplicant *wpa_s, const char *url)
390 {
391 	if (!wpa_sm_pmf_enabled(wpa_s->wpa)) {
392 		wpa_printf(MSG_DEBUG,
393 			   "HS 2.0: Ignore Terms and Conditions Acceptance since PMF was not enabled");
394 		return;
395 	}
396 
397 	wpas_notify_hs20_t_c_acceptance(wpa_s, url);
398 }
399