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 }