git.oblomov.eu Git - wine/blob - dlls/mscoree/cordebug.c

   1 /*
   2  *
   3  * Copyright 2011 Alistair Leslie-Hughes
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2.1 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  18  */
  19
  20 #define COBJMACROS
  21
  22 #include <stdarg.h>
  23
  24 #include "windef.h"
  25 #include "winbase.h"
  26
  27 #include "winuser.h"
  28 #include "winnls.h"
  29 #include "winreg.h"
  30 #include "ole2.h"
  31 #include "shellapi.h"
  32 #include "mscoree.h"
  33 #include "corhdr.h"
  34 #include "metahost.h"
  35 #include "cordebug.h"
  36 #include "wine/list.h"
  37 #include "mscoree_private.h"
  38 #include "wine/debug.h"
  39
  40
  41 WINE_DEFAULT_DEBUG_CHANNEL( mscoree );
  42
  43 static inline CorDebug *impl_from_ICorDebug( ICorDebug *iface )
  44 {
  45     return CONTAINING_RECORD(iface, CorDebug, ICorDebug_iface);
  46 }
  47
  48 /*** IUnknown methods ***/
  49 static HRESULT WINAPI CorDebug_QueryInterface(ICorDebug *iface, REFIID riid, void **ppvObject)
  50 {
  51     CorDebug *This = impl_from_ICorDebug( iface );
  52
  53     TRACE("%p %s %p\n", This, debugstr_guid(riid), ppvObject);
  54
  55     if ( IsEqualGUID( riid, &IID_ICorDebug ) ||
  56          IsEqualGUID( riid, &IID_IUnknown ) )
  57     {
  58         *ppvObject = &This->ICorDebug_iface;
  59     }
  60     else
  61     {
  62         FIXME("Unsupported interface %s\n", debugstr_guid(riid));
  63         return E_NOINTERFACE;
  64     }
  65
  66     ICorDebug_AddRef( iface );
  67
  68     return S_OK;
  69 }
  70
  71 static ULONG WINAPI CorDebug_AddRef(ICorDebug *iface)
  72 {
  73     CorDebug *This = impl_from_ICorDebug( iface );
  74     ULONG ref = InterlockedIncrement(&This->ref);
  75
  76     TRACE("%p ref=%u\n", This, ref);
  77
  78     return ref;
  79 }
  80
  81 static ULONG WINAPI CorDebug_Release(ICorDebug *iface)
  82 {
  83     CorDebug *This = impl_from_ICorDebug( iface );
  84     ULONG ref = InterlockedDecrement(&This->ref);
  85
  86     TRACE("%p ref=%u\n", This, ref);
  87
  88     if (ref == 0)
  89     {
  90         if(This->runtimehost)
  91             ICLRRuntimeHost_Release(This->runtimehost);
  92
  93         if(This->pCallback)
  94             ICorDebugManagedCallback2_Release(This->pCallback2);
  95
  96         if(This->pCallback)
  97             ICorDebugManagedCallback_Release(This->pCallback);
  98
  99         HeapFree(GetProcessHeap(), 0, This);
 100     }
 101
 102     return ref;
 103 }
 104
 105 /*** ICorDebug methods ***/
 106 static HRESULT WINAPI CorDebug_Initialize(ICorDebug *iface)
 107 {
 108     CorDebug *This = impl_from_ICorDebug( iface );
 109     FIXME("stub %p\n", This);
 110     return S_OK;
 111 }
 112
 113 static HRESULT WINAPI CorDebug_Terminate(ICorDebug *iface)
 114 {
 115     CorDebug *This = impl_from_ICorDebug( iface );
 116     FIXME("stub %p\n", This);
 117     return E_NOTIMPL;
 118 }
 119
 120 static HRESULT WINAPI CorDebug_SetManagedHandler(ICorDebug *iface, ICorDebugManagedCallback *pCallback)
 121 {
 122     CorDebug *This = impl_from_ICorDebug( iface );
 123     HRESULT hr;
 124     ICorDebugManagedCallback2 *pCallback2;
 125
 126     TRACE("%p (%p)\n", This, pCallback);
 127
 128     if(!pCallback)
 129         return E_INVALIDARG;
 130
 131     hr = ICorDebugManagedCallback_QueryInterface(pCallback, &IID_ICorDebugManagedCallback2, (void**)&pCallback2);
 132     if(hr == S_OK)
 133     {
 134         if(This->pCallback2)
 135             ICorDebugManagedCallback2_Release(This->pCallback2);
 136
 137         if(This->pCallback)
 138             ICorDebugManagedCallback_Release(This->pCallback);
 139
 140         This->pCallback = pCallback;
 141         This->pCallback2 = pCallback2;
 142
 143         ICorDebugManagedCallback_AddRef(This->pCallback);
 144     }
 145
 146     return hr;
 147 }
 148
 149 static HRESULT WINAPI CorDebug_SetUnmanagedHandler(ICorDebug *iface, ICorDebugUnmanagedCallback *pCallback)
 150 {
 151     CorDebug *This = impl_from_ICorDebug( iface );
 152     FIXME("stub %p %p\n", This, pCallback);
 153     return E_NOTIMPL;
 154 }
 155
 156 static HRESULT WINAPI CorDebug_CreateProcess(ICorDebug *iface, LPCWSTR lpApplicationName,
 157             LPWSTR lpCommandLine, LPSECURITY_ATTRIBUTES lpProcessAttributes,
 158             LPSECURITY_ATTRIBUTES lpThreadAttributes, BOOL bInheritHandles,
 159             DWORD dwCreationFlags, PVOID lpEnvironment,LPCWSTR lpCurrentDirectory,
 160             LPSTARTUPINFOW lpStartupInfo, LPPROCESS_INFORMATION lpProcessInformation,
 161             CorDebugCreateProcessFlags debuggingFlags, ICorDebugProcess **ppProcess)
 162 {
 163     CorDebug *This = impl_from_ICorDebug( iface );
 164     FIXME("stub %p %s %s %p %p %d %d %p %s %p %p %d %p\n", This, debugstr_w(lpApplicationName),
 165             debugstr_w(lpCommandLine), lpProcessAttributes, lpThreadAttributes,
 166             bInheritHandles, dwCreationFlags, lpEnvironment, debugstr_w(lpCurrentDirectory),
 167             lpStartupInfo, lpProcessInformation, debuggingFlags, ppProcess);
 168     return E_NOTIMPL;
 169 }
 170
 171 static HRESULT WINAPI CorDebug_DebugActiveProcess(ICorDebug *iface, DWORD id, BOOL win32Attach,
 172             ICorDebugProcess **ppProcess)
 173 {
 174     CorDebug *This = impl_from_ICorDebug( iface );
 175     FIXME("stub %p %d %d %p\n", This, id, win32Attach, ppProcess);
 176     return E_NOTIMPL;
 177 }
 178
 179 static HRESULT WINAPI CorDebug_EnumerateProcesses( ICorDebug *iface, ICorDebugProcessEnum **ppProcess)
 180 {
 181     CorDebug *This = impl_from_ICorDebug( iface );
 182     FIXME("stub %p %p\n", This, ppProcess);
 183     return E_NOTIMPL;
 184 }
 185
 186 static HRESULT WINAPI CorDebug_GetProcess(ICorDebug *iface, DWORD dwProcessId, ICorDebugProcess **ppProcess)
 187 {
 188     CorDebug *This = impl_from_ICorDebug( iface );
 189     FIXME("stub %p %d %p\n", This, dwProcessId, ppProcess);
 190     return E_NOTIMPL;
 191 }
 192
 193 static HRESULT WINAPI CorDebug_CanLaunchOrAttach(ICorDebug *iface, DWORD dwProcessId,
 194             BOOL win32DebuggingEnabled)
 195 {
 196     CorDebug *This = impl_from_ICorDebug( iface );
 197     FIXME("stub %p %d %d\n", This, dwProcessId, win32DebuggingEnabled);
 198     return E_NOTIMPL;
 199 }
 200
 201 static const struct ICorDebugVtbl cordebug_vtbl =
 202 {
 203     CorDebug_QueryInterface,
 204     CorDebug_AddRef,
 205     CorDebug_Release,
 206     CorDebug_Initialize,
 207     CorDebug_Terminate,
 208     CorDebug_SetManagedHandler,
 209     CorDebug_SetUnmanagedHandler,
 210     CorDebug_CreateProcess,
 211     CorDebug_DebugActiveProcess,
 212     CorDebug_EnumerateProcesses,
 213     CorDebug_GetProcess,
 214     CorDebug_CanLaunchOrAttach
 215 };
 216
 217 HRESULT CorDebug_Create(ICLRRuntimeHost *runtimehost, IUnknown** ppUnk)
 218 {
 219     CorDebug *This;
 220
 221     This = HeapAlloc( GetProcessHeap(), 0, sizeof *This );
 222     if ( !This )
 223         return E_OUTOFMEMORY;
 224
 225     This->ICorDebug_iface.lpVtbl = &cordebug_vtbl;
 226     This->ref = 1;
 227     This->pCallback = NULL;
 228     This->pCallback2 = NULL;
 229     This->runtimehost = runtimehost;
 230
 231     if(This->runtimehost)
 232         ICLRRuntimeHost_AddRef(This->runtimehost);
 233
 234     *ppUnk = (IUnknown*)This;
 235
 236     return S_OK;
 237 }