Updated to hostap_2_6
[mech_eap.git] / libeap / src / wps / wps_registrar.c
1 /*
2  * Wi-Fi Protected Setup - Registrar
3  * Copyright (c) 2008-2016, Jouni Malinen <j@w1.fi>
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/base64.h"
13 #include "utils/eloop.h"
14 #include "utils/uuid.h"
15 #include "utils/list.h"
16 #include "crypto/crypto.h"
17 #include "crypto/sha256.h"
18 #include "crypto/random.h"
19 #include "common/ieee802_11_defs.h"
20 #include "wps_i.h"
21 #include "wps_dev_attr.h"
22 #include "wps_upnp.h"
23 #include "wps_upnp_i.h"
24
25 #ifndef CONFIG_WPS_STRICT
26 #define WPS_WORKAROUNDS
27 #endif /* CONFIG_WPS_STRICT */
28
29 #ifdef CONFIG_WPS_NFC
30
31 struct wps_nfc_pw_token {
32         struct dl_list list;
33         u8 pubkey_hash[WPS_OOB_PUBKEY_HASH_LEN];
34         unsigned int peer_pk_hash_known:1;
35         u16 pw_id;
36         u8 dev_pw[WPS_OOB_DEVICE_PASSWORD_LEN * 2 + 1];
37         size_t dev_pw_len;
38         int pk_hash_provided_oob; /* whether own PK hash was provided OOB */
39 };
40
41
42 static void wps_remove_nfc_pw_token(struct wps_nfc_pw_token *token)
43 {
44         dl_list_del(&token->list);
45         bin_clear_free(token, sizeof(*token));
46 }
47
48
49 static void wps_free_nfc_pw_tokens(struct dl_list *tokens, u16 pw_id)
50 {
51         struct wps_nfc_pw_token *token, *prev;
52         dl_list_for_each_safe(token, prev, tokens, struct wps_nfc_pw_token,
53                               list) {
54                 if (pw_id == 0 || pw_id == token->pw_id)
55                         wps_remove_nfc_pw_token(token);
56         }
57 }
58
59
60 static struct wps_nfc_pw_token * wps_get_nfc_pw_token(struct dl_list *tokens,
61                                                       u16 pw_id)
62 {
63         struct wps_nfc_pw_token *token;
64         dl_list_for_each(token, tokens, struct wps_nfc_pw_token, list) {
65                 if (pw_id == token->pw_id)
66                         return token;
67         }
68         return NULL;
69 }
70
71 #else /* CONFIG_WPS_NFC */
72
73 #define wps_free_nfc_pw_tokens(t, p) do { } while (0)
74
75 #endif /* CONFIG_WPS_NFC */
76
77
78 struct wps_uuid_pin {
79         struct dl_list list;
80         u8 uuid[WPS_UUID_LEN];
81         int wildcard_uuid;
82         u8 *pin;
83         size_t pin_len;
84 #define PIN_LOCKED BIT(0)
85 #define PIN_EXPIRES BIT(1)
86         int flags;
87         struct os_reltime expiration;
88         u8 enrollee_addr[ETH_ALEN];
89 };
90
91
92 static void wps_free_pin(struct wps_uuid_pin *pin)
93 {
94         bin_clear_free(pin->pin, pin->pin_len);
95         os_free(pin);
96 }
97
98
99 static void wps_remove_pin(struct wps_uuid_pin *pin)
100 {
101         dl_list_del(&pin->list);
102         wps_free_pin(pin);
103 }
104
105
106 static void wps_free_pins(struct dl_list *pins)
107 {
108         struct wps_uuid_pin *pin, *prev;
109         dl_list_for_each_safe(pin, prev, pins, struct wps_uuid_pin, list)
110                 wps_remove_pin(pin);
111 }
112
113
114 struct wps_pbc_session {
115         struct wps_pbc_session *next;
116         u8 addr[ETH_ALEN];
117         u8 uuid_e[WPS_UUID_LEN];
118         struct os_reltime timestamp;
119 };
120
121
122 static void wps_free_pbc_sessions(struct wps_pbc_session *pbc)
123 {
124         struct wps_pbc_session *prev;
125
126         while (pbc) {
127                 prev = pbc;
128                 pbc = pbc->next;
129                 os_free(prev);
130         }
131 }
132
133
134 struct wps_registrar_device {
135         struct wps_registrar_device *next;
136         struct wps_device_data dev;
137         u8 uuid[WPS_UUID_LEN];
138 };
139
140
141 struct wps_registrar {
142         struct wps_context *wps;
143
144         int pbc;
145         int selected_registrar;
146
147         int (*new_psk_cb)(void *ctx, const u8 *mac_addr, const u8 *p2p_dev_addr,
148                           const u8 *psk, size_t psk_len);
149         int (*set_ie_cb)(void *ctx, struct wpabuf *beacon_ie,
150                          struct wpabuf *probe_resp_ie);
151         void (*pin_needed_cb)(void *ctx, const u8 *uuid_e,
152                               const struct wps_device_data *dev);
153         void (*reg_success_cb)(void *ctx, const u8 *mac_addr,
154                                const u8 *uuid_e, const u8 *dev_pw,
155                                size_t dev_pw_len);
156         void (*set_sel_reg_cb)(void *ctx, int sel_reg, u16 dev_passwd_id,
157                                u16 sel_reg_config_methods);
158         void (*enrollee_seen_cb)(void *ctx, const u8 *addr, const u8 *uuid_e,
159                                  const u8 *pri_dev_type, u16 config_methods,
160                                  u16 dev_password_id, u8 request_type,
161                                  const char *dev_name);
162         void *cb_ctx;
163
164         struct dl_list pins;
165         struct dl_list nfc_pw_tokens;
166         struct wps_pbc_session *pbc_sessions;
167
168         int skip_cred_build;
169         struct wpabuf *extra_cred;
170         int disable_auto_conf;
171         int sel_reg_union;
172         int sel_reg_dev_password_id_override;
173         int sel_reg_config_methods_override;
174         int static_wep_only;
175         int dualband;
176         int force_per_enrollee_psk;
177
178         struct wps_registrar_device *devices;
179
180         int force_pbc_overlap;
181
182         u8 authorized_macs[WPS_MAX_AUTHORIZED_MACS][ETH_ALEN];
183         u8 authorized_macs_union[WPS_MAX_AUTHORIZED_MACS][ETH_ALEN];
184
185         u8 p2p_dev_addr[ETH_ALEN];
186
187         u8 pbc_ignore_uuid[WPS_UUID_LEN];
188 #ifdef WPS_WORKAROUNDS
189         struct os_reltime pbc_ignore_start;
190 #endif /* WPS_WORKAROUNDS */
191 };
192
193
194 static int wps_set_ie(struct wps_registrar *reg);
195 static void wps_registrar_pbc_timeout(void *eloop_ctx, void *timeout_ctx);
196 static void wps_registrar_set_selected_timeout(void *eloop_ctx,
197                                                void *timeout_ctx);
198 static void wps_registrar_remove_pin(struct wps_registrar *reg,
199                                      struct wps_uuid_pin *pin);
200
201
202 static void wps_registrar_add_authorized_mac(struct wps_registrar *reg,
203                                              const u8 *addr)
204 {
205         int i;
206         wpa_printf(MSG_DEBUG, "WPS: Add authorized MAC " MACSTR,
207                    MAC2STR(addr));
208         for (i = 0; i < WPS_MAX_AUTHORIZED_MACS; i++)
209                 if (os_memcmp(reg->authorized_macs[i], addr, ETH_ALEN) == 0) {
210                         wpa_printf(MSG_DEBUG, "WPS: Authorized MAC was "
211                                    "already in the list");
212                         return; /* already in list */
213                 }
214         for (i = WPS_MAX_AUTHORIZED_MACS - 1; i > 0; i--)
215                 os_memcpy(reg->authorized_macs[i], reg->authorized_macs[i - 1],
216                           ETH_ALEN);
217         os_memcpy(reg->authorized_macs[0], addr, ETH_ALEN);
218         wpa_hexdump(MSG_DEBUG, "WPS: Authorized MACs",
219                     (u8 *) reg->authorized_macs, sizeof(reg->authorized_macs));
220 }
221
222
223 static void wps_registrar_remove_authorized_mac(struct wps_registrar *reg,
224                                                 const u8 *addr)
225 {
226         int i;
227         wpa_printf(MSG_DEBUG, "WPS: Remove authorized MAC " MACSTR,
228                    MAC2STR(addr));
229         for (i = 0; i < WPS_MAX_AUTHORIZED_MACS; i++) {
230                 if (os_memcmp(reg->authorized_macs, addr, ETH_ALEN) == 0)
231                         break;
232         }
233         if (i == WPS_MAX_AUTHORIZED_MACS) {
234                 wpa_printf(MSG_DEBUG, "WPS: Authorized MAC was not in the "
235                            "list");
236                 return; /* not in the list */
237         }
238         for (; i + 1 < WPS_MAX_AUTHORIZED_MACS; i++)
239                 os_memcpy(reg->authorized_macs[i], reg->authorized_macs[i + 1],
240                           ETH_ALEN);
241         os_memset(reg->authorized_macs[WPS_MAX_AUTHORIZED_MACS - 1], 0,
242                   ETH_ALEN);
243         wpa_hexdump(MSG_DEBUG, "WPS: Authorized MACs",
244                     (u8 *) reg->authorized_macs, sizeof(reg->authorized_macs));
245 }
246
247
248 static void wps_free_devices(struct wps_registrar_device *dev)
249 {
250         struct wps_registrar_device *prev;
251
252         while (dev) {
253                 prev = dev;
254                 dev = dev->next;
255                 wps_device_data_free(&prev->dev);
256                 os_free(prev);
257         }
258 }
259
260
261 static struct wps_registrar_device * wps_device_get(struct wps_registrar *reg,
262                                                     const u8 *addr)
263 {
264         struct wps_registrar_device *dev;
265
266         for (dev = reg->devices; dev; dev = dev->next) {
267                 if (os_memcmp(dev->dev.mac_addr, addr, ETH_ALEN) == 0)
268                         return dev;
269         }
270         return NULL;
271 }
272
273
274 static void wps_device_clone_data(struct wps_device_data *dst,
275                                   struct wps_device_data *src)
276 {
277         os_memcpy(dst->mac_addr, src->mac_addr, ETH_ALEN);
278         os_memcpy(dst->pri_dev_type, src->pri_dev_type, WPS_DEV_TYPE_LEN);
279
280 #define WPS_STRDUP(n) \
281         os_free(dst->n); \
282         dst->n = src->n ? os_strdup(src->n) : NULL
283
284         WPS_STRDUP(device_name);
285         WPS_STRDUP(manufacturer);
286         WPS_STRDUP(model_name);
287         WPS_STRDUP(model_number);
288         WPS_STRDUP(serial_number);
289 #undef WPS_STRDUP
290 }
291
292
293 int wps_device_store(struct wps_registrar *reg,
294                      struct wps_device_data *dev, const u8 *uuid)
295 {
296         struct wps_registrar_device *d;
297
298         d = wps_device_get(reg, dev->mac_addr);
299         if (d == NULL) {
300                 d = os_zalloc(sizeof(*d));
301                 if (d == NULL)
302                         return -1;
303                 d->next = reg->devices;
304                 reg->devices = d;
305         }
306
307         wps_device_clone_data(&d->dev, dev);
308         os_memcpy(d->uuid, uuid, WPS_UUID_LEN);
309
310         return 0;
311 }
312
313
314 static void wps_registrar_add_pbc_session(struct wps_registrar *reg,
315                                           const u8 *addr, const u8 *uuid_e)
316 {
317         struct wps_pbc_session *pbc, *prev = NULL;
318         struct os_reltime now;
319
320         os_get_reltime(&now);
321
322         pbc = reg->pbc_sessions;
323         while (pbc) {
324                 if (os_memcmp(pbc->addr, addr, ETH_ALEN) == 0 &&
325                     os_memcmp(pbc->uuid_e, uuid_e, WPS_UUID_LEN) == 0) {
326                         if (prev)
327                                 prev->next = pbc->next;
328                         else
329                                 reg->pbc_sessions = pbc->next;
330                         break;
331                 }
332                 prev = pbc;
333                 pbc = pbc->next;
334         }
335
336         if (!pbc) {
337                 pbc = os_zalloc(sizeof(*pbc));
338                 if (pbc == NULL)
339                         return;
340                 os_memcpy(pbc->addr, addr, ETH_ALEN);
341                 if (uuid_e)
342                         os_memcpy(pbc->uuid_e, uuid_e, WPS_UUID_LEN);
343         }
344
345         pbc->next = reg->pbc_sessions;
346         reg->pbc_sessions = pbc;
347         pbc->timestamp = now;
348
349         /* remove entries that have timed out */
350         prev = pbc;
351         pbc = pbc->next;
352
353         while (pbc) {
354                 if (os_reltime_expired(&now, &pbc->timestamp,
355                                        WPS_PBC_WALK_TIME)) {
356                         prev->next = NULL;
357                         wps_free_pbc_sessions(pbc);
358                         break;
359                 }
360                 prev = pbc;
361                 pbc = pbc->next;
362         }
363 }
364
365
366 static void wps_registrar_remove_pbc_session(struct wps_registrar *reg,
367                                              const u8 *uuid_e,
368                                              const u8 *p2p_dev_addr)
369 {
370         struct wps_pbc_session *pbc, *prev = NULL, *tmp;
371
372         pbc = reg->pbc_sessions;
373         while (pbc) {
374                 if (os_memcmp(pbc->uuid_e, uuid_e, WPS_UUID_LEN) == 0 ||
375                     (p2p_dev_addr && !is_zero_ether_addr(reg->p2p_dev_addr) &&
376                      os_memcmp(reg->p2p_dev_addr, p2p_dev_addr, ETH_ALEN) ==
377                      0)) {
378                         if (prev)
379                                 prev->next = pbc->next;
380                         else
381                                 reg->pbc_sessions = pbc->next;
382                         tmp = pbc;
383                         pbc = pbc->next;
384                         wpa_printf(MSG_DEBUG, "WPS: Removing PBC session for "
385                                    "addr=" MACSTR, MAC2STR(tmp->addr));
386                         wpa_hexdump(MSG_DEBUG, "WPS: Removed UUID-E",
387                                     tmp->uuid_e, WPS_UUID_LEN);
388                         os_free(tmp);
389                         continue;
390                 }
391                 prev = pbc;
392                 pbc = pbc->next;
393         }
394 }
395
396
397 int wps_registrar_pbc_overlap(struct wps_registrar *reg,
398                               const u8 *addr, const u8 *uuid_e)
399 {
400         int count = 0;
401         struct wps_pbc_session *pbc;
402         struct wps_pbc_session *first = NULL;
403         struct os_reltime now;
404
405         os_get_reltime(&now);
406
407         wpa_printf(MSG_DEBUG, "WPS: Checking active PBC sessions for overlap");
408
409         if (uuid_e) {
410                 wpa_printf(MSG_DEBUG, "WPS: Add one for the requested UUID");
411                 wpa_hexdump(MSG_DEBUG, "WPS: Requested UUID",
412                             uuid_e, WPS_UUID_LEN);
413                 count++;
414         }
415
416         for (pbc = reg->pbc_sessions; pbc; pbc = pbc->next) {
417                 wpa_printf(MSG_DEBUG, "WPS: Consider PBC session with " MACSTR,
418                            MAC2STR(pbc->addr));
419                 wpa_hexdump(MSG_DEBUG, "WPS: UUID-E",
420                             pbc->uuid_e, WPS_UUID_LEN);
421                 if (os_reltime_expired(&now, &pbc->timestamp,
422                                        WPS_PBC_WALK_TIME)) {
423                         wpa_printf(MSG_DEBUG, "WPS: PBC walk time has expired");
424                         break;
425                 }
426                 if (first &&
427                     os_memcmp(pbc->uuid_e, first->uuid_e, WPS_UUID_LEN) == 0) {
428                         wpa_printf(MSG_DEBUG, "WPS: Same Enrollee");
429                         continue; /* same Enrollee */
430                 }
431                 if (uuid_e == NULL ||
432                     os_memcmp(uuid_e, pbc->uuid_e, WPS_UUID_LEN)) {
433                         wpa_printf(MSG_DEBUG, "WPS: New Enrollee");
434                         count++;
435                 }
436                 if (first == NULL)
437                         first = pbc;
438         }
439
440         wpa_printf(MSG_DEBUG, "WPS: %u active PBC session(s) found", count);
441
442         return count > 1 ? 1 : 0;
443 }
444
445
446 static int wps_build_wps_state(struct wps_context *wps, struct wpabuf *msg)
447 {
448         wpa_printf(MSG_DEBUG, "WPS:  * Wi-Fi Protected Setup State (%d)",
449                    wps->wps_state);
450         wpabuf_put_be16(msg, ATTR_WPS_STATE);
451         wpabuf_put_be16(msg, 1);
452         wpabuf_put_u8(msg, wps->wps_state);
453         return 0;
454 }
455
456
457 #ifdef CONFIG_WPS_UPNP
458 static void wps_registrar_free_pending_m2(struct wps_context *wps)
459 {
460         struct upnp_pending_message *p, *p2, *prev = NULL;
461         p = wps->upnp_msgs;
462         while (p) {
463                 if (p->type == WPS_M2 || p->type == WPS_M2D) {
464                         if (prev == NULL)
465                                 wps->upnp_msgs = p->next;
466                         else
467                                 prev->next = p->next;
468                         wpa_printf(MSG_DEBUG, "WPS UPnP: Drop pending M2/M2D");
469                         p2 = p;
470                         p = p->next;
471                         wpabuf_free(p2->msg);
472                         os_free(p2);
473                         continue;
474                 }
475                 prev = p;
476                 p = p->next;
477         }
478 }
479 #endif /* CONFIG_WPS_UPNP */
480
481
482 static int wps_build_ap_setup_locked(struct wps_context *wps,
483                                      struct wpabuf *msg)
484 {
485         if (wps->ap_setup_locked && wps->ap_setup_locked != 2) {
486                 wpa_printf(MSG_DEBUG, "WPS:  * AP Setup Locked");
487                 wpabuf_put_be16(msg, ATTR_AP_SETUP_LOCKED);
488                 wpabuf_put_be16(msg, 1);
489                 wpabuf_put_u8(msg, 1);
490         }
491         return 0;
492 }
493
494
495 static int wps_build_selected_registrar(struct wps_registrar *reg,
496                                         struct wpabuf *msg)
497 {
498         if (!reg->sel_reg_union)
499                 return 0;
500         wpa_printf(MSG_DEBUG, "WPS:  * Selected Registrar");
501         wpabuf_put_be16(msg, ATTR_SELECTED_REGISTRAR);
502         wpabuf_put_be16(msg, 1);
503         wpabuf_put_u8(msg, 1);
504         return 0;
505 }
506
507
508 static int wps_build_sel_reg_dev_password_id(struct wps_registrar *reg,
509                                              struct wpabuf *msg)
510 {
511         u16 id = reg->pbc ? DEV_PW_PUSHBUTTON : DEV_PW_DEFAULT;
512         if (!reg->sel_reg_union)
513                 return 0;
514         if (reg->sel_reg_dev_password_id_override >= 0)
515                 id = reg->sel_reg_dev_password_id_override;
516         wpa_printf(MSG_DEBUG, "WPS:  * Device Password ID (%d)", id);
517         wpabuf_put_be16(msg, ATTR_DEV_PASSWORD_ID);
518         wpabuf_put_be16(msg, 2);
519         wpabuf_put_be16(msg, id);
520         return 0;
521 }
522
523
524 static int wps_build_sel_pbc_reg_uuid_e(struct wps_registrar *reg,
525                                         struct wpabuf *msg)
526 {
527         u16 id = reg->pbc ? DEV_PW_PUSHBUTTON : DEV_PW_DEFAULT;
528         if (!reg->sel_reg_union)
529                 return 0;
530         if (reg->sel_reg_dev_password_id_override >= 0)
531                 id = reg->sel_reg_dev_password_id_override;
532         if (id != DEV_PW_PUSHBUTTON || !reg->dualband)
533                 return 0;
534         return wps_build_uuid_e(msg, reg->wps->uuid);
535 }
536
537
538 static void wps_set_pushbutton(u16 *methods, u16 conf_methods)
539 {
540         *methods |= WPS_CONFIG_PUSHBUTTON;
541         if ((conf_methods & WPS_CONFIG_VIRT_PUSHBUTTON) ==
542             WPS_CONFIG_VIRT_PUSHBUTTON)
543                 *methods |= WPS_CONFIG_VIRT_PUSHBUTTON;
544         if ((conf_methods & WPS_CONFIG_PHY_PUSHBUTTON) ==
545             WPS_CONFIG_PHY_PUSHBUTTON)
546                 *methods |= WPS_CONFIG_PHY_PUSHBUTTON;
547         if ((*methods & WPS_CONFIG_VIRT_PUSHBUTTON) !=
548             WPS_CONFIG_VIRT_PUSHBUTTON &&
549             (*methods & WPS_CONFIG_PHY_PUSHBUTTON) !=
550             WPS_CONFIG_PHY_PUSHBUTTON) {
551                 /*
552                  * Required to include virtual/physical flag, but we were not
553                  * configured with push button type, so have to default to one
554                  * of them.
555                  */
556                 *methods |= WPS_CONFIG_PHY_PUSHBUTTON;
557         }
558 }
559
560
561 static int wps_build_sel_reg_config_methods(struct wps_registrar *reg,
562                                             struct wpabuf *msg)
563 {
564         u16 methods;
565         if (!reg->sel_reg_union)
566                 return 0;
567         methods = reg->wps->config_methods;
568         methods &= ~WPS_CONFIG_PUSHBUTTON;
569         methods &= ~(WPS_CONFIG_VIRT_PUSHBUTTON |
570                      WPS_CONFIG_PHY_PUSHBUTTON);
571         if (reg->pbc)
572                 wps_set_pushbutton(&methods, reg->wps->config_methods);
573         if (reg->sel_reg_config_methods_override >= 0)
574                 methods = reg->sel_reg_config_methods_override;
575         wpa_printf(MSG_DEBUG, "WPS:  * Selected Registrar Config Methods (%x)",
576                    methods);
577         wpabuf_put_be16(msg, ATTR_SELECTED_REGISTRAR_CONFIG_METHODS);
578         wpabuf_put_be16(msg, 2);
579         wpabuf_put_be16(msg, methods);
580         return 0;
581 }
582
583
584 static int wps_build_probe_config_methods(struct wps_registrar *reg,
585                                           struct wpabuf *msg)
586 {
587         u16 methods;
588         /*
589          * These are the methods that the AP supports as an Enrollee for adding
590          * external Registrars.
591          */
592         methods = reg->wps->config_methods & ~WPS_CONFIG_PUSHBUTTON;
593         methods &= ~(WPS_CONFIG_VIRT_PUSHBUTTON |
594                      WPS_CONFIG_PHY_PUSHBUTTON);
595         wpa_printf(MSG_DEBUG, "WPS:  * Config Methods (%x)", methods);
596         wpabuf_put_be16(msg, ATTR_CONFIG_METHODS);
597         wpabuf_put_be16(msg, 2);
598         wpabuf_put_be16(msg, methods);
599         return 0;
600 }
601
602
603 static int wps_build_config_methods_r(struct wps_registrar *reg,
604                                       struct wpabuf *msg)
605 {
606         return wps_build_config_methods(msg, reg->wps->config_methods);
607 }
608
609
610 const u8 * wps_authorized_macs(struct wps_registrar *reg, size_t *count)
611 {
612         *count = 0;
613
614         while (*count < WPS_MAX_AUTHORIZED_MACS) {
615                 if (is_zero_ether_addr(reg->authorized_macs_union[*count]))
616                         break;
617                 (*count)++;
618         }
619
620         return (const u8 *) reg->authorized_macs_union;
621 }
622
623
624 /**
625  * wps_registrar_init - Initialize WPS Registrar data
626  * @wps: Pointer to longterm WPS context
627  * @cfg: Registrar configuration
628  * Returns: Pointer to allocated Registrar data or %NULL on failure
629  *
630  * This function is used to initialize WPS Registrar functionality. It can be
631  * used for a single Registrar run (e.g., when run in a supplicant) or multiple
632  * runs (e.g., when run as an internal Registrar in an AP). Caller is
633  * responsible for freeing the returned data with wps_registrar_deinit() when
634  * Registrar functionality is not needed anymore.
635  */
636 struct wps_registrar *
637 wps_registrar_init(struct wps_context *wps,
638                    const struct wps_registrar_config *cfg)
639 {
640         struct wps_registrar *reg = os_zalloc(sizeof(*reg));
641         if (reg == NULL)
642                 return NULL;
643
644         dl_list_init(&reg->pins);
645         dl_list_init(&reg->nfc_pw_tokens);
646         reg->wps = wps;
647         reg->new_psk_cb = cfg->new_psk_cb;
648         reg->set_ie_cb = cfg->set_ie_cb;
649         reg->pin_needed_cb = cfg->pin_needed_cb;
650         reg->reg_success_cb = cfg->reg_success_cb;
651         reg->set_sel_reg_cb = cfg->set_sel_reg_cb;
652         reg->enrollee_seen_cb = cfg->enrollee_seen_cb;
653         reg->cb_ctx = cfg->cb_ctx;
654         reg->skip_cred_build = cfg->skip_cred_build;
655         if (cfg->extra_cred) {
656                 reg->extra_cred = wpabuf_alloc_copy(cfg->extra_cred,
657                                                     cfg->extra_cred_len);
658                 if (reg->extra_cred == NULL) {
659                         os_free(reg);
660                         return NULL;
661                 }
662         }
663         reg->disable_auto_conf = cfg->disable_auto_conf;
664         reg->sel_reg_dev_password_id_override = -1;
665         reg->sel_reg_config_methods_override = -1;
666         reg->static_wep_only = cfg->static_wep_only;
667         reg->dualband = cfg->dualband;
668         reg->force_per_enrollee_psk = cfg->force_per_enrollee_psk;
669
670         if (wps_set_ie(reg)) {
671                 wps_registrar_deinit(reg);
672                 return NULL;
673         }
674
675         return reg;
676 }
677
678
679 void wps_registrar_flush(struct wps_registrar *reg)
680 {
681         if (reg == NULL)
682                 return;
683         wps_free_pins(&reg->pins);
684         wps_free_nfc_pw_tokens(&reg->nfc_pw_tokens, 0);
685         wps_free_pbc_sessions(reg->pbc_sessions);
686         reg->pbc_sessions = NULL;
687         wps_free_devices(reg->devices);
688         reg->devices = NULL;
689 #ifdef WPS_WORKAROUNDS
690         reg->pbc_ignore_start.sec = 0;
691 #endif /* WPS_WORKAROUNDS */
692 }
693
694
695 /**
696  * wps_registrar_deinit - Deinitialize WPS Registrar data
697  * @reg: Registrar data from wps_registrar_init()
698  */
699 void wps_registrar_deinit(struct wps_registrar *reg)
700 {
701         if (reg == NULL)
702                 return;
703         eloop_cancel_timeout(wps_registrar_pbc_timeout, reg, NULL);
704         eloop_cancel_timeout(wps_registrar_set_selected_timeout, reg, NULL);
705         wps_registrar_flush(reg);
706         wpabuf_clear_free(reg->extra_cred);
707         os_free(reg);
708 }
709
710
711 static void wps_registrar_invalidate_unused(struct wps_registrar *reg)
712 {
713         struct wps_uuid_pin *pin;
714
715         dl_list_for_each(pin, &reg->pins, struct wps_uuid_pin, list) {
716                 if (pin->wildcard_uuid == 1 && !(pin->flags & PIN_LOCKED)) {
717                         wpa_printf(MSG_DEBUG, "WPS: Invalidate previously "
718                                    "configured wildcard PIN");
719                         wps_registrar_remove_pin(reg, pin);
720                         break;
721                 }
722         }
723 }
724
725
726 /**
727  * wps_registrar_add_pin - Configure a new PIN for Registrar
728  * @reg: Registrar data from wps_registrar_init()
729  * @addr: Enrollee MAC address or %NULL if not known
730  * @uuid: UUID-E or %NULL for wildcard (any UUID)
731  * @pin: PIN (Device Password)
732  * @pin_len: Length of pin in octets
733  * @timeout: Time (in seconds) when the PIN will be invalidated; 0 = no timeout
734  * Returns: 0 on success, -1 on failure
735  */
736 int wps_registrar_add_pin(struct wps_registrar *reg, const u8 *addr,
737                           const u8 *uuid, const u8 *pin, size_t pin_len,
738                           int timeout)
739 {
740         struct wps_uuid_pin *p;
741
742         p = os_zalloc(sizeof(*p));
743         if (p == NULL)
744                 return -1;
745         if (addr)
746                 os_memcpy(p->enrollee_addr, addr, ETH_ALEN);
747         if (uuid == NULL)
748                 p->wildcard_uuid = 1;
749         else
750                 os_memcpy(p->uuid, uuid, WPS_UUID_LEN);
751         p->pin = os_malloc(pin_len);
752         if (p->pin == NULL) {
753                 os_free(p);
754                 return -1;
755         }
756         os_memcpy(p->pin, pin, pin_len);
757         p->pin_len = pin_len;
758
759         if (timeout) {
760                 p->flags |= PIN_EXPIRES;
761                 os_get_reltime(&p->expiration);
762                 p->expiration.sec += timeout;
763         }
764
765         if (p->wildcard_uuid)
766                 wps_registrar_invalidate_unused(reg);
767
768         dl_list_add(&reg->pins, &p->list);
769
770         wpa_printf(MSG_DEBUG, "WPS: A new PIN configured (timeout=%d)",
771                    timeout);
772         wpa_hexdump(MSG_DEBUG, "WPS: UUID", uuid, WPS_UUID_LEN);
773         wpa_hexdump_ascii_key(MSG_DEBUG, "WPS: PIN", pin, pin_len);
774         reg->selected_registrar = 1;
775         reg->pbc = 0;
776         if (addr)
777                 wps_registrar_add_authorized_mac(reg, addr);
778         else
779                 wps_registrar_add_authorized_mac(
780                         reg, (u8 *) "\xff\xff\xff\xff\xff\xff");
781         wps_registrar_selected_registrar_changed(reg, 0);
782         eloop_cancel_timeout(wps_registrar_set_selected_timeout, reg, NULL);
783         eloop_register_timeout(WPS_PBC_WALK_TIME, 0,
784                                wps_registrar_set_selected_timeout,
785                                reg, NULL);
786
787         return 0;
788 }
789
790
791 static void wps_registrar_remove_pin(struct wps_registrar *reg,
792                                      struct wps_uuid_pin *pin)
793 {
794         u8 *addr;
795         u8 bcast[ETH_ALEN] = { 0xff, 0xff, 0xff, 0xff, 0xff, 0xff };
796
797         if (is_zero_ether_addr(pin->enrollee_addr))
798                 addr = bcast;
799         else
800                 addr = pin->enrollee_addr;
801         wps_registrar_remove_authorized_mac(reg, addr);
802         wps_remove_pin(pin);
803         wps_registrar_selected_registrar_changed(reg, 0);
804 }
805
806
807 static void wps_registrar_expire_pins(struct wps_registrar *reg)
808 {
809         struct wps_uuid_pin *pin, *prev;
810         struct os_reltime now;
811
812         os_get_reltime(&now);
813         dl_list_for_each_safe(pin, prev, &reg->pins, struct wps_uuid_pin, list)
814         {
815                 if ((pin->flags & PIN_EXPIRES) &&
816                     os_reltime_before(&pin->expiration, &now)) {
817                         wpa_hexdump(MSG_DEBUG, "WPS: Expired PIN for UUID",
818                                     pin->uuid, WPS_UUID_LEN);
819                         wps_registrar_remove_pin(reg, pin);
820                 }
821         }
822 }
823
824
825 /**
826  * wps_registrar_invalidate_wildcard_pin - Invalidate a wildcard PIN
827  * @reg: Registrar data from wps_registrar_init()
828  * @dev_pw: PIN to search for or %NULL to match any
829  * @dev_pw_len: Length of dev_pw in octets
830  * Returns: 0 on success, -1 if not wildcard PIN is enabled
831  */
832 static int wps_registrar_invalidate_wildcard_pin(struct wps_registrar *reg,
833                                                  const u8 *dev_pw,
834                                                  size_t dev_pw_len)
835 {
836         struct wps_uuid_pin *pin, *prev;
837
838         dl_list_for_each_safe(pin, prev, &reg->pins, struct wps_uuid_pin, list)
839         {
840                 if (dev_pw && pin->pin &&
841                     (dev_pw_len != pin->pin_len ||
842                      os_memcmp_const(dev_pw, pin->pin, dev_pw_len) != 0))
843                         continue; /* different PIN */
844                 if (pin->wildcard_uuid) {
845                         wpa_hexdump(MSG_DEBUG, "WPS: Invalidated PIN for UUID",
846                                     pin->uuid, WPS_UUID_LEN);
847                         wps_registrar_remove_pin(reg, pin);
848                         return 0;
849                 }
850         }
851
852         return -1;
853 }
854
855
856 /**
857  * wps_registrar_invalidate_pin - Invalidate a PIN for a specific UUID-E
858  * @reg: Registrar data from wps_registrar_init()
859  * @uuid: UUID-E
860  * Returns: 0 on success, -1 on failure (e.g., PIN not found)
861  */
862 int wps_registrar_invalidate_pin(struct wps_registrar *reg, const u8 *uuid)
863 {
864         struct wps_uuid_pin *pin, *prev;
865
866         dl_list_for_each_safe(pin, prev, &reg->pins, struct wps_uuid_pin, list)
867         {
868                 if (os_memcmp(pin->uuid, uuid, WPS_UUID_LEN) == 0) {
869                         wpa_hexdump(MSG_DEBUG, "WPS: Invalidated PIN for UUID",
870                                     pin->uuid, WPS_UUID_LEN);
871                         wps_registrar_remove_pin(reg, pin);
872                         return 0;
873                 }
874         }
875
876         return -1;
877 }
878
879
880 static const u8 * wps_registrar_get_pin(struct wps_registrar *reg,
881                                         const u8 *uuid, size_t *pin_len)
882 {
883         struct wps_uuid_pin *pin, *found = NULL;
884
885         wps_registrar_expire_pins(reg);
886
887         dl_list_for_each(pin, &reg->pins, struct wps_uuid_pin, list) {
888                 if (!pin->wildcard_uuid &&
889                     os_memcmp(pin->uuid, uuid, WPS_UUID_LEN) == 0) {
890                         found = pin;
891                         break;
892                 }
893         }
894
895         if (!found) {
896                 /* Check for wildcard UUIDs since none of the UUID-specific
897                  * PINs matched */
898                 dl_list_for_each(pin, &reg->pins, struct wps_uuid_pin, list) {
899                         if (pin->wildcard_uuid == 1 ||
900                             pin->wildcard_uuid == 2) {
901                                 wpa_printf(MSG_DEBUG, "WPS: Found a wildcard "
902                                            "PIN. Assigned it for this UUID-E");
903                                 pin->wildcard_uuid++;
904                                 os_memcpy(pin->uuid, uuid, WPS_UUID_LEN);
905                                 found = pin;
906                                 break;
907                         }
908                 }
909         }
910
911         if (!found)
912                 return NULL;
913
914         /*
915          * Lock the PIN to avoid attacks based on concurrent re-use of the PIN
916          * that could otherwise avoid PIN invalidations.
917          */
918         if (found->flags & PIN_LOCKED) {
919                 wpa_printf(MSG_DEBUG, "WPS: Selected PIN locked - do not "
920                            "allow concurrent re-use");
921                 return NULL;
922         }
923         *pin_len = found->pin_len;
924         found->flags |= PIN_LOCKED;
925         return found->pin;
926 }
927
928
929 /**
930  * wps_registrar_unlock_pin - Unlock a PIN for a specific UUID-E
931  * @reg: Registrar data from wps_registrar_init()
932  * @uuid: UUID-E
933  * Returns: 0 on success, -1 on failure
934  *
935  * PINs are locked to enforce only one concurrent use. This function unlocks a
936  * PIN to allow it to be used again. If the specified PIN was configured using
937  * a wildcard UUID, it will be removed instead of allowing multiple uses.
938  */
939 int wps_registrar_unlock_pin(struct wps_registrar *reg, const u8 *uuid)
940 {
941         struct wps_uuid_pin *pin;
942
943         dl_list_for_each(pin, &reg->pins, struct wps_uuid_pin, list) {
944                 if (os_memcmp(pin->uuid, uuid, WPS_UUID_LEN) == 0) {
945                         if (pin->wildcard_uuid == 3) {
946                                 wpa_printf(MSG_DEBUG, "WPS: Invalidating used "
947                                            "wildcard PIN");
948                                 return wps_registrar_invalidate_pin(reg, uuid);
949                         }
950                         pin->flags &= ~PIN_LOCKED;
951                         return 0;
952                 }
953         }
954
955         return -1;
956 }
957
958
959 static void wps_registrar_stop_pbc(struct wps_registrar *reg)
960 {
961         reg->selected_registrar = 0;
962         reg->pbc = 0;
963         os_memset(reg->p2p_dev_addr, 0, ETH_ALEN);
964         wps_registrar_remove_authorized_mac(reg,
965                                             (u8 *) "\xff\xff\xff\xff\xff\xff");
966         wps_registrar_selected_registrar_changed(reg, 0);
967 }
968
969
970 static void wps_registrar_pbc_timeout(void *eloop_ctx, void *timeout_ctx)
971 {
972         struct wps_registrar *reg = eloop_ctx;
973
974         wpa_printf(MSG_DEBUG, "WPS: PBC timed out - disable PBC mode");
975         wps_pbc_timeout_event(reg->wps);
976         wps_registrar_stop_pbc(reg);
977 }
978
979
980 /**
981  * wps_registrar_button_pushed - Notify Registrar that AP button was pushed
982  * @reg: Registrar data from wps_registrar_init()
983  * @p2p_dev_addr: Limit allowed PBC devices to the specified P2P device, %NULL
984  *      indicates no such filtering
985  * Returns: 0 on success, -1 on failure, -2 on session overlap
986  *
987  * This function is called on an AP when a push button is pushed to activate
988  * PBC mode. The PBC mode will be stopped after walk time (2 minutes) timeout
989  * or when a PBC registration is completed. If more than one Enrollee in active
990  * PBC mode has been detected during the monitor time (previous 2 minutes), the
991  * PBC mode is not activated and -2 is returned to indicate session overlap.
992  * This is skipped if a specific Enrollee is selected.
993  */
994 int wps_registrar_button_pushed(struct wps_registrar *reg,
995                                 const u8 *p2p_dev_addr)
996 {
997         if (p2p_dev_addr == NULL &&
998             wps_registrar_pbc_overlap(reg, NULL, NULL)) {
999                 wpa_printf(MSG_DEBUG, "WPS: PBC overlap - do not start PBC "
1000                            "mode");
1001                 wps_pbc_overlap_event(reg->wps);
1002                 return -2;
1003         }
1004         wpa_printf(MSG_DEBUG, "WPS: Button pushed - PBC mode started");
1005         reg->force_pbc_overlap = 0;
1006         reg->selected_registrar = 1;
1007         reg->pbc = 1;
1008         if (p2p_dev_addr)
1009                 os_memcpy(reg->p2p_dev_addr, p2p_dev_addr, ETH_ALEN);
1010         else
1011                 os_memset(reg->p2p_dev_addr, 0, ETH_ALEN);
1012         wps_registrar_add_authorized_mac(reg,
1013                                          (u8 *) "\xff\xff\xff\xff\xff\xff");
1014         wps_registrar_selected_registrar_changed(reg, 0);
1015
1016         wps_pbc_active_event(reg->wps);
1017         eloop_cancel_timeout(wps_registrar_set_selected_timeout, reg, NULL);
1018         eloop_cancel_timeout(wps_registrar_pbc_timeout, reg, NULL);
1019         eloop_register_timeout(WPS_PBC_WALK_TIME, 0, wps_registrar_pbc_timeout,
1020                                reg, NULL);
1021         return 0;
1022 }
1023
1024
1025 static void wps_registrar_pbc_completed(struct wps_registrar *reg)
1026 {
1027         wpa_printf(MSG_DEBUG, "WPS: PBC completed - stopping PBC mode");
1028         eloop_cancel_timeout(wps_registrar_pbc_timeout, reg, NULL);
1029         wps_registrar_stop_pbc(reg);
1030         wps_pbc_disable_event(reg->wps);
1031 }
1032
1033
1034 static void wps_registrar_pin_completed(struct wps_registrar *reg)
1035 {
1036         wpa_printf(MSG_DEBUG, "WPS: PIN completed using internal Registrar");
1037         eloop_cancel_timeout(wps_registrar_set_selected_timeout, reg, NULL);
1038         reg->selected_registrar = 0;
1039         wps_registrar_selected_registrar_changed(reg, 0);
1040 }
1041
1042
1043 void wps_registrar_complete(struct wps_registrar *registrar, const u8 *uuid_e,
1044                             const u8 *dev_pw, size_t dev_pw_len)
1045 {
1046         if (registrar->pbc) {
1047                 wps_registrar_remove_pbc_session(registrar,
1048                                                  uuid_e, NULL);
1049                 wps_registrar_pbc_completed(registrar);
1050 #ifdef WPS_WORKAROUNDS
1051                 os_get_reltime(&registrar->pbc_ignore_start);
1052 #endif /* WPS_WORKAROUNDS */
1053                 os_memcpy(registrar->pbc_ignore_uuid, uuid_e, WPS_UUID_LEN);
1054         } else {
1055                 wps_registrar_pin_completed(registrar);
1056         }
1057
1058         if (dev_pw &&
1059             wps_registrar_invalidate_wildcard_pin(registrar, dev_pw,
1060                                                   dev_pw_len) == 0) {
1061                 wpa_hexdump_key(MSG_DEBUG, "WPS: Invalidated wildcard PIN",
1062                                 dev_pw, dev_pw_len);
1063         }
1064 }
1065
1066
1067 int wps_registrar_wps_cancel(struct wps_registrar *reg)
1068 {
1069         if (reg->pbc) {
1070                 wpa_printf(MSG_DEBUG, "WPS: PBC is set - cancelling it");
1071                 wps_registrar_pbc_timeout(reg, NULL);
1072                 eloop_cancel_timeout(wps_registrar_pbc_timeout, reg, NULL);
1073                 return 1;
1074         } else if (reg->selected_registrar) {
1075                 /* PIN Method */
1076                 wpa_printf(MSG_DEBUG, "WPS: PIN is set - cancelling it");
1077                 wps_registrar_pin_completed(reg);
1078                 wps_registrar_invalidate_wildcard_pin(reg, NULL, 0);
1079                 return 1;
1080         }
1081         return 0;
1082 }
1083
1084
1085 /**
1086  * wps_registrar_probe_req_rx - Notify Registrar of Probe Request
1087  * @reg: Registrar data from wps_registrar_init()
1088  * @addr: MAC address of the Probe Request sender
1089  * @wps_data: WPS IE contents
1090  *
1091  * This function is called on an AP when a Probe Request with WPS IE is
1092  * received. This is used to track PBC mode use and to detect possible overlap
1093  * situation with other WPS APs.
1094  */
1095 void wps_registrar_probe_req_rx(struct wps_registrar *reg, const u8 *addr,
1096                                 const struct wpabuf *wps_data,
1097                                 int p2p_wildcard)
1098 {
1099         struct wps_parse_attr attr;
1100         int skip_add = 0;
1101
1102         wpa_hexdump_buf(MSG_MSGDUMP,
1103                         "WPS: Probe Request with WPS data received",
1104                         wps_data);
1105
1106         if (wps_parse_msg(wps_data, &attr) < 0)
1107                 return;
1108
1109         if (attr.config_methods == NULL) {
1110                 wpa_printf(MSG_DEBUG, "WPS: No Config Methods attribute in "
1111                            "Probe Request");
1112                 return;
1113         }
1114
1115         if (attr.dev_password_id == NULL) {
1116                 wpa_printf(MSG_DEBUG, "WPS: No Device Password Id attribute "
1117                            "in Probe Request");
1118                 return;
1119         }
1120
1121         if (reg->enrollee_seen_cb && attr.uuid_e &&
1122             attr.primary_dev_type && attr.request_type && !p2p_wildcard) {
1123                 char *dev_name = NULL;
1124                 if (attr.dev_name) {
1125                         dev_name = os_zalloc(attr.dev_name_len + 1);
1126                         if (dev_name) {
1127                                 os_memcpy(dev_name, attr.dev_name,
1128                                           attr.dev_name_len);
1129                         }
1130                 }
1131                 reg->enrollee_seen_cb(reg->cb_ctx, addr, attr.uuid_e,
1132                                       attr.primary_dev_type,
1133                                       WPA_GET_BE16(attr.config_methods),
1134                                       WPA_GET_BE16(attr.dev_password_id),
1135                                       *attr.request_type, dev_name);
1136                 os_free(dev_name);
1137         }
1138
1139         if (WPA_GET_BE16(attr.dev_password_id) != DEV_PW_PUSHBUTTON)
1140                 return; /* Not PBC */
1141
1142         wpa_printf(MSG_DEBUG, "WPS: Probe Request for PBC received from "
1143                    MACSTR, MAC2STR(addr));
1144         if (attr.uuid_e == NULL) {
1145                 wpa_printf(MSG_DEBUG, "WPS: Invalid Probe Request WPS IE: No "
1146                            "UUID-E included");
1147                 return;
1148         }
1149         wpa_hexdump(MSG_DEBUG, "WPS: UUID-E from Probe Request", attr.uuid_e,
1150                     WPS_UUID_LEN);
1151
1152 #ifdef WPS_WORKAROUNDS
1153         if (reg->pbc_ignore_start.sec &&
1154             os_memcmp(attr.uuid_e, reg->pbc_ignore_uuid, WPS_UUID_LEN) == 0) {
1155                 struct os_reltime now, dur;
1156                 os_get_reltime(&now);
1157                 os_reltime_sub(&now, &reg->pbc_ignore_start, &dur);
1158                 if (dur.sec >= 0 && dur.sec < 5) {
1159                         wpa_printf(MSG_DEBUG, "WPS: Ignore PBC activation "
1160                                    "based on Probe Request from the Enrollee "
1161                                    "that just completed PBC provisioning");
1162                         skip_add = 1;
1163                 } else
1164                         reg->pbc_ignore_start.sec = 0;
1165         }
1166 #endif /* WPS_WORKAROUNDS */
1167
1168         if (!skip_add)
1169                 wps_registrar_add_pbc_session(reg, addr, attr.uuid_e);
1170         if (wps_registrar_pbc_overlap(reg, addr, attr.uuid_e)) {
1171                 wpa_printf(MSG_DEBUG, "WPS: PBC session overlap detected");
1172                 reg->force_pbc_overlap = 1;
1173                 wps_pbc_overlap_event(reg->wps);
1174         }
1175 }
1176
1177
1178 int wps_cb_new_psk(struct wps_registrar *reg, const u8 *mac_addr,
1179                    const u8 *p2p_dev_addr, const u8 *psk, size_t psk_len)
1180 {
1181         if (reg->new_psk_cb == NULL)
1182                 return 0;
1183
1184         return reg->new_psk_cb(reg->cb_ctx, mac_addr, p2p_dev_addr, psk,
1185                                psk_len);
1186 }
1187
1188
1189 static void wps_cb_pin_needed(struct wps_registrar *reg, const u8 *uuid_e,
1190                               const struct wps_device_data *dev)
1191 {
1192         if (reg->pin_needed_cb == NULL)
1193                 return;
1194
1195         reg->pin_needed_cb(reg->cb_ctx, uuid_e, dev);
1196 }
1197
1198
1199 static void wps_cb_reg_success(struct wps_registrar *reg, const u8 *mac_addr,
1200                                const u8 *uuid_e, const u8 *dev_pw,
1201                                size_t dev_pw_len)
1202 {
1203         if (reg->reg_success_cb == NULL)
1204                 return;
1205
1206         reg->reg_success_cb(reg->cb_ctx, mac_addr, uuid_e, dev_pw, dev_pw_len);
1207 }
1208
1209
1210 static int wps_cb_set_ie(struct wps_registrar *reg, struct wpabuf *beacon_ie,
1211                          struct wpabuf *probe_resp_ie)
1212 {
1213         return reg->set_ie_cb(reg->cb_ctx, beacon_ie, probe_resp_ie);
1214 }
1215
1216
1217 static void wps_cb_set_sel_reg(struct wps_registrar *reg)
1218 {
1219         u16 methods = 0;
1220         if (reg->set_sel_reg_cb == NULL)
1221                 return;
1222
1223         if (reg->selected_registrar) {
1224                 methods = reg->wps->config_methods & ~WPS_CONFIG_PUSHBUTTON;
1225                 methods &= ~(WPS_CONFIG_VIRT_PUSHBUTTON |
1226                              WPS_CONFIG_PHY_PUSHBUTTON);
1227                 if (reg->pbc)
1228                         wps_set_pushbutton(&methods, reg->wps->config_methods);
1229         }
1230
1231         wpa_printf(MSG_DEBUG, "WPS: wps_cb_set_sel_reg: sel_reg=%d "
1232                    "config_methods=0x%x pbc=%d methods=0x%x",
1233                    reg->selected_registrar, reg->wps->config_methods,
1234                    reg->pbc, methods);
1235
1236         reg->set_sel_reg_cb(reg->cb_ctx, reg->selected_registrar,
1237                             reg->pbc ? DEV_PW_PUSHBUTTON : DEV_PW_DEFAULT,
1238                             methods);
1239 }
1240
1241
1242 static int wps_set_ie(struct wps_registrar *reg)
1243 {
1244         struct wpabuf *beacon;
1245         struct wpabuf *probe;
1246         const u8 *auth_macs;
1247         size_t count;
1248         size_t vendor_len = 0;
1249         int i;
1250
1251         if (reg->set_ie_cb == NULL)
1252                 return 0;
1253
1254         for (i = 0; i < MAX_WPS_VENDOR_EXTENSIONS; i++) {
1255                 if (reg->wps->dev.vendor_ext[i]) {
1256                         vendor_len += 2 + 2;
1257                         vendor_len += wpabuf_len(reg->wps->dev.vendor_ext[i]);
1258                 }
1259         }
1260
1261         beacon = wpabuf_alloc(400 + vendor_len);
1262         if (beacon == NULL)
1263                 return -1;
1264         probe = wpabuf_alloc(500 + vendor_len);
1265         if (probe == NULL) {
1266                 wpabuf_free(beacon);
1267                 return -1;
1268         }
1269
1270         auth_macs = wps_authorized_macs(reg, &count);
1271
1272         wpa_printf(MSG_DEBUG, "WPS: Build Beacon IEs");
1273
1274         if (wps_build_version(beacon) ||
1275             wps_build_wps_state(reg->wps, beacon) ||
1276             wps_build_ap_setup_locked(reg->wps, beacon) ||
1277             wps_build_selected_registrar(reg, beacon) ||
1278             wps_build_sel_reg_dev_password_id(reg, beacon) ||
1279             wps_build_sel_reg_config_methods(reg, beacon) ||
1280             wps_build_sel_pbc_reg_uuid_e(reg, beacon) ||
1281             (reg->dualband && wps_build_rf_bands(&reg->wps->dev, beacon, 0)) ||
1282             wps_build_wfa_ext(beacon, 0, auth_macs, count) ||
1283             wps_build_vendor_ext(&reg->wps->dev, beacon)) {
1284                 wpabuf_free(beacon);
1285                 wpabuf_free(probe);
1286                 return -1;
1287         }
1288
1289 #ifdef CONFIG_P2P
1290         if (wps_build_dev_name(&reg->wps->dev, beacon) ||
1291             wps_build_primary_dev_type(&reg->wps->dev, beacon)) {
1292                 wpabuf_free(beacon);
1293                 wpabuf_free(probe);
1294                 return -1;
1295         }
1296 #endif /* CONFIG_P2P */
1297
1298         wpa_printf(MSG_DEBUG, "WPS: Build Probe Response IEs");
1299
1300         if (wps_build_version(probe) ||
1301             wps_build_wps_state(reg->wps, probe) ||
1302             wps_build_ap_setup_locked(reg->wps, probe) ||
1303             wps_build_selected_registrar(reg, probe) ||
1304             wps_build_sel_reg_dev_password_id(reg, probe) ||
1305             wps_build_sel_reg_config_methods(reg, probe) ||
1306             wps_build_resp_type(probe, reg->wps->ap ? WPS_RESP_AP :
1307                                 WPS_RESP_REGISTRAR) ||
1308             wps_build_uuid_e(probe, reg->wps->uuid) ||
1309             wps_build_device_attrs(&reg->wps->dev, probe) ||
1310             wps_build_probe_config_methods(reg, probe) ||
1311             (reg->dualband && wps_build_rf_bands(&reg->wps->dev, probe, 0)) ||
1312             wps_build_wfa_ext(probe, 0, auth_macs, count) ||
1313             wps_build_vendor_ext(&reg->wps->dev, probe)) {
1314                 wpabuf_free(beacon);
1315                 wpabuf_free(probe);
1316                 return -1;
1317         }
1318
1319         beacon = wps_ie_encapsulate(beacon);
1320         probe = wps_ie_encapsulate(probe);
1321
1322         if (!beacon || !probe) {
1323                 wpabuf_free(beacon);
1324                 wpabuf_free(probe);
1325                 return -1;
1326         }
1327
1328         if (reg->static_wep_only) {
1329                 /*
1330                  * Windows XP and Vista clients can get confused about
1331                  * EAP-Identity/Request when they probe the network with
1332                  * EAPOL-Start. In such a case, they may assume the network is
1333                  * using IEEE 802.1X and prompt user for a certificate while
1334                  * the correct (non-WPS) behavior would be to ask for the
1335                  * static WEP key. As a workaround, use Microsoft Provisioning
1336                  * IE to advertise that legacy 802.1X is not supported.
1337                  */
1338                 const u8 ms_wps[7] = {
1339                         WLAN_EID_VENDOR_SPECIFIC, 5,
1340                         /* Microsoft Provisioning IE (00:50:f2:5) */
1341                         0x00, 0x50, 0xf2, 5,
1342                         0x00 /* no legacy 802.1X or MS WPS */
1343                 };
1344                 wpa_printf(MSG_DEBUG, "WPS: Add Microsoft Provisioning IE "
1345                            "into Beacon/Probe Response frames");
1346                 wpabuf_put_data(beacon, ms_wps, sizeof(ms_wps));
1347                 wpabuf_put_data(probe, ms_wps, sizeof(ms_wps));
1348         }
1349
1350         return wps_cb_set_ie(reg, beacon, probe);
1351 }
1352
1353
1354 static int wps_get_dev_password(struct wps_data *wps)
1355 {
1356         const u8 *pin;
1357         size_t pin_len = 0;
1358
1359         bin_clear_free(wps->dev_password, wps->dev_password_len);
1360         wps->dev_password = NULL;
1361
1362         if (wps->pbc) {
1363                 wpa_printf(MSG_DEBUG, "WPS: Use default PIN for PBC");
1364                 pin = (const u8 *) "00000000";
1365                 pin_len = 8;
1366 #ifdef CONFIG_WPS_NFC
1367         } else if (wps->nfc_pw_token) {
1368                 if (wps->nfc_pw_token->pw_id == DEV_PW_NFC_CONNECTION_HANDOVER)
1369                 {
1370                         wpa_printf(MSG_DEBUG, "WPS: Using NFC connection "
1371                                    "handover and abbreviated WPS handshake "
1372                                    "without Device Password");
1373                         return 0;
1374                 }
1375                 wpa_printf(MSG_DEBUG, "WPS: Use OOB Device Password from NFC "
1376                            "Password Token");
1377                 pin = wps->nfc_pw_token->dev_pw;
1378                 pin_len = wps->nfc_pw_token->dev_pw_len;
1379         } else if (wps->dev_pw_id >= 0x10 &&
1380                    wps->wps->ap_nfc_dev_pw_id == wps->dev_pw_id &&
1381                    wps->wps->ap_nfc_dev_pw) {
1382                 wpa_printf(MSG_DEBUG, "WPS: Use OOB Device Password from own NFC Password Token");
1383                 pin = wpabuf_head(wps->wps->ap_nfc_dev_pw);
1384                 pin_len = wpabuf_len(wps->wps->ap_nfc_dev_pw);
1385 #endif /* CONFIG_WPS_NFC */
1386         } else {
1387                 pin = wps_registrar_get_pin(wps->wps->registrar, wps->uuid_e,
1388                                             &pin_len);
1389                 if (pin && wps->dev_pw_id >= 0x10) {
1390                         wpa_printf(MSG_DEBUG, "WPS: No match for OOB Device "
1391                                    "Password ID, but PIN found");
1392                         /*
1393                          * See whether Enrollee is willing to use PIN instead.
1394                          */
1395                         wps->dev_pw_id = DEV_PW_DEFAULT;
1396                 }
1397         }
1398         if (pin == NULL) {
1399                 wpa_printf(MSG_DEBUG, "WPS: No Device Password available for "
1400                            "the Enrollee (context %p registrar %p)",
1401                            wps->wps, wps->wps->registrar);
1402                 wps_cb_pin_needed(wps->wps->registrar, wps->uuid_e,
1403                                   &wps->peer_dev);
1404                 return -1;
1405         }
1406
1407         wps->dev_password = os_malloc(pin_len);
1408         if (wps->dev_password == NULL)
1409                 return -1;
1410         os_memcpy(wps->dev_password, pin, pin_len);
1411         wps->dev_password_len = pin_len;
1412
1413         return 0;
1414 }
1415
1416
1417 static int wps_build_uuid_r(struct wps_data *wps, struct wpabuf *msg)
1418 {
1419         wpa_printf(MSG_DEBUG, "WPS:  * UUID-R");
1420         wpabuf_put_be16(msg, ATTR_UUID_R);
1421         wpabuf_put_be16(msg, WPS_UUID_LEN);
1422         wpabuf_put_data(msg, wps->uuid_r, WPS_UUID_LEN);
1423         return 0;
1424 }
1425
1426
1427 static int wps_build_r_hash(struct wps_data *wps, struct wpabuf *msg)
1428 {
1429         u8 *hash;
1430         const u8 *addr[4];
1431         size_t len[4];
1432
1433         if (random_get_bytes(wps->snonce, 2 * WPS_SECRET_NONCE_LEN) < 0)
1434                 return -1;
1435         wpa_hexdump(MSG_DEBUG, "WPS: R-S1", wps->snonce, WPS_SECRET_NONCE_LEN);
1436         wpa_hexdump(MSG_DEBUG, "WPS: R-S2",
1437                     wps->snonce + WPS_SECRET_NONCE_LEN, WPS_SECRET_NONCE_LEN);
1438
1439         if (wps->dh_pubkey_e == NULL || wps->dh_pubkey_r == NULL) {
1440                 wpa_printf(MSG_DEBUG, "WPS: DH public keys not available for "
1441                            "R-Hash derivation");
1442                 return -1;
1443         }
1444
1445         wpa_printf(MSG_DEBUG, "WPS:  * R-Hash1");
1446         wpabuf_put_be16(msg, ATTR_R_HASH1);
1447         wpabuf_put_be16(msg, SHA256_MAC_LEN);
1448         hash = wpabuf_put(msg, SHA256_MAC_LEN);
1449         /* R-Hash1 = HMAC_AuthKey(R-S1 || PSK1 || PK_E || PK_R) */
1450         addr[0] = wps->snonce;
1451         len[0] = WPS_SECRET_NONCE_LEN;
1452         addr[1] = wps->psk1;
1453         len[1] = WPS_PSK_LEN;
1454         addr[2] = wpabuf_head(wps->dh_pubkey_e);
1455         len[2] = wpabuf_len(wps->dh_pubkey_e);
1456         addr[3] = wpabuf_head(wps->dh_pubkey_r);
1457         len[3] = wpabuf_len(wps->dh_pubkey_r);
1458         hmac_sha256_vector(wps->authkey, WPS_AUTHKEY_LEN, 4, addr, len, hash);
1459         wpa_hexdump(MSG_DEBUG, "WPS: R-Hash1", hash, SHA256_MAC_LEN);
1460
1461         wpa_printf(MSG_DEBUG, "WPS:  * R-Hash2");
1462         wpabuf_put_be16(msg, ATTR_R_HASH2);
1463         wpabuf_put_be16(msg, SHA256_MAC_LEN);
1464         hash = wpabuf_put(msg, SHA256_MAC_LEN);
1465         /* R-Hash2 = HMAC_AuthKey(R-S2 || PSK2 || PK_E || PK_R) */
1466         addr[0] = wps->snonce + WPS_SECRET_NONCE_LEN;
1467         addr[1] = wps->psk2;
1468         hmac_sha256_vector(wps->authkey, WPS_AUTHKEY_LEN, 4, addr, len, hash);
1469         wpa_hexdump(MSG_DEBUG, "WPS: R-Hash2", hash, SHA256_MAC_LEN);
1470
1471         return 0;
1472 }
1473
1474
1475 static int wps_build_r_snonce1(struct wps_data *wps, struct wpabuf *msg)
1476 {
1477         wpa_printf(MSG_DEBUG, "WPS:  * R-SNonce1");
1478         wpabuf_put_be16(msg, ATTR_R_SNONCE1);
1479         wpabuf_put_be16(msg, WPS_SECRET_NONCE_LEN);
1480         wpabuf_put_data(msg, wps->snonce, WPS_SECRET_NONCE_LEN);
1481         return 0;
1482 }
1483
1484
1485 static int wps_build_r_snonce2(struct wps_data *wps, struct wpabuf *msg)
1486 {
1487         wpa_printf(MSG_DEBUG, "WPS:  * R-SNonce2");
1488         wpabuf_put_be16(msg, ATTR_R_SNONCE2);
1489         wpabuf_put_be16(msg, WPS_SECRET_NONCE_LEN);
1490         wpabuf_put_data(msg, wps->snonce + WPS_SECRET_NONCE_LEN,
1491                         WPS_SECRET_NONCE_LEN);
1492         return 0;
1493 }
1494
1495
1496 static int wps_build_cred_network_idx(struct wpabuf *msg,
1497                                       const struct wps_credential *cred)
1498 {
1499         wpa_printf(MSG_DEBUG, "WPS:  * Network Index (1)");
1500         wpabuf_put_be16(msg, ATTR_NETWORK_INDEX);
1501         wpabuf_put_be16(msg, 1);
1502         wpabuf_put_u8(msg, 1);
1503         return 0;
1504 }
1505
1506
1507 static int wps_build_cred_ssid(struct wpabuf *msg,
1508                                const struct wps_credential *cred)
1509 {
1510         wpa_printf(MSG_DEBUG, "WPS:  * SSID");
1511         wpa_hexdump_ascii(MSG_DEBUG, "WPS: SSID for Credential",
1512                           cred->ssid, cred->ssid_len);
1513         wpabuf_put_be16(msg, ATTR_SSID);
1514         wpabuf_put_be16(msg, cred->ssid_len);
1515         wpabuf_put_data(msg, cred->ssid, cred->ssid_len);
1516         return 0;
1517 }
1518
1519
1520 static int wps_build_cred_auth_type(struct wpabuf *msg,
1521                                     const struct wps_credential *cred)
1522 {
1523         wpa_printf(MSG_DEBUG, "WPS:  * Authentication Type (0x%x)",
1524                    cred->auth_type);
1525         wpabuf_put_be16(msg, ATTR_AUTH_TYPE);
1526         wpabuf_put_be16(msg, 2);
1527         wpabuf_put_be16(msg, cred->auth_type);
1528         return 0;
1529 }
1530
1531
1532 static int wps_build_cred_encr_type(struct wpabuf *msg,
1533                                     const struct wps_credential *cred)
1534 {
1535         wpa_printf(MSG_DEBUG, "WPS:  * Encryption Type (0x%x)",
1536                    cred->encr_type);
1537         wpabuf_put_be16(msg, ATTR_ENCR_TYPE);
1538         wpabuf_put_be16(msg, 2);
1539         wpabuf_put_be16(msg, cred->encr_type);
1540         return 0;
1541 }
1542
1543
1544 static int wps_build_cred_network_key(struct wpabuf *msg,
1545                                       const struct wps_credential *cred)
1546 {
1547         wpa_printf(MSG_DEBUG, "WPS:  * Network Key (len=%d)",
1548                    (int) cred->key_len);
1549         wpa_hexdump_key(MSG_DEBUG, "WPS: Network Key",
1550                         cred->key, cred->key_len);
1551         wpabuf_put_be16(msg, ATTR_NETWORK_KEY);
1552         wpabuf_put_be16(msg, cred->key_len);
1553         wpabuf_put_data(msg, cred->key, cred->key_len);
1554         return 0;
1555 }
1556
1557
1558 static int wps_build_credential(struct wpabuf *msg,
1559                                 const struct wps_credential *cred)
1560 {
1561         if (wps_build_cred_network_idx(msg, cred) ||
1562             wps_build_cred_ssid(msg, cred) ||
1563             wps_build_cred_auth_type(msg, cred) ||
1564             wps_build_cred_encr_type(msg, cred) ||
1565             wps_build_cred_network_key(msg, cred) ||
1566             wps_build_mac_addr(msg, cred->mac_addr))
1567                 return -1;
1568         return 0;
1569 }
1570
1571
1572 int wps_build_credential_wrap(struct wpabuf *msg,
1573                               const struct wps_credential *cred)
1574 {
1575         struct wpabuf *wbuf;
1576         wbuf = wpabuf_alloc(200);
1577         if (wbuf == NULL)
1578                 return -1;
1579         if (wps_build_credential(wbuf, cred)) {
1580                 wpabuf_clear_free(wbuf);
1581                 return -1;
1582         }
1583         wpabuf_put_be16(msg, ATTR_CRED);
1584         wpabuf_put_be16(msg, wpabuf_len(wbuf));
1585         wpabuf_put_buf(msg, wbuf);
1586         wpabuf_clear_free(wbuf);
1587         return 0;
1588 }
1589
1590
1591 int wps_build_cred(struct wps_data *wps, struct wpabuf *msg)
1592 {
1593         struct wpabuf *cred;
1594
1595         if (wps->wps->registrar->skip_cred_build)
1596                 goto skip_cred_build;
1597
1598         wpa_printf(MSG_DEBUG, "WPS:  * Credential");
1599         if (wps->use_cred) {
1600                 os_memcpy(&wps->cred, wps->use_cred, sizeof(wps->cred));
1601                 goto use_provided;
1602         }
1603         os_memset(&wps->cred, 0, sizeof(wps->cred));
1604
1605         os_memcpy(wps->cred.ssid, wps->wps->ssid, wps->wps->ssid_len);
1606         wps->cred.ssid_len = wps->wps->ssid_len;
1607
1608         /* Select the best authentication and encryption type */
1609         wpa_printf(MSG_DEBUG,
1610                    "WPS: Own auth types 0x%x - masked Enrollee auth types 0x%x",
1611                    wps->wps->auth_types, wps->auth_type);
1612         if (wps->auth_type & WPS_AUTH_WPA2PSK)
1613                 wps->auth_type = WPS_AUTH_WPA2PSK;
1614         else if (wps->auth_type & WPS_AUTH_WPAPSK)
1615                 wps->auth_type = WPS_AUTH_WPAPSK;
1616         else if (wps->auth_type & WPS_AUTH_OPEN)
1617                 wps->auth_type = WPS_AUTH_OPEN;
1618         else {
1619                 wpa_printf(MSG_DEBUG, "WPS: Unsupported auth_type 0x%x",
1620                            wps->auth_type);
1621                 return -1;
1622         }
1623         wps->cred.auth_type = wps->auth_type;
1624
1625         wpa_printf(MSG_DEBUG,
1626                    "WPS: Own encr types 0x%x (rsn: 0x%x, wpa: 0x%x) - masked Enrollee encr types 0x%x",
1627                    wps->wps->encr_types, wps->wps->encr_types_rsn,
1628                    wps->wps->encr_types_wpa, wps->encr_type);
1629         if (wps->wps->ap && wps->auth_type == WPS_AUTH_WPA2PSK)
1630                 wps->encr_type &= wps->wps->encr_types_rsn;
1631         else if (wps->wps->ap && wps->auth_type == WPS_AUTH_WPAPSK)
1632                 wps->encr_type &= wps->wps->encr_types_wpa;
1633         if (wps->auth_type == WPS_AUTH_WPA2PSK ||
1634             wps->auth_type == WPS_AUTH_WPAPSK) {
1635                 if (wps->encr_type & WPS_ENCR_AES)
1636                         wps->encr_type = WPS_ENCR_AES;
1637                 else if (wps->encr_type & WPS_ENCR_TKIP)
1638                         wps->encr_type = WPS_ENCR_TKIP;
1639                 else {
1640                         wpa_printf(MSG_DEBUG, "WPS: No suitable encryption "
1641                                    "type for WPA/WPA2");
1642                         return -1;
1643                 }
1644         } else {
1645                 if (wps->encr_type & WPS_ENCR_NONE)
1646                         wps->encr_type = WPS_ENCR_NONE;
1647 #ifdef CONFIG_TESTING_OPTIONS
1648                 else if (wps->encr_type & WPS_ENCR_WEP)
1649                         wps->encr_type = WPS_ENCR_WEP;
1650 #endif /* CONFIG_TESTING_OPTIONS */
1651                 else {
1652                         wpa_printf(MSG_DEBUG, "WPS: No suitable encryption "
1653                                    "type for non-WPA/WPA2 mode");
1654                         return -1;
1655                 }
1656         }
1657         wps->cred.encr_type = wps->encr_type;
1658         /*
1659          * Set MAC address in the Credential to be the Enrollee's MAC address
1660          */
1661         os_memcpy(wps->cred.mac_addr, wps->mac_addr_e, ETH_ALEN);
1662
1663         if (wps->wps->wps_state == WPS_STATE_NOT_CONFIGURED && wps->wps->ap &&
1664             !wps->wps->registrar->disable_auto_conf) {
1665                 u8 r[16];
1666                 /* Generate a random passphrase */
1667                 if (random_pool_ready() != 1 ||
1668                     random_get_bytes(r, sizeof(r)) < 0) {
1669                         wpa_printf(MSG_INFO,
1670                                    "WPS: Could not generate random PSK");
1671                         return -1;
1672                 }
1673                 os_free(wps->new_psk);
1674                 wps->new_psk = base64_encode(r, sizeof(r), &wps->new_psk_len);
1675                 if (wps->new_psk == NULL)
1676                         return -1;
1677                 wps->new_psk_len--; /* remove newline */
1678                 while (wps->new_psk_len &&
1679                        wps->new_psk[wps->new_psk_len - 1] == '=')
1680                         wps->new_psk_len--;
1681                 wpa_hexdump_ascii_key(MSG_DEBUG, "WPS: Generated passphrase",
1682                                       wps->new_psk, wps->new_psk_len);
1683                 os_memcpy(wps->cred.key, wps->new_psk, wps->new_psk_len);
1684                 wps->cred.key_len = wps->new_psk_len;
1685         } else if (!wps->wps->registrar->force_per_enrollee_psk &&
1686                    wps->use_psk_key && wps->wps->psk_set) {
1687                 char hex[65];
1688                 wpa_printf(MSG_DEBUG, "WPS: Use PSK format for Network Key");
1689                 wpa_snprintf_hex(hex, sizeof(hex), wps->wps->psk, 32);
1690                 os_memcpy(wps->cred.key, hex, 32 * 2);
1691                 wps->cred.key_len = 32 * 2;
1692         } else if (!wps->wps->registrar->force_per_enrollee_psk &&
1693                    wps->wps->network_key) {
1694                 os_memcpy(wps->cred.key, wps->wps->network_key,
1695                           wps->wps->network_key_len);
1696                 wps->cred.key_len = wps->wps->network_key_len;
1697         } else if (wps->auth_type & (WPS_AUTH_WPAPSK | WPS_AUTH_WPA2PSK)) {
1698                 char hex[65];
1699                 /* Generate a random per-device PSK */
1700                 os_free(wps->new_psk);
1701                 wps->new_psk_len = 32;
1702                 wps->new_psk = os_malloc(wps->new_psk_len);
1703                 if (wps->new_psk == NULL)
1704                         return -1;
1705                 if (random_pool_ready() != 1 ||
1706                     random_get_bytes(wps->new_psk, wps->new_psk_len) < 0) {
1707                         wpa_printf(MSG_INFO,
1708                                    "WPS: Could not generate random PSK");
1709                         os_free(wps->new_psk);
1710                         wps->new_psk = NULL;
1711                         return -1;
1712                 }
1713                 wpa_hexdump_key(MSG_DEBUG, "WPS: Generated per-device PSK",
1714                                 wps->new_psk, wps->new_psk_len);
1715                 wpa_snprintf_hex(hex, sizeof(hex), wps->new_psk,
1716                                  wps->new_psk_len);
1717                 os_memcpy(wps->cred.key, hex, wps->new_psk_len * 2);
1718                 wps->cred.key_len = wps->new_psk_len * 2;
1719         }
1720
1721 use_provided:
1722 #ifdef CONFIG_WPS_TESTING
1723         if (wps_testing_dummy_cred)
1724                 cred = wpabuf_alloc(200);
1725         else
1726                 cred = NULL;
1727         if (cred) {
1728                 struct wps_credential dummy;
1729                 wpa_printf(MSG_DEBUG, "WPS: Add dummy credential");
1730                 os_memset(&dummy, 0, sizeof(dummy));
1731                 os_memcpy(dummy.ssid, "dummy", 5);
1732                 dummy.ssid_len = 5;
1733                 dummy.auth_type = WPS_AUTH_WPA2PSK;
1734                 dummy.encr_type = WPS_ENCR_AES;
1735                 os_memcpy(dummy.key, "dummy psk", 9);
1736                 dummy.key_len = 9;
1737                 os_memcpy(dummy.mac_addr, wps->mac_addr_e, ETH_ALEN);
1738                 wps_build_credential(cred, &dummy);
1739                 wpa_hexdump_buf(MSG_DEBUG, "WPS: Dummy Credential", cred);
1740
1741                 wpabuf_put_be16(msg, ATTR_CRED);
1742                 wpabuf_put_be16(msg, wpabuf_len(cred));
1743                 wpabuf_put_buf(msg, cred);
1744
1745                 wpabuf_free(cred);
1746         }
1747 #endif /* CONFIG_WPS_TESTING */
1748
1749         cred = wpabuf_alloc(200);
1750         if (cred == NULL)
1751                 return -1;
1752
1753         if (wps_build_credential(cred, &wps->cred)) {
1754                 wpabuf_clear_free(cred);
1755                 return -1;
1756         }
1757
1758         wpabuf_put_be16(msg, ATTR_CRED);
1759         wpabuf_put_be16(msg, wpabuf_len(cred));
1760         wpabuf_put_buf(msg, cred);
1761         wpabuf_clear_free(cred);
1762
1763 skip_cred_build:
1764         if (wps->wps->registrar->extra_cred) {
1765                 wpa_printf(MSG_DEBUG, "WPS:  * Credential (pre-configured)");
1766                 wpabuf_put_buf(msg, wps->wps->registrar->extra_cred);
1767         }
1768
1769         return 0;
1770 }
1771
1772
1773 static int wps_build_ap_settings(struct wps_data *wps, struct wpabuf *msg)
1774 {
1775         wpa_printf(MSG_DEBUG, "WPS:  * AP Settings");
1776
1777         if (wps_build_credential(msg, &wps->cred))
1778                 return -1;
1779
1780         return 0;
1781 }
1782
1783
1784 static struct wpabuf * wps_build_ap_cred(struct wps_data *wps)
1785 {
1786         struct wpabuf *msg, *plain;
1787
1788         msg = wpabuf_alloc(1000);
1789         if (msg == NULL)
1790                 return NULL;
1791
1792         plain = wpabuf_alloc(200);
1793         if (plain == NULL) {
1794                 wpabuf_free(msg);
1795                 return NULL;
1796         }
1797
1798         if (wps_build_ap_settings(wps, plain)) {
1799                 wpabuf_clear_free(plain);
1800                 wpabuf_free(msg);
1801                 return NULL;
1802         }
1803
1804         wpabuf_put_be16(msg, ATTR_CRED);
1805         wpabuf_put_be16(msg, wpabuf_len(plain));
1806         wpabuf_put_buf(msg, plain);
1807         wpabuf_clear_free(plain);
1808
1809         return msg;
1810 }
1811
1812
1813 static struct wpabuf * wps_build_m2(struct wps_data *wps)
1814 {
1815         struct wpabuf *msg;
1816         int config_in_m2 = 0;
1817
1818         if (random_get_bytes(wps->nonce_r, WPS_NONCE_LEN) < 0)
1819                 return NULL;
1820         wpa_hexdump(MSG_DEBUG, "WPS: Registrar Nonce",
1821                     wps->nonce_r, WPS_NONCE_LEN);
1822         wpa_hexdump(MSG_DEBUG, "WPS: UUID-R", wps->uuid_r, WPS_UUID_LEN);
1823
1824         wpa_printf(MSG_DEBUG, "WPS: Building Message M2");
1825         msg = wpabuf_alloc(1000);
1826         if (msg == NULL)
1827                 return NULL;
1828
1829         if (wps_build_version(msg) ||
1830             wps_build_msg_type(msg, WPS_M2) ||
1831             wps_build_enrollee_nonce(wps, msg) ||
1832             wps_build_registrar_nonce(wps, msg) ||
1833             wps_build_uuid_r(wps, msg) ||
1834             wps_build_public_key(wps, msg) ||
1835             wps_derive_keys(wps) ||
1836             wps_build_auth_type_flags(wps, msg) ||
1837             wps_build_encr_type_flags(wps, msg) ||
1838             wps_build_conn_type_flags(wps, msg) ||
1839             wps_build_config_methods_r(wps->wps->registrar, msg) ||
1840             wps_build_device_attrs(&wps->wps->dev, msg) ||
1841             wps_build_rf_bands(&wps->wps->dev, msg,
1842                                wps->wps->rf_band_cb(wps->wps->cb_ctx)) ||
1843             wps_build_assoc_state(wps, msg) ||
1844             wps_build_config_error(msg, WPS_CFG_NO_ERROR) ||
1845             wps_build_dev_password_id(msg, wps->dev_pw_id) ||
1846             wps_build_os_version(&wps->wps->dev, msg) ||
1847             wps_build_wfa_ext(msg, 0, NULL, 0)) {
1848                 wpabuf_free(msg);
1849                 return NULL;
1850         }
1851
1852 #ifdef CONFIG_WPS_NFC
1853         if (wps->nfc_pw_token && wps->nfc_pw_token->pk_hash_provided_oob &&
1854             wps->nfc_pw_token->pw_id == DEV_PW_NFC_CONNECTION_HANDOVER) {
1855                 /*
1856                  * Use abbreviated handshake since public key hash allowed
1857                  * Enrollee to validate our public key similarly to how Enrollee
1858                  * public key was validated. There is no need to validate Device
1859                  * Password in this case.
1860                  */
1861                 struct wpabuf *plain = wpabuf_alloc(500);
1862                 if (plain == NULL ||
1863                     wps_build_cred(wps, plain) ||
1864                     wps_build_key_wrap_auth(wps, plain) ||
1865                     wps_build_encr_settings(wps, msg, plain)) {
1866                         wpabuf_free(msg);
1867                         wpabuf_clear_free(plain);
1868                         return NULL;
1869                 }
1870                 wpabuf_clear_free(plain);
1871                 config_in_m2 = 1;
1872         }
1873 #endif /* CONFIG_WPS_NFC */
1874
1875         if (wps_build_authenticator(wps, msg)) {
1876                 wpabuf_free(msg);
1877                 return NULL;
1878         }
1879
1880         wps->int_reg = 1;
1881         wps->state = config_in_m2 ? RECV_DONE : RECV_M3;
1882         return msg;
1883 }
1884
1885
1886 static struct wpabuf * wps_build_m2d(struct wps_data *wps)
1887 {
1888         struct wpabuf *msg;
1889         u16 err = wps->config_error;
1890
1891         wpa_printf(MSG_DEBUG, "WPS: Building Message M2D");
1892         msg = wpabuf_alloc(1000);
1893         if (msg == NULL)
1894                 return NULL;
1895
1896         if (wps->wps->ap && wps->wps->ap_setup_locked &&
1897             err == WPS_CFG_NO_ERROR)
1898                 err = WPS_CFG_SETUP_LOCKED;
1899
1900         if (wps_build_version(msg) ||
1901             wps_build_msg_type(msg, WPS_M2D) ||
1902             wps_build_enrollee_nonce(wps, msg) ||
1903             wps_build_registrar_nonce(wps, msg) ||
1904             wps_build_uuid_r(wps, msg) ||
1905             wps_build_auth_type_flags(wps, msg) ||
1906             wps_build_encr_type_flags(wps, msg) ||
1907             wps_build_conn_type_flags(wps, msg) ||
1908             wps_build_config_methods_r(wps->wps->registrar, msg) ||
1909             wps_build_device_attrs(&wps->wps->dev, msg) ||
1910             wps_build_rf_bands(&wps->wps->dev, msg,
1911                                wps->wps->rf_band_cb(wps->wps->cb_ctx)) ||
1912             wps_build_assoc_state(wps, msg) ||
1913             wps_build_config_error(msg, err) ||
1914             wps_build_os_version(&wps->wps->dev, msg) ||
1915             wps_build_wfa_ext(msg, 0, NULL, 0)) {
1916                 wpabuf_free(msg);
1917                 return NULL;
1918         }
1919
1920         wps->state = RECV_M2D_ACK;
1921         return msg;
1922 }
1923
1924
1925 static struct wpabuf * wps_build_m4(struct wps_data *wps)
1926 {
1927         struct wpabuf *msg, *plain;
1928
1929         wpa_printf(MSG_DEBUG, "WPS: Building Message M4");
1930
1931         if (wps_derive_psk(wps, wps->dev_password, wps->dev_password_len) < 0)
1932                 return NULL;
1933
1934         plain = wpabuf_alloc(200);
1935         if (plain == NULL)
1936                 return NULL;
1937
1938         msg = wpabuf_alloc(1000);
1939         if (msg == NULL) {
1940                 wpabuf_free(plain);
1941                 return NULL;
1942         }
1943
1944         if (wps_build_version(msg) ||
1945             wps_build_msg_type(msg, WPS_M4) ||
1946             wps_build_enrollee_nonce(wps, msg) ||
1947             wps_build_r_hash(wps, msg) ||
1948             wps_build_r_snonce1(wps, plain) ||
1949             wps_build_key_wrap_auth(wps, plain) ||
1950             wps_build_encr_settings(wps, msg, plain) ||
1951             wps_build_wfa_ext(msg, 0, NULL, 0) ||
1952             wps_build_authenticator(wps, msg)) {
1953                 wpabuf_clear_free(plain);
1954                 wpabuf_free(msg);
1955                 return NULL;
1956         }
1957         wpabuf_clear_free(plain);
1958
1959         wps->state = RECV_M5;
1960         return msg;
1961 }
1962
1963
1964 static struct wpabuf * wps_build_m6(struct wps_data *wps)
1965 {
1966         struct wpabuf *msg, *plain;
1967
1968         wpa_printf(MSG_DEBUG, "WPS: Building Message M6");
1969
1970         plain = wpabuf_alloc(200);
1971         if (plain == NULL)
1972                 return NULL;
1973
1974         msg = wpabuf_alloc(1000);
1975         if (msg == NULL) {
1976                 wpabuf_free(plain);
1977                 return NULL;
1978         }
1979
1980         if (wps_build_version(msg) ||
1981             wps_build_msg_type(msg, WPS_M6) ||
1982             wps_build_enrollee_nonce(wps, msg) ||
1983             wps_build_r_snonce2(wps, plain) ||
1984             wps_build_key_wrap_auth(wps, plain) ||
1985             wps_build_encr_settings(wps, msg, plain) ||
1986             wps_build_wfa_ext(msg, 0, NULL, 0) ||
1987             wps_build_authenticator(wps, msg)) {
1988                 wpabuf_clear_free(plain);
1989                 wpabuf_free(msg);
1990                 return NULL;
1991         }
1992         wpabuf_clear_free(plain);
1993
1994         wps->wps_pin_revealed = 1;
1995         wps->state = RECV_M7;
1996         return msg;
1997 }
1998
1999
2000 static struct wpabuf * wps_build_m8(struct wps_data *wps)
2001 {
2002         struct wpabuf *msg, *plain;
2003
2004         wpa_printf(MSG_DEBUG, "WPS: Building Message M8");
2005
2006         plain = wpabuf_alloc(500);
2007         if (plain == NULL)
2008                 return NULL;
2009
2010         msg = wpabuf_alloc(1000);
2011         if (msg == NULL) {
2012                 wpabuf_free(plain);
2013                 return NULL;
2014         }
2015
2016         if (wps_build_version(msg) ||
2017             wps_build_msg_type(msg, WPS_M8) ||
2018             wps_build_enrollee_nonce(wps, msg) ||
2019             ((wps->wps->ap || wps->er) && wps_build_cred(wps, plain)) ||
2020             (!wps->wps->ap && !wps->er && wps_build_ap_settings(wps, plain)) ||
2021             wps_build_key_wrap_auth(wps, plain) ||
2022             wps_build_encr_settings(wps, msg, plain) ||
2023             wps_build_wfa_ext(msg, 0, NULL, 0) ||
2024             wps_build_authenticator(wps, msg)) {
2025                 wpabuf_clear_free(plain);
2026                 wpabuf_clear_free(msg);
2027                 return NULL;
2028         }
2029         wpabuf_clear_free(plain);
2030
2031         wps->state = RECV_DONE;
2032         return msg;
2033 }
2034
2035
2036 struct wpabuf * wps_registrar_get_msg(struct wps_data *wps,
2037                                       enum wsc_op_code *op_code)
2038 {
2039         struct wpabuf *msg;
2040
2041 #ifdef CONFIG_WPS_UPNP
2042         if (!wps->int_reg && wps->wps->wps_upnp) {
2043                 struct upnp_pending_message *p, *prev = NULL;
2044                 if (wps->ext_reg > 1)
2045                         wps_registrar_free_pending_m2(wps->wps);
2046                 p = wps->wps->upnp_msgs;
2047                 /* TODO: check pending message MAC address */
2048                 while (p && p->next) {
2049                         prev = p;
2050                         p = p->next;
2051                 }
2052                 if (p) {
2053                         wpa_printf(MSG_DEBUG, "WPS: Use pending message from "
2054                                    "UPnP");
2055                         if (prev)
2056                                 prev->next = NULL;
2057                         else
2058                                 wps->wps->upnp_msgs = NULL;
2059                         msg = p->msg;
2060                         switch (p->type) {
2061                         case WPS_WSC_ACK:
2062                                 *op_code = WSC_ACK;
2063                                 break;
2064                         case WPS_WSC_NACK:
2065                                 *op_code = WSC_NACK;
2066                                 break;
2067                         default:
2068                                 *op_code = WSC_MSG;
2069                                 break;
2070                         }
2071                         os_free(p);
2072                         if (wps->ext_reg == 0)
2073                                 wps->ext_reg = 1;
2074                         return msg;
2075                 }
2076         }
2077         if (wps->ext_reg) {
2078                 wpa_printf(MSG_DEBUG, "WPS: Using external Registrar, but no "
2079                            "pending message available");
2080                 return NULL;
2081         }
2082 #endif /* CONFIG_WPS_UPNP */
2083
2084         switch (wps->state) {
2085         case SEND_M2:
2086                 if (wps_get_dev_password(wps) < 0)
2087                         msg = wps_build_m2d(wps);
2088                 else
2089                         msg = wps_build_m2(wps);
2090                 *op_code = WSC_MSG;
2091                 break;
2092         case SEND_M2D:
2093                 msg = wps_build_m2d(wps);
2094                 *op_code = WSC_MSG;
2095                 break;
2096         case SEND_M4:
2097                 msg = wps_build_m4(wps);
2098                 *op_code = WSC_MSG;
2099                 break;
2100         case SEND_M6:
2101                 msg = wps_build_m6(wps);
2102                 *op_code = WSC_MSG;
2103                 break;
2104         case SEND_M8:
2105                 msg = wps_build_m8(wps);
2106                 *op_code = WSC_MSG;
2107                 break;
2108         case RECV_DONE:
2109                 msg = wps_build_wsc_ack(wps);
2110                 *op_code = WSC_ACK;
2111                 break;
2112         case SEND_WSC_NACK:
2113                 msg = wps_build_wsc_nack(wps);
2114                 *op_code = WSC_NACK;
2115                 break;
2116         default:
2117                 wpa_printf(MSG_DEBUG, "WPS: Unsupported state %d for building "
2118                            "a message", wps->state);
2119                 msg = NULL;
2120                 break;
2121         }
2122
2123         if (*op_code == WSC_MSG && msg) {
2124                 /* Save a copy of the last message for Authenticator derivation
2125                  */
2126                 wpabuf_free(wps->last_msg);
2127                 wps->last_msg = wpabuf_dup(msg);
2128         }
2129
2130         return msg;
2131 }
2132
2133
2134 static int wps_process_enrollee_nonce(struct wps_data *wps, const u8 *e_nonce)
2135 {
2136         if (e_nonce == NULL) {
2137                 wpa_printf(MSG_DEBUG, "WPS: No Enrollee Nonce received");
2138                 return -1;
2139         }
2140
2141         os_memcpy(wps->nonce_e, e_nonce, WPS_NONCE_LEN);
2142         wpa_hexdump(MSG_DEBUG, "WPS: Enrollee Nonce",
2143                     wps->nonce_e, WPS_NONCE_LEN);
2144
2145         return 0;
2146 }
2147
2148
2149 static int wps_process_registrar_nonce(struct wps_data *wps, const u8 *r_nonce)
2150 {
2151         if (r_nonce == NULL) {
2152                 wpa_printf(MSG_DEBUG, "WPS: No Registrar Nonce received");
2153                 return -1;
2154         }
2155
2156         if (os_memcmp(wps->nonce_r, r_nonce, WPS_NONCE_LEN) != 0) {
2157                 wpa_printf(MSG_DEBUG, "WPS: Invalid Registrar Nonce received");
2158                 return -1;
2159         }
2160
2161         return 0;
2162 }
2163
2164
2165 static int wps_process_uuid_e(struct wps_data *wps, const u8 *uuid_e)
2166 {
2167         if (uuid_e == NULL) {
2168                 wpa_printf(MSG_DEBUG, "WPS: No UUID-E received");
2169                 return -1;
2170         }
2171
2172         os_memcpy(wps->uuid_e, uuid_e, WPS_UUID_LEN);
2173         wpa_hexdump(MSG_DEBUG, "WPS: UUID-E", wps->uuid_e, WPS_UUID_LEN);
2174
2175         return 0;
2176 }
2177
2178
2179 static int wps_process_dev_password_id(struct wps_data *wps, const u8 *pw_id)
2180 {
2181         if (pw_id == NULL) {
2182                 wpa_printf(MSG_DEBUG, "WPS: No Device Password ID received");
2183                 return -1;
2184         }
2185
2186         wps->dev_pw_id = WPA_GET_BE16(pw_id);
2187         wpa_printf(MSG_DEBUG, "WPS: Device Password ID %d", wps->dev_pw_id);
2188
2189         return 0;
2190 }
2191
2192
2193 static int wps_process_e_hash1(struct wps_data *wps, const u8 *e_hash1)
2194 {
2195         if (e_hash1 == NULL) {
2196                 wpa_printf(MSG_DEBUG, "WPS: No E-Hash1 received");
2197                 return -1;
2198         }
2199
2200         os_memcpy(wps->peer_hash1, e_hash1, WPS_HASH_LEN);
2201         wpa_hexdump(MSG_DEBUG, "WPS: E-Hash1", wps->peer_hash1, WPS_HASH_LEN);
2202
2203         return 0;
2204 }
2205
2206
2207 static int wps_process_e_hash2(struct wps_data *wps, const u8 *e_hash2)
2208 {
2209         if (e_hash2 == NULL) {
2210                 wpa_printf(MSG_DEBUG, "WPS: No E-Hash2 received");
2211                 return -1;
2212         }
2213
2214         os_memcpy(wps->peer_hash2, e_hash2, WPS_HASH_LEN);
2215         wpa_hexdump(MSG_DEBUG, "WPS: E-Hash2", wps->peer_hash2, WPS_HASH_LEN);
2216
2217         return 0;
2218 }
2219
2220
2221 static int wps_process_e_snonce1(struct wps_data *wps, const u8 *e_snonce1)
2222 {
2223         u8 hash[SHA256_MAC_LEN];
2224         const u8 *addr[4];
2225         size_t len[4];
2226
2227         if (e_snonce1 == NULL) {
2228                 wpa_printf(MSG_DEBUG, "WPS: No E-SNonce1 received");
2229                 return -1;
2230         }
2231
2232         wpa_hexdump_key(MSG_DEBUG, "WPS: E-SNonce1", e_snonce1,
2233                         WPS_SECRET_NONCE_LEN);
2234
2235         /* E-Hash1 = HMAC_AuthKey(E-S1 || PSK1 || PK_E || PK_R) */
2236         addr[0] = e_snonce1;
2237         len[0] = WPS_SECRET_NONCE_LEN;
2238         addr[1] = wps->psk1;
2239         len[1] = WPS_PSK_LEN;
2240         addr[2] = wpabuf_head(wps->dh_pubkey_e);
2241         len[2] = wpabuf_len(wps->dh_pubkey_e);
2242         addr[3] = wpabuf_head(wps->dh_pubkey_r);
2243         len[3] = wpabuf_len(wps->dh_pubkey_r);
2244         hmac_sha256_vector(wps->authkey, WPS_AUTHKEY_LEN, 4, addr, len, hash);
2245
2246         if (os_memcmp_const(wps->peer_hash1, hash, WPS_HASH_LEN) != 0) {
2247                 wpa_printf(MSG_DEBUG, "WPS: E-Hash1 derived from E-S1 does "
2248                            "not match with the pre-committed value");
2249                 wps->config_error = WPS_CFG_DEV_PASSWORD_AUTH_FAILURE;
2250                 wps_pwd_auth_fail_event(wps->wps, 0, 1, wps->mac_addr_e);
2251                 return -1;
2252         }
2253
2254         wpa_printf(MSG_DEBUG, "WPS: Enrollee proved knowledge of the first "
2255                    "half of the device password");
2256
2257         return 0;
2258 }
2259
2260
2261 static int wps_process_e_snonce2(struct wps_data *wps, const u8 *e_snonce2)
2262 {
2263         u8 hash[SHA256_MAC_LEN];
2264         const u8 *addr[4];
2265         size_t len[4];
2266
2267         if (e_snonce2 == NULL) {
2268                 wpa_printf(MSG_DEBUG, "WPS: No E-SNonce2 received");
2269                 return -1;
2270         }
2271
2272         wpa_hexdump_key(MSG_DEBUG, "WPS: E-SNonce2", e_snonce2,
2273                         WPS_SECRET_NONCE_LEN);
2274
2275         /* E-Hash2 = HMAC_AuthKey(E-S2 || PSK2 || PK_E || PK_R) */
2276         addr[0] = e_snonce2;
2277         len[0] = WPS_SECRET_NONCE_LEN;
2278         addr[1] = wps->psk2;
2279         len[1] = WPS_PSK_LEN;
2280         addr[2] = wpabuf_head(wps->dh_pubkey_e);
2281         len[2] = wpabuf_len(wps->dh_pubkey_e);
2282         addr[3] = wpabuf_head(wps->dh_pubkey_r);
2283         len[3] = wpabuf_len(wps->dh_pubkey_r);
2284         hmac_sha256_vector(wps->authkey, WPS_AUTHKEY_LEN, 4, addr, len, hash);
2285
2286         if (os_memcmp_const(wps->peer_hash2, hash, WPS_HASH_LEN) != 0) {
2287                 wpa_printf(MSG_DEBUG, "WPS: E-Hash2 derived from E-S2 does "
2288                            "not match with the pre-committed value");
2289                 wps_registrar_invalidate_pin(wps->wps->registrar, wps->uuid_e);
2290                 wps->config_error = WPS_CFG_DEV_PASSWORD_AUTH_FAILURE;
2291                 wps_pwd_auth_fail_event(wps->wps, 0, 2, wps->mac_addr_e);
2292                 return -1;
2293         }
2294
2295         wpa_printf(MSG_DEBUG, "WPS: Enrollee proved knowledge of the second "
2296                    "half of the device password");
2297         wps->wps_pin_revealed = 0;
2298         wps_registrar_unlock_pin(wps->wps->registrar, wps->uuid_e);
2299
2300         /*
2301          * In case wildcard PIN is used and WPS handshake succeeds in the first
2302          * attempt, wps_registrar_unlock_pin() would not free the PIN, so make
2303          * sure the PIN gets invalidated here.
2304          */
2305         wps_registrar_invalidate_pin(wps->wps->registrar, wps->uuid_e);
2306
2307         return 0;
2308 }
2309
2310
2311 static int wps_process_mac_addr(struct wps_data *wps, const u8 *mac_addr)
2312 {
2313         if (mac_addr == NULL) {
2314                 wpa_printf(MSG_DEBUG, "WPS: No MAC Address received");
2315                 return -1;
2316         }
2317
2318         wpa_printf(MSG_DEBUG, "WPS: Enrollee MAC Address " MACSTR,
2319                    MAC2STR(mac_addr));
2320         os_memcpy(wps->mac_addr_e, mac_addr, ETH_ALEN);
2321         os_memcpy(wps->peer_dev.mac_addr, mac_addr, ETH_ALEN);
2322
2323         return 0;
2324 }
2325
2326
2327 static int wps_process_pubkey(struct wps_data *wps, const u8 *pk,
2328                               size_t pk_len)
2329 {
2330         if (pk == NULL || pk_len == 0) {
2331                 wpa_printf(MSG_DEBUG, "WPS: No Public Key received");
2332                 return -1;
2333         }
2334
2335         wpabuf_free(wps->dh_pubkey_e);
2336         wps->dh_pubkey_e = wpabuf_alloc_copy(pk, pk_len);
2337         if (wps->dh_pubkey_e == NULL)
2338                 return -1;
2339
2340         return 0;
2341 }
2342
2343
2344 static int wps_process_auth_type_flags(struct wps_data *wps, const u8 *auth)
2345 {
2346         u16 auth_types;
2347
2348         if (auth == NULL) {
2349                 wpa_printf(MSG_DEBUG, "WPS: No Authentication Type flags "
2350                            "received");
2351                 return -1;
2352         }
2353
2354         auth_types = WPA_GET_BE16(auth);
2355
2356         wpa_printf(MSG_DEBUG, "WPS: Enrollee Authentication Type flags 0x%x",
2357                    auth_types);
2358 #ifdef WPS_WORKAROUNDS
2359         /*
2360          * Some deployed implementations seem to advertise incorrect information
2361          * in this attribute. A value of 0x1b (WPA2 + WPA + WPAPSK + OPEN, but
2362          * no WPA2PSK) has been reported to be used. Add WPA2PSK to the list to
2363          * avoid issues with building Credentials that do not use the strongest
2364          * actually supported authentication option (that device does support
2365          * WPA2PSK even when it does not claim it here).
2366          */
2367         if ((auth_types &
2368              (WPS_AUTH_WPA2 | WPS_AUTH_WPA2PSK | WPS_AUTH_WPAPSK)) ==
2369             (WPS_AUTH_WPA2 | WPS_AUTH_WPAPSK)) {
2370                 wpa_printf(MSG_DEBUG,
2371                            "WPS: Workaround - assume Enrollee supports WPA2PSK based on claimed WPA2 support");
2372                 auth_types |= WPS_AUTH_WPA2PSK;
2373         }
2374 #endif /* WPS_WORKAROUNDS */
2375         wps->auth_type = wps->wps->auth_types & auth_types;
2376         if (wps->auth_type == 0) {
2377                 wpa_printf(MSG_DEBUG, "WPS: No match in supported "
2378                            "authentication types (own 0x%x Enrollee 0x%x)",
2379                            wps->wps->auth_types, auth_types);
2380 #ifdef WPS_WORKAROUNDS
2381                 /*
2382                  * Some deployed implementations seem to advertise incorrect
2383                  * information in this attribute. For example, Linksys WRT350N
2384                  * seems to have a byteorder bug that breaks this negotiation.
2385                  * In order to interoperate with existing implementations,
2386                  * assume that the Enrollee supports everything we do.
2387                  */
2388                 wpa_printf(MSG_DEBUG, "WPS: Workaround - assume Enrollee "
2389                            "does not advertise supported authentication types "
2390                            "correctly");
2391                 wps->auth_type = wps->wps->auth_types;
2392 #else /* WPS_WORKAROUNDS */
2393                 return -1;
2394 #endif /* WPS_WORKAROUNDS */
2395         }
2396
2397         return 0;
2398 }
2399
2400
2401 static int wps_process_encr_type_flags(struct wps_data *wps, const u8 *encr)
2402 {
2403         u16 encr_types;
2404
2405         if (encr == NULL) {
2406                 wpa_printf(MSG_DEBUG, "WPS: No Encryption Type flags "
2407                            "received");
2408                 return -1;
2409         }
2410
2411         encr_types = WPA_GET_BE16(encr);
2412
2413         wpa_printf(MSG_DEBUG, "WPS: Enrollee Encryption Type flags 0x%x",
2414                    encr_types);
2415         wps->encr_type = wps->wps->encr_types & encr_types;
2416         if (wps->encr_type == 0) {
2417                 wpa_printf(MSG_DEBUG, "WPS: No match in supported "
2418                            "encryption types (own 0x%x Enrollee 0x%x)",
2419                            wps->wps->encr_types, encr_types);
2420 #ifdef WPS_WORKAROUNDS
2421                 /*
2422                  * Some deployed implementations seem to advertise incorrect
2423                  * information in this attribute. For example, Linksys WRT350N
2424                  * seems to have a byteorder bug that breaks this negotiation.
2425                  * In order to interoperate with existing implementations,
2426                  * assume that the Enrollee supports everything we do.
2427                  */
2428                 wpa_printf(MSG_DEBUG, "WPS: Workaround - assume Enrollee "
2429                            "does not advertise supported encryption types "
2430                            "correctly");
2431                 wps->encr_type = wps->wps->encr_types;
2432 #else /* WPS_WORKAROUNDS */
2433                 return -1;
2434 #endif /* WPS_WORKAROUNDS */
2435         }
2436
2437         return 0;
2438 }
2439
2440
2441 static int wps_process_conn_type_flags(struct wps_data *wps, const u8 *conn)
2442 {
2443         if (conn == NULL) {
2444                 wpa_printf(MSG_DEBUG, "WPS: No Connection Type flags "
2445                            "received");
2446                 return -1;
2447         }
2448
2449         wpa_printf(MSG_DEBUG, "WPS: Enrollee Connection Type flags 0x%x",
2450                    *conn);
2451
2452         return 0;
2453 }
2454
2455
2456 static int wps_process_config_methods(struct wps_data *wps, const u8 *methods)
2457 {
2458         u16 m;
2459
2460         if (methods == NULL) {
2461                 wpa_printf(MSG_DEBUG, "WPS: No Config Methods received");
2462                 return -1;
2463         }
2464
2465         m = WPA_GET_BE16(methods);
2466
2467         wpa_printf(MSG_DEBUG, "WPS: Enrollee Config Methods 0x%x"
2468                    "%s%s%s%s%s%s%s%s%s", m,
2469                    m & WPS_CONFIG_USBA ? " [USBA]" : "",
2470                    m & WPS_CONFIG_ETHERNET ? " [Ethernet]" : "",
2471                    m & WPS_CONFIG_LABEL ? " [Label]" : "",
2472                    m & WPS_CONFIG_DISPLAY ? " [Display]" : "",
2473                    m & WPS_CONFIG_EXT_NFC_TOKEN ? " [Ext NFC Token]" : "",
2474                    m & WPS_CONFIG_INT_NFC_TOKEN ? " [Int NFC Token]" : "",
2475                    m & WPS_CONFIG_NFC_INTERFACE ? " [NFC]" : "",
2476                    m & WPS_CONFIG_PUSHBUTTON ? " [PBC]" : "",
2477                    m & WPS_CONFIG_KEYPAD ? " [Keypad]" : "");
2478
2479         if (!(m & WPS_CONFIG_DISPLAY) && !wps->use_psk_key) {
2480                 /*
2481                  * The Enrollee does not have a display so it is unlikely to be
2482                  * able to show the passphrase to a user and as such, could
2483                  * benefit from receiving PSK to reduce key derivation time.
2484                  */
2485                 wpa_printf(MSG_DEBUG, "WPS: Prefer PSK format key due to "
2486                            "Enrollee not supporting display");
2487                 wps->use_psk_key = 1;
2488         }
2489
2490         return 0;
2491 }
2492
2493
2494 static int wps_process_wps_state(struct wps_data *wps, const u8 *state)
2495 {
2496         if (state == NULL) {
2497                 wpa_printf(MSG_DEBUG, "WPS: No Wi-Fi Protected Setup State "
2498                            "received");
2499                 return -1;
2500         }
2501
2502         wpa_printf(MSG_DEBUG, "WPS: Enrollee Wi-Fi Protected Setup State %d",
2503                    *state);
2504
2505         return 0;
2506 }
2507
2508
2509 static int wps_process_assoc_state(struct wps_data *wps, const u8 *assoc)
2510 {
2511         u16 a;
2512
2513         if (assoc == NULL) {
2514                 wpa_printf(MSG_DEBUG, "WPS: No Association State received");
2515                 return -1;
2516         }
2517
2518         a = WPA_GET_BE16(assoc);
2519         wpa_printf(MSG_DEBUG, "WPS: Enrollee Association State %d", a);
2520
2521         return 0;
2522 }
2523
2524
2525 static int wps_process_config_error(struct wps_data *wps, const u8 *err)
2526 {
2527         u16 e;
2528
2529         if (err == NULL) {
2530                 wpa_printf(MSG_DEBUG, "WPS: No Configuration Error received");
2531                 return -1;
2532         }
2533
2534         e = WPA_GET_BE16(err);
2535         wpa_printf(MSG_DEBUG, "WPS: Enrollee Configuration Error %d", e);
2536
2537         return 0;
2538 }
2539
2540
2541 static int wps_registrar_p2p_dev_addr_match(struct wps_data *wps)
2542 {
2543 #ifdef CONFIG_P2P
2544         struct wps_registrar *reg = wps->wps->registrar;
2545
2546         if (is_zero_ether_addr(reg->p2p_dev_addr))
2547                 return 1; /* no filtering in use */
2548
2549         if (os_memcmp(reg->p2p_dev_addr, wps->p2p_dev_addr, ETH_ALEN) != 0) {
2550                 wpa_printf(MSG_DEBUG, "WPS: No match on P2P Device Address "
2551                            "filtering for PBC: expected " MACSTR " was "
2552                            MACSTR " - indicate PBC session overlap",
2553                            MAC2STR(reg->p2p_dev_addr),
2554                            MAC2STR(wps->p2p_dev_addr));
2555                 return 0;
2556         }
2557 #endif /* CONFIG_P2P */
2558         return 1;
2559 }
2560
2561
2562 static int wps_registrar_skip_overlap(struct wps_data *wps)
2563 {
2564 #ifdef CONFIG_P2P
2565         struct wps_registrar *reg = wps->wps->registrar;
2566
2567         if (is_zero_ether_addr(reg->p2p_dev_addr))
2568                 return 0; /* no specific Enrollee selected */
2569
2570         if (os_memcmp(reg->p2p_dev_addr, wps->p2p_dev_addr, ETH_ALEN) == 0) {
2571                 wpa_printf(MSG_DEBUG, "WPS: Skip PBC overlap due to selected "
2572                            "Enrollee match");
2573                 return 1;
2574         }
2575 #endif /* CONFIG_P2P */
2576         return 0;
2577 }
2578
2579
2580 static enum wps_process_res wps_process_m1(struct wps_data *wps,
2581                                            struct wps_parse_attr *attr)
2582 {
2583         wpa_printf(MSG_DEBUG, "WPS: Received M1");
2584
2585         if (wps->state != RECV_M1) {
2586                 wpa_printf(MSG_DEBUG, "WPS: Unexpected state (%d) for "
2587                            "receiving M1", wps->state);
2588                 return WPS_FAILURE;
2589         }
2590
2591         if (wps_process_uuid_e(wps, attr->uuid_e) ||
2592             wps_process_mac_addr(wps, attr->mac_addr) ||
2593             wps_process_enrollee_nonce(wps, attr->enrollee_nonce) ||
2594             wps_process_pubkey(wps, attr->public_key, attr->public_key_len) ||
2595             wps_process_auth_type_flags(wps, attr->auth_type_flags) ||
2596             wps_process_encr_type_flags(wps, attr->encr_type_flags) ||
2597             wps_process_conn_type_flags(wps, attr->conn_type_flags) ||
2598             wps_process_config_methods(wps, attr->config_methods) ||
2599             wps_process_wps_state(wps, attr->wps_state) ||
2600             wps_process_device_attrs(&wps->peer_dev, attr) ||
2601             wps_process_rf_bands(&wps->peer_dev, attr->rf_bands) ||
2602             wps_process_assoc_state(wps, attr->assoc_state) ||
2603             wps_process_dev_password_id(wps, attr->dev_password_id) ||
2604             wps_process_config_error(wps, attr->config_error) ||
2605             wps_process_os_version(&wps->peer_dev, attr->os_version))
2606                 return WPS_FAILURE;
2607
2608         if (wps->dev_pw_id < 0x10 &&
2609             wps->dev_pw_id != DEV_PW_DEFAULT &&
2610             wps->dev_pw_id != DEV_PW_P2PS_DEFAULT &&
2611             wps->dev_pw_id != DEV_PW_USER_SPECIFIED &&
2612             wps->dev_pw_id != DEV_PW_MACHINE_SPECIFIED &&
2613             wps->dev_pw_id != DEV_PW_REGISTRAR_SPECIFIED &&
2614 #ifdef CONFIG_WPS_NFC
2615             wps->dev_pw_id != DEV_PW_NFC_CONNECTION_HANDOVER &&
2616 #endif /* CONFIG_WPS_NFC */
2617             (wps->dev_pw_id != DEV_PW_PUSHBUTTON ||
2618              !wps->wps->registrar->pbc)) {
2619                 wpa_printf(MSG_DEBUG, "WPS: Unsupported Device Password ID %d",
2620                            wps->dev_pw_id);
2621                 wps->state = SEND_M2D;
2622                 return WPS_CONTINUE;
2623         }
2624
2625 #ifdef CONFIG_WPS_NFC
2626         if (wps->dev_pw_id >= 0x10 ||
2627             wps->dev_pw_id == DEV_PW_NFC_CONNECTION_HANDOVER) {
2628                 struct wps_nfc_pw_token *token;
2629                 const u8 *addr[1];
2630                 u8 hash[WPS_HASH_LEN];
2631
2632                 wpa_printf(MSG_DEBUG, "WPS: Searching for NFC token match for id=%d (ctx %p registrar %p)",
2633                            wps->dev_pw_id, wps->wps, wps->wps->registrar);
2634                 token = wps_get_nfc_pw_token(
2635                         &wps->wps->registrar->nfc_pw_tokens, wps->dev_pw_id);
2636                 if (token && token->peer_pk_hash_known) {
2637                         size_t len;
2638
2639                         wpa_printf(MSG_DEBUG, "WPS: Found matching NFC "
2640                                    "Password Token");
2641                         dl_list_del(&token->list);
2642                         wps->nfc_pw_token = token;
2643
2644                         addr[0] = attr->public_key;
2645                         len = attr->public_key_len;
2646                         sha256_vector(1, addr, &len, hash);
2647                         if (os_memcmp_const(hash,
2648                                             wps->nfc_pw_token->pubkey_hash,
2649                                             WPS_OOB_PUBKEY_HASH_LEN) != 0) {
2650                                 wpa_printf(MSG_ERROR, "WPS: Public Key hash "
2651                                            "mismatch");
2652                                 wps->state = SEND_M2D;
2653                                 wps->config_error =
2654                                         WPS_CFG_PUBLIC_KEY_HASH_MISMATCH;
2655                                 return WPS_CONTINUE;
2656                         }
2657                 } else if (token) {
2658                         wpa_printf(MSG_DEBUG, "WPS: Found matching NFC "
2659                                    "Password Token (no peer PK hash)");
2660                         wps->nfc_pw_token = token;
2661                 } else if (wps->dev_pw_id >= 0x10 &&
2662                            wps->wps->ap_nfc_dev_pw_id == wps->dev_pw_id &&
2663                            wps->wps->ap_nfc_dev_pw) {
2664                         wpa_printf(MSG_DEBUG, "WPS: Found match with own NFC Password Token");
2665                 }
2666         }
2667 #endif /* CONFIG_WPS_NFC */
2668
2669         if (wps->dev_pw_id == DEV_PW_PUSHBUTTON) {
2670                 if ((wps->wps->registrar->force_pbc_overlap ||
2671                      wps_registrar_pbc_overlap(wps->wps->registrar,
2672                                                wps->mac_addr_e, wps->uuid_e) ||
2673                      !wps_registrar_p2p_dev_addr_match(wps)) &&
2674                     !wps_registrar_skip_overlap(wps)) {
2675                         wpa_printf(MSG_DEBUG, "WPS: PBC overlap - deny PBC "
2676                                    "negotiation");
2677                         wps->state = SEND_M2D;
2678                         wps->config_error = WPS_CFG_MULTIPLE_PBC_DETECTED;
2679                         wps_pbc_overlap_event(wps->wps);
2680                         wps_fail_event(wps->wps, WPS_M1,
2681                                        WPS_CFG_MULTIPLE_PBC_DETECTED,
2682                                        WPS_EI_NO_ERROR, wps->mac_addr_e);
2683                         wps->wps->registrar->force_pbc_overlap = 1;
2684                         return WPS_CONTINUE;
2685                 }
2686                 wps_registrar_add_pbc_session(wps->wps->registrar,
2687                                               wps->mac_addr_e, wps->uuid_e);
2688                 wps->pbc = 1;
2689         }
2690
2691 #ifdef WPS_WORKAROUNDS
2692         /*
2693          * It looks like Mac OS X 10.6.3 and 10.6.4 do not like Network Key in
2694          * passphrase format. To avoid interop issues, force PSK format to be
2695          * used.
2696          */
2697         if (!wps->use_psk_key &&
2698             wps->peer_dev.manufacturer &&
2699             os_strncmp(wps->peer_dev.manufacturer, "Apple ", 6) == 0 &&
2700             wps->peer_dev.model_name &&
2701             os_strcmp(wps->peer_dev.model_name, "AirPort") == 0) {
2702                 wpa_printf(MSG_DEBUG, "WPS: Workaround - Force Network Key in "
2703                            "PSK format");
2704                 wps->use_psk_key = 1;
2705         }
2706 #endif /* WPS_WORKAROUNDS */
2707
2708         wps->state = SEND_M2;
2709         return WPS_CONTINUE;
2710 }
2711
2712
2713 static enum wps_process_res wps_process_m3(struct wps_data *wps,
2714                                            const struct wpabuf *msg,
2715                                            struct wps_parse_attr *attr)
2716 {
2717         wpa_printf(MSG_DEBUG, "WPS: Received M3");
2718
2719         if (wps->state != RECV_M3) {
2720                 wpa_printf(MSG_DEBUG, "WPS: Unexpected state (%d) for "
2721                            "receiving M3", wps->state);
2722                 wps->state = SEND_WSC_NACK;
2723                 return WPS_CONTINUE;
2724         }
2725
2726         if (wps->pbc && wps->wps->registrar->force_pbc_overlap &&
2727             !wps_registrar_skip_overlap(wps)) {
2728                 wpa_printf(MSG_DEBUG, "WPS: Reject negotiation due to PBC "
2729                            "session overlap");
2730                 wps->state = SEND_WSC_NACK;
2731                 wps->config_error = WPS_CFG_MULTIPLE_PBC_DETECTED;
2732                 return WPS_CONTINUE;
2733         }
2734
2735         if (wps_process_registrar_nonce(wps, attr->registrar_nonce) ||
2736             wps_process_authenticator(wps, attr->authenticator, msg) ||
2737             wps_process_e_hash1(wps, attr->e_hash1) ||
2738             wps_process_e_hash2(wps, attr->e_hash2)) {
2739                 wps->state = SEND_WSC_NACK;
2740                 return WPS_CONTINUE;
2741         }
2742
2743         wps->state = SEND_M4;
2744         return WPS_CONTINUE;
2745 }
2746
2747
2748 static enum wps_process_res wps_process_m5(struct wps_data *wps,
2749                                            const struct wpabuf *msg,
2750                                            struct wps_parse_attr *attr)
2751 {
2752         struct wpabuf *decrypted;
2753         struct wps_parse_attr eattr;
2754
2755         wpa_printf(MSG_DEBUG, "WPS: Received M5");
2756
2757         if (wps->state != RECV_M5) {
2758                 wpa_printf(MSG_DEBUG, "WPS: Unexpected state (%d) for "
2759                            "receiving M5", wps->state);
2760                 wps->state = SEND_WSC_NACK;
2761                 return WPS_CONTINUE;
2762         }
2763
2764         if (wps->pbc && wps->wps->registrar->force_pbc_overlap &&
2765             !wps_registrar_skip_overlap(wps)) {
2766                 wpa_printf(MSG_DEBUG, "WPS: Reject negotiation due to PBC "
2767                            "session overlap");
2768                 wps->state = SEND_WSC_NACK;
2769                 wps->config_error = WPS_CFG_MULTIPLE_PBC_DETECTED;
2770                 return WPS_CONTINUE;
2771         }
2772
2773         if (wps_process_registrar_nonce(wps, attr->registrar_nonce) ||
2774             wps_process_authenticator(wps, attr->authenticator, msg)) {
2775                 wps->state = SEND_WSC_NACK;
2776                 return WPS_CONTINUE;
2777         }
2778
2779         decrypted = wps_decrypt_encr_settings(wps, attr->encr_settings,
2780                                               attr->encr_settings_len);
2781         if (decrypted == NULL) {
2782                 wpa_printf(MSG_DEBUG, "WPS: Failed to decrypted Encrypted "
2783                            "Settings attribute");
2784                 wps->state = SEND_WSC_NACK;
2785                 return WPS_CONTINUE;
2786         }
2787
2788         if (wps_validate_m5_encr(decrypted, attr->version2 != NULL) < 0) {
2789                 wpabuf_clear_free(decrypted);
2790                 wps->state = SEND_WSC_NACK;
2791                 return WPS_CONTINUE;
2792         }
2793
2794         wpa_printf(MSG_DEBUG, "WPS: Processing decrypted Encrypted Settings "
2795                    "attribute");
2796         if (wps_parse_msg(decrypted, &eattr) < 0 ||
2797             wps_process_key_wrap_auth(wps, decrypted, eattr.key_wrap_auth) ||
2798             wps_process_e_snonce1(wps, eattr.e_snonce1)) {
2799                 wpabuf_clear_free(decrypted);
2800                 wps->state = SEND_WSC_NACK;
2801                 return WPS_CONTINUE;
2802         }
2803         wpabuf_clear_free(decrypted);
2804
2805         wps->state = SEND_M6;
2806         return WPS_CONTINUE;
2807 }
2808
2809
2810 static void wps_sta_cred_cb(struct wps_data *wps)
2811 {
2812         /*
2813          * Update credential to only include a single authentication and
2814          * encryption type in case the AP configuration includes more than one
2815          * option.
2816          */
2817         if (wps->cred.auth_type & WPS_AUTH_WPA2PSK)
2818                 wps->cred.auth_type = WPS_AUTH_WPA2PSK;
2819         else if (wps->cred.auth_type & WPS_AUTH_WPAPSK)
2820                 wps->cred.auth_type = WPS_AUTH_WPAPSK;
2821         if (wps->cred.encr_type & WPS_ENCR_AES)
2822                 wps->cred.encr_type = WPS_ENCR_AES;
2823         else if (wps->cred.encr_type & WPS_ENCR_TKIP)
2824                 wps->cred.encr_type = WPS_ENCR_TKIP;
2825         wpa_printf(MSG_DEBUG, "WPS: Update local configuration based on the "
2826                    "AP configuration");
2827         if (wps->wps->cred_cb)
2828                 wps->wps->cred_cb(wps->wps->cb_ctx, &wps->cred);
2829 }
2830
2831
2832 static void wps_cred_update(struct wps_credential *dst,
2833                             struct wps_credential *src)
2834 {
2835         os_memcpy(dst->ssid, src->ssid, sizeof(dst->ssid));
2836         dst->ssid_len = src->ssid_len;
2837         dst->auth_type = src->auth_type;
2838         dst->encr_type = src->encr_type;
2839         dst->key_idx = src->key_idx;
2840         os_memcpy(dst->key, src->key, sizeof(dst->key));
2841         dst->key_len = src->key_len;
2842 }
2843
2844
2845 static int wps_process_ap_settings_r(struct wps_data *wps,
2846                                      struct wps_parse_attr *attr)
2847 {
2848         struct wpabuf *msg;
2849
2850         if (wps->wps->ap || wps->er)
2851                 return 0;
2852
2853         /* AP Settings Attributes in M7 when Enrollee is an AP */
2854         if (wps_process_ap_settings(attr, &wps->cred) < 0)
2855                 return -1;
2856
2857         wpa_printf(MSG_INFO, "WPS: Received old AP configuration from AP");
2858
2859         if (wps->new_ap_settings) {
2860                 wpa_printf(MSG_INFO, "WPS: Update AP configuration based on "
2861                            "new settings");
2862                 wps_cred_update(&wps->cred, wps->new_ap_settings);
2863                 return 0;
2864         } else {
2865                 /*
2866                  * Use the AP PIN only to receive the current AP settings, not
2867                  * to reconfigure the AP.
2868                  */
2869
2870                 /*
2871                  * Clear selected registrar here since we do not get to
2872                  * WSC_Done in this protocol run.
2873                  */
2874                 wps_registrar_pin_completed(wps->wps->registrar);
2875
2876                 msg = wps_build_ap_cred(wps);
2877                 if (msg == NULL)
2878                         return -1;
2879                 wps->cred.cred_attr = wpabuf_head(msg);
2880                 wps->cred.cred_attr_len = wpabuf_len(msg);
2881
2882                 if (wps->ap_settings_cb) {
2883                         wps->ap_settings_cb(wps->ap_settings_cb_ctx,
2884                                             &wps->cred);
2885                         wpabuf_free(msg);
2886                         return 1;
2887                 }
2888                 wps_sta_cred_cb(wps);
2889
2890                 wps->cred.cred_attr = NULL;
2891                 wps->cred.cred_attr_len = 0;
2892                 wpabuf_free(msg);
2893
2894                 return 1;
2895         }
2896 }
2897
2898
2899 static enum wps_process_res wps_process_m7(struct wps_data *wps,
2900                                            const struct wpabuf *msg,
2901                                            struct wps_parse_attr *attr)
2902 {
2903         struct wpabuf *decrypted;
2904         struct wps_parse_attr eattr;
2905
2906         wpa_printf(MSG_DEBUG, "WPS: Received M7");
2907
2908         if (wps->state != RECV_M7) {
2909                 wpa_printf(MSG_DEBUG, "WPS: Unexpected state (%d) for "
2910                            "receiving M7", wps->state);
2911                 wps->state = SEND_WSC_NACK;
2912                 return WPS_CONTINUE;
2913         }
2914
2915         if (wps->pbc && wps->wps->registrar->force_pbc_overlap &&
2916             !wps_registrar_skip_overlap(wps)) {
2917                 wpa_printf(MSG_DEBUG, "WPS: Reject negotiation due to PBC "
2918                            "session overlap");
2919                 wps->state = SEND_WSC_NACK;
2920                 wps->config_error = WPS_CFG_MULTIPLE_PBC_DETECTED;
2921                 return WPS_CONTINUE;
2922         }
2923
2924         if (wps_process_registrar_nonce(wps, attr->registrar_nonce) ||
2925             wps_process_authenticator(wps, attr->authenticator, msg)) {
2926                 wps->state = SEND_WSC_NACK;
2927                 return WPS_CONTINUE;
2928         }
2929
2930         decrypted = wps_decrypt_encr_settings(wps, attr->encr_settings,
2931                                               attr->encr_settings_len);
2932         if (decrypted == NULL) {
2933                 wpa_printf(MSG_DEBUG, "WPS: Failed to decrypt Encrypted "
2934                            "Settings attribute");
2935                 wps->state = SEND_WSC_NACK;
2936                 return WPS_CONTINUE;
2937         }
2938
2939         if (wps_validate_m7_encr(decrypted, wps->wps->ap || wps->er,
2940                                  attr->version2 != NULL) < 0) {
2941                 wpabuf_clear_free(decrypted);
2942                 wps->state = SEND_WSC_NACK;
2943                 return WPS_CONTINUE;
2944         }
2945
2946         wpa_printf(MSG_DEBUG, "WPS: Processing decrypted Encrypted Settings "
2947                    "attribute");
2948         if (wps_parse_msg(decrypted, &eattr) < 0 ||
2949             wps_process_key_wrap_auth(wps, decrypted, eattr.key_wrap_auth) ||
2950             wps_process_e_snonce2(wps, eattr.e_snonce2) ||
2951             wps_process_ap_settings_r(wps, &eattr)) {
2952                 wpabuf_clear_free(decrypted);
2953                 wps->state = SEND_WSC_NACK;
2954                 return WPS_CONTINUE;
2955         }
2956
2957         wpabuf_clear_free(decrypted);
2958
2959         wps->state = SEND_M8;
2960         return WPS_CONTINUE;
2961 }
2962
2963
2964 static enum wps_process_res wps_process_wsc_msg(struct wps_data *wps,
2965                                                 const struct wpabuf *msg)
2966 {
2967         struct wps_parse_attr attr;
2968         enum wps_process_res ret = WPS_CONTINUE;
2969
2970         wpa_printf(MSG_DEBUG, "WPS: Received WSC_MSG");
2971
2972         if (wps_parse_msg(msg, &attr) < 0)
2973                 return WPS_FAILURE;
2974
2975         if (attr.msg_type == NULL) {
2976                 wpa_printf(MSG_DEBUG, "WPS: No Message Type attribute");
2977                 wps->state = SEND_WSC_NACK;
2978                 return WPS_CONTINUE;
2979         }
2980
2981         if (*attr.msg_type != WPS_M1 &&
2982             (attr.registrar_nonce == NULL ||
2983              os_memcmp(wps->nonce_r, attr.registrar_nonce,
2984                        WPS_NONCE_LEN) != 0)) {
2985                 wpa_printf(MSG_DEBUG, "WPS: Mismatch in registrar nonce");
2986                 return WPS_FAILURE;
2987         }
2988
2989         switch (*attr.msg_type) {
2990         case WPS_M1:
2991                 if (wps_validate_m1(msg) < 0)
2992                         return WPS_FAILURE;
2993 #ifdef CONFIG_WPS_UPNP
2994                 if (wps->wps->wps_upnp && attr.mac_addr) {
2995                         /* Remove old pending messages when starting new run */
2996                         wps_free_pending_msgs(wps->wps->upnp_msgs);
2997                         wps->wps->upnp_msgs = NULL;
2998
2999                         upnp_wps_device_send_wlan_event(
3000                                 wps->wps->wps_upnp, attr.mac_addr,
3001                                 UPNP_WPS_WLANEVENT_TYPE_EAP, msg);
3002                 }
3003 #endif /* CONFIG_WPS_UPNP */
3004                 ret = wps_process_m1(wps, &attr);
3005                 break;
3006         case WPS_M3:
3007                 if (wps_validate_m3(msg) < 0)
3008                         return WPS_FAILURE;
3009                 ret = wps_process_m3(wps, msg, &attr);
3010                 if (ret == WPS_FAILURE || wps->state == SEND_WSC_NACK)
3011                         wps_fail_event(wps->wps, WPS_M3, wps->config_error,
3012                                        wps->error_indication, wps->mac_addr_e);
3013                 break;
3014         case WPS_M5:
3015                 if (wps_validate_m5(msg) < 0)
3016                         return WPS_FAILURE;
3017                 ret = wps_process_m5(wps, msg, &attr);
3018                 if (ret == WPS_FAILURE || wps->state == SEND_WSC_NACK)
3019                         wps_fail_event(wps->wps, WPS_M5, wps->config_error,
3020                                        wps->error_indication, wps->mac_addr_e);
3021                 break;
3022         case WPS_M7:
3023                 if (wps_validate_m7(msg) < 0)
3024                         return WPS_FAILURE;
3025                 ret = wps_process_m7(wps, msg, &attr);
3026                 if (ret == WPS_FAILURE || wps->state == SEND_WSC_NACK)
3027                         wps_fail_event(wps->wps, WPS_M7, wps->config_error,
3028                                        wps->error_indication, wps->mac_addr_e);
3029                 break;
3030         default:
3031                 wpa_printf(MSG_DEBUG, "WPS: Unsupported Message Type %d",
3032                            *attr.msg_type);
3033                 return WPS_FAILURE;
3034         }
3035
3036         if (ret == WPS_CONTINUE) {
3037                 /* Save a copy of the last message for Authenticator derivation
3038                  */
3039                 wpabuf_free(wps->last_msg);
3040                 wps->last_msg = wpabuf_dup(msg);
3041         }
3042
3043         return ret;
3044 }
3045
3046
3047 static enum wps_process_res wps_process_wsc_ack(struct wps_data *wps,
3048                                                 const struct wpabuf *msg)
3049 {
3050         struct wps_parse_attr attr;
3051
3052         wpa_printf(MSG_DEBUG, "WPS: Received WSC_ACK");
3053
3054         if (wps_parse_msg(msg, &attr) < 0)
3055                 return WPS_FAILURE;
3056
3057         if (attr.msg_type == NULL) {
3058                 wpa_printf(MSG_DEBUG, "WPS: No Message Type attribute");
3059                 return WPS_FAILURE;
3060         }
3061
3062         if (*attr.msg_type != WPS_WSC_ACK) {
3063                 wpa_printf(MSG_DEBUG, "WPS: Invalid Message Type %d",
3064                            *attr.msg_type);
3065                 return WPS_FAILURE;
3066         }
3067
3068 #ifdef CONFIG_WPS_UPNP
3069         if (wps->wps->wps_upnp && wps->ext_reg && wps->state == RECV_M2D_ACK &&
3070             upnp_wps_subscribers(wps->wps->wps_upnp)) {
3071                 if (wps->wps->upnp_msgs)
3072                         return WPS_CONTINUE;
3073                 wpa_printf(MSG_DEBUG, "WPS: Wait for response from an "
3074                            "external Registrar");
3075                 return WPS_PENDING;
3076         }
3077 #endif /* CONFIG_WPS_UPNP */
3078
3079         if (attr.registrar_nonce == NULL ||
3080             os_memcmp(wps->nonce_r, attr.registrar_nonce, WPS_NONCE_LEN) != 0)
3081         {
3082                 wpa_printf(MSG_DEBUG, "WPS: Mismatch in registrar nonce");
3083                 return WPS_FAILURE;
3084         }
3085
3086         if (attr.enrollee_nonce == NULL ||
3087             os_memcmp(wps->nonce_e, attr.enrollee_nonce, WPS_NONCE_LEN) != 0) {
3088                 wpa_printf(MSG_DEBUG, "WPS: Mismatch in enrollee nonce");
3089                 return WPS_FAILURE;
3090         }
3091
3092         if (wps->state == RECV_M2D_ACK) {
3093 #ifdef CONFIG_WPS_UPNP
3094                 if (wps->wps->wps_upnp &&
3095                     upnp_wps_subscribers(wps->wps->wps_upnp)) {
3096                         if (wps->wps->upnp_msgs)
3097                                 return WPS_CONTINUE;
3098                         if (wps->ext_reg == 0)
3099                                 wps->ext_reg = 1;
3100                         wpa_printf(MSG_DEBUG, "WPS: Wait for response from an "
3101                                    "external Registrar");
3102                         return WPS_PENDING;
3103                 }
3104 #endif /* CONFIG_WPS_UPNP */
3105
3106                 wpa_printf(MSG_DEBUG, "WPS: No more registrars available - "
3107                            "terminate negotiation");
3108         }
3109
3110         return WPS_FAILURE;
3111 }
3112
3113
3114 static enum wps_process_res wps_process_wsc_nack(struct wps_data *wps,
3115                                                  const struct wpabuf *msg)
3116 {
3117         struct wps_parse_attr attr;
3118         int old_state;
3119         u16 config_error;
3120
3121         wpa_printf(MSG_DEBUG, "WPS: Received WSC_NACK");
3122
3123         old_state = wps->state;
3124         wps->state = SEND_WSC_NACK;
3125
3126         if (wps_parse_msg(msg, &attr) < 0)
3127                 return WPS_FAILURE;
3128
3129         if (attr.msg_type == NULL) {
3130                 wpa_printf(MSG_DEBUG, "WPS: No Message Type attribute");
3131                 return WPS_FAILURE;
3132         }
3133
3134         if (*attr.msg_type != WPS_WSC_NACK) {
3135                 wpa_printf(MSG_DEBUG, "WPS: Invalid Message Type %d",
3136                            *attr.msg_type);
3137                 return WPS_FAILURE;
3138         }
3139
3140 #ifdef CONFIG_WPS_UPNP
3141         if (wps->wps->wps_upnp && wps->ext_reg) {
3142                 wpa_printf(MSG_DEBUG, "WPS: Negotiation using external "
3143                            "Registrar terminated by the Enrollee");
3144                 return WPS_FAILURE;
3145         }
3146 #endif /* CONFIG_WPS_UPNP */
3147
3148         if (attr.registrar_nonce == NULL ||
3149             os_memcmp(wps->nonce_r, attr.registrar_nonce, WPS_NONCE_LEN) != 0)
3150         {
3151                 wpa_printf(MSG_DEBUG, "WPS: Mismatch in registrar nonce");
3152                 return WPS_FAILURE;
3153         }
3154
3155         if (attr.enrollee_nonce == NULL ||
3156             os_memcmp(wps->nonce_e, attr.enrollee_nonce, WPS_NONCE_LEN) != 0) {
3157                 wpa_printf(MSG_DEBUG, "WPS: Mismatch in enrollee nonce");
3158                 return WPS_FAILURE;
3159         }
3160
3161         if (attr.config_error == NULL) {
3162                 wpa_printf(MSG_DEBUG, "WPS: No Configuration Error attribute "
3163                            "in WSC_NACK");
3164                 return WPS_FAILURE;
3165         }
3166
3167         config_error = WPA_GET_BE16(attr.config_error);
3168         wpa_printf(MSG_DEBUG, "WPS: Enrollee terminated negotiation with "
3169                    "Configuration Error %d", config_error);
3170
3171         switch (old_state) {
3172         case RECV_M3:
3173                 wps_fail_event(wps->wps, WPS_M2, config_error,
3174                                wps->error_indication, wps->mac_addr_e);
3175                 break;
3176         case RECV_M5:
3177                 wps_fail_event(wps->wps, WPS_M4, config_error,
3178                                wps->error_indication, wps->mac_addr_e);
3179                 break;
3180         case RECV_M7:
3181                 wps_fail_event(wps->wps, WPS_M6, config_error,
3182                                wps->error_indication, wps->mac_addr_e);
3183                 break;
3184         case RECV_DONE:
3185                 wps_fail_event(wps->wps, WPS_M8, config_error,
3186                                wps->error_indication, wps->mac_addr_e);
3187                 break;
3188         default:
3189                 break;
3190         }
3191
3192         return WPS_FAILURE;
3193 }
3194
3195
3196 static enum wps_process_res wps_process_wsc_done(struct wps_data *wps,
3197                                                  const struct wpabuf *msg)
3198 {
3199         struct wps_parse_attr attr;
3200
3201         wpa_printf(MSG_DEBUG, "WPS: Received WSC_Done");
3202
3203         if (wps->state != RECV_DONE &&
3204             (!wps->wps->wps_upnp || !wps->ext_reg)) {
3205                 wpa_printf(MSG_DEBUG, "WPS: Unexpected state (%d) for "
3206                            "receiving WSC_Done", wps->state);
3207                 return WPS_FAILURE;
3208         }
3209
3210         if (wps_parse_msg(msg, &attr) < 0)
3211                 return WPS_FAILURE;
3212
3213         if (attr.msg_type == NULL) {
3214                 wpa_printf(MSG_DEBUG, "WPS: No Message Type attribute");
3215                 return WPS_FAILURE;
3216         }
3217
3218         if (*attr.msg_type != WPS_WSC_DONE) {
3219                 wpa_printf(MSG_DEBUG, "WPS: Invalid Message Type %d",
3220                            *attr.msg_type);
3221                 return WPS_FAILURE;
3222         }
3223
3224 #ifdef CONFIG_WPS_UPNP
3225         if (wps->wps->wps_upnp && wps->ext_reg) {
3226                 wpa_printf(MSG_DEBUG, "WPS: Negotiation using external "
3227                            "Registrar completed successfully");
3228                 wps_device_store(wps->wps->registrar, &wps->peer_dev,
3229                                  wps->uuid_e);
3230                 return WPS_DONE;
3231         }
3232 #endif /* CONFIG_WPS_UPNP */
3233
3234         if (attr.registrar_nonce == NULL ||
3235             os_memcmp(wps->nonce_r, attr.registrar_nonce, WPS_NONCE_LEN) != 0)
3236         {
3237                 wpa_printf(MSG_DEBUG, "WPS: Mismatch in registrar nonce");
3238                 return WPS_FAILURE;
3239         }
3240
3241         if (attr.enrollee_nonce == NULL ||
3242             os_memcmp(wps->nonce_e, attr.enrollee_nonce, WPS_NONCE_LEN) != 0) {
3243                 wpa_printf(MSG_DEBUG, "WPS: Mismatch in enrollee nonce");
3244                 return WPS_FAILURE;
3245         }
3246
3247         wpa_printf(MSG_DEBUG, "WPS: Negotiation completed successfully");
3248         wps_device_store(wps->wps->registrar, &wps->peer_dev,
3249                          wps->uuid_e);
3250
3251         if (wps->wps->wps_state == WPS_STATE_NOT_CONFIGURED && wps->new_psk &&
3252             wps->wps->ap && !wps->wps->registrar->disable_auto_conf) {
3253                 struct wps_credential cred;
3254
3255                 wpa_printf(MSG_DEBUG, "WPS: Moving to Configured state based "
3256                            "on first Enrollee connection");
3257
3258                 os_memset(&cred, 0, sizeof(cred));
3259                 os_memcpy(cred.ssid, wps->wps->ssid, wps->wps->ssid_len);
3260                 cred.ssid_len = wps->wps->ssid_len;
3261                 if (wps->wps->rf_band_cb(wps->wps->cb_ctx) == WPS_RF_60GHZ) {
3262                         cred.auth_type = WPS_AUTH_WPA2PSK;
3263                         cred.encr_type = WPS_ENCR_AES;
3264                 } else {
3265                         cred.auth_type = WPS_AUTH_WPAPSK | WPS_AUTH_WPA2PSK;
3266                         cred.encr_type = WPS_ENCR_TKIP | WPS_ENCR_AES;
3267                 }
3268                 os_memcpy(cred.key, wps->new_psk, wps->new_psk_len);
3269                 cred.key_len = wps->new_psk_len;
3270
3271                 wps->wps->wps_state = WPS_STATE_CONFIGURED;
3272                 wpa_hexdump_ascii_key(MSG_DEBUG,
3273                                       "WPS: Generated random passphrase",
3274                                       wps->new_psk, wps->new_psk_len);
3275                 if (wps->wps->cred_cb)
3276                         wps->wps->cred_cb(wps->wps->cb_ctx, &cred);
3277
3278                 os_free(wps->new_psk);
3279                 wps->new_psk = NULL;
3280         }
3281
3282         if (!wps->wps->ap && !wps->er)
3283                 wps_sta_cred_cb(wps);
3284
3285         if (wps->new_psk) {
3286                 if (wps_cb_new_psk(wps->wps->registrar, wps->mac_addr_e,
3287                                    wps->p2p_dev_addr, wps->new_psk,
3288                                    wps->new_psk_len)) {
3289                         wpa_printf(MSG_DEBUG, "WPS: Failed to configure the "
3290                                    "new PSK");
3291                 }
3292                 os_free(wps->new_psk);
3293                 wps->new_psk = NULL;
3294         }
3295
3296         wps_cb_reg_success(wps->wps->registrar, wps->mac_addr_e, wps->uuid_e,
3297                            wps->dev_password, wps->dev_password_len);
3298
3299         if (wps->pbc) {
3300                 wps_registrar_remove_pbc_session(wps->wps->registrar,
3301                                                  wps->uuid_e,
3302                                                  wps->p2p_dev_addr);
3303                 wps_registrar_pbc_completed(wps->wps->registrar);
3304 #ifdef WPS_WORKAROUNDS
3305                 os_get_reltime(&wps->wps->registrar->pbc_ignore_start);
3306 #endif /* WPS_WORKAROUNDS */
3307                 os_memcpy(wps->wps->registrar->pbc_ignore_uuid, wps->uuid_e,
3308                           WPS_UUID_LEN);
3309         } else {
3310                 wps_registrar_pin_completed(wps->wps->registrar);
3311         }
3312         /* TODO: maintain AuthorizedMACs somewhere separately for each ER and
3313          * merge them into APs own list.. */
3314
3315         wps_success_event(wps->wps, wps->mac_addr_e);
3316
3317         return WPS_DONE;
3318 }
3319
3320
3321 enum wps_process_res wps_registrar_process_msg(struct wps_data *wps,
3322                                                enum wsc_op_code op_code,
3323                                                const struct wpabuf *msg)
3324 {
3325         enum wps_process_res ret;
3326
3327         wpa_printf(MSG_DEBUG, "WPS: Processing received message (len=%lu "
3328                    "op_code=%d)",
3329                    (unsigned long) wpabuf_len(msg), op_code);
3330
3331 #ifdef CONFIG_WPS_UPNP
3332         if (wps->wps->wps_upnp && op_code == WSC_MSG && wps->ext_reg == 1) {
3333                 struct wps_parse_attr attr;
3334                 if (wps_parse_msg(msg, &attr) == 0 && attr.msg_type &&
3335                     *attr.msg_type == WPS_M3)
3336                         wps->ext_reg = 2; /* past M2/M2D phase */
3337         }
3338         if (wps->ext_reg > 1)
3339                 wps_registrar_free_pending_m2(wps->wps);
3340         if (wps->wps->wps_upnp && wps->ext_reg &&
3341             wps->wps->upnp_msgs == NULL &&
3342             (op_code == WSC_MSG || op_code == WSC_Done || op_code == WSC_NACK))
3343         {
3344                 struct wps_parse_attr attr;
3345                 int type;
3346                 if (wps_parse_msg(msg, &attr) < 0 || attr.msg_type == NULL)
3347                         type = -1;
3348                 else
3349                         type = *attr.msg_type;
3350                 wpa_printf(MSG_DEBUG, "WPS: Sending received message (type %d)"
3351                            " to external Registrar for processing", type);
3352                 upnp_wps_device_send_wlan_event(wps->wps->wps_upnp,
3353                                                 wps->mac_addr_e,
3354                                                 UPNP_WPS_WLANEVENT_TYPE_EAP,
3355                                                 msg);
3356                 if (op_code == WSC_MSG)
3357                         return WPS_PENDING;
3358         } else if (wps->wps->wps_upnp && wps->ext_reg && op_code == WSC_MSG) {
3359                 wpa_printf(MSG_DEBUG, "WPS: Skip internal processing - using "
3360                            "external Registrar");
3361                 return WPS_CONTINUE;
3362         }
3363 #endif /* CONFIG_WPS_UPNP */
3364
3365         switch (op_code) {
3366         case WSC_MSG:
3367                 return wps_process_wsc_msg(wps, msg);
3368         case WSC_ACK:
3369                 if (wps_validate_wsc_ack(msg) < 0)
3370                         return WPS_FAILURE;
3371                 return wps_process_wsc_ack(wps, msg);
3372         case WSC_NACK:
3373                 if (wps_validate_wsc_nack(msg) < 0)
3374                         return WPS_FAILURE;
3375                 return wps_process_wsc_nack(wps, msg);
3376         case WSC_Done:
3377                 if (wps_validate_wsc_done(msg) < 0)
3378                         return WPS_FAILURE;
3379                 ret = wps_process_wsc_done(wps, msg);
3380                 if (ret == WPS_FAILURE) {
3381                         wps->state = SEND_WSC_NACK;
3382                         wps_fail_event(wps->wps, WPS_WSC_DONE,
3383                                        wps->config_error,
3384                                        wps->error_indication, wps->mac_addr_e);
3385                 }
3386                 return ret;
3387         default:
3388                 wpa_printf(MSG_DEBUG, "WPS: Unsupported op_code %d", op_code);
3389                 return WPS_FAILURE;
3390         }
3391 }
3392
3393
3394 int wps_registrar_update_ie(struct wps_registrar *reg)
3395 {
3396         return wps_set_ie(reg);
3397 }
3398
3399
3400 static void wps_registrar_set_selected_timeout(void *eloop_ctx,
3401                                                void *timeout_ctx)
3402 {
3403         struct wps_registrar *reg = eloop_ctx;
3404
3405         wpa_printf(MSG_DEBUG, "WPS: Selected Registrar timeout - "
3406                    "unselect internal Registrar");
3407         reg->selected_registrar = 0;
3408         reg->pbc = 0;
3409         wps_registrar_selected_registrar_changed(reg, 0);
3410 }
3411
3412
3413 #ifdef CONFIG_WPS_UPNP
3414 static void wps_registrar_sel_reg_add(struct wps_registrar *reg,
3415                                       struct subscription *s)
3416 {
3417         int i, j;
3418         wpa_printf(MSG_DEBUG, "WPS: External Registrar selected (dev_pw_id=%d "
3419                    "config_methods=0x%x)",
3420                    s->dev_password_id, s->config_methods);
3421         reg->sel_reg_union = 1;
3422         if (reg->sel_reg_dev_password_id_override != DEV_PW_PUSHBUTTON)
3423                 reg->sel_reg_dev_password_id_override = s->dev_password_id;
3424         if (reg->sel_reg_config_methods_override == -1)
3425                 reg->sel_reg_config_methods_override = 0;
3426         reg->sel_reg_config_methods_override |= s->config_methods;
3427         for (i = 0; i < WPS_MAX_AUTHORIZED_MACS; i++)
3428                 if (is_zero_ether_addr(reg->authorized_macs_union[i]))
3429                         break;
3430         for (j = 0; i < WPS_MAX_AUTHORIZED_MACS && j < WPS_MAX_AUTHORIZED_MACS;
3431              j++) {
3432                 if (is_zero_ether_addr(s->authorized_macs[j]))
3433                         break;
3434                 wpa_printf(MSG_DEBUG, "WPS: Add authorized MAC into union: "
3435                            MACSTR, MAC2STR(s->authorized_macs[j]));
3436                 os_memcpy(reg->authorized_macs_union[i],
3437                           s->authorized_macs[j], ETH_ALEN);
3438                 i++;
3439         }
3440         wpa_hexdump(MSG_DEBUG, "WPS: Authorized MACs union",
3441                     (u8 *) reg->authorized_macs_union,
3442                     sizeof(reg->authorized_macs_union));
3443 }
3444 #endif /* CONFIG_WPS_UPNP */
3445
3446
3447 static void wps_registrar_sel_reg_union(struct wps_registrar *reg)
3448 {
3449 #ifdef CONFIG_WPS_UPNP
3450         struct subscription *s;
3451
3452         if (reg->wps->wps_upnp == NULL)
3453                 return;
3454
3455         dl_list_for_each(s, &reg->wps->wps_upnp->subscriptions,
3456                          struct subscription, list) {
3457                 struct subscr_addr *sa;
3458                 sa = dl_list_first(&s->addr_list, struct subscr_addr, list);
3459                 if (sa) {
3460                         wpa_printf(MSG_DEBUG, "WPS: External Registrar %s:%d",
3461                                    inet_ntoa(sa->saddr.sin_addr),
3462                                    ntohs(sa->saddr.sin_port));
3463                 }
3464                 if (s->selected_registrar)
3465                         wps_registrar_sel_reg_add(reg, s);
3466                 else
3467                         wpa_printf(MSG_DEBUG, "WPS: External Registrar not "
3468                                    "selected");
3469         }
3470 #endif /* CONFIG_WPS_UPNP */
3471 }
3472
3473
3474 /**
3475  * wps_registrar_selected_registrar_changed - SetSelectedRegistrar change
3476  * @reg: Registrar data from wps_registrar_init()
3477  *
3478  * This function is called when selected registrar state changes, e.g., when an
3479  * AP receives a SetSelectedRegistrar UPnP message.
3480  */
3481 void wps_registrar_selected_registrar_changed(struct wps_registrar *reg,
3482                                               u16 dev_pw_id)
3483 {
3484         wpa_printf(MSG_DEBUG, "WPS: Selected registrar information changed");
3485
3486         reg->sel_reg_union = reg->selected_registrar;
3487         reg->sel_reg_dev_password_id_override = -1;
3488         reg->sel_reg_config_methods_override = -1;
3489         os_memcpy(reg->authorized_macs_union, reg->authorized_macs,
3490                   WPS_MAX_AUTHORIZED_MACS * ETH_ALEN);
3491         wpa_hexdump(MSG_DEBUG, "WPS: Authorized MACs union (start with own)",
3492                     (u8 *) reg->authorized_macs_union,
3493                     sizeof(reg->authorized_macs_union));
3494         if (reg->selected_registrar) {
3495                 u16 methods;
3496
3497                 methods = reg->wps->config_methods & ~WPS_CONFIG_PUSHBUTTON;
3498                 methods &= ~(WPS_CONFIG_VIRT_PUSHBUTTON |
3499                              WPS_CONFIG_PHY_PUSHBUTTON);
3500                 if (reg->pbc) {
3501                         reg->sel_reg_dev_password_id_override =
3502                                 DEV_PW_PUSHBUTTON;
3503                         wps_set_pushbutton(&methods, reg->wps->config_methods);
3504                 } else if (dev_pw_id)
3505                         reg->sel_reg_dev_password_id_override = dev_pw_id;
3506                 wpa_printf(MSG_DEBUG, "WPS: Internal Registrar selected "
3507                            "(pbc=%d)", reg->pbc);
3508                 reg->sel_reg_config_methods_override = methods;
3509         } else
3510                 wpa_printf(MSG_DEBUG, "WPS: Internal Registrar not selected");
3511
3512         wps_registrar_sel_reg_union(reg);
3513
3514         wps_set_ie(reg);
3515         wps_cb_set_sel_reg(reg);
3516 }
3517
3518
3519 int wps_registrar_get_info(struct wps_registrar *reg, const u8 *addr,
3520                            char *buf, size_t buflen)
3521 {
3522         struct wps_registrar_device *d;
3523         int len = 0, ret;
3524         char uuid[40];
3525         char devtype[WPS_DEV_TYPE_BUFSIZE];
3526
3527         d = wps_device_get(reg, addr);
3528         if (d == NULL)
3529                 return 0;
3530         if (uuid_bin2str(d->uuid, uuid, sizeof(uuid)))
3531                 return 0;
3532
3533         ret = os_snprintf(buf + len, buflen - len,
3534                           "wpsUuid=%s\n"
3535                           "wpsPrimaryDeviceType=%s\n"
3536                           "wpsDeviceName=%s\n"
3537                           "wpsManufacturer=%s\n"
3538                           "wpsModelName=%s\n"
3539                           "wpsModelNumber=%s\n"
3540                           "wpsSerialNumber=%s\n",
3541                           uuid,
3542                           wps_dev_type_bin2str(d->dev.pri_dev_type, devtype,
3543                                                sizeof(devtype)),
3544                           d->dev.device_name ? d->dev.device_name : "",
3545                           d->dev.manufacturer ? d->dev.manufacturer : "",
3546                           d->dev.model_name ? d->dev.model_name : "",
3547                           d->dev.model_number ? d->dev.model_number : "",
3548                           d->dev.serial_number ? d->dev.serial_number : "");
3549         if (os_snprintf_error(buflen - len, ret))
3550                 return len;
3551         len += ret;
3552
3553         return len;
3554 }
3555
3556
3557 int wps_registrar_config_ap(struct wps_registrar *reg,
3558                             struct wps_credential *cred)
3559 {
3560         wpa_printf(MSG_DEBUG, "WPS: encr_type=0x%x", cred->encr_type);
3561         if (!(cred->encr_type & (WPS_ENCR_NONE | WPS_ENCR_TKIP |
3562                                  WPS_ENCR_AES))) {
3563                 if (cred->encr_type & WPS_ENCR_WEP) {
3564                         wpa_printf(MSG_INFO, "WPS: Reject new AP settings "
3565                                    "due to WEP configuration");
3566                         return -1;
3567                 }
3568
3569                 wpa_printf(MSG_INFO, "WPS: Reject new AP settings due to "
3570                            "invalid encr_type 0x%x", cred->encr_type);
3571                 return -1;
3572         }
3573
3574         if ((cred->encr_type & (WPS_ENCR_TKIP | WPS_ENCR_AES)) ==
3575             WPS_ENCR_TKIP) {
3576                 wpa_printf(MSG_DEBUG, "WPS: Upgrade encr_type TKIP -> "
3577                            "TKIP+AES");
3578                 cred->encr_type |= WPS_ENCR_AES;
3579         }
3580
3581         if ((cred->auth_type & (WPS_AUTH_WPAPSK | WPS_AUTH_WPA2PSK)) ==
3582             WPS_AUTH_WPAPSK) {
3583                 wpa_printf(MSG_DEBUG, "WPS: Upgrade auth_type WPAPSK -> "
3584                            "WPAPSK+WPA2PSK");
3585                 cred->auth_type |= WPS_AUTH_WPA2PSK;
3586         }
3587
3588         if (reg->wps->cred_cb)
3589                 return reg->wps->cred_cb(reg->wps->cb_ctx, cred);
3590
3591         return -1;
3592 }
3593
3594
3595 #ifdef CONFIG_WPS_NFC
3596
3597 int wps_registrar_add_nfc_pw_token(struct wps_registrar *reg,
3598                                    const u8 *pubkey_hash, u16 pw_id,
3599                                    const u8 *dev_pw, size_t dev_pw_len,
3600                                    int pk_hash_provided_oob)
3601 {
3602         struct wps_nfc_pw_token *token;
3603
3604         if (dev_pw_len > WPS_OOB_DEVICE_PASSWORD_LEN)
3605                 return -1;
3606
3607         if (pw_id == DEV_PW_NFC_CONNECTION_HANDOVER &&
3608             (pubkey_hash == NULL || !pk_hash_provided_oob)) {
3609                 wpa_printf(MSG_DEBUG, "WPS: Unexpected NFC Password Token "
3610                            "addition - missing public key hash");
3611                 return -1;
3612         }
3613
3614         wps_free_nfc_pw_tokens(&reg->nfc_pw_tokens, pw_id);
3615
3616         token = os_zalloc(sizeof(*token));
3617         if (token == NULL)
3618                 return -1;
3619
3620         token->peer_pk_hash_known = pubkey_hash != NULL;
3621         if (pubkey_hash)
3622                 os_memcpy(token->pubkey_hash, pubkey_hash,
3623                           WPS_OOB_PUBKEY_HASH_LEN);
3624         token->pw_id = pw_id;
3625         token->pk_hash_provided_oob = pk_hash_provided_oob;
3626         if (dev_pw) {
3627                 wpa_snprintf_hex_uppercase((char *) token->dev_pw,
3628                                            sizeof(token->dev_pw),
3629                                            dev_pw, dev_pw_len);
3630                 token->dev_pw_len = dev_pw_len * 2;
3631         }
3632
3633         dl_list_add(&reg->nfc_pw_tokens, &token->list);
3634
3635         reg->selected_registrar = 1;
3636         reg->pbc = 0;
3637         wps_registrar_add_authorized_mac(reg,
3638                                          (u8 *) "\xff\xff\xff\xff\xff\xff");
3639         wps_registrar_selected_registrar_changed(reg, pw_id);
3640         eloop_cancel_timeout(wps_registrar_set_selected_timeout, reg, NULL);
3641         eloop_register_timeout(WPS_PBC_WALK_TIME, 0,
3642                                wps_registrar_set_selected_timeout,
3643                                reg, NULL);
3644
3645         wpa_printf(MSG_DEBUG, "WPS: Added NFC Device Password %u to Registrar",
3646                    pw_id);
3647
3648         return 0;
3649 }
3650
3651
3652 int wps_registrar_add_nfc_password_token(struct wps_registrar *reg,
3653                                          const u8 *oob_dev_pw,
3654                                          size_t oob_dev_pw_len)
3655 {
3656         const u8 *pos, *hash, *dev_pw;
3657         u16 id;
3658         size_t dev_pw_len;
3659
3660         if (oob_dev_pw_len < WPS_OOB_PUBKEY_HASH_LEN + 2 ||
3661             oob_dev_pw_len > WPS_OOB_PUBKEY_HASH_LEN + 2 +
3662             WPS_OOB_DEVICE_PASSWORD_LEN)
3663                 return -1;
3664
3665         hash = oob_dev_pw;
3666         pos = oob_dev_pw + WPS_OOB_PUBKEY_HASH_LEN;
3667         id = WPA_GET_BE16(pos);
3668         dev_pw = pos + 2;
3669         dev_pw_len = oob_dev_pw + oob_dev_pw_len - dev_pw;
3670
3671         wpa_printf(MSG_DEBUG, "WPS: Add NFC Password Token for Password ID %u",
3672                    id);
3673
3674         wpa_hexdump(MSG_DEBUG, "WPS: Public Key Hash",
3675                     hash, WPS_OOB_PUBKEY_HASH_LEN);
3676         wpa_hexdump_key(MSG_DEBUG, "WPS: Device Password", dev_pw, dev_pw_len);
3677
3678         return wps_registrar_add_nfc_pw_token(reg, hash, id, dev_pw,
3679                                               dev_pw_len, 0);
3680 }
3681
3682
3683 void wps_registrar_remove_nfc_pw_token(struct wps_registrar *reg,
3684                                        struct wps_nfc_pw_token *token)
3685 {
3686         wps_registrar_remove_authorized_mac(reg,
3687                                             (u8 *) "\xff\xff\xff\xff\xff\xff");
3688         wps_registrar_selected_registrar_changed(reg, 0);
3689
3690         /*
3691          * Free the NFC password token if it was used only for a single protocol
3692          * run. The static handover case uses the same password token multiple
3693          * times, so do not free that case here.
3694          */
3695         if (token->peer_pk_hash_known)
3696                 os_free(token);
3697 }
3698
3699 #endif /* CONFIG_WPS_NFC */