[ACPICA] Update to version 20191213. CORE-16559
[reactos.git] / dll / win32 / fusion / fusion.c
1 /*
2 * Implementation of the Fusion API
3 *
4 * Copyright 2008 James Hawkins
5 *
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
10 *
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19 */
20
21 #include <stdarg.h>
22 #ifdef __REACTOS__
23 #include <wchar.h>
24 #endif
25
26 #define COBJMACROS
27
28 #include "windef.h"
29 #include "winbase.h"
30 #include "winuser.h"
31 #include "ole2.h"
32 #include "fusion.h"
33 #include "wine/debug.h"
34
35 WINE_DEFAULT_DEBUG_CHANNEL(fusion);
36
37
38 /******************************************************************
39 * InitializeFusion (FUSION.@)
40 */
41 HRESULT WINAPI InitializeFusion(void)
42 {
43 FIXME("\n");
44 return S_OK;
45 }
46
47 /******************************************************************
48 * ClearDownloadCache (FUSION.@)
49 */
50 HRESULT WINAPI ClearDownloadCache(void)
51 {
52 FIXME("stub!\n");
53 return E_NOTIMPL;
54 }
55
56 /******************************************************************
57 * CopyPDBs (FUSION.@)
58 */
59 HRESULT WINAPI CopyPDBs(void *unknown)
60 {
61 FIXME("(%p) stub!\n", unknown);
62 return E_NOTIMPL;
63 }
64
65 /******************************************************************
66 * CreateInstallReferenceEnum (FUSION.@)
67 */
68 HRESULT WINAPI CreateInstallReferenceEnum(IInstallReferenceEnum **ppRefEnum,
69 IAssemblyName *pName, DWORD dwFlags,
70 LPVOID pvReserved)
71 {
72 FIXME("(%p, %p, %08x, %p) stub!\n", ppRefEnum, pName, dwFlags, pvReserved);
73 return E_NOTIMPL;
74 }
75
76 /******************************************************************
77 * CreateApplicationContext (FUSION.@)
78 */
79 HRESULT WINAPI CreateApplicationContext(IAssemblyName *name, void *ctx)
80 {
81 FIXME("%p, %p\n", name, ctx);
82 return E_NOTIMPL;
83 }
84
85 static HRESULT (WINAPI *pGetCORVersion)(LPWSTR pbuffer, DWORD cchBuffer,
86 DWORD *dwLength);
87
88 static HRESULT get_corversion(LPWSTR version, DWORD size)
89 {
90 HMODULE hmscoree;
91 HRESULT hr;
92 DWORD len;
93
94 hmscoree = LoadLibraryA("mscoree.dll");
95 if (!hmscoree)
96 return E_FAIL;
97
98 pGetCORVersion = (void *)GetProcAddress(hmscoree, "GetCORVersion");
99 if (!pGetCORVersion)
100 hr = E_FAIL;
101 else
102 hr = pGetCORVersion(version, size, &len);
103
104 FreeLibrary(hmscoree);
105 return hr;
106 }
107
108 /******************************************************************
109 * GetCachePath (FUSION.@)
110 */
111 HRESULT WINAPI GetCachePath(ASM_CACHE_FLAGS dwCacheFlags, LPWSTR pwzCachePath,
112 PDWORD pcchPath)
113 {
114 static const WCHAR assembly[] = {'\\','a','s','s','e','m','b','l','y',0};
115 static const WCHAR gac[] = {'\\','G','A','C',0};
116 static const WCHAR nativeimg[] = {'N','a','t','i','v','e','I','m','a','g','e','s','_',0};
117 static const WCHAR dotnet[] = {'\\','M','i','c','r','o','s','o','f','t','.','N','E','T',0};
118 #ifdef _WIN64
119 static const WCHAR zapfmt[] = {'%','s','\\','%','s','\\','%','s','%','s','_','6','4',0};
120 #else
121 static const WCHAR zapfmt[] = {'%','s','\\','%','s','\\','%','s','%','s','_','3','2',0};
122 #endif
123 WCHAR path[MAX_PATH], windir[MAX_PATH], version[MAX_PATH];
124 DWORD len;
125 HRESULT hr = S_OK;
126
127 TRACE("(%08x, %p, %p)\n", dwCacheFlags, pwzCachePath, pcchPath);
128
129 if (!pcchPath)
130 return E_INVALIDARG;
131
132 len = GetWindowsDirectoryW(windir, MAX_PATH);
133 lstrcpyW(path, windir);
134
135 switch (dwCacheFlags)
136 {
137 case ASM_CACHE_ZAP:
138 {
139 hr = get_corversion(version, MAX_PATH);
140 if (FAILED(hr))
141 return hr;
142
143 len = swprintf(path, zapfmt, windir, assembly + 1, nativeimg, version);
144 break;
145 }
146 case ASM_CACHE_GAC:
147 {
148 lstrcpyW(path + len, assembly);
149 len += ARRAY_SIZE(assembly) - 1;
150 lstrcpyW(path + len, gac);
151 len += ARRAY_SIZE(gac) - 1;
152 break;
153 }
154 case ASM_CACHE_DOWNLOAD:
155 {
156 FIXME("Download cache not implemented\n");
157 return E_FAIL;
158 }
159 case ASM_CACHE_ROOT:
160 lstrcpyW(path + len, assembly);
161 len += ARRAY_SIZE(assembly) - 1;
162 break;
163 case ASM_CACHE_ROOT_EX:
164 lstrcpyW(path + len, dotnet);
165 len += ARRAY_SIZE(dotnet) - 1;
166 lstrcpyW(path + len, assembly);
167 len += ARRAY_SIZE(assembly) - 1;
168 break;
169 default:
170 return E_INVALIDARG;
171 }
172
173 len++;
174 if (*pcchPath <= len || !pwzCachePath)
175 hr = E_NOT_SUFFICIENT_BUFFER;
176 else if (pwzCachePath)
177 lstrcpyW(pwzCachePath, path);
178
179 *pcchPath = len;
180 return hr;
181 }