1 /*
2  * wpa_supplicant / WPS integration
3  * Copyright (c) 2008, Jouni Malinen <j@w1.fi>
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License version 2 as
7  * published by the Free Software Foundation.
8  *
9  * Alternatively, this software may be distributed under the terms of BSD
10  * license.
11  *
12  * See README and COPYING for more details.
13  */
14 
15 #include "includes.h"
16 
17 #include "common.h"
18 #include "ieee802_11_defs.h"
19 #include "wpa_common.h"
20 #include "config.h"
21 #include "eap_peer/eap.h"
22 #include "wpa_supplicant_i.h"
23 #include "eloop.h"
24 #include "uuid.h"
25 #include "wpa_ctrl.h"
26 #include "ctrl_iface_dbus.h"
27 #include "eap_common/eap_wsc_common.h"
28 #include "blacklist.h"
29 #include "wpa.h"
30 #include "wps_supplicant.h"
31 
32 
33 #define WPS_PIN_SCAN_IGNORE_SEL_REG 3
34 
35 static void wpas_wps_timeout(void *eloop_ctx, void *timeout_ctx);
36 static void wpas_clear_wps(struct wpa_supplicant *wpa_s);
37 
38 
39 int wpas_wps_eapol_cb(struct wpa_supplicant *wpa_s)
40 {
41 	if (!wpa_s->wps_success &&
42 	    wpa_s->current_ssid &&
43 	    eap_is_wps_pin_enrollee(&wpa_s->current_ssid->eap)) {
44 		const u8 *bssid = wpa_s->bssid;
45 		if (is_zero_ether_addr(bssid))
46 			bssid = wpa_s->pending_bssid;
47 
48 		wpa_printf(MSG_DEBUG, "WPS: PIN registration with " MACSTR
49 			   " did not succeed - continue trying to find "
50 			   "suitable AP", MAC2STR(bssid));
51 		wpa_blacklist_add(wpa_s, bssid);
52 
53 		wpa_supplicant_deauthenticate(wpa_s,
54 					      WLAN_REASON_DEAUTH_LEAVING);
55 		wpa_s->reassociate = 1;
56 		wpa_supplicant_req_scan(wpa_s,
57 					wpa_s->blacklist_cleared ? 5 : 0, 0);
58 		wpa_s->blacklist_cleared = 0;
59 		return 1;
60 	}
61 
62 	eloop_cancel_timeout(wpas_wps_timeout, wpa_s, NULL);
63 
64 	if (wpa_s->key_mgmt == WPA_KEY_MGMT_WPS && wpa_s->current_ssid &&
65 	    !(wpa_s->current_ssid->key_mgmt & WPA_KEY_MGMT_WPS)) {
66 		wpa_printf(MSG_DEBUG, "WPS: Network configuration replaced - "
67 			   "try to associate with the received credential");
68 		wpa_supplicant_deauthenticate(wpa_s,
69 					      WLAN_REASON_DEAUTH_LEAVING);
70 		wpa_s->reassociate = 1;
71 		wpa_supplicant_req_scan(wpa_s, 0, 0);
72 		return 1;
73 	}
74 
75 	if (wpa_s->key_mgmt == WPA_KEY_MGMT_WPS && wpa_s->current_ssid) {
76 		wpa_printf(MSG_DEBUG, "WPS: Registration completed - waiting "
77 			   "for external credential processing");
78 		wpas_clear_wps(wpa_s);
79 		wpa_supplicant_deauthenticate(wpa_s,
80 					      WLAN_REASON_DEAUTH_LEAVING);
81 		return 1;
82 	}
83 
84 	return 0;
85 }
86 
87 
88 static void wpas_wps_security_workaround(struct wpa_supplicant *wpa_s,
89 					 struct wpa_ssid *ssid,
90 					 const struct wps_credential *cred)
91 {
92 	struct wpa_driver_capa capa;
93 	size_t i;
94 	struct wpa_scan_res *bss;
95 	const u8 *ie;
96 	struct wpa_ie_data adv;
97 	int wpa2 = 0, ccmp = 0;
98 
99 	/*
100 	 * Many existing WPS APs do not know how to negotiate WPA2 or CCMP in
101 	 * case they are configured for mixed mode operation (WPA+WPA2 and
102 	 * TKIP+CCMP). Try to use scan results to figure out whether the AP
103 	 * actually supports stronger security and select that if the client
104 	 * has support for it, too.
105 	 */
106 
107 	if (wpa_drv_get_capa(wpa_s, &capa))
108 		return; /* Unknown what driver supports */
109 
110 	if (wpa_supplicant_get_scan_results(wpa_s) || wpa_s->scan_res == NULL)
111 		return; /* Could not get scan results for checking advertised
112 			 * parameters */
113 
114 	for (i = 0; i < wpa_s->scan_res->num; i++) {
115 		bss = wpa_s->scan_res->res[i];
116 		if (os_memcmp(bss->bssid, cred->mac_addr, ETH_ALEN) != 0)
117 			continue;
118 		ie = wpa_scan_get_ie(bss, WLAN_EID_SSID);
119 		if (ie == NULL)
120 			continue;
121 		if (ie[1] != ssid->ssid_len || ssid->ssid == NULL ||
122 		    os_memcmp(ie + 2, ssid->ssid, ssid->ssid_len) != 0)
123 			continue;
124 
125 		wpa_printf(MSG_DEBUG, "WPS: AP found from scan results");
126 		break;
127 	}
128 
129 	if (i == wpa_s->scan_res->num) {
130 		wpa_printf(MSG_DEBUG, "WPS: The AP was not found from scan "
131 			   "results - use credential as-is");
132 		return;
133 	}
134 
135 	ie = wpa_scan_get_ie(bss, WLAN_EID_RSN);
136 	if (ie && wpa_parse_wpa_ie(ie, 2 + ie[1], &adv) == 0) {
137 		wpa2 = 1;
138 		if (adv.pairwise_cipher & WPA_CIPHER_CCMP)
139 			ccmp = 1;
140 	} else {
141 		ie = wpa_scan_get_vendor_ie(bss, WPA_IE_VENDOR_TYPE);
142 		if (ie && wpa_parse_wpa_ie(ie, 2 + ie[1], &adv) == 0 &&
143 		    adv.pairwise_cipher & WPA_CIPHER_CCMP)
144 			ccmp = 1;
145 	}
146 
147 	if (ie == NULL && (ssid->proto & WPA_PROTO_WPA) &&
148 	    (ssid->pairwise_cipher & WPA_CIPHER_TKIP)) {
149 		/*
150 		 * TODO: This could be the initial AP configuration and the
151 		 * Beacon contents could change shortly. Should request a new
152 		 * scan and delay addition of the network until the updated
153 		 * scan results are available.
154 		 */
155 		wpa_printf(MSG_DEBUG, "WPS: The AP did not yet advertise WPA "
156 			   "support - use credential as-is");
157 		return;
158 	}
159 
160 	if (ccmp && !(ssid->pairwise_cipher & WPA_CIPHER_CCMP) &&
161 	    (ssid->pairwise_cipher & WPA_CIPHER_TKIP) &&
162 	    (capa.key_mgmt & WPA_DRIVER_CAPA_KEY_MGMT_WPA2_PSK)) {
163 		wpa_printf(MSG_DEBUG, "WPS: Add CCMP into the credential "
164 			   "based on scan results");
165 		if (wpa_s->conf->ap_scan == 1)
166 			ssid->pairwise_cipher |= WPA_CIPHER_CCMP;
167 		else
168 			ssid->pairwise_cipher = WPA_CIPHER_CCMP;
169 	}
170 
171 	if (wpa2 && !(ssid->proto & WPA_PROTO_RSN) &&
172 	    (ssid->proto & WPA_PROTO_WPA) &&
173 	    (capa.enc & WPA_DRIVER_CAPA_ENC_CCMP)) {
174 		wpa_printf(MSG_DEBUG, "WPS: Add WPA2 into the credential "
175 			   "based on scan results");
176 		if (wpa_s->conf->ap_scan == 1)
177 			ssid->proto |= WPA_PROTO_RSN;
178 		else
179 			ssid->proto = WPA_PROTO_RSN;
180 	}
181 }
182 
183 
184 static int wpa_supplicant_wps_cred(void *ctx,
185 				   const struct wps_credential *cred)
186 {
187 	struct wpa_supplicant *wpa_s = ctx;
188 	struct wpa_ssid *ssid = wpa_s->current_ssid;
189 	u8 key_idx = 0;
190 	u16 auth_type;
191 
192 	if ((wpa_s->conf->wps_cred_processing == 1 ||
193 	     wpa_s->conf->wps_cred_processing == 2) && cred->cred_attr) {
194 		size_t blen = cred->cred_attr_len * 2 + 1;
195 		char *buf = os_malloc(blen);
196 		if (buf) {
197 			wpa_snprintf_hex(buf, blen,
198 					 cred->cred_attr, cred->cred_attr_len);
199 			wpa_msg(wpa_s, MSG_INFO, "%s%s",
200 				WPS_EVENT_CRED_RECEIVED, buf);
201 			os_free(buf);
202 		}
203 		wpa_supplicant_dbus_notify_wps_cred(wpa_s, cred);
204 	} else
205 		wpa_msg(wpa_s, MSG_INFO, WPS_EVENT_CRED_RECEIVED);
206 
207 	wpa_hexdump_key(MSG_DEBUG, "WPS: Received Credential attribute",
208 			cred->cred_attr, cred->cred_attr_len);
209 
210 	if (wpa_s->conf->wps_cred_processing == 1)
211 		return 0;
212 
213 	wpa_hexdump_ascii(MSG_DEBUG, "WPS: SSID", cred->ssid, cred->ssid_len);
214 	wpa_printf(MSG_DEBUG, "WPS: Authentication Type 0x%x",
215 		   cred->auth_type);
216 	wpa_printf(MSG_DEBUG, "WPS: Encryption Type 0x%x", cred->encr_type);
217 	wpa_printf(MSG_DEBUG, "WPS: Network Key Index %d", cred->key_idx);
218 	wpa_hexdump_key(MSG_DEBUG, "WPS: Network Key",
219 			cred->key, cred->key_len);
220 	wpa_printf(MSG_DEBUG, "WPS: MAC Address " MACSTR,
221 		   MAC2STR(cred->mac_addr));
222 
223 	auth_type = cred->auth_type;
224 	if (auth_type == (WPS_AUTH_WPAPSK | WPS_AUTH_WPA2PSK)) {
225 		wpa_printf(MSG_DEBUG, "WPS: Workaround - convert mixed-mode "
226 			   "auth_type into WPA2PSK");
227 		auth_type = WPS_AUTH_WPA2PSK;
228 	}
229 
230 	if (auth_type != WPS_AUTH_OPEN &&
231 	    auth_type != WPS_AUTH_SHARED &&
232 	    auth_type != WPS_AUTH_WPAPSK &&
233 	    auth_type != WPS_AUTH_WPA2PSK) {
234 		wpa_printf(MSG_DEBUG, "WPS: Ignored credentials for "
235 			   "unsupported authentication type 0x%x",
236 			   auth_type);
237 		return 0;
238 	}
239 
240 	if (ssid && (ssid->key_mgmt & WPA_KEY_MGMT_WPS)) {
241 		wpa_printf(MSG_DEBUG, "WPS: Replace WPS network block based "
242 			   "on the received credential");
243 		os_free(ssid->eap.identity);
244 		ssid->eap.identity = NULL;
245 		ssid->eap.identity_len = 0;
246 		os_free(ssid->eap.phase1);
247 		ssid->eap.phase1 = NULL;
248 		os_free(ssid->eap.eap_methods);
249 		ssid->eap.eap_methods = NULL;
250 	} else {
251 		wpa_printf(MSG_DEBUG, "WPS: Create a new network based on the "
252 			   "received credential");
253 		ssid = wpa_config_add_network(wpa_s->conf);
254 		if (ssid == NULL)
255 			return -1;
256 	}
257 
258 	wpa_config_set_network_defaults(ssid);
259 
260 	os_free(ssid->ssid);
261 	ssid->ssid = os_malloc(cred->ssid_len);
262 	if (ssid->ssid) {
263 		os_memcpy(ssid->ssid, cred->ssid, cred->ssid_len);
264 		ssid->ssid_len = cred->ssid_len;
265 	}
266 
267 	switch (cred->encr_type) {
268 	case WPS_ENCR_NONE:
269 		break;
270 	case WPS_ENCR_WEP:
271 		if (cred->key_len <= 0)
272 			break;
273 		if (cred->key_len != 5 && cred->key_len != 13 &&
274 		    cred->key_len != 10 && cred->key_len != 26) {
275 			wpa_printf(MSG_ERROR, "WPS: Invalid WEP Key length "
276 				   "%lu", (unsigned long) cred->key_len);
277 			return -1;
278 		}
279 		if (cred->key_idx > NUM_WEP_KEYS) {
280 			wpa_printf(MSG_ERROR, "WPS: Invalid WEP Key index %d",
281 				   cred->key_idx);
282 			return -1;
283 		}
284 		if (cred->key_idx)
285 			key_idx = cred->key_idx - 1;
286 		if (cred->key_len == 10 || cred->key_len == 26) {
287 			if (hexstr2bin((char *) cred->key,
288 				       ssid->wep_key[key_idx],
289 				       cred->key_len / 2) < 0) {
290 				wpa_printf(MSG_ERROR, "WPS: Invalid WEP Key "
291 					   "%d", key_idx);
292 				return -1;
293 			}
294 			ssid->wep_key_len[key_idx] = cred->key_len / 2;
295 		} else {
296 			os_memcpy(ssid->wep_key[key_idx], cred->key,
297 				  cred->key_len);
298 			ssid->wep_key_len[key_idx] = cred->key_len;
299 		}
300 		ssid->wep_tx_keyidx = key_idx;
301 		break;
302 	case WPS_ENCR_TKIP:
303 		ssid->pairwise_cipher = WPA_CIPHER_TKIP;
304 		break;
305 	case WPS_ENCR_AES:
306 		ssid->pairwise_cipher = WPA_CIPHER_CCMP;
307 		break;
308 	}
309 
310 	switch (auth_type) {
311 	case WPS_AUTH_OPEN:
312 		ssid->auth_alg = WPA_AUTH_ALG_OPEN;
313 		ssid->key_mgmt = WPA_KEY_MGMT_NONE;
314 		ssid->proto = 0;
315 		break;
316 	case WPS_AUTH_SHARED:
317 		ssid->auth_alg = WPA_AUTH_ALG_SHARED;
318 		ssid->key_mgmt = WPA_KEY_MGMT_NONE;
319 		ssid->proto = 0;
320 		break;
321 	case WPS_AUTH_WPAPSK:
322 		ssid->auth_alg = WPA_AUTH_ALG_OPEN;
323 		ssid->key_mgmt = WPA_KEY_MGMT_PSK;
324 		ssid->proto = WPA_PROTO_WPA;
325 		break;
326 	case WPS_AUTH_WPA:
327 		ssid->auth_alg = WPA_AUTH_ALG_OPEN;
328 		ssid->key_mgmt = WPA_KEY_MGMT_IEEE8021X;
329 		ssid->proto = WPA_PROTO_WPA;
330 		break;
331 	case WPS_AUTH_WPA2:
332 		ssid->auth_alg = WPA_AUTH_ALG_OPEN;
333 		ssid->key_mgmt = WPA_KEY_MGMT_IEEE8021X;
334 		ssid->proto = WPA_PROTO_RSN;
335 		break;
336 	case WPS_AUTH_WPA2PSK:
337 		ssid->auth_alg = WPA_AUTH_ALG_OPEN;
338 		ssid->key_mgmt = WPA_KEY_MGMT_PSK;
339 		ssid->proto = WPA_PROTO_RSN;
340 		break;
341 	}
342 
343 	if (ssid->key_mgmt == WPA_KEY_MGMT_PSK) {
344 		if (cred->key_len == 2 * PMK_LEN) {
345 			if (hexstr2bin((const char *) cred->key, ssid->psk,
346 				       PMK_LEN)) {
347 				wpa_printf(MSG_ERROR, "WPS: Invalid Network "
348 					   "Key");
349 				return -1;
350 			}
351 			ssid->psk_set = 1;
352 		} else if (cred->key_len >= 8 && cred->key_len < 2 * PMK_LEN) {
353 			os_free(ssid->passphrase);
354 			ssid->passphrase = os_malloc(cred->key_len + 1);
355 			if (ssid->passphrase == NULL)
356 				return -1;
357 			os_memcpy(ssid->passphrase, cred->key, cred->key_len);
358 			ssid->passphrase[cred->key_len] = '\0';
359 			wpa_config_update_psk(ssid);
360 		} else {
361 			wpa_printf(MSG_ERROR, "WPS: Invalid Network Key "
362 				   "length %lu",
363 				   (unsigned long) cred->key_len);
364 			return -1;
365 		}
366 	}
367 
368 	wpas_wps_security_workaround(wpa_s, ssid, cred);
369 
370 #ifndef CONFIG_NO_CONFIG_WRITE
371 	if (wpa_s->conf->update_config &&
372 	    wpa_config_write(wpa_s->confname, wpa_s->conf)) {
373 		wpa_printf(MSG_DEBUG, "WPS: Failed to update configuration");
374 		return -1;
375 	}
376 #endif /* CONFIG_NO_CONFIG_WRITE */
377 
378 	return 0;
379 }
380 
381 
382 static void wpa_supplicant_wps_event_m2d(struct wpa_supplicant *wpa_s,
383 					 struct wps_event_m2d *m2d)
384 {
385 	wpa_msg(wpa_s, MSG_INFO, WPS_EVENT_M2D
386 		"dev_password_id=%d config_error=%d",
387 		m2d->dev_password_id, m2d->config_error);
388 }
389 
390 
391 static void wpa_supplicant_wps_event_fail(struct wpa_supplicant *wpa_s,
392 					  struct wps_event_fail *fail)
393 {
394 	wpa_msg(wpa_s, MSG_INFO, WPS_EVENT_FAIL "msg=%d", fail->msg);
395 	wpas_clear_wps(wpa_s);
396 }
397 
398 
399 static void wpa_supplicant_wps_event_success(struct wpa_supplicant *wpa_s)
400 {
401 	wpa_msg(wpa_s, MSG_INFO, WPS_EVENT_SUCCESS);
402 	wpa_s->wps_success = 1;
403 }
404 
405 
406 static void wpa_supplicant_wps_event(void *ctx, enum wps_event event,
407 				     union wps_event_data *data)
408 {
409 	struct wpa_supplicant *wpa_s = ctx;
410 	switch (event) {
411 	case WPS_EV_M2D:
412 		wpa_supplicant_wps_event_m2d(wpa_s, &data->m2d);
413 		break;
414 	case WPS_EV_FAIL:
415 		wpa_supplicant_wps_event_fail(wpa_s, &data->fail);
416 		break;
417 	case WPS_EV_SUCCESS:
418 		wpa_supplicant_wps_event_success(wpa_s);
419 		break;
420 	case WPS_EV_PWD_AUTH_FAIL:
421 		break;
422 	case WPS_EV_PBC_OVERLAP:
423 		break;
424 	case WPS_EV_PBC_TIMEOUT:
425 		break;
426 	}
427 }
428 
429 
430 enum wps_request_type wpas_wps_get_req_type(struct wpa_ssid *ssid)
431 {
432 	if (eap_is_wps_pbc_enrollee(&ssid->eap) ||
433 	    eap_is_wps_pin_enrollee(&ssid->eap))
434 		return WPS_REQ_ENROLLEE;
435 	else
436 		return WPS_REQ_REGISTRAR;
437 }
438 
439 
440 static void wpas_clear_wps(struct wpa_supplicant *wpa_s)
441 {
442 	int id;
443 	struct wpa_ssid *ssid;
444 
445 	eloop_cancel_timeout(wpas_wps_timeout, wpa_s, NULL);
446 
447 	/* Remove any existing WPS network from configuration */
448 	ssid = wpa_s->conf->ssid;
449 	while (ssid) {
450 		if (ssid->key_mgmt & WPA_KEY_MGMT_WPS) {
451 			if (ssid == wpa_s->current_ssid)
452 				wpa_s->current_ssid = NULL;
453 			id = ssid->id;
454 		} else
455 			id = -1;
456 		ssid = ssid->next;
457 		if (id >= 0)
458 			wpa_config_remove_network(wpa_s->conf, id);
459 	}
460 }
461 
462 
463 static void wpas_wps_timeout(void *eloop_ctx, void *timeout_ctx)
464 {
465 	struct wpa_supplicant *wpa_s = eloop_ctx;
466 	wpa_printf(MSG_INFO, WPS_EVENT_TIMEOUT "Requested operation timed "
467 		   "out");
468 	wpas_clear_wps(wpa_s);
469 }
470 
471 
472 static struct wpa_ssid * wpas_wps_add_network(struct wpa_supplicant *wpa_s,
473 					      int registrar, const u8 *bssid)
474 {
475 	struct wpa_ssid *ssid;
476 
477 	ssid = wpa_config_add_network(wpa_s->conf);
478 	if (ssid == NULL)
479 		return NULL;
480 	wpa_config_set_network_defaults(ssid);
481 	if (wpa_config_set(ssid, "key_mgmt", "WPS", 0) < 0 ||
482 	    wpa_config_set(ssid, "eap", "WSC", 0) < 0 ||
483 	    wpa_config_set(ssid, "identity", registrar ?
484 			   "\"" WSC_ID_REGISTRAR "\"" :
485 			   "\"" WSC_ID_ENROLLEE "\"", 0) < 0) {
486 		wpa_config_remove_network(wpa_s->conf, ssid->id);
487 		return NULL;
488 	}
489 
490 	if (bssid) {
491 		size_t i;
492 		int count = 0;
493 
494 		os_memcpy(ssid->bssid, bssid, ETH_ALEN);
495 		ssid->bssid_set = 1;
496 
497 		/* Try to get SSID from scan results */
498 		if (wpa_s->scan_res == NULL &&
499 		    wpa_supplicant_get_scan_results(wpa_s) < 0)
500 			return ssid; /* Could not find any scan results */
501 
502 		for (i = 0; i < wpa_s->scan_res->num; i++) {
503 			const u8 *ie;
504 			struct wpa_scan_res *res;
505 
506 			res = wpa_s->scan_res->res[i];
507 			if (os_memcmp(bssid, res->bssid, ETH_ALEN) != 0)
508 				continue;
509 
510 			ie = wpa_scan_get_ie(res, WLAN_EID_SSID);
511 			if (ie == NULL)
512 				break;
513 			os_free(ssid->ssid);
514 			ssid->ssid = os_malloc(ie[1]);
515 			if (ssid->ssid == NULL)
516 				break;
517 			os_memcpy(ssid->ssid, ie + 2, ie[1]);
518 			ssid->ssid_len = ie[1];
519 			wpa_hexdump_ascii(MSG_DEBUG, "WPS: Picked SSID from "
520 					  "scan results",
521 					  ssid->ssid, ssid->ssid_len);
522 			count++;
523 		}
524 
525 		if (count > 1) {
526 			wpa_printf(MSG_DEBUG, "WPS: More than one SSID found "
527 				   "for the AP; use wildcard");
528 			os_free(ssid->ssid);
529 			ssid->ssid = NULL;
530 			ssid->ssid_len = 0;
531 		}
532 	}
533 
534 	return ssid;
535 }
536 
537 
538 static void wpas_wps_reassoc(struct wpa_supplicant *wpa_s,
539 			     struct wpa_ssid *selected)
540 {
541 	struct wpa_ssid *ssid;
542 
543 	/* Mark all other networks disabled and trigger reassociation */
544 	ssid = wpa_s->conf->ssid;
545 	while (ssid) {
546 		ssid->disabled = ssid != selected;
547 		ssid = ssid->next;
548 	}
549 	wpa_s->disconnected = 0;
550 	wpa_s->reassociate = 1;
551 	wpa_s->scan_runs = 0;
552 	wpa_s->wps_success = 0;
553 	wpa_s->blacklist_cleared = 0;
554 	wpa_supplicant_req_scan(wpa_s, 0, 0);
555 }
556 
557 
558 int wpas_wps_start_pbc(struct wpa_supplicant *wpa_s, const u8 *bssid)
559 {
560 	struct wpa_ssid *ssid;
561 	wpas_clear_wps(wpa_s);
562 	ssid = wpas_wps_add_network(wpa_s, 0, bssid);
563 	if (ssid == NULL)
564 		return -1;
565 	wpa_config_set(ssid, "phase1", "\"pbc=1\"", 0);
566 	eloop_register_timeout(WPS_PBC_WALK_TIME, 0, wpas_wps_timeout,
567 			       wpa_s, NULL);
568 	wpas_wps_reassoc(wpa_s, ssid);
569 	return 0;
570 }
571 
572 
573 int wpas_wps_start_pin(struct wpa_supplicant *wpa_s, const u8 *bssid,
574 		       const char *pin)
575 {
576 	struct wpa_ssid *ssid;
577 	char val[30];
578 	unsigned int rpin = 0;
579 
580 	wpas_clear_wps(wpa_s);
581 	ssid = wpas_wps_add_network(wpa_s, 0, bssid);
582 	if (ssid == NULL)
583 		return -1;
584 	if (pin)
585 		os_snprintf(val, sizeof(val), "\"pin=%s\"", pin);
586 	else {
587 		rpin = wps_generate_pin();
588 		os_snprintf(val, sizeof(val), "\"pin=%08d\"", rpin);
589 	}
590 	wpa_config_set(ssid, "phase1", val, 0);
591 	eloop_register_timeout(WPS_PBC_WALK_TIME, 0, wpas_wps_timeout,
592 			       wpa_s, NULL);
593 	wpas_wps_reassoc(wpa_s, ssid);
594 	return rpin;
595 }
596 
597 
598 int wpas_wps_start_reg(struct wpa_supplicant *wpa_s, const u8 *bssid,
599 		       const char *pin)
600 {
601 	struct wpa_ssid *ssid;
602 	char val[30];
603 
604 	if (!pin)
605 		return -1;
606 	wpas_clear_wps(wpa_s);
607 	ssid = wpas_wps_add_network(wpa_s, 1, bssid);
608 	if (ssid == NULL)
609 		return -1;
610 	os_snprintf(val, sizeof(val), "\"pin=%s\"", pin);
611 	wpa_config_set(ssid, "phase1", val, 0);
612 	eloop_register_timeout(WPS_PBC_WALK_TIME, 0, wpas_wps_timeout,
613 			       wpa_s, NULL);
614 	wpas_wps_reassoc(wpa_s, ssid);
615 	return 0;
616 }
617 
618 
619 static int wpas_wps_new_psk_cb(void *ctx, const u8 *mac_addr, const u8 *psk,
620 			       size_t psk_len)
621 {
622 	wpa_printf(MSG_DEBUG, "WPS: Received new WPA/WPA2-PSK from WPS for "
623 		   "STA " MACSTR, MAC2STR(mac_addr));
624 	wpa_hexdump_key(MSG_DEBUG, "Per-device PSK", psk, psk_len);
625 
626 	/* TODO */
627 
628 	return 0;
629 }
630 
631 
632 static void wpas_wps_pin_needed_cb(void *ctx, const u8 *uuid_e,
633 				   const struct wps_device_data *dev)
634 {
635 	char uuid[40], txt[400];
636 	int len;
637 	if (uuid_bin2str(uuid_e, uuid, sizeof(uuid)))
638 		return;
639 	wpa_printf(MSG_DEBUG, "WPS: PIN needed for UUID-E %s", uuid);
640 	len = os_snprintf(txt, sizeof(txt), "WPS-EVENT-PIN-NEEDED %s " MACSTR
641 			  " [%s|%s|%s|%s|%s|%d-%08X-%d]",
642 			  uuid, MAC2STR(dev->mac_addr), dev->device_name,
643 			  dev->manufacturer, dev->model_name,
644 			  dev->model_number, dev->serial_number,
645 			  dev->categ, dev->oui, dev->sub_categ);
646 	if (len > 0 && len < (int) sizeof(txt))
647 		wpa_printf(MSG_INFO, "%s", txt);
648 }
649 
650 
651 int wpas_wps_init(struct wpa_supplicant *wpa_s)
652 {
653 	struct wps_context *wps;
654 	struct wps_registrar_config rcfg;
655 
656 	wps = os_zalloc(sizeof(*wps));
657 	if (wps == NULL)
658 		return -1;
659 
660 	wps->cred_cb = wpa_supplicant_wps_cred;
661 	wps->event_cb = wpa_supplicant_wps_event;
662 	wps->cb_ctx = wpa_s;
663 
664 	wps->dev.device_name = wpa_s->conf->device_name;
665 	wps->dev.manufacturer = wpa_s->conf->manufacturer;
666 	wps->dev.model_name = wpa_s->conf->model_name;
667 	wps->dev.model_number = wpa_s->conf->model_number;
668 	wps->dev.serial_number = wpa_s->conf->serial_number;
669 	if (wpa_s->conf->device_type) {
670 		char *pos;
671 		u8 oui[4];
672 		/* <categ>-<OUI>-<subcateg> */
673 		wps->dev.categ = atoi(wpa_s->conf->device_type);
674 		pos = os_strchr(wpa_s->conf->device_type, '-');
675 		if (pos == NULL) {
676 			wpa_printf(MSG_ERROR, "WPS: Invalid device_type");
677 			os_free(wps);
678 			return -1;
679 		}
680 		pos++;
681 		if (hexstr2bin(pos, oui, 4)) {
682 			wpa_printf(MSG_ERROR, "WPS: Invalid device_type OUI");
683 			os_free(wps);
684 			return -1;
685 		}
686 		wps->dev.oui = WPA_GET_BE32(oui);
687 		pos = os_strchr(pos, '-');
688 		if (pos == NULL) {
689 			wpa_printf(MSG_ERROR, "WPS: Invalid device_type");
690 			os_free(wps);
691 			return -1;
692 		}
693 		pos++;
694 		wps->dev.sub_categ = atoi(pos);
695 	}
696 	wps->dev.os_version = WPA_GET_BE32(wpa_s->conf->os_version);
697 	wps->dev.rf_bands = WPS_RF_24GHZ | WPS_RF_50GHZ; /* TODO: config */
698 	os_memcpy(wps->dev.mac_addr, wpa_s->own_addr, ETH_ALEN);
699 	if (is_nil_uuid(wpa_s->conf->uuid)) {
700 		uuid_gen_mac_addr(wpa_s->own_addr, wps->uuid);
701 		wpa_hexdump(MSG_DEBUG, "WPS: UUID based on MAC address",
702 			    wps->uuid, WPS_UUID_LEN);
703 	} else
704 		os_memcpy(wps->uuid, wpa_s->conf->uuid, WPS_UUID_LEN);
705 
706 	wps->auth_types = WPS_AUTH_WPA2PSK | WPS_AUTH_WPAPSK;
707 	wps->encr_types = WPS_ENCR_AES | WPS_ENCR_TKIP;
708 
709 	os_memset(&rcfg, 0, sizeof(rcfg));
710 	rcfg.new_psk_cb = wpas_wps_new_psk_cb;
711 	rcfg.pin_needed_cb = wpas_wps_pin_needed_cb;
712 	rcfg.cb_ctx = wpa_s;
713 
714 	wps->registrar = wps_registrar_init(wps, &rcfg);
715 	if (wps->registrar == NULL) {
716 		wpa_printf(MSG_DEBUG, "Failed to initialize WPS Registrar");
717 		os_free(wps);
718 		return -1;
719 	}
720 
721 	wpa_s->wps = wps;
722 
723 	return 0;
724 }
725 
726 
727 void wpas_wps_deinit(struct wpa_supplicant *wpa_s)
728 {
729 	eloop_cancel_timeout(wpas_wps_timeout, wpa_s, NULL);
730 
731 	if (wpa_s->wps == NULL)
732 		return;
733 
734 	wps_registrar_deinit(wpa_s->wps->registrar);
735 	os_free(wpa_s->wps->network_key);
736 	os_free(wpa_s->wps);
737 	wpa_s->wps = NULL;
738 }
739 
740 
741 int wpas_wps_ssid_bss_match(struct wpa_supplicant *wpa_s,
742 			    struct wpa_ssid *ssid, struct wpa_scan_res *bss)
743 {
744 	struct wpabuf *wps_ie;
745 
746 	if (!(ssid->key_mgmt & WPA_KEY_MGMT_WPS))
747 		return -1;
748 
749 	wps_ie = wpa_scan_get_vendor_ie_multi(bss, WPS_IE_VENDOR_TYPE);
750 	if (eap_is_wps_pbc_enrollee(&ssid->eap)) {
751 		if (!wps_ie) {
752 			wpa_printf(MSG_DEBUG, "   skip - non-WPS AP");
753 			return 0;
754 		}
755 
756 		if (!wps_is_selected_pbc_registrar(wps_ie)) {
757 			wpa_printf(MSG_DEBUG, "   skip - WPS AP "
758 				   "without active PBC Registrar");
759 			wpabuf_free(wps_ie);
760 			return 0;
761 		}
762 
763 		/* TODO: overlap detection */
764 		wpa_printf(MSG_DEBUG, "   selected based on WPS IE "
765 			   "(Active PBC)");
766 		wpabuf_free(wps_ie);
767 		return 1;
768 	}
769 
770 	if (eap_is_wps_pin_enrollee(&ssid->eap)) {
771 		if (!wps_ie) {
772 			wpa_printf(MSG_DEBUG, "   skip - non-WPS AP");
773 			return 0;
774 		}
775 
776 		/*
777 		 * Start with WPS APs that advertise active PIN Registrar and
778 		 * allow any WPS AP after third scan since some APs do not set
779 		 * Selected Registrar attribute properly when using external
780 		 * Registrar.
781 		 */
782 		if (!wps_is_selected_pin_registrar(wps_ie)) {
783 			if (wpa_s->scan_runs < WPS_PIN_SCAN_IGNORE_SEL_REG) {
784 				wpa_printf(MSG_DEBUG, "   skip - WPS AP "
785 					   "without active PIN Registrar");
786 				wpabuf_free(wps_ie);
787 				return 0;
788 			}
789 			wpa_printf(MSG_DEBUG, "   selected based on WPS IE");
790 		} else {
791 			wpa_printf(MSG_DEBUG, "   selected based on WPS IE "
792 				   "(Active PIN)");
793 		}
794 		wpabuf_free(wps_ie);
795 		return 1;
796 	}
797 
798 	if (wps_ie) {
799 		wpa_printf(MSG_DEBUG, "   selected based on WPS IE");
800 		wpabuf_free(wps_ie);
801 		return 1;
802 	}
803 
804 	return -1;
805 }
806 
807 
808 int wpas_wps_ssid_wildcard_ok(struct wpa_supplicant *wpa_s,
809 			      struct wpa_ssid *ssid,
810 			      struct wpa_scan_res *bss)
811 {
812 	struct wpabuf *wps_ie = NULL;
813 	int ret = 0;
814 
815 	if (eap_is_wps_pbc_enrollee(&ssid->eap)) {
816 		wps_ie = wpa_scan_get_vendor_ie_multi(bss, WPS_IE_VENDOR_TYPE);
817 		if (wps_ie && wps_is_selected_pbc_registrar(wps_ie)) {
818 			/* allow wildcard SSID for WPS PBC */
819 			ret = 1;
820 		}
821 	} else if (eap_is_wps_pin_enrollee(&ssid->eap)) {
822 		wps_ie = wpa_scan_get_vendor_ie_multi(bss, WPS_IE_VENDOR_TYPE);
823 		if (wps_ie &&
824 		    (wps_is_selected_pin_registrar(wps_ie) ||
825 		     wpa_s->scan_runs >= WPS_PIN_SCAN_IGNORE_SEL_REG)) {
826 			/* allow wildcard SSID for WPS PIN */
827 			ret = 1;
828 		}
829 	}
830 
831 	if (!ret && ssid->bssid_set &&
832 	    os_memcmp(ssid->bssid, bss->bssid, ETH_ALEN) == 0) {
833 		/* allow wildcard SSID due to hardcoded BSSID match */
834 		ret = 1;
835 	}
836 
837 	wpabuf_free(wps_ie);
838 
839 	return ret;
840 }
841 
842 
843 int wpas_wps_scan_pbc_overlap(struct wpa_supplicant *wpa_s,
844 			      struct wpa_scan_res *selected,
845 			      struct wpa_ssid *ssid)
846 {
847 	const u8 *sel_uuid, *uuid;
848 	size_t i;
849 	struct wpabuf *wps_ie;
850 	int ret = 0;
851 
852 	if (!eap_is_wps_pbc_enrollee(&ssid->eap))
853 		return 0;
854 
855 	/* Make sure that only one AP is in active PBC mode */
856 	wps_ie = wpa_scan_get_vendor_ie_multi(selected, WPS_IE_VENDOR_TYPE);
857 	if (wps_ie)
858 		sel_uuid = wps_get_uuid_e(wps_ie);
859 	else
860 		sel_uuid = NULL;
861 
862 	for (i = 0; i < wpa_s->scan_res->num; i++) {
863 		struct wpa_scan_res *bss = wpa_s->scan_res->res[i];
864 		struct wpabuf *ie;
865 		if (bss == selected)
866 			continue;
867 		ie = wpa_scan_get_vendor_ie_multi(bss, WPS_IE_VENDOR_TYPE);
868 		if (!ie)
869 			continue;
870 		if (!wps_is_selected_pbc_registrar(ie)) {
871 			wpabuf_free(ie);
872 			continue;
873 		}
874 		uuid = wps_get_uuid_e(ie);
875 		if (sel_uuid == NULL || uuid == NULL ||
876 		    os_memcmp(sel_uuid, uuid, 16) != 0) {
877 			ret = 1; /* PBC overlap */
878 			wpabuf_free(ie);
879 			break;
880 		}
881 
882 		/* TODO: verify that this is reasonable dual-band situation */
883 
884 		wpabuf_free(ie);
885 	}
886 
887 	wpabuf_free(wps_ie);
888 
889 	return ret;
890 }
891 
892 
893 void wpas_wps_notify_scan_results(struct wpa_supplicant *wpa_s)
894 {
895 	size_t i;
896 
897 	if (wpa_s->disconnected || wpa_s->wpa_state >= WPA_ASSOCIATED)
898 		return;
899 
900 	for (i = 0; i < wpa_s->scan_res->num; i++) {
901 		struct wpa_scan_res *bss = wpa_s->scan_res->res[i];
902 		struct wpabuf *ie;
903 		ie = wpa_scan_get_vendor_ie_multi(bss, WPS_IE_VENDOR_TYPE);
904 		if (!ie)
905 			continue;
906 		if (wps_is_selected_pbc_registrar(ie))
907 			wpa_msg(wpa_s, MSG_INFO, WPS_EVENT_AP_AVAILABLE_PBC);
908 		else if (wps_is_selected_pin_registrar(ie))
909 			wpa_msg(wpa_s, MSG_INFO, WPS_EVENT_AP_AVAILABLE_PIN);
910 		else
911 			wpa_msg(wpa_s, MSG_INFO, WPS_EVENT_AP_AVAILABLE);
912 		wpabuf_free(ie);
913 		break;
914 	}
915 }
916 
917 
918 int wpas_wps_searching(struct wpa_supplicant *wpa_s)
919 {
920 	struct wpa_ssid *ssid;
921 
922 	for (ssid = wpa_s->conf->ssid; ssid; ssid = ssid->next) {
923 		if ((ssid->key_mgmt & WPA_KEY_MGMT_WPS) && !ssid->disabled)
924 			return 1;
925 	}
926 
927 	return 0;
928 }
929