dlls/mscoree/metadata.c

   1 /*
   2  * IMetaDataDispenserEx - dynamic creation/editing of assemblies
   3  *
   4  * Copyright 2010 Vincent Povirk for CodeWeavers
   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 <stdio.h>
  22 #include <stdarg.h>
  23 #include <assert.h>
  24
  25 #define COBJMACROS
  26
  27 #include "wine/library.h"
  28 #include "windef.h"
  29 #include "winbase.h"
  30 #include "winreg.h"
  31 #include "ole2.h"
  32
  33 #include "cor.h"
  34 #include "metahost.h"
  35 #include "wine/list.h"
  36 #include "mscoree_private.h"
  37
  38 #include "wine/debug.h"
  39
  40 WINE_DEFAULT_DEBUG_CHANNEL( mscoree );
  41
  42 typedef struct MetaDataDispenser
  43 {
  44     IMetaDataDispenserEx IMetaDataDispenserEx_iface;
  45     LONG ref;
  46 } MetaDataDispenser;
  47
  48 static inline MetaDataDispenser *impl_from_IMetaDataDispenserEx(IMetaDataDispenserEx *iface)
  49 {
  50     return CONTAINING_RECORD(iface, MetaDataDispenser, IMetaDataDispenserEx_iface);
  51 }
  52
  53 static HRESULT WINAPI MetaDataDispenser_QueryInterface(IMetaDataDispenserEx* iface,
  54     REFIID riid, void **ppvObject)
  55 {
  56     TRACE("%p %s %p\n", iface, debugstr_guid(riid), ppvObject);
  57
  58     if (IsEqualGUID(riid, &IID_IMetaDataDispenserEx) ||
  59         IsEqualGUID(riid, &IID_IMetaDataDispenser) ||
  60         IsEqualGUID(riid, &IID_IUnknown))
  61     {
  62         *ppvObject = iface;
  63     }
  64     else
  65     {
  66         FIXME("Unsupported interface %s\n", debugstr_guid(riid));
  67         return E_NOINTERFACE;
  68     }
  69
  70     IMetaDataDispenserEx_AddRef( iface );
  71
  72     return S_OK;
  73 }
  74
  75 static ULONG WINAPI MetaDataDispenser_AddRef(IMetaDataDispenserEx* iface)
  76 {
  77     MetaDataDispenser *This = impl_from_IMetaDataDispenserEx(iface);
  78     ULONG ref = InterlockedIncrement(&This->ref);
  79
  80     TRACE("%p ref=%u\n", This, ref);
  81
  82     return ref;
  83 }
  84
  85 static ULONG WINAPI MetaDataDispenser_Release(IMetaDataDispenserEx* iface)
  86 {
  87     MetaDataDispenser *This = impl_from_IMetaDataDispenserEx(iface);
  88     ULONG ref = InterlockedDecrement(&This->ref);
  89
  90     TRACE("%p ref=%u\n", This, ref);
  91
  92     if (ref == 0)
  93     {
  94         HeapFree(GetProcessHeap(), 0, This);
  95     }
  96
  97     return ref;
  98 }
  99
 100 static HRESULT WINAPI MetaDataDispenser_DefineScope(IMetaDataDispenserEx* iface,
 101     REFCLSID rclsid, DWORD dwCreateFlags, REFIID riid, IUnknown **ppIUnk)
 102 {
 103     FIXME("%p %s %x %s %p\n", iface, debugstr_guid(rclsid), dwCreateFlags,
 104         debugstr_guid(riid), ppIUnk);
 105     return E_NOTIMPL;
 106 }
 107
 108 static HRESULT WINAPI MetaDataDispenser_OpenScope(IMetaDataDispenserEx* iface,
 109     LPCWSTR szScope, DWORD dwOpenFlags, REFIID riid, IUnknown **ppIUnk)
 110 {
 111     FIXME("%p %s %x %s %p\n", iface, debugstr_w(szScope), dwOpenFlags,
 112         debugstr_guid(riid), ppIUnk);
 113     return E_NOTIMPL;
 114 }
 115
 116 static HRESULT WINAPI MetaDataDispenser_OpenScopeOnMemory(IMetaDataDispenserEx* iface,
 117     const void *pData, ULONG cbData, DWORD dwOpenFlags, REFIID riid, IUnknown **ppIUnk)
 118 {
 119     FIXME("%p %p %u %x %s %p\n", iface, pData, cbData, dwOpenFlags,
 120         debugstr_guid(riid), ppIUnk);
 121     return E_NOTIMPL;
 122 }
 123
 124 static HRESULT WINAPI MetaDataDispenser_SetOption(IMetaDataDispenserEx* iface,
 125     REFGUID optionid, const VARIANT *value)
 126 {
 127     FIXME("%p %s\n", iface, debugstr_guid(optionid));
 128     return E_NOTIMPL;
 129 }
 130
 131 static HRESULT WINAPI MetaDataDispenser_GetOption(IMetaDataDispenserEx* iface,
 132     REFGUID optionid, VARIANT *pvalue)
 133 {
 134     FIXME("%p %s\n", iface, debugstr_guid(optionid));
 135     return E_NOTIMPL;
 136 }
 137
 138 static HRESULT WINAPI MetaDataDispenser_OpenScopeOnITypeInfo(IMetaDataDispenserEx* iface,
 139     ITypeInfo *pITI, DWORD dwOpenFlags, REFIID riid, IUnknown **ppIUnk)
 140 {
 141     FIXME("%p %p %u %s %p\n", iface, pITI, dwOpenFlags, debugstr_guid(riid), ppIUnk);
 142     return E_NOTIMPL;
 143 }
 144
 145 static HRESULT WINAPI MetaDataDispenser_GetCORSystemDirectory(IMetaDataDispenserEx* iface,
 146     LPWSTR szBuffer, DWORD cchBuffer, DWORD *pchBuffer)
 147 {
 148     FIXME("%p %p %u %p\n", iface, szBuffer, cchBuffer, pchBuffer);
 149     return E_NOTIMPL;
 150 }
 151
 152 static HRESULT WINAPI MetaDataDispenser_FindAssembly(IMetaDataDispenserEx* iface,
 153     LPCWSTR szAppBase, LPCWSTR szPrivateBin, LPCWSTR szGlobalBin, LPCWSTR szAssemblyName,
 154     LPWSTR szName, ULONG cchName, ULONG *pcName)
 155 {
 156     FIXME("%p %s %s %s %s %p %u %p\n", iface, debugstr_w(szAppBase),
 157         debugstr_w(szPrivateBin), debugstr_w(szGlobalBin),
 158         debugstr_w(szAssemblyName), szName, cchName, pcName);
 159     return E_NOTIMPL;
 160 }
 161
 162 static HRESULT WINAPI MetaDataDispenser_FindAssemblyModule(IMetaDataDispenserEx* iface,
 163     LPCWSTR szAppBase, LPCWSTR szPrivateBin, LPCWSTR szGlobalBin, LPCWSTR szAssemblyName,
 164     LPCWSTR szModuleName, LPWSTR szName, ULONG cchName, ULONG *pcName)
 165 {
 166     FIXME("%p %s %s %s %s %s %p %u %p\n", iface, debugstr_w(szAppBase),
 167         debugstr_w(szPrivateBin), debugstr_w(szGlobalBin), debugstr_w(szAssemblyName),
 168         debugstr_w(szModuleName), szName, cchName, pcName);
 169     return E_NOTIMPL;
 170 }
 171
 172 static const struct IMetaDataDispenserExVtbl MetaDataDispenserVtbl =
 173 {
 174     MetaDataDispenser_QueryInterface,
 175     MetaDataDispenser_AddRef,
 176     MetaDataDispenser_Release,
 177     MetaDataDispenser_DefineScope,
 178     MetaDataDispenser_OpenScope,
 179     MetaDataDispenser_OpenScopeOnMemory,
 180     MetaDataDispenser_SetOption,
 181     MetaDataDispenser_GetOption,
 182     MetaDataDispenser_OpenScopeOnITypeInfo,
 183     MetaDataDispenser_GetCORSystemDirectory,
 184     MetaDataDispenser_FindAssembly,
 185     MetaDataDispenser_FindAssemblyModule
 186 };
 187
 188 HRESULT MetaDataDispenser_CreateInstance(IUnknown **ppUnk)
 189 {
 190     MetaDataDispenser *This;
 191
 192     This = HeapAlloc(GetProcessHeap(), 0, sizeof(MetaDataDispenser));
 193
 194     if (!This)
 195         return E_OUTOFMEMORY;
 196
 197     This->IMetaDataDispenserEx_iface.lpVtbl = &MetaDataDispenserVtbl;
 198     This->ref = 1;
 199
 200     *ppUnk = (IUnknown*)This;
 201
 202     return S_OK;
 203 }