winecfg: Allow theme colour names to be case insensitive when reading them from a...
[wine] / programs / winecfg / theme.c
1 /*
2  * Desktop Integration
3  * - Theme configuration code
4  * - User Shell Folder mapping
5  *
6  * Copyright (c) 2005 by Frank Richter
7  * Copyright (c) 2006 by Michael Jung
8  *
9  * This library is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU Lesser General Public
11  * License as published by the Free Software Foundation; either
12  * version 2.1 of the License, or (at your option) any later version.
13  *
14  * This library is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  * Lesser General Public License for more details.
18  *
19  * You should have received a copy of the GNU Lesser General Public
20  * License along with this library; if not, write to the Free Software
21  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
22  *
23  */
24
25 #include "config.h"
26 #include "wine/port.h"
27
28 #include <stdarg.h>
29 #include <stdlib.h>
30 #include <stdio.h>
31 #ifdef HAVE_SYS_STAT_H
32 #include <sys/stat.h>
33 #endif
34 #ifdef HAVE_UNISTD_H
35 #include <unistd.h>
36 #endif
37 #ifdef HAVE_DIRECT_H
38 #include <direct.h>
39 #endif
40
41 #define COBJMACROS
42
43 #include <windows.h>
44 #include <uxtheme.h>
45 #include <tmschema.h>
46 #include <shlobj.h>
47 #include <shlwapi.h>
48 #include <wine/debug.h>
49 #include <wine/unicode.h>
50
51 #include "resource.h"
52 #include "winecfg.h"
53
54 WINE_DEFAULT_DEBUG_CHANNEL(winecfg);
55
56 /* UXTHEME functions not in the headers */
57
58 typedef struct tagTHEMENAMES
59 {
60     WCHAR szName[MAX_PATH+1];
61     WCHAR szDisplayName[MAX_PATH+1];
62     WCHAR szTooltip[MAX_PATH+1];
63 } THEMENAMES, *PTHEMENAMES;
64
65 typedef void* HTHEMEFILE;
66 typedef BOOL (CALLBACK *EnumThemeProc)(LPVOID lpReserved, 
67                                        LPCWSTR pszThemeFileName,
68                                        LPCWSTR pszThemeName, 
69                                        LPCWSTR pszToolTip, LPVOID lpReserved2,
70                                        LPVOID lpData);
71
72 HRESULT WINAPI EnumThemeColors (LPCWSTR pszThemeFileName, LPWSTR pszSizeName,
73                                 DWORD dwColorNum, PTHEMENAMES pszColorNames);
74 HRESULT WINAPI EnumThemeSizes (LPCWSTR pszThemeFileName, LPWSTR pszColorName,
75                                DWORD dwSizeNum, PTHEMENAMES pszSizeNames);
76 HRESULT WINAPI ApplyTheme (HTHEMEFILE hThemeFile, char* unknown, HWND hWnd);
77 HRESULT WINAPI OpenThemeFile (LPCWSTR pszThemeFileName, LPCWSTR pszColorName,
78                               LPCWSTR pszSizeName, HTHEMEFILE* hThemeFile,
79                               DWORD unknown);
80 HRESULT WINAPI CloseThemeFile (HTHEMEFILE hThemeFile);
81 HRESULT WINAPI EnumThemes (LPCWSTR pszThemePath, EnumThemeProc callback,
82                            LPVOID lpData);
83
84 /* A struct to keep both the internal and "fancy" name of a color or size */
85 typedef struct
86 {
87   WCHAR* name;
88   WCHAR* fancyName;
89 } ThemeColorOrSize;
90
91 /* wrapper around DSA that also keeps an item count */
92 typedef struct
93 {
94   HDSA dsa;
95   int count;
96 } WrappedDsa;
97
98 /* Some helper functions to deal with ThemeColorOrSize structs in WrappedDSAs */
99
100 static void color_or_size_dsa_add (WrappedDsa* wdsa, const WCHAR* name,
101                                    const WCHAR* fancyName)
102 {
103     ThemeColorOrSize item;
104     
105     item.name = HeapAlloc (GetProcessHeap(), 0, 
106         (lstrlenW (name) + 1) * sizeof(WCHAR));
107     lstrcpyW (item.name, name);
108
109     item.fancyName = HeapAlloc (GetProcessHeap(), 0, 
110         (lstrlenW (fancyName) + 1) * sizeof(WCHAR));
111     lstrcpyW (item.fancyName, fancyName);
112
113     DSA_InsertItem (wdsa->dsa, wdsa->count, &item);
114     wdsa->count++;
115 }
116
117 static int CALLBACK dsa_destroy_callback (LPVOID p, LPVOID pData)
118 {
119     ThemeColorOrSize* item = (ThemeColorOrSize*)p;
120     HeapFree (GetProcessHeap(), 0, item->name);
121     HeapFree (GetProcessHeap(), 0, item->fancyName);
122     return 1;
123 }
124
125 static void free_color_or_size_dsa (WrappedDsa* wdsa)
126 {
127     DSA_DestroyCallback (wdsa->dsa, dsa_destroy_callback, NULL);
128 }
129
130 static void create_color_or_size_dsa (WrappedDsa* wdsa)
131 {
132     wdsa->dsa = DSA_Create (sizeof (ThemeColorOrSize), 1);
133     wdsa->count = 0;
134 }
135
136 static ThemeColorOrSize* color_or_size_dsa_get (WrappedDsa* wdsa, int index)
137 {
138     return (ThemeColorOrSize*)DSA_GetItemPtr (wdsa->dsa, index);
139 }
140
141 static int color_or_size_dsa_find (WrappedDsa* wdsa, const WCHAR* name)
142 {
143     int i = 0;
144     for (; i < wdsa->count; i++)
145     {
146         ThemeColorOrSize* item = color_or_size_dsa_get (wdsa, i);
147         if (lstrcmpiW (item->name, name) == 0) break;
148     }
149     return i;
150 }
151
152 /* A theme file, contains file name, display name, color and size scheme names */
153 typedef struct
154 {
155     WCHAR* themeFileName;
156     WCHAR* fancyName;
157     WrappedDsa colors;
158     WrappedDsa sizes;
159 } ThemeFile;
160
161 static HDSA themeFiles = NULL;
162 static int themeFilesCount = 0;
163
164 static int CALLBACK theme_dsa_destroy_callback (LPVOID p, LPVOID pData)
165 {
166     ThemeFile* item = (ThemeFile*)p;
167     HeapFree (GetProcessHeap(), 0, item->themeFileName);
168     HeapFree (GetProcessHeap(), 0, item->fancyName);
169     free_color_or_size_dsa (&item->colors);
170     free_color_or_size_dsa (&item->sizes);
171     return 1;
172 }
173
174 /* Free memory occupied by the theme list */
175 static void free_theme_files(void)
176 {
177     if (themeFiles == NULL) return;
178       
179     DSA_DestroyCallback (themeFiles , theme_dsa_destroy_callback, NULL);
180     themeFiles = NULL;
181     themeFilesCount = 0;
182 }
183
184 typedef HRESULT (WINAPI * EnumTheme) (LPCWSTR, LPWSTR, DWORD, PTHEMENAMES);
185
186 /* fill a string list with either colors or sizes of a theme */
187 static void fill_theme_string_array (const WCHAR* filename, 
188                                      WrappedDsa* wdsa,
189                                      EnumTheme enumTheme)
190 {
191     DWORD index = 0;
192     THEMENAMES names;
193
194     WINE_TRACE ("%s %p %p\n", wine_dbgstr_w (filename), wdsa, enumTheme);
195
196     while (SUCCEEDED (enumTheme (filename, NULL, index++, &names)))
197     {
198         WINE_TRACE ("%s: %s\n", wine_dbgstr_w (names.szName), 
199             wine_dbgstr_w (names.szDisplayName));
200         color_or_size_dsa_add (wdsa, names.szName, names.szDisplayName);
201     }
202 }
203
204 /* Theme enumeration callback, adds theme to theme list */
205 static BOOL CALLBACK myEnumThemeProc (LPVOID lpReserved, 
206                                       LPCWSTR pszThemeFileName,
207                                       LPCWSTR pszThemeName, 
208                                       LPCWSTR pszToolTip, 
209                                       LPVOID lpReserved2, LPVOID lpData)
210 {
211     ThemeFile newEntry;
212
213     /* fill size/color lists */
214     create_color_or_size_dsa (&newEntry.colors);
215     fill_theme_string_array (pszThemeFileName, &newEntry.colors, EnumThemeColors);
216     create_color_or_size_dsa (&newEntry.sizes);
217     fill_theme_string_array (pszThemeFileName, &newEntry.sizes, EnumThemeSizes);
218
219     newEntry.themeFileName = HeapAlloc (GetProcessHeap(), 0, 
220         (lstrlenW (pszThemeFileName) + 1) * sizeof(WCHAR));
221     lstrcpyW (newEntry.themeFileName, pszThemeFileName);
222   
223     newEntry.fancyName = HeapAlloc (GetProcessHeap(), 0, 
224         (lstrlenW (pszThemeName) + 1) * sizeof(WCHAR));
225     lstrcpyW (newEntry.fancyName, pszThemeName);
226   
227     /*list_add_tail (&themeFiles, &newEntry->entry);*/
228     DSA_InsertItem (themeFiles, themeFilesCount, &newEntry);
229     themeFilesCount++;
230
231     return TRUE;
232 }
233
234 /* Scan for themes */
235 static void scan_theme_files(void)
236 {
237     static const WCHAR themesSubdir[] = { '\\','T','h','e','m','e','s',0 };
238     WCHAR themesPath[MAX_PATH];
239
240     free_theme_files();
241
242     if (FAILED (SHGetFolderPathW (NULL, CSIDL_RESOURCES, NULL, 
243         SHGFP_TYPE_CURRENT, themesPath))) return;
244
245     themeFiles = DSA_Create (sizeof (ThemeFile), 1);
246     lstrcatW (themesPath, themesSubdir);
247
248     EnumThemes (themesPath, myEnumThemeProc, 0);
249 }
250
251 /* fill the color & size combo boxes for a given theme */
252 static void fill_color_size_combos (ThemeFile* theme, HWND comboColor, 
253                                     HWND comboSize)
254 {
255     int i;
256
257     SendMessageW (comboColor, CB_RESETCONTENT, 0, 0);
258     for (i = 0; i < theme->colors.count; i++)
259     {
260         ThemeColorOrSize* item = color_or_size_dsa_get (&theme->colors, i);
261         SendMessageW (comboColor, CB_ADDSTRING, 0, (LPARAM)item->fancyName);
262     }
263
264     SendMessageW (comboSize, CB_RESETCONTENT, 0, 0);
265     for (i = 0; i < theme->sizes.count; i++)
266     {
267         ThemeColorOrSize* item = color_or_size_dsa_get (&theme->sizes, i);
268         SendMessageW (comboSize, CB_ADDSTRING, 0, (LPARAM)item->fancyName);
269     }
270 }
271
272 /* Select the item of a combo box that matches a theme's color and size 
273  * scheme. */
274 static void select_color_and_size (ThemeFile* theme, 
275                             const WCHAR* colorName, HWND comboColor, 
276                             const WCHAR* sizeName, HWND comboSize)
277 {
278     SendMessageW (comboColor, CB_SETCURSEL, 
279         color_or_size_dsa_find (&theme->colors, colorName), 0);
280     SendMessageW (comboSize, CB_SETCURSEL, 
281         color_or_size_dsa_find (&theme->sizes, sizeName), 0);
282 }
283
284 /* Fill theme, color and sizes combo boxes with the know themes and select
285  * the entries matching the currently active theme. */
286 static BOOL fill_theme_list (HWND comboTheme, HWND comboColor, HWND comboSize)
287 {
288     WCHAR textNoTheme[256];
289     int themeIndex = 0;
290     BOOL ret = TRUE;
291     int i;
292     WCHAR currentTheme[MAX_PATH];
293     WCHAR currentColor[MAX_PATH];
294     WCHAR currentSize[MAX_PATH];
295     ThemeFile* theme = NULL;
296
297     LoadStringW (GetModuleHandle (NULL), IDS_NOTHEME, textNoTheme,
298         sizeof(textNoTheme) / sizeof(WCHAR));
299
300     SendMessageW (comboTheme, CB_RESETCONTENT, 0, 0);
301     SendMessageW (comboTheme, CB_ADDSTRING, 0, (LPARAM)textNoTheme);
302
303     for (i = 0; i < themeFilesCount; i++)
304     {
305         ThemeFile* item = (ThemeFile*)DSA_GetItemPtr (themeFiles, i);
306         SendMessageW (comboTheme, CB_ADDSTRING, 0, 
307             (LPARAM)item->fancyName);
308     }
309   
310     if (IsThemeActive () && SUCCEEDED (GetCurrentThemeName (currentTheme, 
311             sizeof(currentTheme) / sizeof(WCHAR),
312             currentColor, sizeof(currentColor) / sizeof(WCHAR),
313             currentSize, sizeof(currentSize) / sizeof(WCHAR))))
314     {
315         /* Determine the index of the currently active theme. */
316         BOOL found = FALSE;
317         for (i = 0; i < themeFilesCount; i++)
318         {
319             theme = (ThemeFile*)DSA_GetItemPtr (themeFiles, i);
320             if (lstrcmpiW (theme->themeFileName, currentTheme) == 0)
321             {
322                 found = TRUE;
323                 themeIndex = i+1;
324                 break;
325             }
326         }
327         if (!found)
328         {
329             /* Current theme not found?... add to the list, then... */
330             WINE_TRACE("Theme %s not in list of enumerated themes\n",
331                 wine_dbgstr_w (currentTheme));
332             myEnumThemeProc (NULL, currentTheme, currentTheme, 
333                 currentTheme, NULL, NULL);
334             themeIndex = themeFilesCount;
335             theme = (ThemeFile*)DSA_GetItemPtr (themeFiles, 
336                 themeFilesCount-1);
337         }
338         fill_color_size_combos (theme, comboColor, comboSize);
339         select_color_and_size (theme, currentColor, comboColor,
340             currentSize, comboSize);
341     }
342     else
343     {
344         /* No theme selected */
345         ret = FALSE;
346     }
347
348     SendMessageW (comboTheme, CB_SETCURSEL, themeIndex, 0);
349     return ret;
350 }
351
352 /* Update the color & size combo boxes when the selection of the theme
353  * combo changed. Selects the current color and size scheme if the theme
354  * is currently active, otherwise the first color and size. */
355 static BOOL update_color_and_size (int themeIndex, HWND comboColor, 
356                                    HWND comboSize)
357 {
358     if (themeIndex == 0)
359     {
360         return FALSE;
361     }
362     else
363     {
364         WCHAR currentTheme[MAX_PATH];
365         WCHAR currentColor[MAX_PATH];
366         WCHAR currentSize[MAX_PATH];
367         ThemeFile* theme = 
368             (ThemeFile*)DSA_GetItemPtr (themeFiles, themeIndex - 1);
369     
370         fill_color_size_combos (theme, comboColor, comboSize);
371       
372         if ((SUCCEEDED (GetCurrentThemeName (currentTheme, 
373             sizeof(currentTheme) / sizeof(WCHAR),
374             currentColor, sizeof(currentColor) / sizeof(WCHAR),
375             currentSize, sizeof(currentSize) / sizeof(WCHAR))))
376             && (lstrcmpiW (currentTheme, theme->themeFileName) == 0))
377         {
378             select_color_and_size (theme, currentColor, comboColor,
379                 currentSize, comboSize);
380         }
381         else
382         {
383             SendMessageW (comboColor, CB_SETCURSEL, 0, 0);
384             SendMessageW (comboSize, CB_SETCURSEL, 0, 0);
385         }
386     }
387     return TRUE;
388 }
389
390 /* Apply a theme from a given theme, color and size combo box item index. */
391 static void do_apply_theme (int themeIndex, int colorIndex, int sizeIndex)
392 {
393     static char b[] = "\0";
394
395     if (themeIndex == 0)
396     {
397         /* no theme */
398         ApplyTheme (NULL, b, NULL);
399     }
400     else
401     {
402         ThemeFile* theme = 
403             (ThemeFile*)DSA_GetItemPtr (themeFiles, themeIndex-1);
404         const WCHAR* themeFileName = theme->themeFileName;
405         const WCHAR* colorName = NULL;
406         const WCHAR* sizeName = NULL;
407         HTHEMEFILE hTheme;
408         ThemeColorOrSize* item;
409     
410         item = color_or_size_dsa_get (&theme->colors, colorIndex);
411         colorName = item->name;
412         
413         item = color_or_size_dsa_get (&theme->sizes, sizeIndex);
414         sizeName = item->name;
415         
416         if (SUCCEEDED (OpenThemeFile (themeFileName, colorName, sizeName,
417             &hTheme, 0)))
418         {
419             ApplyTheme (hTheme, b, NULL);
420             CloseThemeFile (hTheme);
421         }
422         else
423         {
424             ApplyTheme (NULL, b, NULL);
425         }
426     }
427 }
428
429 int updating_ui;
430 BOOL theme_dirty;
431
432 static void enable_size_and_color_controls (HWND dialog, BOOL enable)
433 {
434     EnableWindow (GetDlgItem (dialog, IDC_THEME_COLORCOMBO), enable);
435     EnableWindow (GetDlgItem (dialog, IDC_THEME_COLORTEXT), enable);
436     EnableWindow (GetDlgItem (dialog, IDC_THEME_SIZECOMBO), enable);
437     EnableWindow (GetDlgItem (dialog, IDC_THEME_SIZETEXT), enable);
438 }
439   
440 static void init_dialog (HWND dialog)
441 {
442     updating_ui = TRUE;
443     
444     scan_theme_files();
445     if (!fill_theme_list (GetDlgItem (dialog, IDC_THEME_THEMECOMBO),
446         GetDlgItem (dialog, IDC_THEME_COLORCOMBO),
447         GetDlgItem (dialog, IDC_THEME_SIZECOMBO)))
448     {
449         SendMessageW (GetDlgItem (dialog, IDC_THEME_COLORCOMBO), CB_SETCURSEL, (WPARAM)-1, 0);
450         SendMessageW (GetDlgItem (dialog, IDC_THEME_SIZECOMBO), CB_SETCURSEL, (WPARAM)-1, 0);
451         enable_size_and_color_controls (dialog, FALSE);
452     }
453     else
454     {
455         enable_size_and_color_controls (dialog, TRUE);
456     }
457     theme_dirty = FALSE;
458
459     SendDlgItemMessageW(dialog, IDC_SYSPARAM_SIZE_UD, UDM_SETBUDDY, (WPARAM)GetDlgItem(dialog, IDC_SYSPARAM_SIZE), 0);
460     SendDlgItemMessageW(dialog, IDC_SYSPARAM_SIZE_UD, UDM_SETRANGE, 0, MAKELONG(100, 8));
461
462     updating_ui = FALSE;
463 }
464
465 static void on_theme_changed(HWND dialog) {
466     int index = SendMessageW (GetDlgItem (dialog, IDC_THEME_THEMECOMBO),
467         CB_GETCURSEL, 0, 0);
468     if (!update_color_and_size (index, GetDlgItem (dialog, IDC_THEME_COLORCOMBO),
469         GetDlgItem (dialog, IDC_THEME_SIZECOMBO)))
470     {
471         SendMessageW (GetDlgItem (dialog, IDC_THEME_COLORCOMBO), CB_SETCURSEL, (WPARAM)-1, 0);
472         SendMessageW (GetDlgItem (dialog, IDC_THEME_SIZECOMBO), CB_SETCURSEL, (WPARAM)-1, 0);
473         enable_size_and_color_controls (dialog, FALSE);
474     }
475     else
476     {
477         enable_size_and_color_controls (dialog, TRUE);
478     }
479     theme_dirty = TRUE;
480 }
481
482 static void apply_theme(HWND dialog)
483 {
484     int themeIndex, colorIndex, sizeIndex;
485
486     if (!theme_dirty) return;
487
488     themeIndex = SendMessageW (GetDlgItem (dialog, IDC_THEME_THEMECOMBO),
489         CB_GETCURSEL, 0, 0);
490     colorIndex = SendMessageW (GetDlgItem (dialog, IDC_THEME_COLORCOMBO),
491         CB_GETCURSEL, 0, 0);
492     sizeIndex = SendMessageW (GetDlgItem (dialog, IDC_THEME_SIZECOMBO),
493         CB_GETCURSEL, 0, 0);
494
495     do_apply_theme (themeIndex, colorIndex, sizeIndex);
496     theme_dirty = FALSE;
497 }
498
499 static struct
500 {
501     int sm_idx, color_idx;
502     const char *color_reg;
503     int size;
504     COLORREF color;
505     LOGFONTW lf;
506 } metrics[] =
507 {
508     {-1,                COLOR_BTNFACE,          "ButtonFace"    }, /* IDC_SYSPARAMS_BUTTON */
509     {-1,                COLOR_BTNTEXT,          "ButtonText"    }, /* IDC_SYSPARAMS_BUTTON_TEXT */
510     {-1,                COLOR_BACKGROUND,       "Background"    }, /* IDC_SYSPARAMS_DESKTOP */
511     {SM_CXMENUSIZE,     COLOR_MENU,             "Menu"          }, /* IDC_SYSPARAMS_MENU */
512     {-1,                COLOR_MENUTEXT,         "MenuText"      }, /* IDC_SYSPARAMS_MENU_TEXT */
513     {SM_CXVSCROLL,      COLOR_SCROLLBAR,        "Scrollbar"     }, /* IDC_SYSPARAMS_SCROLLBAR */
514     {-1,                COLOR_HIGHLIGHT,        "Hilight"       }, /* IDC_SYSPARAMS_SELECTION */
515     {-1,                COLOR_HIGHLIGHTTEXT,    "HilightText"   }, /* IDC_SYSPARAMS_SELECTION_TEXT */
516     {-1,                COLOR_INFOBK,           "InfoWindow"    }, /* IDC_SYSPARAMS_TOOLTIP */
517     {-1,                COLOR_INFOTEXT,         "InfoText"      }, /* IDC_SYSPARAMS_TOOLTIP_TEXT */
518     {-1,                COLOR_WINDOW,           "Window"        }, /* IDC_SYSPARAMS_WINDOW */
519     {-1,                COLOR_WINDOWTEXT,       "WindowText"    }, /* IDC_SYSPARAMS_WINDOW_TEXT */
520     {SM_CXSIZE,         COLOR_ACTIVECAPTION,    "ActiveTitle"   }, /* IDC_SYSPARAMS_ACTIVE_TITLE */
521     {-1,                COLOR_CAPTIONTEXT,      "TitleText"     }, /* IDC_SYSPARAMS_ACTIVE_TITLE_TEXT */
522     {-1,                COLOR_INACTIVECAPTION,  "InactiveTitle" }, /* IDC_SYSPARAMS_INACTIVE_TITLE */
523     {-1,                COLOR_INACTIVECAPTIONTEXT,"InactiveTitleText" }, /* IDC_SYSPARAMS_INACTIVE_TITLE_TEXT */
524     {-1,                -1,                     "MsgBoxText"    }, /* IDC_SYSPARAMS_MSGBOX_TEXT */
525 };
526
527 static void save_sys_color(int idx, COLORREF clr)
528 {
529     char buffer[13];
530
531     sprintf(buffer, "%d %d %d",  GetRValue (clr), GetGValue (clr), GetBValue (clr));
532     set_reg_key(HKEY_CURRENT_USER, "Control Panel\\Colors", metrics[idx].color_reg, buffer);
533 }
534
535 static void set_color_from_theme(WCHAR *keyName, COLORREF color)
536 {
537     char *keyNameA = NULL;
538     int keyNameSize=0, i=0;
539
540     keyNameSize = WideCharToMultiByte(CP_ACP, 0, keyName, -1, keyNameA, 0, NULL, NULL);
541     keyNameA = HeapAlloc(GetProcessHeap(), 0, keyNameSize);
542     WideCharToMultiByte(CP_ACP, 0, keyName, -1, keyNameA, -1, NULL, NULL);
543
544     for (i=0; i<sizeof(metrics)/sizeof(metrics[0]); i++)
545     {
546         if (lstrcmpiA(metrics[i].color_reg, keyNameA)==0)
547         {
548             metrics[i].color = color;
549             save_sys_color(i, color);
550             break;
551         }
552     }
553     HeapFree(GetProcessHeap(), 0, keyNameA);
554 }
555
556 static void do_parse_theme(WCHAR *file)
557 {
558     static const WCHAR colorSect[] = {
559         'C','o','n','t','r','o','l',' ','P','a','n','e','l','\\',
560         'C','o','l','o','r','s',0};
561     WCHAR keyName[MAX_PATH], keyNameValue[MAX_PATH];
562     WCHAR *keyNamePtr = NULL;
563     char *keyNameValueA = NULL;
564     int keyNameValueSize = 0;
565     int red = 0, green = 0, blue = 0;
566     COLORREF color;
567
568     WINE_TRACE("%s\n", wine_dbgstr_w(file));
569
570     GetPrivateProfileStringW(colorSect, NULL, NULL, keyName,
571                              MAX_PATH*sizeof(WCHAR), file);
572
573     keyNamePtr = keyName;
574     while (*keyNamePtr!=0) {
575         GetPrivateProfileStringW(colorSect, keyNamePtr, NULL, keyNameValue,
576                                  MAX_PATH*sizeof(WCHAR), file);
577
578         keyNameValueSize = WideCharToMultiByte(CP_ACP, 0, keyNameValue, -1,
579                                                keyNameValueA, 0, NULL, NULL);
580         keyNameValueA = HeapAlloc(GetProcessHeap(), 0, keyNameValueSize);
581         WideCharToMultiByte(CP_ACP, 0, keyNameValue, -1, keyNameValueA, -1, NULL, NULL);
582
583         WINE_TRACE("parsing key: %s with value: %s\n",
584                    wine_dbgstr_w(keyNamePtr), wine_dbgstr_w(keyNameValue));
585
586         sscanf(keyNameValueA, "%d %d %d", &red, &green, &blue);
587
588         color = RGB((BYTE)red, (BYTE)green, (BYTE)blue);
589
590         HeapFree(GetProcessHeap(), 0, keyNameValueA);
591
592         set_color_from_theme(keyNamePtr, color);
593
594         keyNamePtr+=lstrlenW(keyNamePtr);
595         keyNamePtr++;
596     }
597 }
598
599 static void on_theme_install(HWND dialog)
600 {
601   static const WCHAR filterMask[] = {0,'*','.','m','s','s','t','y','l','e','s',';',
602       '*','.','t','h','e','m','e',0,0};
603   static const WCHAR themeExt[] = {'.','T','h','e','m','e',0};
604   const int filterMaskLen = sizeof(filterMask)/sizeof(filterMask[0]);
605   OPENFILENAMEW ofn;
606   WCHAR filetitle[MAX_PATH];
607   WCHAR file[MAX_PATH];
608   WCHAR filter[100];
609   WCHAR title[100];
610
611   LoadStringW (GetModuleHandle (NULL), IDS_THEMEFILE, 
612       filter, sizeof (filter) / sizeof (filter[0]) - filterMaskLen);
613   memcpy (filter + lstrlenW (filter), filterMask, 
614       filterMaskLen * sizeof (WCHAR));
615   LoadStringW (GetModuleHandle (NULL), IDS_THEMEFILE_SELECT, 
616       title, sizeof (title) / sizeof (title[0]));
617
618   ofn.lStructSize = sizeof(OPENFILENAMEW);
619   ofn.hwndOwner = 0;
620   ofn.hInstance = 0;
621   ofn.lpstrFilter = filter;
622   ofn.lpstrCustomFilter = NULL;
623   ofn.nMaxCustFilter = 0;
624   ofn.nFilterIndex = 0;
625   ofn.lpstrFile = file;
626   ofn.lpstrFile[0] = '\0';
627   ofn.nMaxFile = sizeof(file)/sizeof(filetitle[0]);
628   ofn.lpstrFileTitle = filetitle;
629   ofn.lpstrFileTitle[0] = '\0';
630   ofn.nMaxFileTitle = sizeof(filetitle)/sizeof(filetitle[0]);
631   ofn.lpstrInitialDir = NULL;
632   ofn.lpstrTitle = title;
633   ofn.Flags = OFN_FILEMUSTEXIST | OFN_PATHMUSTEXIST | OFN_HIDEREADONLY;
634   ofn.nFileOffset = 0;
635   ofn.nFileExtension = 0;
636   ofn.lpstrDefExt = NULL;
637   ofn.lCustData = 0;
638   ofn.lpfnHook = NULL;
639   ofn.lpTemplateName = NULL;
640
641   if (GetOpenFileNameW(&ofn))
642   {
643       static const WCHAR themesSubdir[] = { '\\','T','h','e','m','e','s',0 };
644       static const WCHAR backslash[] = { '\\',0 };
645       WCHAR themeFilePath[MAX_PATH];
646       SHFILEOPSTRUCTW shfop;
647
648       if (FAILED (SHGetFolderPathW (NULL, CSIDL_RESOURCES|CSIDL_FLAG_CREATE, NULL, 
649           SHGFP_TYPE_CURRENT, themeFilePath))) return;
650
651       if (lstrcmpiW(PathFindExtensionW(filetitle), themeExt)==0)
652       {
653           do_parse_theme(file);
654           SendMessage(GetParent(dialog), PSM_CHANGED, 0, 0);
655           return;
656       }
657
658       PathRemoveExtensionW (filetitle);
659
660       /* Construct path into which the theme file goes */
661       lstrcatW (themeFilePath, themesSubdir);
662       lstrcatW (themeFilePath, backslash);
663       lstrcatW (themeFilePath, filetitle);
664
665       /* Create the directory */
666       SHCreateDirectoryExW (dialog, themeFilePath, NULL);
667
668       /* Append theme file name itself */
669       lstrcatW (themeFilePath, backslash);
670       lstrcatW (themeFilePath, PathFindFileNameW (file));
671       /* SHFileOperation() takes lists as input, so double-nullterminate */
672       themeFilePath[lstrlenW (themeFilePath)+1] = 0;
673       file[lstrlenW (file)+1] = 0;
674
675       /* Do the copying */
676       WINE_TRACE("copying: %s -> %s\n", wine_dbgstr_w (file), 
677           wine_dbgstr_w (themeFilePath));
678       shfop.hwnd = dialog;
679       shfop.wFunc = FO_COPY;
680       shfop.pFrom = file;
681       shfop.pTo = themeFilePath;
682       shfop.fFlags = FOF_NOCONFIRMMKDIR;
683       if (SHFileOperationW (&shfop) == 0)
684       {
685           scan_theme_files();
686           if (!fill_theme_list (GetDlgItem (dialog, IDC_THEME_THEMECOMBO),
687               GetDlgItem (dialog, IDC_THEME_COLORCOMBO),
688               GetDlgItem (dialog, IDC_THEME_SIZECOMBO)))
689           {
690               SendMessageW (GetDlgItem (dialog, IDC_THEME_COLORCOMBO), CB_SETCURSEL, (WPARAM)-1, 0);
691               SendMessageW (GetDlgItem (dialog, IDC_THEME_SIZECOMBO), CB_SETCURSEL, (WPARAM)-1, 0);
692               enable_size_and_color_controls (dialog, FALSE);
693           }
694           else
695           {
696               enable_size_and_color_controls (dialog, TRUE);
697           }
698       }
699       else
700           WINE_TRACE("copy operation failed\n");
701   }
702   else WINE_TRACE("user cancelled\n");
703 }
704
705 /* Information about symbolic link targets of certain User Shell Folders. */
706 struct ShellFolderInfo {
707     int nFolder;
708     char szLinkTarget[FILENAME_MAX]; /* in unix locale */
709 };
710
711 static struct ShellFolderInfo asfiInfo[] = {
712     { CSIDL_DESKTOP,  "" },
713     { CSIDL_PERSONAL, "" },
714     { CSIDL_MYPICTURES, "" },
715     { CSIDL_MYMUSIC, "" },
716     { CSIDL_MYVIDEO, "" }
717 };
718
719 static struct ShellFolderInfo *psfiSelected = NULL;
720
721 #define NUM_ELEMS(x) (sizeof(x)/sizeof(*(x)))
722
723 /* create a unicode string from a string in Unix locale */
724 static WCHAR *strdupU2W(const char *unix_str)
725 {
726     WCHAR *unicode_str;
727     int lenW;
728
729     lenW = MultiByteToWideChar(CP_UNIXCP, 0, unix_str, -1, NULL, 0);
730     unicode_str = HeapAlloc(GetProcessHeap(), 0, lenW * sizeof(WCHAR));
731     if (unicode_str)
732         MultiByteToWideChar(CP_UNIXCP, 0, unix_str, -1, unicode_str, lenW);
733     return unicode_str;
734 }
735
736 static void init_shell_folder_listview_headers(HWND dialog) {
737     LVCOLUMN listColumn;
738     RECT viewRect;
739     char szShellFolder[64] = "Shell Folder";
740     char szLinksTo[64] = "Links to";
741     int width;
742
743     LoadString(GetModuleHandle(NULL), IDS_SHELL_FOLDER, szShellFolder, sizeof(szShellFolder));
744     LoadString(GetModuleHandle(NULL), IDS_LINKS_TO, szLinksTo, sizeof(szLinksTo));
745     
746     GetClientRect(GetDlgItem(dialog, IDC_LIST_SFPATHS), &viewRect);
747     width = (viewRect.right - viewRect.left) / 4;
748
749     listColumn.mask = LVCF_TEXT | LVCF_WIDTH | LVCF_SUBITEM;
750     listColumn.pszText = szShellFolder;
751     listColumn.cchTextMax = lstrlen(listColumn.pszText);
752     listColumn.cx = width;
753
754     SendDlgItemMessage(dialog, IDC_LIST_SFPATHS, LVM_INSERTCOLUMN, 0, (LPARAM) &listColumn);
755
756     listColumn.pszText = szLinksTo;
757     listColumn.cchTextMax = lstrlen(listColumn.pszText);
758     listColumn.cx = viewRect.right - viewRect.left - width - 1;
759
760     SendDlgItemMessage(dialog, IDC_LIST_SFPATHS, LVM_INSERTCOLUMN, 1, (LPARAM) &listColumn);
761 }
762
763 /* Reads the currently set shell folder symbol link targets into asfiInfo. */
764 static void read_shell_folder_link_targets(void) {
765     WCHAR wszPath[MAX_PATH];
766     HRESULT hr;
767     int i;
768    
769     for (i=0; i<NUM_ELEMS(asfiInfo); i++) {
770         asfiInfo[i].szLinkTarget[0] = '\0';
771         hr = SHGetFolderPathW(NULL, asfiInfo[i].nFolder|CSIDL_FLAG_DONT_VERIFY, NULL, 
772                               SHGFP_TYPE_CURRENT, wszPath);
773         if (SUCCEEDED(hr)) {
774             char *pszUnixPath = wine_get_unix_file_name(wszPath);
775             if (pszUnixPath) {
776                 struct stat statPath;
777                 if (!lstat(pszUnixPath, &statPath) && S_ISLNK(statPath.st_mode)) {
778                     int cLen = readlink(pszUnixPath, asfiInfo[i].szLinkTarget, FILENAME_MAX-1);
779                     if (cLen >= 0) asfiInfo[i].szLinkTarget[cLen] = '\0';
780                 }
781                 HeapFree(GetProcessHeap(), 0, pszUnixPath);
782             }
783         } 
784     }    
785 }
786
787 static void update_shell_folder_listview(HWND dialog) {
788     int i;
789     LVITEMW item;
790     LONG lSelected = SendDlgItemMessage(dialog, IDC_LIST_SFPATHS, LVM_GETNEXTITEM, (WPARAM)-1, 
791                                         MAKELPARAM(LVNI_SELECTED,0));
792     
793     SendDlgItemMessage(dialog, IDC_LIST_SFPATHS, LVM_DELETEALLITEMS, 0, 0);
794
795     for (i=0; i<NUM_ELEMS(asfiInfo); i++) {
796         WCHAR buffer[MAX_PATH];
797         HRESULT hr;
798         LPITEMIDLIST pidlCurrent;
799
800         /* Some acrobatic to get the localized name of the shell folder */
801         hr = SHGetFolderLocation(dialog, asfiInfo[i].nFolder, NULL, 0, &pidlCurrent);
802         if (SUCCEEDED(hr)) { 
803             LPSHELLFOLDER psfParent;
804             LPCITEMIDLIST pidlLast;
805             hr = SHBindToParent(pidlCurrent, &IID_IShellFolder, (LPVOID*)&psfParent, &pidlLast);
806             if (SUCCEEDED(hr)) {
807                 STRRET strRet;
808                 hr = IShellFolder_GetDisplayNameOf(psfParent, pidlLast, SHGDN_FORADDRESSBAR, &strRet);
809                 if (SUCCEEDED(hr)) {
810                     hr = StrRetToBufW(&strRet, pidlLast, buffer, MAX_PATH);
811                 }
812                 IShellFolder_Release(psfParent);
813             }
814             ILFree(pidlCurrent);
815         }
816
817         /* If there's a dangling symlink for the current shell folder, SHGetFolderLocation
818          * will fail above. We fall back to the (non-verified) path of the shell folder. */
819         if (FAILED(hr)) {
820             hr = SHGetFolderPathW(dialog, asfiInfo[i].nFolder|CSIDL_FLAG_DONT_VERIFY, NULL,
821                                  SHGFP_TYPE_CURRENT, buffer);
822         }
823     
824         item.mask = LVIF_TEXT | LVIF_PARAM;
825         item.iItem = i;
826         item.iSubItem = 0;
827         item.pszText = buffer;
828         item.lParam = (LPARAM)&asfiInfo[i];
829         SendDlgItemMessage(dialog, IDC_LIST_SFPATHS, LVM_INSERTITEMW, 0, (LPARAM)&item);
830
831         item.mask = LVIF_TEXT;
832         item.iItem = i;
833         item.iSubItem = 1;
834         item.pszText = strdupU2W(asfiInfo[i].szLinkTarget);
835         SendDlgItemMessage(dialog, IDC_LIST_SFPATHS, LVM_SETITEMW, 0, (LPARAM)&item);
836         HeapFree(GetProcessHeap(), 0, item.pszText);
837     }
838
839     /* Ensure that the previously selected item is selected again. */
840     if (lSelected >= 0) {
841         item.mask = LVIF_STATE;
842         item.state = LVIS_SELECTED;
843         item.stateMask = LVIS_SELECTED;
844         SendDlgItemMessage(dialog, IDC_LIST_SFPATHS, LVM_SETITEMSTATE, (WPARAM)lSelected, 
845                            (LPARAM)&item);
846     }
847 }
848
849 static void on_shell_folder_selection_changed(HWND hDlg, LPNMLISTVIEW lpnm) {
850     if (lpnm->uNewState & LVIS_SELECTED) {
851         psfiSelected = (struct ShellFolderInfo *)lpnm->lParam;
852         EnableWindow(GetDlgItem(hDlg, IDC_LINK_SFPATH), 1);
853         if (strlen(psfiSelected->szLinkTarget)) {
854             WCHAR *link;
855             CheckDlgButton(hDlg, IDC_LINK_SFPATH, BST_CHECKED);
856             EnableWindow(GetDlgItem(hDlg, IDC_EDIT_SFPATH), 1);
857             EnableWindow(GetDlgItem(hDlg, IDC_BROWSE_SFPATH), 1);
858             link = strdupU2W(psfiSelected->szLinkTarget);
859             set_textW(hDlg, IDC_EDIT_SFPATH, link);
860             HeapFree(GetProcessHeap(), 0, link);
861         } else {
862             CheckDlgButton(hDlg, IDC_LINK_SFPATH, BST_UNCHECKED);
863             EnableWindow(GetDlgItem(hDlg, IDC_EDIT_SFPATH), 0);
864             EnableWindow(GetDlgItem(hDlg, IDC_BROWSE_SFPATH), 0);
865             set_text(hDlg, IDC_EDIT_SFPATH, "");
866         }
867     } else {
868         psfiSelected = NULL;
869         CheckDlgButton(hDlg, IDC_LINK_SFPATH, BST_UNCHECKED);
870         set_text(hDlg, IDC_EDIT_SFPATH, "");
871         EnableWindow(GetDlgItem(hDlg, IDC_LINK_SFPATH), 0);
872         EnableWindow(GetDlgItem(hDlg, IDC_EDIT_SFPATH), 0);
873         EnableWindow(GetDlgItem(hDlg, IDC_BROWSE_SFPATH), 0);
874     }
875 }
876
877 /* Keep the contents of the edit control, the listview control and the symlink 
878  * information in sync. */
879 static void on_shell_folder_edit_changed(HWND hDlg) {
880     LVITEMW item;
881     WCHAR *text = get_textW(hDlg, IDC_EDIT_SFPATH);
882     LONG iSel = SendDlgItemMessage(hDlg, IDC_LIST_SFPATHS, LVM_GETNEXTITEM, -1,
883                                    MAKELPARAM(LVNI_SELECTED,0));
884     
885     if (!text || !psfiSelected || iSel < 0) {
886         HeapFree(GetProcessHeap(), 0, text);
887         return;
888     }
889
890     WideCharToMultiByte(CP_UNIXCP, 0, text, -1,
891                         psfiSelected->szLinkTarget, FILENAME_MAX, NULL, NULL);
892
893     item.mask = LVIF_TEXT;
894     item.iItem = iSel;
895     item.iSubItem = 1;
896     item.pszText = text;
897     SendDlgItemMessage(hDlg, IDC_LIST_SFPATHS, LVM_SETITEMW, 0, (LPARAM)&item);
898
899     HeapFree(GetProcessHeap(), 0, text);
900
901     SendMessage(GetParent(hDlg), PSM_CHANGED, 0, 0);
902 }
903
904 static void apply_shell_folder_changes(void) {
905     WCHAR wszPath[MAX_PATH];
906     char szBackupPath[FILENAME_MAX], szUnixPath[FILENAME_MAX], *pszUnixPath = NULL;
907     int i, cUnixPathLen;
908     struct stat statPath;
909     HRESULT hr;
910
911     for (i=0; i<NUM_ELEMS(asfiInfo); i++) {
912         /* Ignore nonexistent link targets */
913         if (asfiInfo[i].szLinkTarget[0] && stat(asfiInfo[i].szLinkTarget, &statPath))
914             continue;
915         
916         hr = SHGetFolderPathW(NULL, asfiInfo[i].nFolder|CSIDL_FLAG_CREATE, NULL, 
917                               SHGFP_TYPE_CURRENT, wszPath);
918         if (FAILED(hr)) continue;
919
920         /* Retrieve the corresponding unix path. */
921         pszUnixPath = wine_get_unix_file_name(wszPath);
922         if (!pszUnixPath) continue;
923         lstrcpyA(szUnixPath, pszUnixPath);
924         HeapFree(GetProcessHeap(), 0, pszUnixPath);
925             
926         /* Derive name for folder backup. */
927         cUnixPathLen = lstrlenA(szUnixPath);    
928         lstrcpyA(szBackupPath, szUnixPath);
929         lstrcatA(szBackupPath, ".winecfg");
930         
931         if (lstat(szUnixPath, &statPath)) continue;
932     
933         /* Move old folder/link out of the way. */
934         if (S_ISLNK(statPath.st_mode)) {
935             if (unlink(szUnixPath)) continue; /* Unable to remove link. */
936         } else { 
937             if (!*asfiInfo[i].szLinkTarget) {
938                 continue; /* We are done. Old was real folder, as new shall be. */
939             } else { 
940                 if (rename(szUnixPath, szBackupPath)) { /* Move folder out of the way. */
941                     continue; /* Unable to move old folder. */
942                 }
943             }
944         }
945     
946         /* Create new link/folder. */
947         if (*asfiInfo[i].szLinkTarget) {
948             symlink(asfiInfo[i].szLinkTarget, szUnixPath);
949         } else {
950             /* If there's a backup folder, restore it. Else create new folder. */
951             if (!lstat(szBackupPath, &statPath) && S_ISDIR(statPath.st_mode)) {
952                 rename(szBackupPath, szUnixPath);
953             } else {
954                 mkdir(szUnixPath, 0777);
955             }
956         }
957     }
958 }
959
960 static void read_sysparams(HWND hDlg)
961 {
962     WCHAR buffer[256];
963     HWND list = GetDlgItem(hDlg, IDC_SYSPARAM_COMBO);
964     NONCLIENTMETRICSW nonclient_metrics;
965     int i, idx;
966
967     for (i = 0; i < sizeof(metrics) / sizeof(metrics[0]); i++)
968     {
969         LoadStringW(GetModuleHandle(NULL), i + IDC_SYSPARAMS_BUTTON, buffer,
970                     sizeof(buffer) / sizeof(buffer[0]));
971         idx = SendMessageW(list, CB_ADDSTRING, 0, (LPARAM)buffer);
972         if (idx != CB_ERR) SendMessageW(list, CB_SETITEMDATA, idx, i);
973
974         if (metrics[i].sm_idx != -1)
975             metrics[i].size = GetSystemMetrics(metrics[i].sm_idx);
976         if (metrics[i].color_idx != -1)
977             metrics[i].color = GetSysColor(metrics[i].color_idx);
978     }
979
980     nonclient_metrics.cbSize = sizeof(NONCLIENTMETRICSW);
981     SystemParametersInfoW(SPI_GETNONCLIENTMETRICS, sizeof(NONCLIENTMETRICSW), &nonclient_metrics, 0);
982
983     memcpy(&(metrics[IDC_SYSPARAMS_MENU_TEXT - IDC_SYSPARAMS_BUTTON].lf),
984            &(nonclient_metrics.lfMenuFont), sizeof(LOGFONTW));
985     memcpy(&(metrics[IDC_SYSPARAMS_ACTIVE_TITLE_TEXT - IDC_SYSPARAMS_BUTTON].lf),
986            &(nonclient_metrics.lfCaptionFont), sizeof(LOGFONTW));
987     memcpy(&(metrics[IDC_SYSPARAMS_TOOLTIP_TEXT - IDC_SYSPARAMS_BUTTON].lf),
988            &(nonclient_metrics.lfStatusFont), sizeof(LOGFONTW));
989     memcpy(&(metrics[IDC_SYSPARAMS_MSGBOX_TEXT - IDC_SYSPARAMS_BUTTON].lf),
990            &(nonclient_metrics.lfMessageFont), sizeof(LOGFONTW));
991 }
992
993 static void apply_sysparams(void)
994 {
995     NONCLIENTMETRICSW nonclient_metrics;
996     int i, cnt = 0;
997     int colors_idx[sizeof(metrics) / sizeof(metrics[0])];
998     COLORREF colors[sizeof(metrics) / sizeof(metrics[0])];
999
1000     nonclient_metrics.cbSize = sizeof(nonclient_metrics);
1001     SystemParametersInfoW(SPI_GETNONCLIENTMETRICS, sizeof(nonclient_metrics), &nonclient_metrics, 0);
1002
1003     nonclient_metrics.iMenuWidth = nonclient_metrics.iMenuHeight =
1004             metrics[IDC_SYSPARAMS_MENU - IDC_SYSPARAMS_BUTTON].size;
1005     nonclient_metrics.iCaptionWidth = nonclient_metrics.iCaptionHeight =
1006             metrics[IDC_SYSPARAMS_ACTIVE_TITLE - IDC_SYSPARAMS_BUTTON].size;
1007     nonclient_metrics.iScrollWidth = nonclient_metrics.iScrollHeight =
1008             metrics[IDC_SYSPARAMS_SCROLLBAR - IDC_SYSPARAMS_BUTTON].size;
1009
1010     memcpy(&(nonclient_metrics.lfMenuFont),
1011            &(metrics[IDC_SYSPARAMS_MENU_TEXT - IDC_SYSPARAMS_BUTTON].lf),
1012            sizeof(LOGFONTW));
1013     memcpy(&(nonclient_metrics.lfCaptionFont),
1014            &(metrics[IDC_SYSPARAMS_ACTIVE_TITLE_TEXT - IDC_SYSPARAMS_BUTTON].lf),
1015            sizeof(LOGFONTW));
1016     memcpy(&(nonclient_metrics.lfStatusFont),
1017            &(metrics[IDC_SYSPARAMS_TOOLTIP_TEXT - IDC_SYSPARAMS_BUTTON].lf),
1018            sizeof(LOGFONTW));
1019     memcpy(&(nonclient_metrics.lfMessageFont),
1020            &(metrics[IDC_SYSPARAMS_MSGBOX_TEXT - IDC_SYSPARAMS_BUTTON].lf),
1021            sizeof(LOGFONTW));
1022
1023     SystemParametersInfoW(SPI_SETNONCLIENTMETRICS, sizeof(nonclient_metrics), &nonclient_metrics,
1024                           SPIF_UPDATEINIFILE | SPIF_SENDCHANGE);
1025
1026     for (i = 0; i < sizeof(metrics) / sizeof(metrics[0]); i++)
1027         if (metrics[i].color_idx != -1)
1028         {
1029             colors_idx[cnt] = metrics[i].color_idx;
1030             colors[cnt++] = metrics[i].color;
1031         }
1032     SetSysColors(cnt, colors_idx, colors);
1033 }
1034
1035 static void on_sysparam_change(HWND hDlg)
1036 {
1037     int index = SendDlgItemMessageW(hDlg, IDC_SYSPARAM_COMBO, CB_GETCURSEL, 0, 0);
1038
1039     index = SendDlgItemMessageW(hDlg, IDC_SYSPARAM_COMBO, CB_GETITEMDATA, index, 0);
1040
1041     updating_ui = TRUE;
1042
1043     EnableWindow(GetDlgItem(hDlg, IDC_SYSPARAM_COLOR_TEXT), metrics[index].color_idx != -1);
1044     EnableWindow(GetDlgItem(hDlg, IDC_SYSPARAM_COLOR), metrics[index].color_idx != -1);
1045     InvalidateRect(GetDlgItem(hDlg, IDC_SYSPARAM_COLOR), NULL, TRUE);
1046
1047     EnableWindow(GetDlgItem(hDlg, IDC_SYSPARAM_SIZE_TEXT), metrics[index].sm_idx != -1);
1048     EnableWindow(GetDlgItem(hDlg, IDC_SYSPARAM_SIZE), metrics[index].sm_idx != -1);
1049     EnableWindow(GetDlgItem(hDlg, IDC_SYSPARAM_SIZE_UD), metrics[index].sm_idx != -1);
1050     if (metrics[index].sm_idx != -1)
1051         SendDlgItemMessageW(hDlg, IDC_SYSPARAM_SIZE_UD, UDM_SETPOS, 0, MAKELONG(metrics[index].size, 0));
1052     else
1053         set_text(hDlg, IDC_SYSPARAM_SIZE, "");
1054
1055     EnableWindow(GetDlgItem(hDlg, IDC_SYSPARAM_FONT),
1056         index == IDC_SYSPARAMS_MENU_TEXT-IDC_SYSPARAMS_BUTTON ||
1057         index == IDC_SYSPARAMS_ACTIVE_TITLE_TEXT-IDC_SYSPARAMS_BUTTON ||
1058         index == IDC_SYSPARAMS_TOOLTIP_TEXT-IDC_SYSPARAMS_BUTTON ||
1059         index == IDC_SYSPARAMS_MSGBOX_TEXT-IDC_SYSPARAMS_BUTTON
1060     );
1061
1062     updating_ui = FALSE;
1063 }
1064
1065 static void on_draw_item(HWND hDlg, WPARAM wParam, LPARAM lParam)
1066 {
1067     static HBRUSH black_brush = 0;
1068     LPDRAWITEMSTRUCT draw_info = (LPDRAWITEMSTRUCT)lParam;
1069
1070     if (!black_brush) black_brush = CreateSolidBrush(0);
1071
1072     if (draw_info->CtlID == IDC_SYSPARAM_COLOR)
1073     {
1074         UINT state = DFCS_ADJUSTRECT | DFCS_BUTTONPUSH;
1075
1076         if (draw_info->itemState & ODS_DISABLED)
1077             state |= DFCS_INACTIVE;
1078         else
1079             state |= draw_info->itemState & ODS_SELECTED ? DFCS_PUSHED : 0;
1080
1081         DrawFrameControl(draw_info->hDC, &draw_info->rcItem, DFC_BUTTON, state);
1082
1083         if (!(draw_info->itemState & ODS_DISABLED))
1084         {
1085             HBRUSH brush;
1086             int index = SendDlgItemMessageW(hDlg, IDC_SYSPARAM_COMBO, CB_GETCURSEL, 0, 0);
1087
1088             index = SendDlgItemMessageW(hDlg, IDC_SYSPARAM_COMBO, CB_GETITEMDATA, index, 0);
1089             brush = CreateSolidBrush(metrics[index].color);
1090
1091             InflateRect(&draw_info->rcItem, -1, -1);
1092             FrameRect(draw_info->hDC, &draw_info->rcItem, black_brush);
1093             InflateRect(&draw_info->rcItem, -1, -1);
1094             FillRect(draw_info->hDC, &draw_info->rcItem, brush);
1095             DeleteObject(brush);
1096         }
1097     }
1098 }
1099
1100 static void on_select_font(HWND hDlg)
1101 {
1102     CHOOSEFONTW cf;
1103     int index = SendDlgItemMessageW(hDlg, IDC_SYSPARAM_COMBO, CB_GETCURSEL, 0, 0);
1104     index = SendDlgItemMessageW(hDlg, IDC_SYSPARAM_COMBO, CB_GETITEMDATA, index, 0);
1105
1106     ZeroMemory(&cf, sizeof(cf));
1107     cf.lStructSize = sizeof(CHOOSEFONTW);
1108     cf.hwndOwner = hDlg;
1109     cf.lpLogFont = &(metrics[index].lf);
1110     cf.Flags = CF_SCREENFONTS | CF_INITTOLOGFONTSTRUCT | CF_NOSCRIPTSEL;
1111
1112     ChooseFontW(&cf);
1113 }
1114
1115 INT_PTR CALLBACK
1116 ThemeDlgProc (HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
1117 {
1118     switch (uMsg) {
1119         case WM_INITDIALOG:
1120             read_shell_folder_link_targets();
1121             init_shell_folder_listview_headers(hDlg);
1122             update_shell_folder_listview(hDlg);
1123             read_sysparams(hDlg);
1124             break;
1125         
1126         case WM_DESTROY:
1127             free_theme_files();
1128             break;
1129
1130         case WM_SHOWWINDOW:
1131             set_window_title(hDlg);
1132             break;
1133             
1134         case WM_COMMAND:
1135             switch(HIWORD(wParam)) {
1136                 case CBN_SELCHANGE: {
1137                     if (updating_ui) break;
1138                     switch (LOWORD(wParam))
1139                     {
1140                         case IDC_THEME_THEMECOMBO: on_theme_changed(hDlg); break;
1141                         case IDC_THEME_COLORCOMBO: /* fall through */
1142                         case IDC_THEME_SIZECOMBO: theme_dirty = TRUE; break;
1143                         case IDC_SYSPARAM_COMBO: on_sysparam_change(hDlg); return FALSE;
1144                     }
1145                     SendMessage(GetParent(hDlg), PSM_CHANGED, 0, 0);
1146                     break;
1147                 }
1148                 case EN_CHANGE: {
1149                     if (updating_ui) break;
1150                     switch (LOWORD(wParam))
1151                     {
1152                         case IDC_EDIT_SFPATH: on_shell_folder_edit_changed(hDlg); break;
1153                         case IDC_SYSPARAM_SIZE:
1154                         {
1155                             char *text = get_text(hDlg, IDC_SYSPARAM_SIZE);
1156                             int index = SendDlgItemMessageW(hDlg, IDC_SYSPARAM_COMBO, CB_GETCURSEL, 0, 0);
1157
1158                             index = SendDlgItemMessageW(hDlg, IDC_SYSPARAM_COMBO, CB_GETITEMDATA, index, 0);
1159                             metrics[index].size = atoi(text);
1160                             HeapFree(GetProcessHeap(), 0, text);
1161
1162                             SendMessage(GetParent(hDlg), PSM_CHANGED, 0, 0);
1163                             break;
1164                         }
1165                     }
1166                     break;
1167                 }
1168                 case BN_CLICKED:
1169                     switch (LOWORD(wParam))
1170                     {
1171                         case IDC_THEME_INSTALL:
1172                             on_theme_install (hDlg);
1173                             break;
1174
1175                         case IDC_SYSPARAM_FONT:
1176                             on_select_font(hDlg);
1177                             break;
1178
1179                         case IDC_BROWSE_SFPATH:
1180                         {
1181                             WCHAR link[FILENAME_MAX];
1182                             if (browse_for_unix_folder(hDlg, link)) {
1183                                 WideCharToMultiByte(CP_UNIXCP, 0, link, -1,
1184                                                     psfiSelected->szLinkTarget, FILENAME_MAX,
1185                                                     NULL, NULL);
1186                                 update_shell_folder_listview(hDlg);
1187                                 SendMessage(GetParent(hDlg), PSM_CHANGED, 0, 0);
1188                             }
1189                             break;
1190                         }
1191
1192                         case IDC_LINK_SFPATH:
1193                             if (IsDlgButtonChecked(hDlg, IDC_LINK_SFPATH)) {
1194                                 WCHAR link[FILENAME_MAX];
1195                                 if (browse_for_unix_folder(hDlg, link)) {
1196                                     WideCharToMultiByte(CP_UNIXCP, 0, link, -1,
1197                                                         psfiSelected->szLinkTarget, FILENAME_MAX,
1198                                                         NULL, NULL);
1199                                     update_shell_folder_listview(hDlg);
1200                                     SendMessage(GetParent(hDlg), PSM_CHANGED, 0, 0);
1201                                 } else {
1202                                     CheckDlgButton(hDlg, IDC_LINK_SFPATH, BST_UNCHECKED);
1203                                 }
1204                             } else {
1205                                 psfiSelected->szLinkTarget[0] = '\0';
1206                                 update_shell_folder_listview(hDlg);
1207                                 SendMessage(GetParent(hDlg), PSM_CHANGED, 0, 0);
1208                             }
1209                             break;    
1210
1211                         case IDC_SYSPARAM_COLOR:
1212                         {
1213                             static COLORREF user_colors[16];
1214                             CHOOSECOLORW c_color;
1215                             int index = SendDlgItemMessageW(hDlg, IDC_SYSPARAM_COMBO, CB_GETCURSEL, 0, 0);
1216
1217                             index = SendDlgItemMessageW(hDlg, IDC_SYSPARAM_COMBO, CB_GETITEMDATA, index, 0);
1218
1219                             memset(&c_color, 0, sizeof(c_color));
1220                             c_color.lStructSize = sizeof(c_color);
1221                             c_color.lpCustColors = user_colors;
1222                             c_color.rgbResult = metrics[index].color;
1223                             c_color.Flags = CC_ANYCOLOR | CC_RGBINIT;
1224                             c_color.hwndOwner = hDlg;
1225                             if (ChooseColorW(&c_color))
1226                             {
1227                                 metrics[index].color = c_color.rgbResult;
1228                                 save_sys_color(index, metrics[index].color);
1229                                 InvalidateRect(GetDlgItem(hDlg, IDC_SYSPARAM_COLOR), NULL, TRUE);
1230                                 SendMessage(GetParent(hDlg), PSM_CHANGED, 0, 0);
1231                             }
1232                             break;
1233                         }
1234                     }
1235                     break;
1236             }
1237             break;
1238         
1239         case WM_NOTIFY:
1240             switch (((LPNMHDR)lParam)->code) {
1241                 case PSN_KILLACTIVE: {
1242                     SetWindowLongPtr(hDlg, DWLP_MSGRESULT, FALSE);
1243                     break;
1244                 }
1245                 case PSN_APPLY: {
1246                     apply();
1247                     apply_theme(hDlg);
1248                     apply_shell_folder_changes();
1249                     apply_sysparams();
1250                     read_shell_folder_link_targets();
1251                     update_shell_folder_listview(hDlg);
1252                     SetWindowLongPtr(hDlg, DWLP_MSGRESULT, PSNRET_NOERROR);
1253                     break;
1254                 }
1255                 case LVN_ITEMCHANGED: { 
1256                     if (wParam == IDC_LIST_SFPATHS)  
1257                         on_shell_folder_selection_changed(hDlg, (LPNMLISTVIEW)lParam);
1258                     break;
1259                 }
1260                 case PSN_SETACTIVE: {
1261                     init_dialog (hDlg);
1262                     break;
1263                 }
1264             }
1265             break;
1266
1267         case WM_DRAWITEM:
1268             on_draw_item(hDlg, wParam, lParam);
1269             break;
1270
1271         default:
1272             break;
1273     }
1274     return FALSE;
1275 }