dlls/appwiz.cpl/addons.c

   1 /*
   2  * Copyright 2006-2010 Jacek Caban for CodeWeavers
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  17  */
  18
  19 #include <stdarg.h>
  20 #include <fcntl.h>
  21 #include <stdio.h>
  22 #include <errno.h>
  23
  24 #define COBJMACROS
  25 #include "windef.h"
  26 #include "winbase.h"
  27 #include "winuser.h"
  28 #include "cpl.h"
  29 #include "winreg.h"
  30 #include "ole2.h"
  31 #include "commctrl.h"
  32 #include "advpub.h"
  33 #include "wininet.h"
  34 #include "pathcch.h"
  35 #include "shellapi.h"
  36 #include "urlmon.h"
  37 #include "msi.h"
  38 #include "bcrypt.h"
  39
  40 #include "appwiz.h"
  41 #include "res.h"
  42
  43 #include "wine/debug.h"
  44
  45 WINE_DEFAULT_DEBUG_CHANNEL(appwizcpl);
  46
  47 #define GECKO_VERSION "2.47.4"
  48 #ifdef __i386__
  49 #define GECKO_ARCH "x86"
  50 #define GECKO_SHA "26cecc47706b091908f7f814bddb074c61beb8063318e9efc5a7f789857793d6"
  51 #elif defined(__x86_64__)
  52 #define GECKO_ARCH "x86_64"
  53 #define GECKO_SHA "e590b7d988a32d6aa4cf1d8aa3aa3d33766fdd4cf4c89c2dcc2095ecb28d066f"
  54 #else
  55 #define GECKO_ARCH ""
  56 #define GECKO_SHA "???"
  57 #endif
  58
  59 #define MONO_VERSION "9.2.0"
  60 #if defined(__i386__) || defined(__x86_64__)
  61 #define MONO_ARCH "x86"
  62 #define MONO_SHA "fd5829244d92985b8a404745adddb58c3a9b0bbb6d54ca4c6eaf86ea466735f9"
  63 #else
  64 #define MONO_ARCH ""
  65 #define MONO_SHA "???"
  66 #endif
  67
  68 typedef struct {
  69     const char *version;
  70     const WCHAR *file_name;
  71     const WCHAR *subdir_name;
  72     const char *sha;
  73     const char *url_default;
  74     const char *config_key;
  75     const char *url_config_key;
  76     const char *dir_config_key;
  77     LPCWSTR dialog_template;
  78 } addon_info_t;
  79
  80 /* Download addon files over HTTP because Wine depends on an external library
  81  * for TLS, so we can't be sure that HTTPS will work. The integrity of each file
  82  * is checked with a hardcoded cryptographically secure hash. */
  83 static const addon_info_t addons_info[] = {
  84     {
  85         GECKO_VERSION,
  86         L"wine-gecko-" GECKO_VERSION "-" GECKO_ARCH ".msi",
  87         L"gecko",
  88         GECKO_SHA,
  89         "http://source.winehq.org/winegecko.php",
  90         "MSHTML", "GeckoUrl", "GeckoCabDir",
  91         MAKEINTRESOURCEW(ID_DWL_GECKO_DIALOG)
  92     },
  93     {
  94         MONO_VERSION,
  95         L"wine-mono-" MONO_VERSION "-" MONO_ARCH ".msi",
  96         L"mono",
  97         MONO_SHA,
  98         "http://source.winehq.org/winemono.php",
  99         "Dotnet", "MonoUrl", "MonoCabDir",
 100         MAKEINTRESOURCEW(ID_DWL_MONO_DIALOG)
 101     }
 102 };
 103
 104 static const addon_info_t *addon;
 105
 106 static HWND install_dialog = NULL;
 107 static LPWSTR url = NULL;
 108 static IBinding *dwl_binding;
 109 static WCHAR *msi_file;
 110
 111 static const char * (CDECL *p_wine_get_version)(void);
 112 static WCHAR * (CDECL *p_wine_get_dos_file_name)(const char*);
 113
 114 static BOOL sha_check(const WCHAR *file_name)
 115 {
 116     const unsigned char *file_map;
 117     HANDLE file, map;
 118     DWORD size, i;
 119     UCHAR sha[32];
 120     char buf[1024];
 121     BOOL ret = FALSE;
 122
 123     file = CreateFileW(file_name, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_READONLY, NULL);
 124     if(file == INVALID_HANDLE_VALUE) {
 125         WARN("Could not open file: %lu\n", GetLastError());
 126         return FALSE;
 127     }
 128
 129     size = GetFileSize(file, NULL);
 130
 131     map = CreateFileMappingW(file, NULL, PAGE_READONLY, 0, 0, NULL);
 132     CloseHandle(file);
 133     if(!map)
 134         return FALSE;
 135
 136     file_map = MapViewOfFile(map, FILE_MAP_READ, 0, 0, 0);
 137     CloseHandle(map);
 138     if(!file_map)
 139         return FALSE;
 140
 141     if(!BCryptHash(BCRYPT_SHA256_ALG_HANDLE, NULL, 0, (UCHAR *)file_map, size, sha, sizeof(sha))) {
 142         for(i=0; i < sizeof(sha); i++)
 143             sprintf(buf + i * 2, "%02x", sha[i]);
 144
 145         ret = !strcmp(buf, addon->sha);
 146         if(!ret)
 147             WARN("Got %s, expected %s\n", buf, addon->sha);
 148     }
 149
 150     UnmapViewOfFile(file_map);
 151     return ret;
 152 }
 153
 154 static void set_status(DWORD id)
 155 {
 156     HWND status = GetDlgItem(install_dialog, ID_DWL_STATUS);
 157     WCHAR buf[64];
 158
 159     LoadStringW(hInst, id, buf, ARRAY_SIZE(buf));
 160     SendMessageW(status, WM_SETTEXT, 0, (LPARAM)buf);
 161 }
 162
 163 enum install_res {
 164     INSTALL_OK = 0,
 165     INSTALL_FAILED,
 166     INSTALL_NEXT,
 167 };
 168
 169 static enum install_res install_file(const WCHAR *file_name)
 170 {
 171     ULONG res;
 172
 173     res = MsiInstallProductW(file_name, NULL);
 174     if(res == ERROR_PRODUCT_VERSION)
 175         res = MsiInstallProductW(file_name, L"REINSTALL=ALL REINSTALLMODE=vomus");
 176     if(res != ERROR_SUCCESS) {
 177         ERR("MsiInstallProduct failed: %lu\n", res);
 178         return INSTALL_FAILED;
 179     }
 180
 181     return INSTALL_OK;
 182 }
 183
 184 static enum install_res install_from_dos_file(const WCHAR *dir, const WCHAR *subdir, const WCHAR *file_name)
 185 {
 186     WCHAR *path, *canonical_path;
 187     enum install_res ret;
 188     int len = lstrlenW( dir );
 189     int size = len + 1;
 190     HRESULT hr;
 191
 192     size += lstrlenW( subdir ) + lstrlenW( file_name ) + 2;
 193     if (!(path = malloc( size * sizeof(WCHAR) ))) return INSTALL_FAILED;
 194
 195     lstrcpyW( path, dir );
 196     if (!wcsncmp( path, L"\\??\\", 4 ))  path[1] = '\\';  /* change \??\ into \\?\ */
 197     if (len && path[len-1] != '/' && path[len-1] != '\\') path[len++] = '\\';
 198
 199     lstrcpyW( path + len, subdir );
 200     lstrcatW( path, L"\\" );
 201     lstrcatW( path, file_name );
 202
 203     hr = PathAllocCanonicalize( path, PATHCCH_ALLOW_LONG_PATHS, &canonical_path );
 204     if (FAILED( hr ))
 205     {
 206         ERR( "Failed to canonicalize %s, hr %#lx\n", debugstr_w(path), hr );
 207         free( path );
 208         return INSTALL_NEXT;
 209     }
 210     free( path );
 211
 212     if (GetFileAttributesW( canonical_path ) == INVALID_FILE_ATTRIBUTES)
 213     {
 214         TRACE( "%s not found\n", debugstr_w(canonical_path) );
 215         LocalFree( canonical_path );
 216         return INSTALL_NEXT;
 217     }
 218
 219     ret = install_file( canonical_path );
 220
 221     LocalFree( canonical_path );
 222     return ret;
 223 }
 224
 225 static enum install_res install_from_unix_file(const char *dir, const WCHAR *subdir, const WCHAR *file_name)
 226 {
 227     WCHAR *dos_dir;
 228     enum install_res ret = INSTALL_NEXT;
 229
 230     if (p_wine_get_dos_file_name && (dos_dir = p_wine_get_dos_file_name( dir )))
 231     {
 232         ret = install_from_dos_file( dos_dir, subdir, file_name );
 233         HeapFree( GetProcessHeap(), 0, dos_dir );
 234     }
 235     return ret;
 236 }
 237
 238 static HKEY open_config_key(void)
 239 {
 240     HKEY hkey, ret;
 241     DWORD res;
 242
 243     /* @@ Wine registry key: HKCU\Software\Wine\$config_key */
 244     res = RegOpenKeyW(HKEY_CURRENT_USER, L"Software\\Wine", &hkey);
 245     if(res != ERROR_SUCCESS)
 246         return NULL;
 247
 248     res = RegOpenKeyA(hkey, addon->config_key, &ret);
 249     RegCloseKey(hkey);
 250     return res == ERROR_SUCCESS ? ret : NULL;
 251 }
 252
 253 static enum install_res install_from_registered_dir(void)
 254 {
 255     char *package_dir, *new_package_dir;
 256     HKEY hkey;
 257     DWORD res, type, size = MAX_PATH;
 258     enum install_res ret;
 259
 260     hkey = open_config_key();
 261     if(!hkey)
 262         return INSTALL_NEXT;
 263
 264     package_dir = malloc(size);
 265     res = RegGetValueA(hkey, NULL, addon->dir_config_key, RRF_RT_ANY, &type, (PBYTE)package_dir, &size);
 266     if(res == ERROR_MORE_DATA) {
 267         new_package_dir = realloc(package_dir, size);
 268         if(new_package_dir) {
 269             package_dir = new_package_dir;
 270             res = RegGetValueA(hkey, NULL, addon->dir_config_key, RRF_RT_ANY, &type, (PBYTE)package_dir, &size);
 271         }
 272     }
 273     RegCloseKey(hkey);
 274     if(res == ERROR_FILE_NOT_FOUND) {
 275         free(package_dir);
 276         return INSTALL_NEXT;
 277     } else if(res != ERROR_SUCCESS || (type != REG_SZ && type != REG_EXPAND_SZ)) {
 278         free(package_dir);
 279         return INSTALL_FAILED;
 280     }
 281
 282     ret = install_from_unix_file(package_dir, L"", addon->file_name);
 283
 284     free(package_dir);
 285     return ret;
 286 }
 287
 288 static enum install_res install_from_default_dir(void)
 289 {
 290     const WCHAR *package_dir;
 291     WCHAR *dir_buf = NULL;
 292     enum install_res ret = INSTALL_NEXT;
 293
 294     if ((package_dir = _wgetenv( L"WINEBUILDDIR" )))
 295     {
 296         dir_buf = malloc( wcslen(package_dir) * sizeof(WCHAR) + sizeof(L"\\..\\") );
 297         lstrcpyW( dir_buf, package_dir );
 298         lstrcatW( dir_buf, L"\\..\\" );
 299         package_dir = dir_buf;
 300     }
 301     else package_dir = _wgetenv( L"WINEDATADIR" );
 302
 303     if (package_dir)
 304     {
 305         ret = install_from_dos_file(package_dir, addon->subdir_name, addon->file_name);
 306         free(dir_buf);
 307     }
 308
 309     if (ret == INSTALL_NEXT)
 310         ret = install_from_unix_file(INSTALL_DATADIR "/wine/", addon->subdir_name, addon->file_name);
 311     if (ret == INSTALL_NEXT && strcmp(INSTALL_DATADIR, "/usr/share") != 0)
 312         ret = install_from_unix_file("/usr/share/wine/", addon->subdir_name, addon->file_name);
 313     if (ret == INSTALL_NEXT)
 314         ret = install_from_unix_file("/opt/wine/", addon->subdir_name, addon->file_name);
 315     return ret;
 316 }
 317
 318 static WCHAR *get_cache_file_name(BOOL ensure_exists)
 319 {
 320     const char *xdg_dir;
 321     const WCHAR *home_dir;
 322     WCHAR *cache_dir, *ret;
 323     size_t len, size;
 324
 325     xdg_dir = getenv( "XDG_CACHE_HOME" );
 326     if (xdg_dir && *xdg_dir && p_wine_get_dos_file_name)
 327     {
 328         if (!(cache_dir = p_wine_get_dos_file_name( xdg_dir ))) return NULL;
 329     }
 330     else if ((home_dir = _wgetenv( L"WINEHOMEDIR" )))
 331     {
 332         if (!(cache_dir = HeapAlloc( GetProcessHeap(), 0, wcslen(home_dir) * sizeof(WCHAR) + sizeof(L"\\.cache") ))) return NULL;
 333         lstrcpyW( cache_dir, home_dir );
 334         lstrcatW( cache_dir, L"\\.cache" );
 335         cache_dir[1] = '\\';  /* change \??\ into \\?\ */
 336     }
 337     else return NULL;
 338
 339     if (ensure_exists && !CreateDirectoryW( cache_dir, NULL ) && GetLastError() != ERROR_ALREADY_EXISTS)
 340     {
 341         WARN( "%s does not exist and could not be created (%lu)\n", debugstr_w(cache_dir), GetLastError() );
 342         HeapFree( GetProcessHeap(), 0, cache_dir );
 343         return NULL;
 344     }
 345
 346     size = lstrlenW( cache_dir ) + ARRAY_SIZE(L"\\wine") + lstrlenW( addon->file_name ) + 1;
 347     if (!(ret = malloc( size * sizeof(WCHAR) )))
 348     {
 349         HeapFree( GetProcessHeap(), 0, cache_dir );
 350         return NULL;
 351     }
 352     lstrcpyW( ret, cache_dir );
 353     lstrcatW( ret, L"\\wine" );
 354     HeapFree( GetProcessHeap(), 0, cache_dir );
 355
 356     if (ensure_exists && !CreateDirectoryW( ret, NULL ) && GetLastError() != ERROR_ALREADY_EXISTS)
 357     {
 358         WARN( "%s does not exist and could not be created (%lu)\n", debugstr_w(ret), GetLastError() );
 359         free( ret );
 360         return NULL;
 361     }
 362     len = lstrlenW( ret );
 363     ret[len++] = '\\';
 364     lstrcpyW( ret + len, addon->file_name );
 365
 366     TRACE( "got %s\n", debugstr_w(ret) );
 367     return ret;
 368 }
 369
 370 static enum install_res install_from_cache(void)
 371 {
 372     WCHAR *cache_file_name;
 373     enum install_res res;
 374
 375     cache_file_name = get_cache_file_name(FALSE);
 376     if(!cache_file_name)
 377         return INSTALL_NEXT;
 378
 379     if(!sha_check(cache_file_name)) {
 380         WARN("could not validate checksum\n");
 381         DeleteFileW(cache_file_name);
 382         free(cache_file_name);
 383         return INSTALL_NEXT;
 384     }
 385
 386     res = install_file(cache_file_name);
 387     free(cache_file_name);
 388     return res;
 389 }
 390
 391 static IInternetBindInfo InstallCallbackBindInfo;
 392
 393 static HRESULT WINAPI InstallCallback_QueryInterface(IBindStatusCallback *iface,
 394         REFIID riid, void **ppv)
 395 {
 396     if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IBindStatusCallback, riid)) {
 397         *ppv = iface;
 398         return S_OK;
 399     }
 400
 401     if(IsEqualGUID(&IID_IInternetBindInfo, riid)) {
 402         TRACE("IID_IInternetBindInfo\n");
 403         *ppv = &InstallCallbackBindInfo;
 404         return S_OK;
 405     }
 406
 407     return E_INVALIDARG;
 408 }
 409
 410 static ULONG WINAPI InstallCallback_AddRef(IBindStatusCallback *iface)
 411 {
 412     return 2;
 413 }
 414
 415 static ULONG WINAPI InstallCallback_Release(IBindStatusCallback *iface)
 416 {
 417     return 1;
 418 }
 419
 420 static HRESULT WINAPI InstallCallback_OnStartBinding(IBindStatusCallback *iface,
 421         DWORD dwReserved, IBinding *pib)
 422 {
 423     set_status(IDS_DOWNLOADING);
 424
 425     IBinding_AddRef(pib);
 426     dwl_binding = pib;
 427
 428     return S_OK;
 429 }
 430
 431 static HRESULT WINAPI InstallCallback_GetPriority(IBindStatusCallback *iface,
 432         LONG *pnPriority)
 433 {
 434     return E_NOTIMPL;
 435 }
 436
 437 static HRESULT WINAPI InstallCallback_OnLowResource(IBindStatusCallback *iface,
 438        DWORD dwReserved)
 439 {
 440     return E_NOTIMPL;
 441 }
 442
 443 static HRESULT WINAPI InstallCallback_OnProgress(IBindStatusCallback *iface, ULONG ulProgress,
 444         ULONG ulProgressMax, ULONG ulStatusCode, LPCWSTR szStatusText)
 445 {
 446     HWND progress = GetDlgItem(install_dialog, ID_DWL_PROGRESS);
 447
 448     if(ulProgressMax)
 449         SendMessageW(progress, PBM_SETRANGE32, 0, ulProgressMax);
 450     if(ulProgress)
 451         SendMessageW(progress, PBM_SETPOS, ulProgress, 0);
 452
 453     return S_OK;
 454 }
 455
 456 static HRESULT WINAPI InstallCallback_OnStopBinding(IBindStatusCallback *iface,
 457         HRESULT hresult, LPCWSTR szError)
 458 {
 459     if(dwl_binding) {
 460         IBinding_Release(dwl_binding);
 461         dwl_binding = NULL;
 462     }
 463
 464     if(FAILED(hresult)) {
 465         if(hresult == E_ABORT)
 466             TRACE("Binding aborted\n");
 467         else
 468             ERR("Binding failed %08lx\n", hresult);
 469         return S_OK;
 470     }
 471
 472     if(!msi_file) {
 473         ERR("No MSI file\n");
 474         return E_FAIL;
 475     }
 476
 477     set_status(IDS_INSTALLING);
 478     EnableWindow(GetDlgItem(install_dialog, IDCANCEL), 0);
 479
 480     if(sha_check(msi_file)) {
 481         WCHAR *cache_file_name;
 482
 483         install_file(msi_file);
 484
 485         cache_file_name = get_cache_file_name(TRUE);
 486         if(cache_file_name) {
 487             CopyFileW(msi_file, cache_file_name, FALSE);
 488             free(cache_file_name);
 489         }
 490     }else {
 491         WCHAR message[256];
 492
 493         if(LoadStringW(hInst, IDS_INVALID_SHA, message, ARRAY_SIZE(message)))
 494             MessageBoxW(NULL, message, NULL, MB_ICONERROR);
 495     }
 496
 497     DeleteFileW(msi_file);
 498     free(msi_file);
 499     msi_file = NULL;
 500
 501     EndDialog(install_dialog, 0);
 502     return S_OK;
 503 }
 504
 505 static HRESULT WINAPI InstallCallback_GetBindInfo(IBindStatusCallback *iface,
 506         DWORD* grfBINDF, BINDINFO* pbindinfo)
 507 {
 508     TRACE("()\n");
 509
 510     *grfBINDF = BINDF_ASYNCHRONOUS;
 511     return S_OK;
 512 }
 513
 514 static HRESULT WINAPI InstallCallback_OnDataAvailable(IBindStatusCallback *iface, DWORD grfBSCF,
 515         DWORD dwSize, FORMATETC* pformatetc, STGMEDIUM* pstgmed)
 516 {
 517     if(!msi_file) {
 518         msi_file = wcsdup(pstgmed->lpszFileName);
 519         TRACE("got file name %s\n", debugstr_w(msi_file));
 520     }
 521
 522     return S_OK;
 523 }
 524
 525 static HRESULT WINAPI InstallCallback_OnObjectAvailable(IBindStatusCallback *iface,
 526         REFIID riid, IUnknown* punk)
 527 {
 528     ERR("\n");
 529     return E_NOTIMPL;
 530 }
 531
 532 static const IBindStatusCallbackVtbl InstallCallbackVtbl = {
 533     InstallCallback_QueryInterface,
 534     InstallCallback_AddRef,
 535     InstallCallback_Release,
 536     InstallCallback_OnStartBinding,
 537     InstallCallback_GetPriority,
 538     InstallCallback_OnLowResource,
 539     InstallCallback_OnProgress,
 540     InstallCallback_OnStopBinding,
 541     InstallCallback_GetBindInfo,
 542     InstallCallback_OnDataAvailable,
 543     InstallCallback_OnObjectAvailable
 544 };
 545
 546 static IBindStatusCallback InstallCallback = { &InstallCallbackVtbl };
 547
 548 static HRESULT WINAPI InstallCallbackBindInfo_QueryInterface(IInternetBindInfo *iface, REFIID riid, void **ppv)
 549 {
 550     return IBindStatusCallback_QueryInterface(&InstallCallback, riid, ppv);
 551 }
 552
 553 static ULONG WINAPI InstallCallbackBindInfo_AddRef(IInternetBindInfo *iface)
 554 {
 555     return 2;
 556 }
 557
 558 static ULONG WINAPI InstallCallbackBindInfo_Release(IInternetBindInfo *iface)
 559 {
 560     return 1;
 561 }
 562
 563 static HRESULT WINAPI InstallCallbackBindInfo_GetBindInfo(IInternetBindInfo *iface, DWORD *bindf, BINDINFO *bindinfo)
 564 {
 565     ERR("\n");
 566     return E_NOTIMPL;
 567 }
 568
 569 static HRESULT WINAPI InstallCallbackBindInfo_GetBindString(IInternetBindInfo *iface, ULONG string_type,
 570         WCHAR **strs, ULONG cnt, ULONG *fetched)
 571 {
 572     switch(string_type) {
 573     case BINDSTRING_USER_AGENT:
 574         TRACE("BINDSTRING_USER_AGENT\n");
 575
 576         *strs = CoTaskMemAlloc(sizeof(L"Wine Addon Downloader"));
 577         if(!*strs)
 578             return E_OUTOFMEMORY;
 579
 580         lstrcpyW(*strs, L"Wine Addon Downloader");
 581         *fetched = 1;
 582         return S_OK;
 583     }
 584
 585     return E_NOTIMPL;
 586 }
 587
 588 static const IInternetBindInfoVtbl InstallCallbackBindInfoVtbl = {
 589     InstallCallbackBindInfo_QueryInterface,
 590     InstallCallbackBindInfo_AddRef,
 591     InstallCallbackBindInfo_Release,
 592     InstallCallbackBindInfo_GetBindInfo,
 593     InstallCallbackBindInfo_GetBindString
 594 };
 595
 596 static IInternetBindInfo InstallCallbackBindInfo = { &InstallCallbackBindInfoVtbl };
 597
 598 static void append_url_params( WCHAR *url )
 599 {
 600     DWORD size = INTERNET_MAX_URL_LENGTH * sizeof(WCHAR);
 601     DWORD len = lstrlenW(url);
 602
 603     lstrcpyW(url+len, L"?arch=");
 604     len += lstrlenW(L"?arch=");
 605     len += MultiByteToWideChar(CP_ACP, 0, GECKO_ARCH, sizeof(GECKO_ARCH),
 606                                url+len, size/sizeof(WCHAR)-len)-1;
 607     lstrcpyW(url+len, L"&v=");
 608     len += lstrlenW(L"&v=");
 609     len += MultiByteToWideChar(CP_ACP, 0, addon->version, -1, url+len, size/sizeof(WCHAR)-len)-1;
 610     lstrcpyW(url+len, L"&winev=");
 611     len += lstrlenW(L"&winev=");
 612     MultiByteToWideChar(CP_ACP, 0, p_wine_get_version() ? p_wine_get_version() : 0, -1, url+len, size/sizeof(WCHAR)-len);
 613 }
 614
 615 static LPWSTR get_url(void)
 616 {
 617     DWORD size = INTERNET_MAX_URL_LENGTH*sizeof(WCHAR);
 618     WCHAR *url, *config_key;
 619     HKEY hkey;
 620     DWORD res, type;
 621     DWORD returned_size;
 622
 623     static const WCHAR httpW[] = {'h','t','t','p'};
 624
 625     url = malloc(size);
 626     returned_size = size;
 627
 628     hkey = open_config_key();
 629     if (hkey)
 630     {
 631         config_key = strdupAtoW(addon->url_config_key);
 632         res = RegQueryValueExW(hkey, config_key, NULL, &type, (LPBYTE)url, &returned_size);
 633         free(config_key);
 634         RegCloseKey(hkey);
 635         if(res == ERROR_SUCCESS && type == REG_SZ) goto found;
 636     }
 637
 638     MultiByteToWideChar( CP_ACP, 0, addon->url_default, -1, url, size / sizeof(WCHAR) );
 639
 640 found:
 641     if (returned_size > sizeof(httpW) && !memcmp(url, httpW, sizeof(httpW))) append_url_params( url );
 642
 643     TRACE("Got URL %s\n", debugstr_w(url));
 644     return url;
 645 }
 646
 647 static BOOL start_download(void)
 648 {
 649     IBindCtx *bind_ctx;
 650     IMoniker *mon;
 651     IUnknown *tmp;
 652     HRESULT hres;
 653
 654     hres = CreateURLMoniker(NULL, url, &mon);
 655     if(FAILED(hres))
 656         return FALSE;
 657
 658     hres = CreateAsyncBindCtx(0, &InstallCallback, NULL, &bind_ctx);
 659     if(SUCCEEDED(hres)) {
 660         hres = IMoniker_BindToStorage(mon, bind_ctx, NULL, &IID_IUnknown, (void**)&tmp);
 661         IBindCtx_Release(bind_ctx);
 662     }
 663     IMoniker_Release(mon);
 664     if(FAILED(hres))
 665         return FALSE;
 666
 667     if(tmp)
 668         IUnknown_Release(tmp);
 669     return TRUE;
 670 }
 671
 672 static void run_winebrowser(const WCHAR *url)
 673 {
 674     PROCESS_INFORMATION pi;
 675     STARTUPINFOW si;
 676     WCHAR app[MAX_PATH];
 677     LONG len, url_len;
 678     WCHAR *args;
 679     BOOL ret;
 680
 681     url_len = lstrlenW(url);
 682
 683     len = GetSystemDirectoryW(app, MAX_PATH - ARRAY_SIZE(L"\\winebrowser.exe"));
 684     lstrcpyW(app+len, L"\\winebrowser.exe");
 685     len += ARRAY_SIZE(L"\\winebrowser.exe") - 1;
 686
 687     args = malloc((len + 1 + url_len) * sizeof(WCHAR));
 688     if(!args)
 689         return;
 690
 691     memcpy(args, app, len*sizeof(WCHAR));
 692     args[len++] = ' ';
 693     memcpy(args+len, url, (url_len+1) * sizeof(WCHAR));
 694
 695     TRACE("starting %s\n", debugstr_w(args));
 696
 697     memset(&si, 0, sizeof(si));
 698     si.cb = sizeof(si);
 699     ret = CreateProcessW(app, args, NULL, NULL, FALSE, DETACHED_PROCESS, NULL, NULL, &si, &pi);
 700     free(args);
 701     if (ret) {
 702         CloseHandle(pi.hThread);
 703         CloseHandle(pi.hProcess);
 704     }
 705 }
 706
 707 static INT_PTR CALLBACK installer_proc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
 708 {
 709     switch(msg) {
 710     case WM_INITDIALOG:
 711         ShowWindow(GetDlgItem(hwnd, ID_DWL_PROGRESS), SW_HIDE);
 712         install_dialog = hwnd;
 713         return TRUE;
 714
 715     case WM_NOTIFY:
 716         switch (((NMHDR *)lParam)->code)
 717         {
 718         case NM_CLICK:
 719         case NM_RETURN:
 720             if (wParam == ID_DWL_STATUS)
 721                 run_winebrowser(((NMLINK*)lParam)->item.szUrl);
 722             break;
 723         }
 724         break;
 725
 726     case WM_COMMAND:
 727         switch(wParam) {
 728         case IDCANCEL:
 729             if(dwl_binding)
 730                 IBinding_Abort(dwl_binding);
 731             EndDialog(hwnd, 0);
 732             return FALSE;
 733
 734         case ID_DWL_INSTALL:
 735             ShowWindow(GetDlgItem(hwnd, ID_DWL_PROGRESS), SW_SHOW);
 736             EnableWindow(GetDlgItem(hwnd, ID_DWL_INSTALL), 0);
 737             if(!start_download())
 738                 EndDialog(install_dialog, 0);
 739         }
 740     }
 741
 742     return FALSE;
 743 }
 744
 745 BOOL install_addon(addon_t addon_type)
 746 {
 747     if(!*GECKO_ARCH)
 748         return FALSE;
 749
 750     addon = addons_info+addon_type;
 751
 752     p_wine_get_dos_file_name = (void *)GetProcAddress(GetModuleHandleW(L"kernel32.dll"), "wine_get_dos_file_name");
 753     p_wine_get_version = (void *)GetProcAddress(GetModuleHandleW(L"ntdll.dll"), "wine_get_version");
 754
 755     /*
 756      * Try to find addon .msi file in following order:
 757      * - directory stored in $dir_config_key value of HKCU/Software/Wine/$config_key key
 758      * - $datadir/$addon_subdir/
 759      * - $INSTALL_DATADIR/wine/$addon_subdir/
 760      * - /usr/share/wine/$addon_subdir/
 761      * - /opt/wine/$addon_subdir/
 762      * - download from URL stored in $url_config_key value of HKCU/Software/Wine/$config_key key
 763      */
 764     if (install_from_registered_dir() == INSTALL_NEXT
 765         && install_from_default_dir() == INSTALL_NEXT
 766         && install_from_cache() == INSTALL_NEXT
 767         && (url = get_url()))
 768         DialogBoxW(hInst, addon->dialog_template, 0, installer_proc);
 769
 770     free(url);
 771     url = NULL;
 772     return TRUE;
 773 }