Merge branch 'moonshot' of ssh://moonshot.suchdamage.org:822/srv/git/libeap into...
[libeap.git] / wpa_supplicant / config_winreg.c
1 /*
2  * WPA Supplicant / Configuration backend: Windows registry
3  * Copyright (c) 2003-2008, Jouni Malinen <j@w1.fi>
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License version 2 as
7  * published by the Free Software Foundation.
8  *
9  * Alternatively, this software may be distributed under the terms of BSD
10  * license.
11  *
12  * See README and COPYING for more details.
13  *
14  * This file implements a configuration backend for Windows registry. All the
15  * configuration information is stored in the registry and the format for
16  * network configuration fields is same as described in the sample
17  * configuration file, wpa_supplicant.conf.
18  *
19  * Configuration data is in
20  * \a HKEY_LOCAL_MACHINE\\SOFTWARE\\%wpa_supplicant\\configs
21  * key. Each configuration profile has its own key under this. In terms of text
22  * files, each profile would map to a separate text file with possibly multiple
23  * networks. Under each profile, there is a networks key that lists all
24  * networks as a subkey. Each network has set of values in the same way as
25  * network block in the configuration file. In addition, blobs subkey has
26  * possible blobs as values.
27  *
28  * Example network configuration block:
29  * \verbatim
30 HKEY_LOCAL_MACHINE\SOFTWARE\wpa_supplicant\configs\test\networks\0000
31    ssid="example"
32    key_mgmt=WPA-PSK
33 \endverbatim
34  */
35
36 #include "includes.h"
37
38 #include "common.h"
39 #include "uuid.h"
40 #include "config.h"
41
42 #ifndef WPA_KEY_ROOT
43 #define WPA_KEY_ROOT HKEY_LOCAL_MACHINE
44 #endif
45 #ifndef WPA_KEY_PREFIX
46 #define WPA_KEY_PREFIX TEXT("SOFTWARE\\wpa_supplicant")
47 #endif
48
49 #ifdef UNICODE
50 #define TSTR "%S"
51 #else /* UNICODE */
52 #define TSTR "%s"
53 #endif /* UNICODE */
54
55
56 static int wpa_config_read_blobs(struct wpa_config *config, HKEY hk)
57 {
58         struct wpa_config_blob *blob;
59         int errors = 0;
60         HKEY bhk;
61         LONG ret;
62         DWORD i;
63
64         ret = RegOpenKeyEx(hk, TEXT("blobs"), 0, KEY_QUERY_VALUE, &bhk);
65         if (ret != ERROR_SUCCESS) {
66                 wpa_printf(MSG_DEBUG, "Could not open wpa_supplicant config "
67                            "blobs key");
68                 return 0; /* assume no blobs */
69         }
70
71         for (i = 0; ; i++) {
72 #define TNAMELEN 255
73                 TCHAR name[TNAMELEN];
74                 char data[4096];
75                 DWORD namelen, datalen, type;
76
77                 namelen = TNAMELEN;
78                 datalen = sizeof(data);
79                 ret = RegEnumValue(bhk, i, name, &namelen, NULL, &type,
80                                    (LPBYTE) data, &datalen);
81
82                 if (ret == ERROR_NO_MORE_ITEMS)
83                         break;
84
85                 if (ret != ERROR_SUCCESS) {
86                         wpa_printf(MSG_DEBUG, "RegEnumValue failed: 0x%x",
87                                    (unsigned int) ret);
88                         break;
89                 }
90
91                 if (namelen >= TNAMELEN)
92                         namelen = TNAMELEN - 1;
93                 name[namelen] = TEXT('\0');
94                 wpa_unicode2ascii_inplace(name);
95
96                 if (datalen >= sizeof(data))
97                         datalen = sizeof(data) - 1;
98
99                 wpa_printf(MSG_MSGDUMP, "blob %d: field='%s' len %d",
100                            (int) i, name, (int) datalen);
101
102                 blob = os_zalloc(sizeof(*blob));
103                 if (blob == NULL) {
104                         errors++;
105                         break;
106                 }
107                 blob->name = os_strdup((char *) name);
108                 blob->data = os_malloc(datalen);
109                 if (blob->name == NULL || blob->data == NULL) {
110                         wpa_config_free_blob(blob);
111                         errors++;
112                         break;
113                 }
114                 os_memcpy(blob->data, data, datalen);
115                 blob->len = datalen;
116
117                 wpa_config_set_blob(config, blob);
118         }
119
120         RegCloseKey(bhk);
121
122         return errors ? -1 : 0;
123 }
124
125
126 static int wpa_config_read_reg_dword(HKEY hk, const TCHAR *name, int *_val)
127 {
128         DWORD val, buflen;
129         LONG ret;
130
131         buflen = sizeof(val);
132         ret = RegQueryValueEx(hk, name, NULL, NULL, (LPBYTE) &val, &buflen);
133         if (ret == ERROR_SUCCESS && buflen == sizeof(val)) {
134                 wpa_printf(MSG_DEBUG, TSTR "=%d", name, (int) val);
135                 *_val = val;
136                 return 0;
137         }
138
139         return -1;
140 }
141
142
143 static char * wpa_config_read_reg_string(HKEY hk, const TCHAR *name)
144 {
145         DWORD buflen;
146         LONG ret;
147         TCHAR *val;
148
149         buflen = 0;
150         ret = RegQueryValueEx(hk, name, NULL, NULL, NULL, &buflen);
151         if (ret != ERROR_SUCCESS)
152                 return NULL;
153         val = os_malloc(buflen);
154         if (val == NULL)
155                 return NULL;
156
157         ret = RegQueryValueEx(hk, name, NULL, NULL, (LPBYTE) val, &buflen);
158         if (ret != ERROR_SUCCESS) {
159                 os_free(val);
160                 return NULL;
161         }
162
163         wpa_unicode2ascii_inplace(val);
164         wpa_printf(MSG_DEBUG, TSTR "=%s", name, (char *) val);
165         return (char *) val;
166 }
167
168
169 #ifdef CONFIG_WPS
170 static int wpa_config_read_global_uuid(struct wpa_config *config, HKEY hk)
171 {
172         char *str;
173         int ret = 0;
174
175         str = wpa_config_read_reg_string(hk, TEXT("uuid"));
176         if (str == NULL)
177                 return 0;
178
179         if (uuid_str2bin(str, config->uuid))
180                 ret = -1;
181
182         os_free(str);
183
184         return ret;
185 }
186
187
188 static int wpa_config_read_global_os_version(struct wpa_config *config,
189                                              HKEY hk)
190 {
191         char *str;
192         int ret = 0;
193
194         str = wpa_config_read_reg_string(hk, TEXT("os_version"));
195         if (str == NULL)
196                 return 0;
197
198         if (hexstr2bin(str, config->os_version, 4))
199                 ret = -1;
200
201         os_free(str);
202
203         return ret;
204 }
205 #endif /* CONFIG_WPS */
206
207
208 static int wpa_config_read_global(struct wpa_config *config, HKEY hk)
209 {
210         int errors = 0;
211
212         wpa_config_read_reg_dword(hk, TEXT("ap_scan"), &config->ap_scan);
213         wpa_config_read_reg_dword(hk, TEXT("fast_reauth"),
214                                   &config->fast_reauth);
215         wpa_config_read_reg_dword(hk, TEXT("dot11RSNAConfigPMKLifetime"),
216                                   (int *) &config->dot11RSNAConfigPMKLifetime);
217         wpa_config_read_reg_dword(hk,
218                                   TEXT("dot11RSNAConfigPMKReauthThreshold"),
219                                   (int *)
220                                   &config->dot11RSNAConfigPMKReauthThreshold);
221         wpa_config_read_reg_dword(hk, TEXT("dot11RSNAConfigSATimeout"),
222                                   (int *) &config->dot11RSNAConfigSATimeout);
223         wpa_config_read_reg_dword(hk, TEXT("update_config"),
224                                   &config->update_config);
225
226         if (wpa_config_read_reg_dword(hk, TEXT("eapol_version"),
227                                       &config->eapol_version) == 0) {
228                 if (config->eapol_version < 1 ||
229                     config->eapol_version > 2) {
230                         wpa_printf(MSG_ERROR, "Invalid EAPOL version (%d)",
231                                    config->eapol_version);
232                         errors++;
233                 }
234         }
235
236         config->ctrl_interface = wpa_config_read_reg_string(
237                 hk, TEXT("ctrl_interface"));
238
239 #ifdef CONFIG_WPS
240         if (wpa_config_read_global_uuid(config, hk))
241                 errors++;
242         config->device_name = wpa_config_read_reg_string(
243                 hk, TEXT("device_name"));
244         config->manufacturer = wpa_config_read_reg_string(
245                 hk, TEXT("manufacturer"));
246         config->model_name = wpa_config_read_reg_string(
247                 hk, TEXT("model_name"));
248         config->serial_number = wpa_config_read_reg_string(
249                 hk, TEXT("serial_number"));
250         config->device_type = wpa_config_read_reg_string(
251                 hk, TEXT("device_type"));
252         config->config_methods = wpa_config_read_reg_string(
253                 hk, TEXT("config_methods"));
254         if (wpa_config_read_global_os_version(config, hk))
255                 errors++;
256         wpa_config_read_reg_dword(hk, TEXT("wps_cred_processing"),
257                                   &config->wps_cred_processing);
258 #endif /* CONFIG_WPS */
259 #ifdef CONFIG_P2P
260         config->p2p_ssid_postfix = wpa_config_read_reg_string(
261                 hk, TEXT("p2p_ssid_postfix"));
262 #endif /* CONFIG_P2P */
263
264         wpa_config_read_reg_dword(hk, TEXT("bss_max_count"),
265                                   (int *) &config->bss_max_count);
266         wpa_config_read_reg_dword(hk, TEXT("filter_ssids"),
267                                   &config->filter_ssids);
268
269         return errors ? -1 : 0;
270 }
271
272
273 static struct wpa_ssid * wpa_config_read_network(HKEY hk, const TCHAR *netw,
274                                                  int id)
275 {
276         HKEY nhk;
277         LONG ret;
278         DWORD i;
279         struct wpa_ssid *ssid;
280         int errors = 0;
281
282         ret = RegOpenKeyEx(hk, netw, 0, KEY_QUERY_VALUE, &nhk);
283         if (ret != ERROR_SUCCESS) {
284                 wpa_printf(MSG_DEBUG, "Could not open wpa_supplicant config "
285                            "network '" TSTR "'", netw);
286                 return NULL;
287         }
288
289         wpa_printf(MSG_MSGDUMP, "Start of a new network '" TSTR "'", netw);
290         ssid = os_zalloc(sizeof(*ssid));
291         if (ssid == NULL) {
292                 RegCloseKey(nhk);
293                 return NULL;
294         }
295         ssid->id = id;
296
297         wpa_config_set_network_defaults(ssid);
298
299         for (i = 0; ; i++) {
300                 TCHAR name[255], data[1024];
301                 DWORD namelen, datalen, type;
302
303                 namelen = 255;
304                 datalen = sizeof(data);
305                 ret = RegEnumValue(nhk, i, name, &namelen, NULL, &type,
306                                    (LPBYTE) data, &datalen);
307
308                 if (ret == ERROR_NO_MORE_ITEMS)
309                         break;
310
311                 if (ret != ERROR_SUCCESS) {
312                         wpa_printf(MSG_ERROR, "RegEnumValue failed: 0x%x",
313                                    (unsigned int) ret);
314                         break;
315                 }
316
317                 if (namelen >= 255)
318                         namelen = 255 - 1;
319                 name[namelen] = TEXT('\0');
320
321                 if (datalen >= 1024)
322                         datalen = 1024 - 1;
323                 data[datalen] = TEXT('\0');
324
325                 wpa_unicode2ascii_inplace(name);
326                 wpa_unicode2ascii_inplace(data);
327                 if (wpa_config_set(ssid, (char *) name, (char *) data, 0) < 0)
328                         errors++;
329         }
330
331         RegCloseKey(nhk);
332
333         if (ssid->passphrase) {
334                 if (ssid->psk_set) {
335                         wpa_printf(MSG_ERROR, "Both PSK and passphrase "
336                                    "configured for network '" TSTR "'.", netw);
337                         errors++;
338                 }
339                 wpa_config_update_psk(ssid);
340         }
341
342         if ((ssid->key_mgmt & (WPA_KEY_MGMT_PSK | WPA_KEY_MGMT_FT_PSK |
343                                WPA_KEY_MGMT_PSK_SHA256)) &&
344             !ssid->psk_set) {
345                 wpa_printf(MSG_ERROR, "WPA-PSK accepted for key management, "
346                            "but no PSK configured for network '" TSTR "'.",
347                            netw);
348                 errors++;
349         }
350
351         if ((ssid->group_cipher & WPA_CIPHER_CCMP) &&
352             !(ssid->pairwise_cipher & WPA_CIPHER_CCMP) &&
353             !(ssid->pairwise_cipher & WPA_CIPHER_NONE)) {
354                 /* Group cipher cannot be stronger than the pairwise cipher. */
355                 wpa_printf(MSG_DEBUG, "Removed CCMP from group cipher "
356                            "list since it was not allowed for pairwise "
357                            "cipher for network '" TSTR "'.", netw);
358                 ssid->group_cipher &= ~WPA_CIPHER_CCMP;
359         }
360
361         if (errors) {
362                 wpa_config_free_ssid(ssid);
363                 ssid = NULL;
364         }
365
366         return ssid;
367 }
368
369
370 static int wpa_config_read_networks(struct wpa_config *config, HKEY hk)
371 {
372         HKEY nhk;
373         struct wpa_ssid *ssid, *tail = NULL, *head = NULL;
374         int errors = 0;
375         LONG ret;
376         DWORD i;
377
378         ret = RegOpenKeyEx(hk, TEXT("networks"), 0, KEY_ENUMERATE_SUB_KEYS,
379                            &nhk);
380         if (ret != ERROR_SUCCESS) {
381                 wpa_printf(MSG_ERROR, "Could not open wpa_supplicant networks "
382                            "registry key");
383                 return -1;
384         }
385
386         for (i = 0; ; i++) {
387                 TCHAR name[255];
388                 DWORD namelen;
389
390                 namelen = 255;
391                 ret = RegEnumKeyEx(nhk, i, name, &namelen, NULL, NULL, NULL,
392                                    NULL);
393
394                 if (ret == ERROR_NO_MORE_ITEMS)
395                         break;
396
397                 if (ret != ERROR_SUCCESS) {
398                         wpa_printf(MSG_DEBUG, "RegEnumKeyEx failed: 0x%x",
399                                    (unsigned int) ret);
400                         break;
401                 }
402
403                 if (namelen >= 255)
404                         namelen = 255 - 1;
405                 name[namelen] = '\0';
406
407                 ssid = wpa_config_read_network(nhk, name, i);
408                 if (ssid == NULL) {
409                         wpa_printf(MSG_ERROR, "Failed to parse network "
410                                    "profile '%s'.", name);
411                         errors++;
412                         continue;
413                 }
414                 if (head == NULL) {
415                         head = tail = ssid;
416                 } else {
417                         tail->next = ssid;
418                         tail = ssid;
419                 }
420                 if (wpa_config_add_prio_network(config, ssid)) {
421                         wpa_printf(MSG_ERROR, "Failed to add network profile "
422                                    "'%s' to priority list.", name);
423                         errors++;
424                         continue;
425                 }
426         }
427
428         RegCloseKey(nhk);
429
430         config->ssid = head;
431
432         return errors ? -1 : 0;
433 }
434
435
436 struct wpa_config * wpa_config_read(const char *name)
437 {
438         TCHAR buf[256];
439         int errors = 0;
440         struct wpa_config *config;
441         HKEY hk;
442         LONG ret;
443
444         config = wpa_config_alloc_empty(NULL, NULL);
445         if (config == NULL)
446                 return NULL;
447         wpa_printf(MSG_DEBUG, "Reading configuration profile '%s'", name);
448
449 #ifdef UNICODE
450         _snwprintf(buf, 256, WPA_KEY_PREFIX TEXT("\\configs\\%S"), name);
451 #else /* UNICODE */
452         os_snprintf(buf, 256, WPA_KEY_PREFIX TEXT("\\configs\\%s"), name);
453 #endif /* UNICODE */
454
455         ret = RegOpenKeyEx(WPA_KEY_ROOT, buf, 0, KEY_QUERY_VALUE, &hk);
456         if (ret != ERROR_SUCCESS) {
457                 wpa_printf(MSG_ERROR, "Could not open wpa_supplicant "
458                            "configuration registry HKLM\\" TSTR, buf);
459                 os_free(config);
460                 return NULL;
461         }
462
463         if (wpa_config_read_global(config, hk))
464                 errors++;
465
466         if (wpa_config_read_networks(config, hk))
467                 errors++;
468
469         if (wpa_config_read_blobs(config, hk))
470                 errors++;
471
472         wpa_config_debug_dump_networks(config);
473
474         RegCloseKey(hk);
475
476         if (errors) {
477                 wpa_config_free(config);
478                 config = NULL;
479         }
480
481         return config;
482 }
483
484
485 static int wpa_config_write_reg_dword(HKEY hk, const TCHAR *name, int val,
486                                       int def)
487 {
488         LONG ret;
489         DWORD _val = val;
490
491         if (val == def) {
492                 RegDeleteValue(hk, name);
493                 return 0;
494         }
495
496         ret = RegSetValueEx(hk, name, 0, REG_DWORD, (LPBYTE) &_val,
497                             sizeof(_val));
498         if (ret != ERROR_SUCCESS) {
499                 wpa_printf(MSG_ERROR, "WINREG: Failed to set %s=%d: error %d",
500                            name, val, (int) GetLastError());
501                 return -1;
502         }
503
504         return 0;
505 }
506
507
508 static int wpa_config_write_reg_string(HKEY hk, const char *name,
509                                        const char *val)
510 {
511         LONG ret;
512         TCHAR *_name, *_val;
513
514         _name = wpa_strdup_tchar(name);
515         if (_name == NULL)
516                 return -1;
517
518         if (val == NULL) {
519                 RegDeleteValue(hk, _name);
520                 os_free(_name);
521                 return 0;
522         }
523
524         _val = wpa_strdup_tchar(val);
525         if (_val == NULL) {
526                 os_free(_name);
527                 return -1;
528         }
529         ret = RegSetValueEx(hk, _name, 0, REG_SZ, (BYTE *) _val,
530                             (os_strlen(val) + 1) * sizeof(TCHAR));
531         if (ret != ERROR_SUCCESS) {
532                 wpa_printf(MSG_ERROR, "WINREG: Failed to set %s='%s': "
533                            "error %d", name, val, (int) GetLastError());
534                 os_free(_name);
535                 os_free(_val);
536                 return -1;
537         }
538
539         os_free(_name);
540         os_free(_val);
541         return 0;
542 }
543
544
545 static int wpa_config_write_global(struct wpa_config *config, HKEY hk)
546 {
547 #ifdef CONFIG_CTRL_IFACE
548         wpa_config_write_reg_string(hk, "ctrl_interface",
549                                     config->ctrl_interface);
550 #endif /* CONFIG_CTRL_IFACE */
551
552         wpa_config_write_reg_dword(hk, TEXT("eapol_version"),
553                                    config->eapol_version,
554                                    DEFAULT_EAPOL_VERSION);
555         wpa_config_write_reg_dword(hk, TEXT("ap_scan"), config->ap_scan,
556                                    DEFAULT_AP_SCAN);
557         wpa_config_write_reg_dword(hk, TEXT("fast_reauth"),
558                                    config->fast_reauth, DEFAULT_FAST_REAUTH);
559         wpa_config_write_reg_dword(hk, TEXT("dot11RSNAConfigPMKLifetime"),
560                                    config->dot11RSNAConfigPMKLifetime, 0);
561         wpa_config_write_reg_dword(hk,
562                                    TEXT("dot11RSNAConfigPMKReauthThreshold"),
563                                    config->dot11RSNAConfigPMKReauthThreshold,
564                                    0);
565         wpa_config_write_reg_dword(hk, TEXT("dot11RSNAConfigSATimeout"),
566                                    config->dot11RSNAConfigSATimeout, 0);
567         wpa_config_write_reg_dword(hk, TEXT("update_config"),
568                                    config->update_config,
569                                    0);
570 #ifdef CONFIG_WPS
571         if (!is_nil_uuid(config->uuid)) {
572                 char buf[40];
573                 uuid_bin2str(config->uuid, buf, sizeof(buf));
574                 wpa_config_write_reg_string(hk, "uuid", buf);
575         }
576         wpa_config_write_reg_string(hk, "device_name", config->device_name);
577         wpa_config_write_reg_string(hk, "manufacturer", config->manufacturer);
578         wpa_config_write_reg_string(hk, "model_name", config->model_name);
579         wpa_config_write_reg_string(hk, "model_number", config->model_number);
580         wpa_config_write_reg_string(hk, "serial_number",
581                                     config->serial_number);
582         wpa_config_write_reg_string(hk, "device_type", config->device_type);
583         wpa_config_write_reg_string(hk, "config_methods",
584                                     config->config_methods);
585         if (WPA_GET_BE32(config->os_version)) {
586                 char vbuf[10];
587                 os_snprintf(vbuf, sizeof(vbuf), "%08x",
588                             WPA_GET_BE32(config->os_version));
589                 wpa_config_write_reg_string(hk, "os_version", vbuf);
590         }
591         wpa_config_write_reg_dword(hk, TEXT("wps_cred_processing"),
592                                    config->wps_cred_processing, 0);
593 #endif /* CONFIG_WPS */
594 #ifdef CONFIG_P2P
595         wpa_config_write_reg_string(hk, "p2p_ssid_postfix",
596                                     config->p2p_ssid_postfix);
597 #endif /* CONFIG_P2P */
598
599         wpa_config_write_reg_dword(hk, TEXT("bss_max_count"),
600                                    config->bss_max_count,
601                                    DEFAULT_BSS_MAX_COUNT);
602         wpa_config_write_reg_dword(hk, TEXT("filter_ssids"),
603                                    config->filter_ssids, 0);
604
605         return 0;
606 }
607
608
609 static int wpa_config_delete_subkeys(HKEY hk, const TCHAR *key)
610 {
611         HKEY nhk;
612         int i, errors = 0;
613         LONG ret;
614
615         ret = RegOpenKeyEx(hk, key, 0, KEY_ENUMERATE_SUB_KEYS | DELETE, &nhk);
616         if (ret != ERROR_SUCCESS) {
617                 wpa_printf(MSG_DEBUG, "WINREG: Could not open key '" TSTR
618                            "' for subkey deletion: error 0x%x (%d)", key,
619                            (unsigned int) ret, (int) GetLastError());
620                 return 0;
621         }
622
623         for (i = 0; ; i++) {
624                 TCHAR name[255];
625                 DWORD namelen;
626
627                 namelen = 255;
628                 ret = RegEnumKeyEx(nhk, i, name, &namelen, NULL, NULL, NULL,
629                                    NULL);
630
631                 if (ret == ERROR_NO_MORE_ITEMS)
632                         break;
633
634                 if (ret != ERROR_SUCCESS) {
635                         wpa_printf(MSG_DEBUG, "RegEnumKeyEx failed: 0x%x (%d)",
636                                    (unsigned int) ret, (int) GetLastError());
637                         break;
638                 }
639
640                 if (namelen >= 255)
641                         namelen = 255 - 1;
642                 name[namelen] = TEXT('\0');
643
644                 ret = RegDeleteKey(nhk, name);
645                 if (ret != ERROR_SUCCESS) {
646                         wpa_printf(MSG_DEBUG, "RegDeleteKey failed: 0x%x (%d)",
647                                    (unsigned int) ret, (int) GetLastError());
648                         errors++;
649                 }
650         }
651
652         RegCloseKey(nhk);
653
654         return errors ? -1 : 0;
655 }
656
657
658 static void write_str(HKEY hk, const char *field, struct wpa_ssid *ssid)
659 {
660         char *value = wpa_config_get(ssid, field);
661         if (value == NULL)
662                 return;
663         wpa_config_write_reg_string(hk, field, value);
664         os_free(value);
665 }
666
667
668 static void write_int(HKEY hk, const char *field, int value, int def)
669 {
670         char val[20];
671         if (value == def)
672                 return;
673         os_snprintf(val, sizeof(val), "%d", value);
674         wpa_config_write_reg_string(hk, field, val);
675 }
676
677
678 static void write_bssid(HKEY hk, struct wpa_ssid *ssid)
679 {
680         char *value = wpa_config_get(ssid, "bssid");
681         if (value == NULL)
682                 return;
683         wpa_config_write_reg_string(hk, "bssid", value);
684         os_free(value);
685 }
686
687
688 static void write_psk(HKEY hk, struct wpa_ssid *ssid)
689 {
690         char *value = wpa_config_get(ssid, "psk");
691         if (value == NULL)
692                 return;
693         wpa_config_write_reg_string(hk, "psk", value);
694         os_free(value);
695 }
696
697
698 static void write_proto(HKEY hk, struct wpa_ssid *ssid)
699 {
700         char *value;
701
702         if (ssid->proto == DEFAULT_PROTO)
703                 return;
704
705         value = wpa_config_get(ssid, "proto");
706         if (value == NULL)
707                 return;
708         if (value[0])
709                 wpa_config_write_reg_string(hk, "proto", value);
710         os_free(value);
711 }
712
713
714 static void write_key_mgmt(HKEY hk, struct wpa_ssid *ssid)
715 {
716         char *value;
717
718         if (ssid->key_mgmt == DEFAULT_KEY_MGMT)
719                 return;
720
721         value = wpa_config_get(ssid, "key_mgmt");
722         if (value == NULL)
723                 return;
724         if (value[0])
725                 wpa_config_write_reg_string(hk, "key_mgmt", value);
726         os_free(value);
727 }
728
729
730 static void write_pairwise(HKEY hk, struct wpa_ssid *ssid)
731 {
732         char *value;
733
734         if (ssid->pairwise_cipher == DEFAULT_PAIRWISE)
735                 return;
736
737         value = wpa_config_get(ssid, "pairwise");
738         if (value == NULL)
739                 return;
740         if (value[0])
741                 wpa_config_write_reg_string(hk, "pairwise", value);
742         os_free(value);
743 }
744
745
746 static void write_group(HKEY hk, struct wpa_ssid *ssid)
747 {
748         char *value;
749
750         if (ssid->group_cipher == DEFAULT_GROUP)
751                 return;
752
753         value = wpa_config_get(ssid, "group");
754         if (value == NULL)
755                 return;
756         if (value[0])
757                 wpa_config_write_reg_string(hk, "group", value);
758         os_free(value);
759 }
760
761
762 static void write_auth_alg(HKEY hk, struct wpa_ssid *ssid)
763 {
764         char *value;
765
766         if (ssid->auth_alg == 0)
767                 return;
768
769         value = wpa_config_get(ssid, "auth_alg");
770         if (value == NULL)
771                 return;
772         if (value[0])
773                 wpa_config_write_reg_string(hk, "auth_alg", value);
774         os_free(value);
775 }
776
777
778 #ifdef IEEE8021X_EAPOL
779 static void write_eap(HKEY hk, struct wpa_ssid *ssid)
780 {
781         char *value;
782
783         value = wpa_config_get(ssid, "eap");
784         if (value == NULL)
785                 return;
786
787         if (value[0])
788                 wpa_config_write_reg_string(hk, "eap", value);
789         os_free(value);
790 }
791 #endif /* IEEE8021X_EAPOL */
792
793
794 static void write_wep_key(HKEY hk, int idx, struct wpa_ssid *ssid)
795 {
796         char field[20], *value;
797
798         os_snprintf(field, sizeof(field), "wep_key%d", idx);
799         value = wpa_config_get(ssid, field);
800         if (value) {
801                 wpa_config_write_reg_string(hk, field, value);
802                 os_free(value);
803         }
804 }
805
806
807 static int wpa_config_write_network(HKEY hk, struct wpa_ssid *ssid, int id)
808 {
809         int i, errors = 0;
810         HKEY nhk, netw;
811         LONG ret;
812         TCHAR name[5];
813
814         ret = RegOpenKeyEx(hk, TEXT("networks"), 0, KEY_CREATE_SUB_KEY, &nhk);
815         if (ret != ERROR_SUCCESS) {
816                 wpa_printf(MSG_DEBUG, "WINREG: Could not open networks key "
817                            "for subkey addition: error 0x%x (%d)",
818                            (unsigned int) ret, (int) GetLastError());
819                 return 0;
820         }
821
822 #ifdef UNICODE
823         wsprintf(name, L"%04d", id);
824 #else /* UNICODE */
825         os_snprintf(name, sizeof(name), "%04d", id);
826 #endif /* UNICODE */
827         ret = RegCreateKeyEx(nhk, name, 0, NULL, 0, KEY_WRITE, NULL, &netw,
828                              NULL);
829         RegCloseKey(nhk);
830         if (ret != ERROR_SUCCESS) {
831                 wpa_printf(MSG_DEBUG, "WINREG: Could not add network key '%s':"
832                            " error 0x%x (%d)",
833                            name, (unsigned int) ret, (int) GetLastError());
834                 return -1;
835         }
836
837 #define STR(t) write_str(netw, #t, ssid)
838 #define INT(t) write_int(netw, #t, ssid->t, 0)
839 #define INTe(t) write_int(netw, #t, ssid->eap.t, 0)
840 #define INT_DEF(t, def) write_int(netw, #t, ssid->t, def)
841 #define INT_DEFe(t, def) write_int(netw, #t, ssid->eap.t, def)
842
843         STR(ssid);
844         INT(scan_ssid);
845         write_bssid(netw, ssid);
846         write_psk(netw, ssid);
847         write_proto(netw, ssid);
848         write_key_mgmt(netw, ssid);
849         write_pairwise(netw, ssid);
850         write_group(netw, ssid);
851         write_auth_alg(netw, ssid);
852 #ifdef IEEE8021X_EAPOL
853         write_eap(netw, ssid);
854         STR(identity);
855         STR(anonymous_identity);
856         STR(password);
857         STR(ca_cert);
858         STR(ca_path);
859         STR(client_cert);
860         STR(private_key);
861         STR(private_key_passwd);
862         STR(dh_file);
863         STR(subject_match);
864         STR(altsubject_match);
865         STR(ca_cert2);
866         STR(ca_path2);
867         STR(client_cert2);
868         STR(private_key2);
869         STR(private_key2_passwd);
870         STR(dh_file2);
871         STR(subject_match2);
872         STR(altsubject_match2);
873         STR(phase1);
874         STR(phase2);
875         STR(pcsc);
876         STR(pin);
877         STR(engine_id);
878         STR(key_id);
879         STR(cert_id);
880         STR(ca_cert_id);
881         STR(key2_id);
882         STR(pin2);
883         STR(engine2_id);
884         STR(cert2_id);
885         STR(ca_cert2_id);
886         INTe(engine);
887         INTe(engine2);
888         INT_DEF(eapol_flags, DEFAULT_EAPOL_FLAGS);
889 #endif /* IEEE8021X_EAPOL */
890         for (i = 0; i < 4; i++)
891                 write_wep_key(netw, i, ssid);
892         INT(wep_tx_keyidx);
893         INT(priority);
894 #ifdef IEEE8021X_EAPOL
895         INT_DEF(eap_workaround, DEFAULT_EAP_WORKAROUND);
896         STR(pac_file);
897         INT_DEFe(fragment_size, DEFAULT_FRAGMENT_SIZE);
898 #endif /* IEEE8021X_EAPOL */
899         INT(mode);
900         INT(proactive_key_caching);
901         INT(disabled);
902         INT(peerkey);
903 #ifdef CONFIG_IEEE80211W
904         INT(ieee80211w);
905 #endif /* CONFIG_IEEE80211W */
906         STR(id_str);
907
908 #undef STR
909 #undef INT
910 #undef INT_DEF
911
912         RegCloseKey(netw);
913
914         return errors ? -1 : 0;
915 }
916
917
918 static int wpa_config_write_blob(HKEY hk, struct wpa_config_blob *blob)
919 {
920         HKEY bhk;
921         LONG ret;
922         TCHAR *name;
923
924         ret = RegCreateKeyEx(hk, TEXT("blobs"), 0, NULL, 0, KEY_WRITE, NULL,
925                              &bhk, NULL);
926         if (ret != ERROR_SUCCESS) {
927                 wpa_printf(MSG_DEBUG, "WINREG: Could not add blobs key: "
928                            "error 0x%x (%d)",
929                            (unsigned int) ret, (int) GetLastError());
930                 return -1;
931         }
932
933         name = wpa_strdup_tchar(blob->name);
934         ret = RegSetValueEx(bhk, name, 0, REG_BINARY, blob->data,
935                             blob->len);
936         if (ret != ERROR_SUCCESS) {
937                 wpa_printf(MSG_ERROR, "WINREG: Failed to set blob %s': "
938                            "error 0x%x (%d)", blob->name, (unsigned int) ret,
939                            (int) GetLastError());
940                 RegCloseKey(bhk);
941                 os_free(name);
942                 return -1;
943         }
944         os_free(name);
945
946         RegCloseKey(bhk);
947
948         return 0;
949 }
950
951
952 int wpa_config_write(const char *name, struct wpa_config *config)
953 {
954         TCHAR buf[256];
955         HKEY hk;
956         LONG ret;
957         int errors = 0;
958         struct wpa_ssid *ssid;
959         struct wpa_config_blob *blob;
960         int id;
961
962         wpa_printf(MSG_DEBUG, "Writing configuration file '%s'", name);
963
964 #ifdef UNICODE
965         _snwprintf(buf, 256, WPA_KEY_PREFIX TEXT("\\configs\\%S"), name);
966 #else /* UNICODE */
967         os_snprintf(buf, 256, WPA_KEY_PREFIX TEXT("\\configs\\%s"), name);
968 #endif /* UNICODE */
969
970         ret = RegOpenKeyEx(WPA_KEY_ROOT, buf, 0, KEY_SET_VALUE | DELETE, &hk);
971         if (ret != ERROR_SUCCESS) {
972                 wpa_printf(MSG_ERROR, "Could not open wpa_supplicant "
973                            "configuration registry %s: error %d", buf,
974                            (int) GetLastError());
975                 return -1;
976         }
977
978         if (wpa_config_write_global(config, hk)) {
979                 wpa_printf(MSG_ERROR, "Failed to write global configuration "
980                            "data");
981                 errors++;
982         }
983
984         wpa_config_delete_subkeys(hk, TEXT("networks"));
985         for (ssid = config->ssid, id = 0; ssid; ssid = ssid->next, id++) {
986                 if (ssid->key_mgmt == WPA_KEY_MGMT_WPS)
987                         continue; /* do not save temporary WPS networks */
988                 if (wpa_config_write_network(hk, ssid, id))
989                         errors++;
990         }
991
992         RegDeleteKey(hk, TEXT("blobs"));
993         for (blob = config->blobs; blob; blob = blob->next) {
994                 if (wpa_config_write_blob(hk, blob))
995                         errors++;
996         }
997
998         RegCloseKey(hk);
999
1000         wpa_printf(MSG_DEBUG, "Configuration '%s' written %ssuccessfully",
1001                    name, errors ? "un" : "");
1002         return errors ? -1 : 0;
1003 }