2 * Copyright 2006-2010 Jacek Caban for CodeWeavers
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.
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.
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
20 #include "wine/port.h"
31 #define NONAMELESSUNION
50 #include "wine/debug.h"
51 #include "wine/library.h"
53 WINE_DEFAULT_DEBUG_CHANNEL(appwizcpl
);
55 #define GECKO_VERSION "2.47"
58 #define ARCH_STRING "x86"
59 #define GECKO_SHA "3b8a361f5d63952d21caafd74e849a774994822fb96c5922b01d554f1677643a"
60 #elif defined(__x86_64__)
61 #define ARCH_STRING "x86_64"
62 #define GECKO_SHA "c565ea25e50ea953937d4ab01299e4306da4a556946327d253ea9b28357e4a7d"
64 #define ARCH_STRING ""
65 #define GECKO_SHA "???"
68 #define MONO_VERSION "4.7.1"
69 #define MONO_SHA "2c8d5db7f833c3413b2519991f5af1f433d59a927564ec6f38a3f1f8b2c629aa"
73 const char *file_name
;
74 const char *subdir_name
;
76 const char *url_default
;
77 const char *config_key
;
78 const char *url_config_key
;
79 const char *dir_config_key
;
80 LPCWSTR dialog_template
;
83 /* Download addon files over HTTP because Wine depends on an external library
84 * for TLS, so we can't be sure that HTTPS will work. The integrity of each file
85 * is checked with a hardcoded cryptographically secure hash. */
86 static const addon_info_t addons_info
[] = {
89 "wine_gecko-" GECKO_VERSION
"-" ARCH_STRING
".msi",
92 "http://source.winehq.org/winegecko.php",
93 "MSHTML", "GeckoUrl", "GeckoCabDir",
94 MAKEINTRESOURCEW(ID_DWL_GECKO_DIALOG
)
98 "wine-mono-" MONO_VERSION
".msi",
101 "http://source.winehq.org/winemono.php",
102 "Dotnet", "MonoUrl", "MonoCabDir",
103 MAKEINTRESOURCEW(ID_DWL_MONO_DIALOG
)
107 static const addon_info_t
*addon
;
109 static HWND install_dialog
= NULL
;
110 static LPWSTR url
= NULL
;
111 static IBinding
*dwl_binding
;
112 static WCHAR
*msi_file
;
114 static WCHAR
* (CDECL
*p_wine_get_dos_file_name
)(const char*);
115 static const WCHAR kernel32_dllW
[] = {'k','e','r','n','e','l','3','2','.','d','l','l',0};
117 static BOOL
sha_check(const WCHAR
*file_name
)
119 const unsigned char *file_map
;
122 BCRYPT_HASH_HANDLE hash
= NULL
;
123 BCRYPT_ALG_HANDLE alg
= NULL
;
128 file
= CreateFileW(file_name
, GENERIC_READ
, FILE_SHARE_READ
, NULL
, OPEN_EXISTING
, FILE_ATTRIBUTE_READONLY
, NULL
);
129 if(file
== INVALID_HANDLE_VALUE
) {
130 WARN("Could not open file: %u\n", GetLastError());
134 size
= GetFileSize(file
, NULL
);
136 map
= CreateFileMappingW(file
, NULL
, PAGE_READONLY
, 0, 0, NULL
);
141 file_map
= MapViewOfFile(map
, FILE_MAP_READ
, 0, 0, 0);
146 if(BCryptOpenAlgorithmProvider(&alg
, BCRYPT_SHA256_ALGORITHM
, MS_PRIMITIVE_PROVIDER
, 0))
148 if(BCryptCreateHash(alg
, &hash
, NULL
, 0, NULL
, 0, 0))
150 if(BCryptHashData(hash
, (UCHAR
*)file_map
, size
, 0))
152 if(BCryptFinishHash(hash
, sha
, sizeof(sha
), 0))
155 for(i
=0; i
< sizeof(sha
); i
++)
156 sprintf(buf
+ i
* 2, "%02x", sha
[i
]);
158 ret
= !strcmp(buf
, addon
->sha
);
160 WARN("Got %s, expected %s\n", buf
, addon
->sha
);
163 UnmapViewOfFile(file_map
);
164 if(hash
) BCryptDestroyHash(hash
);
165 if(alg
) BCryptCloseAlgorithmProvider(alg
, 0);
169 static void set_status(DWORD id
)
171 HWND status
= GetDlgItem(install_dialog
, ID_DWL_STATUS
);
174 LoadStringW(hInst
, id
, buf
, sizeof(buf
)/sizeof(WCHAR
));
175 SendMessageW(status
, WM_SETTEXT
, 0, (LPARAM
)buf
);
184 static enum install_res
install_file(const WCHAR
*file_name
)
188 res
= MsiInstallProductW(file_name
, NULL
);
189 if(res
!= ERROR_SUCCESS
) {
190 ERR("MsiInstallProduct failed: %u\n", res
);
191 return INSTALL_FAILED
;
197 static enum install_res
install_from_unix_file(const char *dir
, const char *subdir
, const char *file_name
)
199 LPWSTR dos_file_name
;
202 enum install_res ret
;
205 file_path
= heap_alloc(len
+strlen(subdir
)+strlen(file_name
)+3);
207 return INSTALL_FAILED
;
209 memcpy(file_path
, dir
, len
);
210 if(len
&& file_path
[len
-1] != '/' && file_path
[len
-1] != '\\')
211 file_path
[len
++] = '/';
213 strcpy(file_path
+len
, subdir
);
214 len
+= strlen(subdir
);
215 file_path
[len
++] = '/';
217 strcpy(file_path
+len
, file_name
);
219 fd
= open(file_path
, O_RDONLY
);
221 TRACE("%s not found\n", debugstr_a(file_path
));
222 heap_free(file_path
);
228 if(p_wine_get_dos_file_name
) { /* Wine UNIX mode */
229 dos_file_name
= p_wine_get_dos_file_name(file_path
);
231 ERR("Could not get dos file name of %s\n", debugstr_a(file_path
));
232 heap_free(file_path
);
233 return INSTALL_FAILED
;
235 } else { /* Windows mode */
237 WARN("Could not get wine_get_dos_file_name function, calling install_cab directly.\n");
238 res
= MultiByteToWideChar( CP_ACP
, 0, file_path
, -1, 0, 0);
239 dos_file_name
= heap_alloc (res
*sizeof(WCHAR
));
240 MultiByteToWideChar( CP_ACP
, 0, file_path
, -1, dos_file_name
, res
);
243 heap_free(file_path
);
245 ret
= install_file(dos_file_name
);
247 heap_free(dos_file_name
);
251 static HKEY
open_config_key(void)
256 static const WCHAR wine_keyW
[] = {'S','o','f','t','w','a','r','e','\\','W','i','n','e',0};
258 /* @@ Wine registry key: HKCU\Software\Wine\$config_key */
259 res
= RegOpenKeyW(HKEY_CURRENT_USER
, wine_keyW
, &hkey
);
260 if(res
!= ERROR_SUCCESS
)
263 res
= RegOpenKeyA(hkey
, addon
->config_key
, &ret
);
265 return res
== ERROR_SUCCESS
? ret
: NULL
;
268 static enum install_res
install_from_registered_dir(void)
272 DWORD res
, type
, size
= MAX_PATH
;
273 enum install_res ret
;
275 hkey
= open_config_key();
279 package_dir
= heap_alloc(size
);
280 res
= RegGetValueA(hkey
, NULL
, addon
->dir_config_key
, RRF_RT_ANY
, &type
, (PBYTE
)package_dir
, &size
);
281 if(res
== ERROR_MORE_DATA
) {
282 package_dir
= heap_realloc(package_dir
, size
);
283 res
= RegGetValueA(hkey
, NULL
, addon
->dir_config_key
, RRF_RT_ANY
, &type
, (PBYTE
)package_dir
, &size
);
286 if(res
== ERROR_FILE_NOT_FOUND
) {
287 heap_free(package_dir
);
289 } else if(res
!= ERROR_SUCCESS
|| (type
!= REG_SZ
&& type
!= REG_EXPAND_SZ
)) {
290 heap_free(package_dir
);
291 return INSTALL_FAILED
;
294 TRACE("Trying %s/%s\n", debugstr_a(package_dir
), debugstr_a(addon
->file_name
));
296 ret
= install_from_unix_file(package_dir
, "", addon
->file_name
);
298 heap_free(package_dir
);
302 static enum install_res
install_from_default_dir(void)
304 const char *data_dir
, *package_dir
;
305 char *dir_buf
= NULL
;
307 enum install_res ret
;
309 if((data_dir
= wine_get_data_dir())) {
310 package_dir
= data_dir
;
311 }else if((data_dir
= wine_get_build_dir())) {
312 len
= strlen(data_dir
);
313 dir_buf
= heap_alloc(len
+ sizeof("/../"));
314 memcpy(dir_buf
, data_dir
, len
);
315 strcpy(dir_buf
+len
, "/../");
316 package_dir
= dir_buf
;
321 ret
= install_from_unix_file(package_dir
, addon
->subdir_name
, addon
->file_name
);
324 if (ret
== INSTALL_NEXT
)
325 ret
= install_from_unix_file(INSTALL_DATADIR
"/wine/", addon
->subdir_name
, addon
->file_name
);
326 if (ret
== INSTALL_NEXT
&& strcmp(INSTALL_DATADIR
, "/usr/share"))
327 ret
= install_from_unix_file("/usr/share/wine/", addon
->subdir_name
, addon
->file_name
);
331 static WCHAR
*get_cache_file_name(BOOL ensure_exists
)
333 const char *home_dir
= NULL
, *xdg_cache_dir
;
334 size_t len
, size
= strlen(addon
->file_name
) + 7; /* strlen("/wine/"), '\0' */
335 char *cache_file_name
;
338 /* non-Wine (eg. Windows) cache is currently not supported */
339 if(!p_wine_get_dos_file_name
)
342 xdg_cache_dir
= getenv("XDG_CACHE_HOME");
343 if(xdg_cache_dir
&& *xdg_cache_dir
) {
344 size
+= strlen(xdg_cache_dir
);
346 home_dir
= getenv("HOME");
350 size
+= strlen(home_dir
) + 8; /* strlen("/.cache/") */
353 cache_file_name
= heap_alloc(size
);
357 if(xdg_cache_dir
&& *xdg_cache_dir
) {
358 len
= strlen(xdg_cache_dir
);
359 if(len
> 1 && xdg_cache_dir
[len
-1] == '/')
361 memcpy(cache_file_name
, xdg_cache_dir
, len
);
362 cache_file_name
[len
] = 0;
364 len
= strlen(home_dir
);
365 memcpy(cache_file_name
, home_dir
, len
);
366 strcpy(cache_file_name
+len
, "/.cache");
370 if(ensure_exists
&& mkdir(cache_file_name
, 0777) && errno
!= EEXIST
) {
371 WARN("%s does not exist and could not be created: %s\n", cache_file_name
, strerror(errno
));
372 heap_free(cache_file_name
);
376 strcpy(cache_file_name
+len
, "/wine");
379 if(ensure_exists
&& mkdir(cache_file_name
, 0777) && errno
!= EEXIST
) {
380 WARN("%s does not exist and could not be created: %s\n", cache_file_name
, strerror(errno
));
384 cache_file_name
[len
++] = '/';
385 strcpy(cache_file_name
+len
, addon
->file_name
);
386 ret
= p_wine_get_dos_file_name(cache_file_name
);
388 TRACE("%s -> %s\n", cache_file_name
, debugstr_w(ret
));
390 heap_free(cache_file_name
);
394 static enum install_res
install_from_cache(void)
396 WCHAR
*cache_file_name
;
397 enum install_res res
;
399 cache_file_name
= get_cache_file_name(FALSE
);
403 if(!sha_check(cache_file_name
)) {
404 WARN("could not validate checksum\n");
405 DeleteFileW(cache_file_name
);
406 heap_free(cache_file_name
);
410 res
= install_file(cache_file_name
);
411 heap_free(cache_file_name
);
415 static IInternetBindInfo InstallCallbackBindInfo
;
417 static HRESULT WINAPI
InstallCallback_QueryInterface(IBindStatusCallback
*iface
,
418 REFIID riid
, void **ppv
)
420 if(IsEqualGUID(&IID_IUnknown
, riid
) || IsEqualGUID(&IID_IBindStatusCallback
, riid
)) {
425 if(IsEqualGUID(&IID_IInternetBindInfo
, riid
)) {
426 TRACE("IID_IInternetBindInfo\n");
427 *ppv
= &InstallCallbackBindInfo
;
434 static ULONG WINAPI
InstallCallback_AddRef(IBindStatusCallback
*iface
)
439 static ULONG WINAPI
InstallCallback_Release(IBindStatusCallback
*iface
)
444 static HRESULT WINAPI
InstallCallback_OnStartBinding(IBindStatusCallback
*iface
,
445 DWORD dwReserved
, IBinding
*pib
)
447 set_status(IDS_DOWNLOADING
);
449 IBinding_AddRef(pib
);
455 static HRESULT WINAPI
InstallCallback_GetPriority(IBindStatusCallback
*iface
,
461 static HRESULT WINAPI
InstallCallback_OnLowResource(IBindStatusCallback
*iface
,
467 static HRESULT WINAPI
InstallCallback_OnProgress(IBindStatusCallback
*iface
, ULONG ulProgress
,
468 ULONG ulProgressMax
, ULONG ulStatusCode
, LPCWSTR szStatusText
)
470 HWND progress
= GetDlgItem(install_dialog
, ID_DWL_PROGRESS
);
473 SendMessageW(progress
, PBM_SETRANGE32
, 0, ulProgressMax
);
475 SendMessageW(progress
, PBM_SETPOS
, ulProgress
, 0);
480 static HRESULT WINAPI
InstallCallback_OnStopBinding(IBindStatusCallback
*iface
,
481 HRESULT hresult
, LPCWSTR szError
)
484 IBinding_Release(dwl_binding
);
488 if(FAILED(hresult
)) {
489 if(hresult
== E_ABORT
)
490 TRACE("Binding aborted\n");
492 ERR("Binding failed %08x\n", hresult
);
497 ERR("No MSI file\n");
501 set_status(IDS_INSTALLING
);
502 EnableWindow(GetDlgItem(install_dialog
, IDCANCEL
), 0);
504 if(sha_check(msi_file
)) {
505 WCHAR
*cache_file_name
;
507 install_file(msi_file
);
509 cache_file_name
= get_cache_file_name(TRUE
);
510 if(cache_file_name
) {
511 MoveFileW(msi_file
, cache_file_name
);
512 heap_free(cache_file_name
);
517 if(LoadStringW(hInst
, IDS_INVALID_SHA
, message
, sizeof(message
)/sizeof(WCHAR
)))
518 MessageBoxW(NULL
, message
, NULL
, MB_ICONERROR
);
521 DeleteFileW(msi_file
);
525 EndDialog(install_dialog
, 0);
529 static HRESULT WINAPI
InstallCallback_GetBindInfo(IBindStatusCallback
*iface
,
530 DWORD
* grfBINDF
, BINDINFO
* pbindinfo
)
534 *grfBINDF
= BINDF_ASYNCHRONOUS
;
538 static HRESULT WINAPI
InstallCallback_OnDataAvailable(IBindStatusCallback
*iface
, DWORD grfBSCF
,
539 DWORD dwSize
, FORMATETC
* pformatetc
, STGMEDIUM
* pstgmed
)
542 msi_file
= heap_strdupW(pstgmed
->u
.lpszFileName
);
543 TRACE("got file name %s\n", debugstr_w(msi_file
));
549 static HRESULT WINAPI
InstallCallback_OnObjectAvailable(IBindStatusCallback
*iface
,
550 REFIID riid
, IUnknown
* punk
)
556 static const IBindStatusCallbackVtbl InstallCallbackVtbl
= {
557 InstallCallback_QueryInterface
,
558 InstallCallback_AddRef
,
559 InstallCallback_Release
,
560 InstallCallback_OnStartBinding
,
561 InstallCallback_GetPriority
,
562 InstallCallback_OnLowResource
,
563 InstallCallback_OnProgress
,
564 InstallCallback_OnStopBinding
,
565 InstallCallback_GetBindInfo
,
566 InstallCallback_OnDataAvailable
,
567 InstallCallback_OnObjectAvailable
570 static IBindStatusCallback InstallCallback
= { &InstallCallbackVtbl
};
572 static HRESULT WINAPI
InstallCallbackBindInfo_QueryInterface(IInternetBindInfo
*iface
, REFIID riid
, void **ppv
)
574 return IBindStatusCallback_QueryInterface(&InstallCallback
, riid
, ppv
);
577 static ULONG WINAPI
InstallCallbackBindInfo_AddRef(IInternetBindInfo
*iface
)
582 static ULONG WINAPI
InstallCallbackBindInfo_Release(IInternetBindInfo
*iface
)
587 static HRESULT WINAPI
InstallCallbackBindInfo_GetBindInfo(IInternetBindInfo
*iface
, DWORD
*bindf
, BINDINFO
*bindinfo
)
593 static HRESULT WINAPI
InstallCallbackBindInfo_GetBindString(IInternetBindInfo
*iface
, ULONG string_type
,
594 WCHAR
**strs
, ULONG cnt
, ULONG
*fetched
)
596 static const WCHAR wine_addon_downloaderW
[] =
597 {'W','i','n','e',' ','A','d','d','o','n',' ','D','o','w','n','l','o','a','d','e','r',0};
599 switch(string_type
) {
600 case BINDSTRING_USER_AGENT
:
601 TRACE("BINDSTRING_USER_AGENT\n");
603 *strs
= CoTaskMemAlloc(sizeof(wine_addon_downloaderW
));
605 return E_OUTOFMEMORY
;
607 memcpy(*strs
, wine_addon_downloaderW
, sizeof(wine_addon_downloaderW
));
615 static const IInternetBindInfoVtbl InstallCallbackBindInfoVtbl
= {
616 InstallCallbackBindInfo_QueryInterface
,
617 InstallCallbackBindInfo_AddRef
,
618 InstallCallbackBindInfo_Release
,
619 InstallCallbackBindInfo_GetBindInfo
,
620 InstallCallbackBindInfo_GetBindString
623 static IInternetBindInfo InstallCallbackBindInfo
= { &InstallCallbackBindInfoVtbl
};
625 static void append_url_params( WCHAR
*url
)
627 static const WCHAR arch_formatW
[] = {'?','a','r','c','h','='};
628 static const WCHAR v_formatW
[] = {'&','v','='};
629 static const WCHAR winevW
[] = {'&','w','i','n','e','v','='};
630 DWORD size
= INTERNET_MAX_URL_LENGTH
* sizeof(WCHAR
);
631 DWORD len
= strlenW(url
);
633 memcpy(url
+len
, arch_formatW
, sizeof(arch_formatW
));
634 len
+= sizeof(arch_formatW
)/sizeof(WCHAR
);
635 len
+= MultiByteToWideChar(CP_ACP
, 0, ARCH_STRING
, sizeof(ARCH_STRING
),
636 url
+len
, size
/sizeof(WCHAR
)-len
)-1;
637 memcpy(url
+len
, v_formatW
, sizeof(v_formatW
));
638 len
+= sizeof(v_formatW
)/sizeof(WCHAR
);
639 len
+= MultiByteToWideChar(CP_ACP
, 0, addon
->version
, -1, url
+len
, size
/sizeof(WCHAR
)-len
)-1;
640 memcpy(url
+len
, winevW
, sizeof(winevW
));
641 len
+= sizeof(winevW
)/sizeof(WCHAR
);
642 MultiByteToWideChar(CP_ACP
, 0, PACKAGE_VERSION
, -1, url
+len
, size
/sizeof(WCHAR
)-len
);
645 static LPWSTR
get_url(void)
647 DWORD size
= INTERNET_MAX_URL_LENGTH
*sizeof(WCHAR
);
648 WCHAR
*url
, *config_key
;
653 static const WCHAR httpW
[] = {'h','t','t','p'};
655 url
= heap_alloc(size
);
656 returned_size
= size
;
658 hkey
= open_config_key();
661 config_key
= heap_strdupAtoW(addon
->url_config_key
);
662 res
= RegQueryValueExW(hkey
, config_key
, NULL
, &type
, (LPBYTE
)url
, &returned_size
);
663 heap_free(config_key
);
665 if(res
== ERROR_SUCCESS
&& type
== REG_SZ
) goto found
;
668 MultiByteToWideChar( CP_ACP
, 0, addon
->url_default
, -1, url
, size
/ sizeof(WCHAR
) );
671 if (returned_size
> sizeof(httpW
) && !memcmp(url
, httpW
, sizeof(httpW
))) append_url_params( url
);
673 TRACE("Got URL %s\n", debugstr_w(url
));
677 static BOOL
start_download(void)
684 hres
= CreateURLMoniker(NULL
, url
, &mon
);
688 hres
= CreateAsyncBindCtx(0, &InstallCallback
, NULL
, &bind_ctx
);
689 if(SUCCEEDED(hres
)) {
690 hres
= IMoniker_BindToStorage(mon
, bind_ctx
, NULL
, &IID_IUnknown
, (void**)&tmp
);
691 IBindCtx_Release(bind_ctx
);
693 IMoniker_Release(mon
);
698 IUnknown_Release(tmp
);
702 static void run_winebrowser(const WCHAR
*url
)
704 PROCESS_INFORMATION pi
;
711 static const WCHAR winebrowserW
[] = {'\\','w','i','n','e','b','r','o','w','s','e','r','.','e','x','e',0};
713 url_len
= strlenW(url
);
715 len
= GetSystemDirectoryW(app
, MAX_PATH
-sizeof(winebrowserW
)/sizeof(WCHAR
));
716 memcpy(app
+len
, winebrowserW
, sizeof(winebrowserW
));
717 len
+= sizeof(winebrowserW
)/sizeof(WCHAR
) -1;
719 args
= heap_alloc((len
+1+url_len
)*sizeof(WCHAR
));
723 memcpy(args
, app
, len
*sizeof(WCHAR
));
725 memcpy(args
+len
, url
, (url_len
+1) * sizeof(WCHAR
));
727 TRACE("starting %s\n", debugstr_w(args
));
729 memset(&si
, 0, sizeof(si
));
731 ret
= CreateProcessW(app
, args
, NULL
, NULL
, FALSE
, DETACHED_PROCESS
, NULL
, NULL
, &si
, &pi
);
734 CloseHandle(pi
.hThread
);
735 CloseHandle(pi
.hProcess
);
739 static INT_PTR CALLBACK
installer_proc(HWND hwnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
743 ShowWindow(GetDlgItem(hwnd
, ID_DWL_PROGRESS
), SW_HIDE
);
744 install_dialog
= hwnd
;
748 switch (((NMHDR
*)lParam
)->code
)
752 if (wParam
== ID_DWL_STATUS
)
753 run_winebrowser(((NMLINK
*)lParam
)->item
.szUrl
);
762 IBinding_Abort(dwl_binding
);
767 ShowWindow(GetDlgItem(hwnd
, ID_DWL_PROGRESS
), SW_SHOW
);
768 EnableWindow(GetDlgItem(hwnd
, ID_DWL_INSTALL
), 0);
769 if(!start_download())
770 EndDialog(install_dialog
, 0);
777 BOOL
install_addon(addon_t addon_type
)
782 addon
= addons_info
+addon_type
;
784 p_wine_get_dos_file_name
= (void*)GetProcAddress(GetModuleHandleW(kernel32_dllW
), "wine_get_dos_file_name");
787 * Try to find addon .msi file in following order:
788 * - directory stored in $dir_config_key value of HKCU/Software/Wine/$config_key key
789 * - $datadir/$addon_subdir/
790 * - $INSTALL_DATADIR/wine/$addon_subdir/
791 * - /usr/share/wine/$addon_subdir/
792 * - download from URL stored in $url_config_key value of HKCU/Software/Wine/$config_key key
794 if (install_from_registered_dir() == INSTALL_NEXT
795 && install_from_default_dir() == INSTALL_NEXT
796 && install_from_cache() == INSTALL_NEXT
797 && (url
= get_url()))
798 DialogBoxW(hInst
, addon
->dialog_template
, 0, installer_proc
);