--- /dev/null
+/*
+ *
+ * Copyright 2008 Alistair Leslie-Hughes
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
+ */
+
+#define COBJMACROS
+
+#include <stdarg.h>
+
+#include "windef.h"
+#include "winbase.h"
+#include "winuser.h"
+#include "winreg.h"
+#include "ole2.h"
+
+#include "cor.h"
+#include "mscoree.h"
+
+#include "wine/debug.h"
+
+WINE_DEFAULT_DEBUG_CHANNEL( mscoree );
+
+typedef struct _corruntimehost
+{
+ const struct ICorRuntimeHostVtbl *lpVtbl;
+ LONG ref;
+} corruntimehost;
+
+static inline corruntimehost *impl_from_ICorRuntimeHost( ICorRuntimeHost *iface )
+{
+ return (corruntimehost *)((char*)iface - FIELD_OFFSET(corruntimehost, lpVtbl));
+}
+
+/*** IUnknown methods ***/
+static HRESULT WINAPI corruntimehost_QueryInterface(ICorRuntimeHost* iface,
+ REFIID riid,
+ void **ppvObject)
+{
+ corruntimehost *This = impl_from_ICorRuntimeHost( iface );
+ TRACE("%p %s %p\n", This, debugstr_guid(riid), ppvObject);
+
+ if ( IsEqualGUID( riid, &IID_ICorRuntimeHost ) ||
+ IsEqualGUID( riid, &IID_IUnknown ) )
+ {
+ *ppvObject = iface;
+ }
+ else
+ {
+ FIXME("Unsupported interface %s\n", debugstr_guid(riid));
+ return E_NOINTERFACE;
+ }
+
+ ICorRuntimeHost_AddRef( iface );
+
+ return S_OK;
+}
+
+static ULONG WINAPI corruntimehost_AddRef(ICorRuntimeHost* iface)
+{
+ corruntimehost *This = impl_from_ICorRuntimeHost( iface );
+ return InterlockedIncrement( &This->ref );
+}
+
+static ULONG WINAPI corruntimehost_Release(ICorRuntimeHost* iface)
+{
+ corruntimehost *This = impl_from_ICorRuntimeHost( iface );
+ ULONG ref;
+
+ ref = InterlockedDecrement( &This->ref );
+ if ( ref == 0 )
+ {
+ HeapFree( GetProcessHeap(), 0, This );
+ }
+
+ return ref;
+}
+
+/*** ICorRuntimeHost methods ***/
+static HRESULT WINAPI corruntimehost_CreateLogicalThreadState(
+ ICorRuntimeHost* iface)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_DeleteLogicalThreadState(
+ ICorRuntimeHost* iface)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_SwitchInLogicalThreadState(
+ ICorRuntimeHost* iface,
+ DWORD *fiberCookie)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_SwitchOutLogicalThreadState(
+ ICorRuntimeHost* iface,
+ DWORD **fiberCookie)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_LocksHeldByLogicalThread(
+ ICorRuntimeHost* iface,
+ DWORD *pCount)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_MapFile(
+ ICorRuntimeHost* iface,
+ HANDLE hFile,
+ HMODULE *mapAddress)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_GetConfiguration(
+ ICorRuntimeHost* iface,
+ ICorConfiguration **pConfiguration)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_Start(
+ ICorRuntimeHost* iface)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_Stop(
+ ICorRuntimeHost* iface)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_CreateDomain(
+ ICorRuntimeHost* iface,
+ LPCWSTR friendlyName,
+ IUnknown *identityArray,
+ IUnknown **appDomain)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_GetDefaultDomain(
+ ICorRuntimeHost* iface,
+ IUnknown **pAppDomain)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_EnumDomains(
+ ICorRuntimeHost* iface,
+ HDOMAINENUM *hEnum)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_NextDomain(
+ ICorRuntimeHost* iface,
+ HDOMAINENUM hEnum,
+ IUnknown **appDomain)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_CloseEnum(
+ ICorRuntimeHost* iface,
+ HDOMAINENUM hEnum)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_CreateDomainEx(
+ ICorRuntimeHost* iface,
+ LPCWSTR friendlyName,
+ IUnknown *setup,
+ IUnknown *evidence,
+ IUnknown **appDomain)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_CreateDomainSetup(
+ ICorRuntimeHost* iface,
+ IUnknown **appDomainSetup)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_CreateEvidence(
+ ICorRuntimeHost* iface,
+ IUnknown **evidence)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_UnloadDomain(
+ ICorRuntimeHost* iface,
+ IUnknown *appDomain)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI corruntimehost_CurrentDomain(
+ ICorRuntimeHost* iface,
+ IUnknown **appDomain)
+{
+ FIXME("stub %p\n", iface);
+ return E_NOTIMPL;
+}
+
+static const struct ICorRuntimeHostVtbl corruntimehost_vtbl =
+{
+ corruntimehost_QueryInterface,
+ corruntimehost_AddRef,
+ corruntimehost_Release,
+ corruntimehost_CreateLogicalThreadState,
+ corruntimehost_DeleteLogicalThreadState,
+ corruntimehost_SwitchInLogicalThreadState,
+ corruntimehost_SwitchOutLogicalThreadState,
+ corruntimehost_LocksHeldByLogicalThread,
+ corruntimehost_MapFile,
+ corruntimehost_GetConfiguration,
+ corruntimehost_Start,
+ corruntimehost_Stop,
+ corruntimehost_CreateDomain,
+ corruntimehost_GetDefaultDomain,
+ corruntimehost_EnumDomains,
+ corruntimehost_NextDomain,
+ corruntimehost_CloseEnum,
+ corruntimehost_CreateDomainEx,
+ corruntimehost_CreateDomainSetup,
+ corruntimehost_CreateEvidence,
+ corruntimehost_UnloadDomain,
+ corruntimehost_CurrentDomain
+};
+
+IUnknown* create_corruntimehost(void)
+{
+ corruntimehost *This;
+
+ This = HeapAlloc( GetProcessHeap(), 0, sizeof *This );
+ if ( !This )
+ return NULL;
+
+ This->lpVtbl = &corruntimehost_vtbl;
+ This->ref = 1;
+
+ FIXME("return iface %p\n", This);
+
+ return (IUnknown*) &This->lpVtbl;
+}