xref: /reactos/dll/win32/fusion/fusion.c (revision b8dd046e)
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 }
182