dlls/d3d8/device.c

   1 /*
   2  * IDirect3DDevice8 implementation
   3  *
   4  * Copyright 2002-2004 Jason Edmeades
   5  * Copyright 2004 Christian Costa
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #include "config.h"
  23
  24 #include <math.h>
  25 #include <stdarg.h>
  26
  27 #define NONAMELESSUNION
  28 #define NONAMELESSSTRUCT
  29 #include "windef.h"
  30 #include "winbase.h"
  31 #include "winuser.h"
  32 #include "wingdi.h"
  33 #include "wine/debug.h"
  34
  35 #include "d3d8_private.h"
  36
  37 WINE_DEFAULT_DEBUG_CHANNEL(d3d8);
  38
  39 /* Shader handle functions */
  40 static shader_handle *alloc_shader_handle(IDirect3DDevice8Impl *This) {
  41     if (This->free_shader_handles) {
  42         /* Use a free handle */
  43         shader_handle *handle = This->free_shader_handles;
  44         This->free_shader_handles = *handle;
  45         return handle;
  46     }
  47     if (!(This->allocated_shader_handles < This->shader_handle_table_size)) {
  48         /* Grow the table */
  49         DWORD new_size = This->shader_handle_table_size + (This->shader_handle_table_size >> 1);
  50         shader_handle *new_handles = HeapReAlloc(GetProcessHeap(), 0, This->shader_handles, new_size * sizeof(shader_handle));
  51         if (!new_handles) return NULL;
  52         This->shader_handles = new_handles;
  53         This->shader_handle_table_size = new_size;
  54     }
  55
  56     return &This->shader_handles[This->allocated_shader_handles++];
  57 }
  58
  59 static void free_shader_handle(IDirect3DDevice8Impl *This, shader_handle *handle) {
  60     *handle = This->free_shader_handles;
  61     This->free_shader_handles = handle;
  62 }
  63
  64 /* IDirect3D IUnknown parts follow: */
  65 static HRESULT WINAPI IDirect3DDevice8Impl_QueryInterface(LPDIRECT3DDEVICE8 iface,REFIID riid,LPVOID *ppobj)
  66 {
  67     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
  68
  69     if (IsEqualGUID(riid, &IID_IUnknown)
  70         || IsEqualGUID(riid, &IID_IDirect3DDevice8)) {
  71         IUnknown_AddRef(iface);
  72         *ppobj = This;
  73         return S_OK;
  74     }
  75
  76     WARN("(%p)->(%s,%p),not found\n", This, debugstr_guid(riid), ppobj);
  77     *ppobj = NULL;
  78     return E_NOINTERFACE;
  79 }
  80
  81 static ULONG WINAPI IDirect3DDevice8Impl_AddRef(LPDIRECT3DDEVICE8 iface) {
  82     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
  83     ULONG ref = InterlockedIncrement(&This->ref);
  84
  85     TRACE("(%p) : AddRef from %d\n", This, ref - 1);
  86
  87     return ref;
  88 }
  89
  90 static ULONG WINAPI IDirect3DDevice8Impl_Release(LPDIRECT3DDEVICE8 iface) {
  91     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
  92     ULONG ref = InterlockedDecrement(&This->ref);
  93
  94     TRACE("(%p) : ReleaseRef to %d\n", This, ref);
  95
  96     if (ref == 0) {
  97         TRACE("Releasing wined3d device %p\n", This->WineD3DDevice);
  98         IWineD3DDevice_Uninit3D(This->WineD3DDevice);
  99         IWineD3DDevice_Release(This->WineD3DDevice);
 100         HeapFree(GetProcessHeap(), 0, This->shader_handles);
 101         HeapFree(GetProcessHeap(), 0, This);
 102     }
 103     return ref;
 104 }
 105
 106 /* IDirect3DDevice Interface follow: */
 107 static HRESULT WINAPI IDirect3DDevice8Impl_TestCooperativeLevel(LPDIRECT3DDEVICE8 iface) {
 108     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 109
 110     TRACE("(%p) : Relay\n", This);
 111     return IWineD3DDevice_TestCooperativeLevel(This->WineD3DDevice);
 112 }
 113
 114 static UINT WINAPI  IDirect3DDevice8Impl_GetAvailableTextureMem(LPDIRECT3DDEVICE8 iface) {
 115     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 116
 117     TRACE("(%p) Relay\n", This);
 118     return IWineD3DDevice_GetAvailableTextureMem(This->WineD3DDevice);
 119 }
 120
 121 static HRESULT WINAPI IDirect3DDevice8Impl_ResourceManagerDiscardBytes(LPDIRECT3DDEVICE8 iface, DWORD Bytes) {
 122     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 123
 124     TRACE("(%p) : Relay bytes(%d)\n", This, Bytes);
 125     return IWineD3DDevice_EvictManagedResources(This->WineD3DDevice);
 126 }
 127
 128 static HRESULT WINAPI IDirect3DDevice8Impl_GetDirect3D(LPDIRECT3DDEVICE8 iface, IDirect3D8** ppD3D8) {
 129     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 130     HRESULT hr = D3D_OK;
 131     IWineD3D* pWineD3D;
 132
 133     TRACE("(%p) Relay\n", This);
 134
 135     if (NULL == ppD3D8) {
 136         return D3DERR_INVALIDCALL;
 137     }
 138     hr = IWineD3DDevice_GetDirect3D(This->WineD3DDevice, &pWineD3D);
 139     if (hr == D3D_OK && pWineD3D != NULL)
 140     {
 141         IWineD3DResource_GetParent((IWineD3DResource *)pWineD3D,(IUnknown **)ppD3D8);
 142     } else {
 143         FIXME("Call to IWineD3DDevice_GetDirect3D failed\n");
 144         *ppD3D8 = NULL;
 145     }
 146     TRACE("(%p) returning %p\n",This , *ppD3D8);
 147     return hr;
 148 }
 149
 150 static HRESULT WINAPI IDirect3DDevice8Impl_GetDeviceCaps(LPDIRECT3DDEVICE8 iface, D3DCAPS8* pCaps) {
 151     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 152     HRESULT hrc = D3D_OK;
 153     WINED3DCAPS *pWineCaps;
 154
 155     TRACE("(%p) : Relay pCaps %p\n", This, pCaps);
 156     if(NULL == pCaps){
 157         return D3DERR_INVALIDCALL;
 158     }
 159     pWineCaps = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(WINED3DCAPS));
 160     if(pWineCaps == NULL){
 161         return D3DERR_INVALIDCALL; /* well this is what MSDN says to return */
 162     }
 163
 164     D3D8CAPSTOWINECAPS(pCaps, pWineCaps)
 165     hrc = IWineD3DDevice_GetDeviceCaps(This->WineD3DDevice, pWineCaps);
 166     HeapFree(GetProcessHeap(), 0, pWineCaps);
 167     TRACE("Returning %p %p\n", This, pCaps);
 168     return hrc;
 169 }
 170
 171 static HRESULT WINAPI IDirect3DDevice8Impl_GetDisplayMode(LPDIRECT3DDEVICE8 iface, D3DDISPLAYMODE* pMode) {
 172     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 173     TRACE("(%p) Relay\n", This);
 174     return IWineD3DDevice_GetDisplayMode(This->WineD3DDevice, 0, (WINED3DDISPLAYMODE *) pMode);
 175 }
 176
 177 static HRESULT WINAPI IDirect3DDevice8Impl_GetCreationParameters(LPDIRECT3DDEVICE8 iface, D3DDEVICE_CREATION_PARAMETERS *pParameters) {
 178     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 179     TRACE("(%p) Relay\n", This);
 180     return IWineD3DDevice_GetCreationParameters(This->WineD3DDevice, (WINED3DDEVICE_CREATION_PARAMETERS *) pParameters);
 181 }
 182
 183 static HRESULT WINAPI IDirect3DDevice8Impl_SetCursorProperties(LPDIRECT3DDEVICE8 iface, UINT XHotSpot, UINT YHotSpot, IDirect3DSurface8* pCursorBitmap) {
 184     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 185     IDirect3DSurface8Impl *pSurface = (IDirect3DSurface8Impl*)pCursorBitmap;
 186     TRACE("(%p) Relay\n", This);
 187     if(!pCursorBitmap) {
 188         WARN("No cursor bitmap, returning WINED3DERR_INVALIDCALL\n");
 189         return WINED3DERR_INVALIDCALL;
 190     }
 191     return IWineD3DDevice_SetCursorProperties(This->WineD3DDevice,XHotSpot,YHotSpot,(IWineD3DSurface*)pSurface->wineD3DSurface);
 192 }
 193
 194 static void WINAPI IDirect3DDevice8Impl_SetCursorPosition(LPDIRECT3DDEVICE8 iface, UINT XScreenSpace, UINT YScreenSpace, DWORD Flags) {
 195     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 196     TRACE("(%p) Relay\n", This);
 197     return IWineD3DDevice_SetCursorPosition(This->WineD3DDevice, XScreenSpace, YScreenSpace, Flags);
 198 }
 199
 200 static BOOL WINAPI IDirect3DDevice8Impl_ShowCursor(LPDIRECT3DDEVICE8 iface, BOOL bShow) {
 201     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 202     TRACE("(%p) Relay\n", This);
 203
 204     return IWineD3DDevice_ShowCursor(This->WineD3DDevice, bShow);
 205 }
 206
 207 static HRESULT WINAPI IDirect3DDevice8Impl_CreateAdditionalSwapChain(LPDIRECT3DDEVICE8 iface, D3DPRESENT_PARAMETERS* pPresentationParameters, IDirect3DSwapChain8** pSwapChain) {
 208     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 209     IDirect3DSwapChain8Impl* object;
 210     HRESULT hrc = D3D_OK;
 211     WINED3DPRESENT_PARAMETERS localParameters;
 212
 213     TRACE("(%p) Relay\n", This);
 214
 215     /* Fix the back buffer count */
 216     if(pPresentationParameters->BackBufferCount == 0) {
 217         pPresentationParameters->BackBufferCount = 1;
 218     }
 219
 220     object = HeapAlloc(GetProcessHeap(),  HEAP_ZERO_MEMORY, sizeof(*object));
 221     if (NULL == object) {
 222         FIXME("Allocation of memory failed\n");
 223         *pSwapChain = NULL;
 224         return D3DERR_OUTOFVIDEOMEMORY;
 225     }
 226     object->ref = 1;
 227     object->lpVtbl = &Direct3DSwapChain8_Vtbl;
 228
 229     /* Allocate an associated WineD3DDevice object */
 230     localParameters.BackBufferWidth                = &pPresentationParameters->BackBufferWidth;
 231     localParameters.BackBufferHeight               = &pPresentationParameters->BackBufferHeight;
 232     localParameters.BackBufferFormat               = (WINED3DFORMAT *)&pPresentationParameters->BackBufferFormat;
 233     localParameters.BackBufferCount                = &pPresentationParameters->BackBufferCount;
 234     localParameters.MultiSampleType                = (WINED3DMULTISAMPLE_TYPE *) &pPresentationParameters->MultiSampleType;
 235     localParameters.MultiSampleQuality             = NULL; /* d3d9 only */
 236     localParameters.SwapEffect                     = (WINED3DSWAPEFFECT *) &pPresentationParameters->SwapEffect;
 237     localParameters.hDeviceWindow                  = &pPresentationParameters->hDeviceWindow;
 238     localParameters.Windowed                       = &pPresentationParameters->Windowed;
 239     localParameters.EnableAutoDepthStencil         = &pPresentationParameters->EnableAutoDepthStencil;
 240     localParameters.AutoDepthStencilFormat         = (WINED3DFORMAT *)&pPresentationParameters->AutoDepthStencilFormat;
 241     localParameters.Flags                          = &pPresentationParameters->Flags;
 242     localParameters.FullScreen_RefreshRateInHz     = &pPresentationParameters->FullScreen_RefreshRateInHz;
 243     localParameters.PresentationInterval           = &pPresentationParameters->FullScreen_PresentationInterval;
 244
 245
 246     hrc = IWineD3DDevice_CreateAdditionalSwapChain(This->WineD3DDevice, &localParameters, &object->wineD3DSwapChain, (IUnknown*)object, D3D8CB_CreateRenderTarget, D3D8CB_CreateDepthStencilSurface);
 247     if (hrc != D3D_OK) {
 248         FIXME("(%p) call to IWineD3DDevice_CreateAdditionalSwapChain failed\n", This);
 249         HeapFree(GetProcessHeap(), 0 , object);
 250         *pSwapChain = NULL;
 251     }else{
 252         IUnknown_AddRef(iface);
 253         object->parentDevice = iface;
 254         *pSwapChain = (IDirect3DSwapChain8 *)object;
 255     }
 256     TRACE("(%p) returning %p\n", This, *pSwapChain);
 257     return hrc;
 258 }
 259
 260 static HRESULT WINAPI IDirect3DDevice8Impl_Reset(LPDIRECT3DDEVICE8 iface, D3DPRESENT_PARAMETERS* pPresentationParameters) {
 261     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 262     WINED3DPRESENT_PARAMETERS localParameters;
 263     TRACE("(%p) Relay pPresentationParameters(%p)\n", This, pPresentationParameters);
 264 /* FINDME: FIXME: */
 265     localParameters.BackBufferWidth                = &pPresentationParameters->BackBufferWidth;
 266     localParameters.BackBufferHeight               = &pPresentationParameters->BackBufferHeight;
 267     localParameters.BackBufferFormat               = (WINED3DFORMAT *)&pPresentationParameters->BackBufferFormat;
 268     localParameters.BackBufferCount                = &pPresentationParameters->BackBufferCount;
 269     localParameters.MultiSampleType                = (WINED3DMULTISAMPLE_TYPE *) &pPresentationParameters->MultiSampleType;
 270     localParameters.MultiSampleQuality             = NULL; /* D3d9 only */
 271     localParameters.SwapEffect                     = (WINED3DSWAPEFFECT *) &pPresentationParameters->SwapEffect;
 272     localParameters.hDeviceWindow                  = &pPresentationParameters->hDeviceWindow;
 273     localParameters.Windowed                       = &pPresentationParameters->Windowed;
 274     localParameters.EnableAutoDepthStencil         = &pPresentationParameters->EnableAutoDepthStencil;
 275     localParameters.AutoDepthStencilFormat         = (WINED3DFORMAT *)&pPresentationParameters->AutoDepthStencilFormat;
 276     localParameters.Flags                          = &pPresentationParameters->Flags;
 277     localParameters.FullScreen_RefreshRateInHz     = &pPresentationParameters->FullScreen_RefreshRateInHz;
 278     localParameters.PresentationInterval           = &pPresentationParameters->FullScreen_PresentationInterval;
 279     return IWineD3DDevice_Reset(This->WineD3DDevice, &localParameters);
 280 }
 281
 282 static HRESULT WINAPI IDirect3DDevice8Impl_Present(LPDIRECT3DDEVICE8 iface, CONST RECT* pSourceRect,CONST RECT* pDestRect,HWND hDestWindowOverride,CONST RGNDATA* pDirtyRegion) {
 283     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 284     TRACE("(%p) Relay\n", This);
 285     return IWineD3DDevice_Present(This->WineD3DDevice, pSourceRect, pDestRect, hDestWindowOverride, pDirtyRegion);
 286 }
 287
 288 static HRESULT WINAPI IDirect3DDevice8Impl_GetBackBuffer(LPDIRECT3DDEVICE8 iface, UINT BackBuffer, D3DBACKBUFFER_TYPE Type, IDirect3DSurface8** ppBackBuffer) {
 289     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 290     IWineD3DSurface *retSurface = NULL;
 291     HRESULT rc = D3D_OK;
 292
 293     TRACE("(%p) Relay\n", This);
 294
 295     rc = IWineD3DDevice_GetBackBuffer(This->WineD3DDevice, 0, BackBuffer, (WINED3DBACKBUFFER_TYPE) Type, (IWineD3DSurface **)&retSurface);
 296     if (rc == D3D_OK && NULL != retSurface && NULL != ppBackBuffer) {
 297         IWineD3DSurface_GetParent(retSurface, (IUnknown **)ppBackBuffer);
 298     }
 299     return rc;
 300 }
 301
 302 static HRESULT WINAPI IDirect3DDevice8Impl_GetRasterStatus(LPDIRECT3DDEVICE8 iface, D3DRASTER_STATUS* pRasterStatus) {
 303     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 304     TRACE("(%p) Relay\n", This);
 305
 306     return IWineD3DDevice_GetRasterStatus(This->WineD3DDevice, 0, (WINED3DRASTER_STATUS *) pRasterStatus);
 307 }
 308
 309 static void WINAPI IDirect3DDevice8Impl_SetGammaRamp(LPDIRECT3DDEVICE8 iface, DWORD Flags, CONST D3DGAMMARAMP* pRamp) {
 310     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 311     TRACE("(%p) Relay\n", This);
 312
 313     /* Note: D3DGAMMARAMP is compatible with WINED3DGAMMARAMP */
 314     return IWineD3DDevice_SetGammaRamp(This->WineD3DDevice, 0, Flags, (CONST WINED3DGAMMARAMP *) pRamp);
 315 }
 316
 317 static void WINAPI IDirect3DDevice8Impl_GetGammaRamp(LPDIRECT3DDEVICE8 iface, D3DGAMMARAMP* pRamp) {
 318     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 319     TRACE("(%p) Relay\n", This);
 320
 321     /* Note: D3DGAMMARAMP is compatible with WINED3DGAMMARAMP */
 322     return IWineD3DDevice_GetGammaRamp(This->WineD3DDevice, 0, (WINED3DGAMMARAMP *) pRamp);
 323 }
 324
 325 static HRESULT WINAPI IDirect3DDevice8Impl_CreateTexture(LPDIRECT3DDEVICE8 iface, UINT Width, UINT Height, UINT Levels, DWORD Usage,
 326                                                     D3DFORMAT Format, D3DPOOL Pool, IDirect3DTexture8 **ppTexture) {
 327     IDirect3DTexture8Impl *object;
 328     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 329     HRESULT hrc = D3D_OK;
 330
 331     TRACE("(%p) : W(%d) H(%d), Lvl(%d) d(%d), Fmt(%u), Pool(%d)\n", This, Width, Height, Levels, Usage, Format,  Pool);
 332
 333     /* Allocate the storage for the device */
 334     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirect3DTexture8Impl));
 335
 336     if (NULL == object) {
 337         FIXME("Allocation of memory failed\n");
 338 /*        *ppTexture = NULL; */
 339         return D3DERR_OUTOFVIDEOMEMORY;
 340     }
 341
 342     object->lpVtbl = &Direct3DTexture8_Vtbl;
 343     object->ref = 1;
 344     hrc = IWineD3DDevice_CreateTexture(This->WineD3DDevice, Width, Height, Levels, Usage & WINED3DUSAGE_MASK,
 345                                  (WINED3DFORMAT)Format, (WINED3DPOOL) Pool, &object->wineD3DTexture, NULL, (IUnknown *)object, D3D8CB_CreateSurface);
 346
 347     if (FAILED(hrc)) {
 348         /* free up object */
 349         FIXME("(%p) call to IWineD3DDevice_CreateTexture failed\n", This);
 350         HeapFree(GetProcessHeap(), 0, object);
 351 /*      *ppTexture = NULL; */
 352    } else {
 353         IUnknown_AddRef(iface);
 354         object->parentDevice = iface;
 355         *ppTexture = (LPDIRECT3DTEXTURE8) object;
 356    }
 357
 358    TRACE("(%p) Created Texture %p, %p\n",This,object,object->wineD3DTexture);
 359    return hrc;
 360 }
 361
 362 static HRESULT WINAPI IDirect3DDevice8Impl_CreateVolumeTexture(LPDIRECT3DDEVICE8 iface,
 363                                                           UINT Width, UINT Height, UINT Depth, UINT Levels, DWORD Usage,
 364                                                           D3DFORMAT Format, D3DPOOL Pool, IDirect3DVolumeTexture8** ppVolumeTexture) {
 365
 366     IDirect3DVolumeTexture8Impl *object;
 367     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 368     HRESULT hrc = D3D_OK;
 369
 370     TRACE("(%p) Relay\n", This);
 371
 372     /* Allocate the storage for the device */
 373     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirect3DVolumeTexture8Impl));
 374     if (NULL == object) {
 375         FIXME("(%p) allocation of memory failed\n", This);
 376         *ppVolumeTexture = NULL;
 377         return D3DERR_OUTOFVIDEOMEMORY;
 378     }
 379
 380     object->lpVtbl = &Direct3DVolumeTexture8_Vtbl;
 381     object->ref = 1;
 382     hrc = IWineD3DDevice_CreateVolumeTexture(This->WineD3DDevice, Width, Height, Depth, Levels, Usage & WINED3DUSAGE_MASK,
 383                                  (WINED3DFORMAT)Format, (WINED3DPOOL) Pool, &object->wineD3DVolumeTexture, NULL,
 384                                  (IUnknown *)object, D3D8CB_CreateVolume);
 385
 386     if (hrc != D3D_OK) {
 387
 388         /* free up object */
 389         FIXME("(%p) call to IWineD3DDevice_CreateVolumeTexture failed\n", This);
 390         HeapFree(GetProcessHeap(), 0, object);
 391         *ppVolumeTexture = NULL;
 392     } else {
 393         IUnknown_AddRef(iface);
 394         object->parentDevice = iface;
 395         *ppVolumeTexture = (LPDIRECT3DVOLUMETEXTURE8) object;
 396     }
 397     TRACE("(%p)  returning %p\n", This , *ppVolumeTexture);
 398     return hrc;
 399 }
 400
 401 static HRESULT WINAPI IDirect3DDevice8Impl_CreateCubeTexture(LPDIRECT3DDEVICE8 iface, UINT EdgeLength, UINT Levels, DWORD Usage,
 402                                                         D3DFORMAT Format, D3DPOOL Pool, IDirect3DCubeTexture8** ppCubeTexture) {
 403
 404     IDirect3DCubeTexture8Impl *object;
 405     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 406     HRESULT hr = D3D_OK;
 407
 408     TRACE("(%p) : ELen(%d) Lvl(%d) Usage(%d) fmt(%u), Pool(%d)\n" , This, EdgeLength, Levels, Usage, Format, Pool);
 409
 410     /* Allocate the storage for the device */
 411     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*object));
 412
 413     if (NULL == object) {
 414         FIXME("(%p) allocation of CubeTexture failed\n", This);
 415         *ppCubeTexture = NULL;
 416         return D3DERR_OUTOFVIDEOMEMORY;
 417     }
 418
 419     object->lpVtbl = &Direct3DCubeTexture8_Vtbl;
 420     object->ref = 1;
 421     hr = IWineD3DDevice_CreateCubeTexture(This->WineD3DDevice, EdgeLength, Levels, Usage & WINED3DUSAGE_MASK,
 422                                  (WINED3DFORMAT)Format, (WINED3DPOOL) Pool, &object->wineD3DCubeTexture, NULL, (IUnknown*)object,
 423                                  D3D8CB_CreateSurface);
 424
 425     if (hr != D3D_OK){
 426
 427         /* free up object */
 428         FIXME("(%p) call to IWineD3DDevice_CreateCubeTexture failed\n", This);
 429         HeapFree(GetProcessHeap(), 0, object);
 430         *ppCubeTexture = NULL;
 431     } else {
 432         IUnknown_AddRef(iface);
 433         object->parentDevice = iface;
 434         *ppCubeTexture = (LPDIRECT3DCUBETEXTURE8) object;
 435     }
 436
 437     TRACE("(%p) returning %p\n",This, *ppCubeTexture);
 438     return hr;
 439 }
 440
 441 static HRESULT WINAPI IDirect3DDevice8Impl_CreateVertexBuffer(LPDIRECT3DDEVICE8 iface, UINT Size, DWORD Usage, DWORD FVF, D3DPOOL Pool, IDirect3DVertexBuffer8** ppVertexBuffer) {
 442     IDirect3DVertexBuffer8Impl *object;
 443     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 444     HRESULT hrc = D3D_OK;
 445
 446     TRACE("(%p) Relay\n", This);
 447     /* Allocate the storage for the device */
 448     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirect3DVertexBuffer8Impl));
 449     if (NULL == object) {
 450         FIXME("Allocation of memory failed\n");
 451         *ppVertexBuffer = NULL;
 452         return D3DERR_OUTOFVIDEOMEMORY;
 453     }
 454
 455     object->lpVtbl = &Direct3DVertexBuffer8_Vtbl;
 456     object->ref = 1;
 457     hrc = IWineD3DDevice_CreateVertexBuffer(This->WineD3DDevice, Size, Usage & WINED3DUSAGE_MASK, FVF, (WINED3DPOOL) Pool, &(object->wineD3DVertexBuffer), NULL, (IUnknown *)object);
 458
 459     if (D3D_OK != hrc) {
 460
 461         /* free up object */
 462         FIXME("(%p) call to IWineD3DDevice_CreateVertexBuffer failed\n", This);
 463         HeapFree(GetProcessHeap(), 0, object);
 464         *ppVertexBuffer = NULL;
 465     } else {
 466         IUnknown_AddRef(iface);
 467         object->parentDevice = iface;
 468         *ppVertexBuffer = (LPDIRECT3DVERTEXBUFFER8) object;
 469     }
 470     return hrc;
 471 }
 472
 473 static HRESULT WINAPI IDirect3DDevice8Impl_CreateIndexBuffer(LPDIRECT3DDEVICE8 iface, UINT Length, DWORD Usage, D3DFORMAT Format, D3DPOOL Pool, IDirect3DIndexBuffer8** ppIndexBuffer) {
 474     IDirect3DIndexBuffer8Impl *object;
 475     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 476     HRESULT hrc = D3D_OK;
 477
 478     TRACE("(%p) Relay\n", This);
 479     /* Allocate the storage for the device */
 480     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*object));
 481     if (NULL == object) {
 482         FIXME("Allocation of memory failed\n");
 483         *ppIndexBuffer = NULL;
 484         return D3DERR_OUTOFVIDEOMEMORY;
 485     }
 486
 487     object->lpVtbl = &Direct3DIndexBuffer8_Vtbl;
 488     object->ref = 1;
 489     TRACE("Calling wined3d create index buffer\n");
 490     hrc = IWineD3DDevice_CreateIndexBuffer(This->WineD3DDevice, Length, Usage & WINED3DUSAGE_MASK, Format, (WINED3DPOOL) Pool, &object->wineD3DIndexBuffer, NULL, (IUnknown *)object);
 491
 492     if (D3D_OK != hrc) {
 493
 494         /* free up object */
 495         FIXME("(%p) call to IWineD3DDevice_CreateIndexBuffer failed\n", This);
 496         HeapFree(GetProcessHeap(), 0, object);
 497         *ppIndexBuffer = NULL;
 498     } else {
 499         IUnknown_AddRef(iface);
 500         object->parentDevice = iface;
 501         *ppIndexBuffer = (LPDIRECT3DINDEXBUFFER8)object;
 502     }
 503     return hrc;
 504 }
 505
 506 static HRESULT WINAPI IDirect3DDevice8Impl_CreateSurface(LPDIRECT3DDEVICE8 iface, UINT Width, UINT Height, D3DFORMAT Format, BOOL Lockable, BOOL Discard, UINT Level, IDirect3DSurface8 **ppSurface,D3DRESOURCETYPE Type, UINT Usage,D3DPOOL Pool, D3DMULTISAMPLE_TYPE MultiSample, DWORD MultisampleQuality)  {
 507     HRESULT hrc;
 508     IDirect3DSurface8Impl *object;
 509     IDirect3DDevice8Impl  *This = (IDirect3DDevice8Impl *)iface;
 510     TRACE("(%p) Relay\n", This);
 511     if(MultisampleQuality < 0) {
 512         FIXME("MultisampleQuality out of range %d, substituting 0\n", MultisampleQuality);
 513         /*FIXME: Find out what windows does with a MultisampleQuality < 0 */
 514         MultisampleQuality=0;
 515     }
 516
 517     if(MultisampleQuality > 0){
 518         FIXME("MultisampleQuality set to %d, substituting 0\n" , MultisampleQuality);
 519         /*
 520         MultisampleQuality
 521         [in] Quality level. The valid range is between zero and one less than the level returned by pQualityLevels used by IDirect3D8::CheckDeviceMultiSampleType. Passing a larger value returns the error D3DERR_INVALIDCALL. The MultisampleQuality values of paired render targets, depth stencil surfaces, and the MultiSample type must all match.
 522         */
 523         MultisampleQuality=0;
 524     }
 525     /*FIXME: Check MAX bounds of MultisampleQuality*/
 526
 527     /* Allocate the storage for the device */
 528     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirect3DSurface8Impl));
 529     if (NULL == object) {
 530         FIXME("Allocation of memory failed\n");
 531         *ppSurface = NULL;
 532         return D3DERR_OUTOFVIDEOMEMORY;
 533     }
 534
 535     object->lpVtbl = &Direct3DSurface8_Vtbl;
 536     object->ref = 1;
 537
 538     TRACE("(%p) : w(%d) h(%d) fmt(%d) surf@%p\n", This, Width, Height, Format, *ppSurface);
 539
 540     hrc = IWineD3DDevice_CreateSurface(This->WineD3DDevice, Width, Height, Format, Lockable, Discard, Level,  &object->wineD3DSurface, Type, Usage & WINED3DUSAGE_MASK, (WINED3DPOOL) Pool,MultiSample,MultisampleQuality, NULL, SURFACE_OPENGL, (IUnknown *)object);
 541     if (hrc != D3D_OK || NULL == object->wineD3DSurface) {
 542        /* free up object */
 543         FIXME("(%p) call to IWineD3DDevice_CreateSurface failed\n", This);
 544         HeapFree(GetProcessHeap(), 0, object);
 545         *ppSurface = NULL;
 546     } else {
 547         IUnknown_AddRef(iface);
 548         object->parentDevice = iface;
 549         *ppSurface = (LPDIRECT3DSURFACE8) object;
 550     }
 551     return hrc;
 552 }
 553
 554 static HRESULT WINAPI IDirect3DDevice8Impl_CreateRenderTarget(LPDIRECT3DDEVICE8 iface, UINT Width, UINT Height, D3DFORMAT Format, D3DMULTISAMPLE_TYPE MultiSample, BOOL Lockable, IDirect3DSurface8** ppSurface) {
 555     TRACE("Relay\n");
 556
 557     return IDirect3DDevice8Impl_CreateSurface(iface, Width, Height, Format, Lockable, FALSE /* Discard */, 0 /* Level */ , ppSurface, D3DRTYPE_SURFACE, D3DUSAGE_RENDERTARGET, D3DPOOL_DEFAULT, MultiSample, 0);
 558 }
 559
 560 static HRESULT WINAPI IDirect3DDevice8Impl_CreateDepthStencilSurface(LPDIRECT3DDEVICE8 iface, UINT Width, UINT Height, D3DFORMAT Format, D3DMULTISAMPLE_TYPE MultiSample, IDirect3DSurface8** ppSurface) {
 561     TRACE("Relay\n");
 562     /* TODO: Verify that Discard is false */
 563     return IDirect3DDevice8Impl_CreateSurface(iface, Width, Height, Format, TRUE /* Lockable */, FALSE, 0 /* Level */
 564                                                ,ppSurface, D3DRTYPE_SURFACE, D3DUSAGE_DEPTHSTENCIL,
 565                                                 D3DPOOL_DEFAULT, MultiSample, 0);
 566 }
 567
 568 static HRESULT WINAPI IDirect3DDevice8Impl_CreateImageSurface(LPDIRECT3DDEVICE8 iface, UINT Width, UINT Height, D3DFORMAT Format, IDirect3DSurface8** ppSurface) {
 569     TRACE("Relay\n");
 570
 571     return IDirect3DDevice8Impl_CreateSurface(iface, Width, Height, Format, TRUE /* Loackable */ , FALSE /*Discard*/ , 0 /* Level */ , ppSurface, D3DRTYPE_SURFACE, 0 /* Usage (undefined/none) */ , D3DPOOL_SCRATCH, D3DMULTISAMPLE_NONE, 0 /* MultisampleQuality */);
 572 }
 573
 574 static HRESULT WINAPI IDirect3DDevice8Impl_CopyRects(LPDIRECT3DDEVICE8 iface, IDirect3DSurface8 *pSourceSurface, CONST RECT *pSourceRects, UINT cRects, IDirect3DSurface8 *pDestinationSurface, CONST POINT *pDestPoints) {
 575     IDirect3DSurface8Impl *Source = (IDirect3DSurface8Impl *) pSourceSurface;
 576     IDirect3DSurface8Impl *Dest = (IDirect3DSurface8Impl *) pDestinationSurface;
 577
 578     HRESULT              hr = WINED3D_OK;
 579     WINED3DFORMAT        srcFormat, destFormat;
 580     UINT                 srcWidth,  destWidth;
 581     UINT                 srcHeight, destHeight;
 582     UINT                 srcSize;
 583     WINED3DSURFACE_DESC  winedesc;
 584
 585     TRACE("(%p) pSrcSur=%p, pSourceRects=%p, cRects=%d, pDstSur=%p, pDestPtsArr=%p\n", iface,
 586           pSourceSurface, pSourceRects, cRects, pDestinationSurface, pDestPoints);
 587
 588
 589     /* Check that the source texture is in WINED3DPOOL_SYSTEMMEM and the destination texture is in WINED3DPOOL_DEFAULT */
 590     memset(&winedesc, 0, sizeof(winedesc));
 591
 592     winedesc.Format = &srcFormat;
 593     winedesc.Width  = &srcWidth;
 594     winedesc.Height = &srcHeight;
 595     winedesc.Size   = &srcSize;
 596     IWineD3DSurface_GetDesc(Source->wineD3DSurface, &winedesc);
 597
 598     winedesc.Format = &destFormat;
 599     winedesc.Width  = &destWidth;
 600     winedesc.Height = &destHeight;
 601     winedesc.Size   = NULL;
 602     IWineD3DSurface_GetDesc(Dest->wineD3DSurface, &winedesc);
 603
 604     /* Check that the source and destination formats match */
 605     if (srcFormat != destFormat && WINED3DFMT_UNKNOWN != destFormat) {
 606         WARN("(%p) source %p format must match the dest %p format, returning WINED3DERR_INVALIDCALL\n", iface, pSourceSurface, pDestinationSurface);
 607         return WINED3DERR_INVALIDCALL;
 608     } else if (WINED3DFMT_UNKNOWN == destFormat) {
 609         TRACE("(%p) : Converting destination surface from WINED3DFMT_UNKNOWN to the source format\n", iface);
 610         IWineD3DSurface_SetFormat(Dest->wineD3DSurface, srcFormat);
 611         destFormat = srcFormat;
 612     }
 613
 614     /* Quick if complete copy ... */
 615     if (cRects == 0 && pSourceRects == NULL && pDestPoints == NULL) {
 616         IWineD3DSurface_BltFast(Dest->wineD3DSurface, 0, 0, Source->wineD3DSurface, NULL, DDBLTFAST_NOCOLORKEY);
 617     } else {
 618         unsigned int i;
 619         /* Copy rect by rect */
 620         if (NULL != pSourceRects && NULL != pDestPoints) {
 621             for (i = 0; i < cRects; ++i) {
 622                 IWineD3DSurface_BltFast(Dest->wineD3DSurface, pDestPoints[i].x, pDestPoints[i].y, Source->wineD3DSurface, (RECT *) &pSourceRects[i], DDBLTFAST_NOCOLORKEY);
 623             }
 624         } else {
 625             for (i = 0; i < cRects; ++i) {
 626                 IWineD3DSurface_BltFast(Dest->wineD3DSurface, 0, 0, Source->wineD3DSurface, (RECT *) &pSourceRects[i], DDBLTFAST_NOCOLORKEY);
 627             }
 628         }
 629     }
 630
 631     return hr;
 632 }
 633
 634 static HRESULT WINAPI IDirect3DDevice8Impl_UpdateTexture(LPDIRECT3DDEVICE8 iface, IDirect3DBaseTexture8* pSourceTexture, IDirect3DBaseTexture8* pDestinationTexture) {
 635     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 636     TRACE("(%p) Relay\n" , This);
 637
 638     return IWineD3DDevice_UpdateTexture(This->WineD3DDevice,  ((IDirect3DBaseTexture8Impl *)pSourceTexture)->wineD3DBaseTexture, ((IDirect3DBaseTexture8Impl *)pDestinationTexture)->wineD3DBaseTexture);
 639 }
 640
 641 static HRESULT WINAPI IDirect3DDevice8Impl_GetFrontBuffer(LPDIRECT3DDEVICE8 iface, IDirect3DSurface8* pDestSurface) {
 642     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 643     IDirect3DSurface8Impl *destSurface = (IDirect3DSurface8Impl *)pDestSurface;
 644
 645     TRACE("(%p) Relay\n" , This);
 646
 647     if (pDestSurface == NULL) {
 648         WARN("(%p) : Caller passed NULL as pDestSurface returning D3DERR_INVALIDCALL\n", This);
 649         return D3DERR_INVALIDCALL;
 650     }
 651
 652     return IWineD3DDevice_GetFrontBufferData(This->WineD3DDevice, 0, destSurface->wineD3DSurface);
 653 }
 654
 655 static HRESULT WINAPI IDirect3DDevice8Impl_SetRenderTarget(LPDIRECT3DDEVICE8 iface, IDirect3DSurface8* pRenderTarget, IDirect3DSurface8* pNewZStencil) {
 656     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 657     IDirect3DSurface8Impl *pSurface = (IDirect3DSurface8Impl *)pRenderTarget;
 658     IDirect3DSurface8Impl *pZSurface = (IDirect3DSurface8Impl *)pNewZStencil;
 659     TRACE("(%p) Relay\n" , This);
 660
 661     IWineD3DDevice_SetDepthStencilSurface(This->WineD3DDevice, NULL == pZSurface ? NULL : (IWineD3DSurface *)pZSurface->wineD3DSurface);
 662
 663     return IWineD3DDevice_SetRenderTarget(This->WineD3DDevice, 0, pSurface ? (IWineD3DSurface *)pSurface->wineD3DSurface : NULL);
 664 }
 665
 666 static HRESULT  WINAPI  IDirect3DDevice8Impl_GetRenderTarget(LPDIRECT3DDEVICE8 iface, IDirect3DSurface8** ppRenderTarget) {
 667     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 668     HRESULT hr = D3D_OK;
 669     IWineD3DSurface *pRenderTarget;
 670
 671     TRACE("(%p) Relay\n" , This);
 672
 673     if (ppRenderTarget == NULL) {
 674         return D3DERR_INVALIDCALL;
 675     }
 676     hr = IWineD3DDevice_GetRenderTarget(This->WineD3DDevice, 0, &pRenderTarget);
 677
 678     if (hr == D3D_OK && pRenderTarget != NULL) {
 679         IWineD3DResource_GetParent((IWineD3DResource *)pRenderTarget,(IUnknown**)ppRenderTarget);
 680     } else {
 681         FIXME("Call to IWineD3DDevice_GetRenderTarget failed\n");
 682         *ppRenderTarget = NULL;
 683     }
 684
 685     return hr;
 686 }
 687
 688 static HRESULT  WINAPI  IDirect3DDevice8Impl_GetDepthStencilSurface(LPDIRECT3DDEVICE8 iface, IDirect3DSurface8** ppZStencilSurface) {
 689     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 690     HRESULT hr = D3D_OK;
 691     IWineD3DSurface *pZStencilSurface;
 692
 693     TRACE("(%p) Relay\n" , This);
 694     if(ppZStencilSurface == NULL){
 695         return D3DERR_INVALIDCALL;
 696     }
 697
 698     hr=IWineD3DDevice_GetDepthStencilSurface(This->WineD3DDevice,&pZStencilSurface);
 699     if(hr == D3D_OK && pZStencilSurface != NULL){
 700         IWineD3DResource_GetParent((IWineD3DResource *)pZStencilSurface,(IUnknown**)ppZStencilSurface);
 701     }else{
 702         FIXME("Call to IWineD3DDevice_GetDepthStencilSurface failed\n");
 703         *ppZStencilSurface = NULL;
 704     }
 705
 706     return D3D_OK;
 707 }
 708
 709 static HRESULT WINAPI IDirect3DDevice8Impl_BeginScene(LPDIRECT3DDEVICE8 iface) {
 710     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 711     return IWineD3DDevice_BeginScene(This->WineD3DDevice);
 712 }
 713
 714 static HRESULT WINAPI IDirect3DDevice8Impl_EndScene(LPDIRECT3DDEVICE8 iface) {
 715     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 716     TRACE("(%p) Relay\n" , This);
 717
 718     return IWineD3DDevice_EndScene(This->WineD3DDevice);
 719 }
 720
 721 static HRESULT WINAPI IDirect3DDevice8Impl_Clear(LPDIRECT3DDEVICE8 iface, DWORD Count, CONST D3DRECT* pRects, DWORD Flags, D3DCOLOR Color, float Z, DWORD Stencil) {
 722     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 723     TRACE("(%p) Relay\n" , This);
 724
 725     /* Note: D3DRECT is compatible with WINED3DRECT */
 726     return IWineD3DDevice_Clear(This->WineD3DDevice, Count, (CONST WINED3DRECT*) pRects, Flags, Color, Z, Stencil);
 727 }
 728
 729 static HRESULT WINAPI IDirect3DDevice8Impl_SetTransform(LPDIRECT3DDEVICE8 iface, D3DTRANSFORMSTATETYPE State, CONST D3DMATRIX* lpMatrix) {
 730     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 731     TRACE("(%p) Relay\n" , This);
 732
 733     /* Note: D3DMATRIX is compatible with WINED3DMATRIX */
 734     return IWineD3DDevice_SetTransform(This->WineD3DDevice, State, (CONST WINED3DMATRIX*) lpMatrix);
 735 }
 736
 737 static HRESULT WINAPI IDirect3DDevice8Impl_GetTransform(LPDIRECT3DDEVICE8 iface, D3DTRANSFORMSTATETYPE State,D3DMATRIX* pMatrix) {
 738     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 739     TRACE("(%p) Relay\n" , This);
 740
 741     /* Note: D3DMATRIX is compatible with WINED3DMATRIX */
 742     return IWineD3DDevice_GetTransform(This->WineD3DDevice, State, (WINED3DMATRIX*) pMatrix);
 743 }
 744
 745 static HRESULT WINAPI IDirect3DDevice8Impl_MultiplyTransform(LPDIRECT3DDEVICE8 iface, D3DTRANSFORMSTATETYPE State, CONST D3DMATRIX* pMatrix) {
 746     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 747     TRACE("(%p) Relay\n" , This);
 748
 749     /* Note: D3DMATRIX is compatible with WINED3DMATRIX */
 750     return IWineD3DDevice_MultiplyTransform(This->WineD3DDevice, State, (CONST WINED3DMATRIX*) pMatrix);
 751 }
 752
 753 static HRESULT WINAPI IDirect3DDevice8Impl_SetViewport(LPDIRECT3DDEVICE8 iface, CONST D3DVIEWPORT8* pViewport) {
 754     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 755     TRACE("(%p) Relay\n" , This);
 756
 757     /* Note: D3DVIEWPORT8 is compatible with WINED3DVIEWPORT */
 758     return IWineD3DDevice_SetViewport(This->WineD3DDevice, (const WINED3DVIEWPORT *)pViewport);
 759 }
 760
 761 static HRESULT WINAPI IDirect3DDevice8Impl_GetViewport(LPDIRECT3DDEVICE8 iface, D3DVIEWPORT8* pViewport) {
 762     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 763     TRACE("(%p) Relay\n" , This);
 764
 765     /* Note: D3DVIEWPORT8 is compatible with WINED3DVIEWPORT */
 766     return IWineD3DDevice_GetViewport(This->WineD3DDevice, (WINED3DVIEWPORT *)pViewport);
 767 }
 768
 769 static HRESULT WINAPI IDirect3DDevice8Impl_SetMaterial(LPDIRECT3DDEVICE8 iface, CONST D3DMATERIAL8* pMaterial) {
 770     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 771     TRACE("(%p) Relay\n" , This);
 772
 773     /* Note: D3DMATERIAL8 is compatible with WINED3DMATERIAL */
 774     return IWineD3DDevice_SetMaterial(This->WineD3DDevice, (const WINED3DMATERIAL *)pMaterial);
 775 }
 776
 777 static HRESULT WINAPI IDirect3DDevice8Impl_GetMaterial(LPDIRECT3DDEVICE8 iface, D3DMATERIAL8* pMaterial) {
 778     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 779     TRACE("(%p) Relay\n" , This);
 780
 781     /* Note: D3DMATERIAL8 is compatible with WINED3DMATERIAL */
 782     return IWineD3DDevice_GetMaterial(This->WineD3DDevice, (WINED3DMATERIAL *)pMaterial);
 783 }
 784
 785 static HRESULT WINAPI IDirect3DDevice8Impl_SetLight(LPDIRECT3DDEVICE8 iface, DWORD Index, CONST D3DLIGHT8* pLight) {
 786     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 787     TRACE("(%p) Relay\n" , This);
 788
 789     /* Note: D3DLIGHT8 is compatible with WINED3DLIGHT */
 790     return IWineD3DDevice_SetLight(This->WineD3DDevice, Index, (const WINED3DLIGHT *)pLight);
 791 }
 792
 793 static HRESULT WINAPI IDirect3DDevice8Impl_GetLight(LPDIRECT3DDEVICE8 iface, DWORD Index,D3DLIGHT8* pLight) {
 794     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 795     TRACE("(%p) Relay\n" , This);
 796
 797     /* Note: D3DLIGHT8 is compatible with WINED3DLIGHT */
 798     return IWineD3DDevice_GetLight(This->WineD3DDevice, Index, (WINED3DLIGHT *)pLight);
 799 }
 800
 801 static HRESULT WINAPI IDirect3DDevice8Impl_LightEnable(LPDIRECT3DDEVICE8 iface, DWORD Index,BOOL Enable) {
 802     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 803     TRACE("(%p) Relay\n" , This);
 804
 805     return IWineD3DDevice_SetLightEnable(This->WineD3DDevice, Index, Enable);
 806 }
 807
 808 static HRESULT WINAPI IDirect3DDevice8Impl_GetLightEnable(LPDIRECT3DDEVICE8 iface, DWORD Index,BOOL* pEnable) {
 809     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 810     TRACE("(%p) Relay\n" , This);
 811
 812     return IWineD3DDevice_GetLightEnable(This->WineD3DDevice, Index, pEnable);
 813 }
 814
 815 static HRESULT WINAPI IDirect3DDevice8Impl_SetClipPlane(LPDIRECT3DDEVICE8 iface, DWORD Index,CONST float* pPlane) {
 816     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 817     TRACE("(%p) Relay\n" , This);
 818
 819     return IWineD3DDevice_SetClipPlane(This->WineD3DDevice, Index, pPlane);
 820 }
 821
 822 static HRESULT WINAPI IDirect3DDevice8Impl_GetClipPlane(LPDIRECT3DDEVICE8 iface, DWORD Index,float* pPlane) {
 823     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 824     TRACE("(%p) Relay\n" , This);
 825
 826     return IWineD3DDevice_GetClipPlane(This->WineD3DDevice, Index, pPlane);
 827 }
 828
 829 static HRESULT WINAPI IDirect3DDevice8Impl_SetRenderState(LPDIRECT3DDEVICE8 iface, D3DRENDERSTATETYPE State,DWORD Value) {
 830     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 831     TRACE("(%p) Relay\n" , This);
 832
 833     return IWineD3DDevice_SetRenderState(This->WineD3DDevice, State, Value);
 834 }
 835
 836 static HRESULT WINAPI IDirect3DDevice8Impl_GetRenderState(LPDIRECT3DDEVICE8 iface, D3DRENDERSTATETYPE State,DWORD* pValue) {
 837     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 838     TRACE("(%p) Relay\n" , This);
 839
 840     return IWineD3DDevice_GetRenderState(This->WineD3DDevice, State, pValue);
 841 }
 842
 843 static HRESULT WINAPI IDirect3DDevice8Impl_BeginStateBlock(LPDIRECT3DDEVICE8 iface) {
 844   IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 845
 846   TRACE("(%p)\n", This);
 847
 848   return IWineD3DDevice_BeginStateBlock(This->WineD3DDevice);
 849 }
 850
 851 static HRESULT WINAPI IDirect3DDevice8Impl_EndStateBlock(LPDIRECT3DDEVICE8 iface, DWORD* pToken) {
 852     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 853     HRESULT hr;
 854     IWineD3DStateBlock* wineD3DStateBlock;
 855     IDirect3DStateBlock8Impl* object;
 856
 857     TRACE("(%p) Relay\n", This);
 858
 859     /* Tell wineD3D to endstatablock before anything else (in case we run out
 860      * of memory later and cause locking problems)
 861      */
 862     hr = IWineD3DDevice_EndStateBlock(This->WineD3DDevice , &wineD3DStateBlock);
 863     if (hr != D3D_OK) {
 864        FIXME("IWineD3DDevice_EndStateBlock returned an error\n");
 865        return hr;
 866     }
 867
 868     /* allocate a new IDirectD3DStateBlock */
 869     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY ,sizeof(IDirect3DStateBlock8Impl));
 870     object->ref = 1;
 871     object->lpVtbl = &Direct3DStateBlock8_Vtbl;
 872
 873     object->wineD3DStateBlock = wineD3DStateBlock;
 874
 875     *pToken = (DWORD)object;
 876     TRACE("(%p)Returning %p %p\n", This, object, wineD3DStateBlock);
 877
 878     return hr;
 879 }
 880
 881 static HRESULT WINAPI IDirect3DDevice8Impl_ApplyStateBlock(LPDIRECT3DDEVICE8 iface, DWORD Token) {
 882     IDirect3DStateBlock8Impl *pSB  = (IDirect3DStateBlock8Impl*) Token;
 883     IDirect3DDevice8Impl     *This = (IDirect3DDevice8Impl *)iface;
 884
 885     TRACE("(%p) %p Relay\n", This, pSB);
 886
 887     return  IWineD3DStateBlock_Apply(pSB->wineD3DStateBlock);
 888 }
 889
 890 static HRESULT WINAPI IDirect3DDevice8Impl_CaptureStateBlock(LPDIRECT3DDEVICE8 iface, DWORD Token) {
 891     IDirect3DStateBlock8Impl* pSB = (IDirect3DStateBlock8Impl *)Token;
 892     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 893
 894     TRACE("(%p) %p Relay\n", This, pSB);
 895
 896     return IWineD3DStateBlock_Capture(pSB->wineD3DStateBlock);
 897 }
 898
 899 static HRESULT WINAPI IDirect3DDevice8Impl_DeleteStateBlock(LPDIRECT3DDEVICE8 iface, DWORD Token) {
 900     IDirect3DStateBlock8Impl* pSB = (IDirect3DStateBlock8Impl *)Token;
 901     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 902
 903     TRACE("(%p) Relay\n", This);
 904
 905     while(IUnknown_Release((IUnknown *)pSB));
 906
 907     return D3D_OK;
 908 }
 909
 910 static HRESULT WINAPI IDirect3DDevice8Impl_CreateStateBlock(LPDIRECT3DDEVICE8 iface, D3DSTATEBLOCKTYPE Type, DWORD* pToken) {
 911    IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 912    IDirect3DStateBlock8Impl *object;
 913    HRESULT hrc = D3D_OK;
 914
 915    TRACE("(%p) Relay\n", This);
 916
 917    object  = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirect3DStateBlock8Impl));
 918    if (NULL == object) {
 919       *pToken = 0;
 920       return E_OUTOFMEMORY;
 921    }
 922    object->lpVtbl = &Direct3DStateBlock8_Vtbl;
 923    object->ref = 1;
 924
 925    hrc = IWineD3DDevice_CreateStateBlock(This->WineD3DDevice, (WINED3DSTATEBLOCKTYPE)Type, &object->wineD3DStateBlock, (IUnknown *)object);
 926    if(D3D_OK != hrc){
 927        FIXME("(%p) Call to IWineD3DDevice_CreateStateBlock failed.\n", This);
 928        HeapFree(GetProcessHeap(), 0, object);
 929        *pToken = 0;
 930    } else {
 931        *pToken = (DWORD)object;
 932    }
 933    TRACE("(%p) returning token (ptr to stateblock) of %p\n", This, object);
 934
 935    return hrc;
 936 }
 937
 938 static HRESULT WINAPI IDirect3DDevice8Impl_SetClipStatus(LPDIRECT3DDEVICE8 iface, CONST D3DCLIPSTATUS8* pClipStatus) {
 939     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 940     TRACE("(%p) Relay\n" , This);
 941 /* FIXME: Verify that D3DCLIPSTATUS8 ~= WINED3DCLIPSTATUS */
 942     return IWineD3DDevice_SetClipStatus(This->WineD3DDevice, (const WINED3DCLIPSTATUS *)pClipStatus);
 943 }
 944
 945 static HRESULT WINAPI IDirect3DDevice8Impl_GetClipStatus(LPDIRECT3DDEVICE8 iface, D3DCLIPSTATUS8* pClipStatus) {
 946     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 947     TRACE("(%p) Relay\n" , This);
 948
 949     return IWineD3DDevice_GetClipStatus(This->WineD3DDevice, (WINED3DCLIPSTATUS *)pClipStatus);
 950 }
 951
 952 static HRESULT WINAPI IDirect3DDevice8Impl_GetTexture(LPDIRECT3DDEVICE8 iface, DWORD Stage,IDirect3DBaseTexture8** ppTexture) {
 953     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 954     IWineD3DBaseTexture *retTexture = NULL;
 955     HRESULT rc = D3D_OK;
 956
 957     TRACE("(%p) Relay\n" , This);
 958
 959     if(ppTexture == NULL){
 960         return D3DERR_INVALIDCALL;
 961     }
 962
 963     rc = IWineD3DDevice_GetTexture(This->WineD3DDevice, Stage, (IWineD3DBaseTexture **)&retTexture);
 964     if (rc == D3D_OK && NULL != retTexture) {
 965         IWineD3DBaseTexture_GetParent(retTexture, (IUnknown **)ppTexture);
 966         IWineD3DBaseTexture_Release(retTexture);
 967     } else {
 968         FIXME("Call to get texture  (%d) failed (%p)\n", Stage, retTexture);
 969         *ppTexture = NULL;
 970     }
 971
 972     return rc;
 973 }
 974
 975 static HRESULT WINAPI IDirect3DDevice8Impl_SetTexture(LPDIRECT3DDEVICE8 iface, DWORD Stage, IDirect3DBaseTexture8* pTexture) {
 976     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 977     TRACE("(%p) Relay %d %p\n" , This, Stage, pTexture);
 978
 979     return IWineD3DDevice_SetTexture(This->WineD3DDevice, Stage,
 980                                      pTexture==NULL ? NULL : ((IDirect3DBaseTexture8Impl *)pTexture)->wineD3DBaseTexture);
 981 }
 982
 983 static HRESULT  WINAPI  IDirect3DDevice8Impl_GetTextureStageState(LPDIRECT3DDEVICE8 iface, DWORD Stage,D3DTEXTURESTAGESTATETYPE Type,DWORD* pValue) {
 984     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
 985     TRACE("(%p) Relay\n" , This);
 986
 987     switch(Type) {
 988     case D3DTSS_ADDRESSU:
 989         Type = WINED3DSAMP_ADDRESSU;
 990         break;
 991     case D3DTSS_ADDRESSV:
 992         Type = WINED3DSAMP_ADDRESSV;
 993         break;
 994     case D3DTSS_ADDRESSW:
 995         Type = WINED3DSAMP_ADDRESSW;
 996         break;
 997     case D3DTSS_BORDERCOLOR:
 998         Type = WINED3DSAMP_BORDERCOLOR;
 999         break;
1000     case D3DTSS_MAGFILTER:
1001         Type = WINED3DSAMP_MAGFILTER;
1002         break;
1003     case D3DTSS_MAXANISOTROPY:
1004         Type = WINED3DSAMP_MAXANISOTROPY;
1005         break;
1006     case D3DTSS_MAXMIPLEVEL:
1007         Type = WINED3DSAMP_MAXMIPLEVEL;
1008         break;
1009     case D3DTSS_MINFILTER:
1010         Type = WINED3DSAMP_MINFILTER;
1011         break;
1012     case D3DTSS_MIPFILTER:
1013         Type = WINED3DSAMP_MIPFILTER;
1014         break;
1015     case D3DTSS_MIPMAPLODBIAS:
1016         Type = WINED3DSAMP_MIPMAPLODBIAS;
1017         break;
1018     default:
1019         return IWineD3DDevice_GetTextureStageState(This->WineD3DDevice, Stage, Type, pValue);
1020     }
1021
1022     return IWineD3DDevice_GetSamplerState(This->WineD3DDevice, Stage, Type, pValue);
1023 }
1024
1025 static HRESULT WINAPI IDirect3DDevice8Impl_SetTextureStageState(LPDIRECT3DDEVICE8 iface, DWORD Stage, D3DTEXTURESTAGESTATETYPE Type, DWORD Value) {
1026     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1027     TRACE("(%p) Relay\n" , This);
1028
1029     switch(Type) {
1030     case D3DTSS_ADDRESSU:
1031         Type = WINED3DSAMP_ADDRESSU;
1032         break;
1033     case D3DTSS_ADDRESSV:
1034         Type = WINED3DSAMP_ADDRESSV;
1035         break;
1036     case D3DTSS_ADDRESSW:
1037         Type = WINED3DSAMP_ADDRESSW;
1038         break;
1039     case D3DTSS_BORDERCOLOR:
1040         Type = WINED3DSAMP_BORDERCOLOR;
1041         break;
1042     case D3DTSS_MAGFILTER:
1043         Type = WINED3DSAMP_MAGFILTER;
1044         break;
1045     case D3DTSS_MAXANISOTROPY:
1046         Type = WINED3DSAMP_MAXANISOTROPY;
1047         break;
1048     case D3DTSS_MAXMIPLEVEL:
1049         Type = WINED3DSAMP_MAXMIPLEVEL;
1050         break;
1051     case D3DTSS_MINFILTER:
1052         Type = WINED3DSAMP_MINFILTER;
1053         break;
1054     case D3DTSS_MIPFILTER:
1055         Type = WINED3DSAMP_MIPFILTER;
1056         break;
1057     case D3DTSS_MIPMAPLODBIAS:
1058         Type = WINED3DSAMP_MIPMAPLODBIAS;
1059         break;
1060     default:
1061         return IWineD3DDevice_SetTextureStageState(This->WineD3DDevice, Stage, Type, Value);
1062     }
1063
1064     return IWineD3DDevice_SetSamplerState(This->WineD3DDevice, Stage, Type, Value);
1065 }
1066
1067 static HRESULT WINAPI IDirect3DDevice8Impl_ValidateDevice(LPDIRECT3DDEVICE8 iface, DWORD* pNumPasses) {
1068     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1069     TRACE("(%p) Relay\n" , This);
1070
1071     return IWineD3DDevice_ValidateDevice(This->WineD3DDevice, pNumPasses);
1072 }
1073
1074 static HRESULT WINAPI IDirect3DDevice8Impl_GetInfo(LPDIRECT3DDEVICE8 iface, DWORD DevInfoID, void* pDevInfoStruct, DWORD DevInfoStructSize) {
1075     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1076     FIXME("(%p) : stub\n", This);
1077     return D3D_OK;
1078 }
1079
1080 static HRESULT WINAPI IDirect3DDevice8Impl_SetPaletteEntries(LPDIRECT3DDEVICE8 iface, UINT PaletteNumber, CONST PALETTEENTRY* pEntries) {
1081     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1082     TRACE("(%p) Relay\n" , This);
1083
1084     return IWineD3DDevice_SetPaletteEntries(This->WineD3DDevice, PaletteNumber, pEntries);
1085 }
1086
1087 static HRESULT WINAPI IDirect3DDevice8Impl_GetPaletteEntries(LPDIRECT3DDEVICE8 iface, UINT PaletteNumber, PALETTEENTRY* pEntries) {
1088     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1089     TRACE("(%p) Relay\n" , This);
1090
1091     return IWineD3DDevice_GetPaletteEntries(This->WineD3DDevice, PaletteNumber, pEntries);
1092 }
1093
1094 static HRESULT WINAPI IDirect3DDevice8Impl_SetCurrentTexturePalette(LPDIRECT3DDEVICE8 iface, UINT PaletteNumber) {
1095     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1096     TRACE("(%p) Relay\n" , This);
1097
1098     return IWineD3DDevice_SetCurrentTexturePalette(This->WineD3DDevice, PaletteNumber);
1099 }
1100
1101 static HRESULT  WINAPI  IDirect3DDevice8Impl_GetCurrentTexturePalette(LPDIRECT3DDEVICE8 iface, UINT *PaletteNumber) {
1102     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1103     TRACE("(%p) Relay\n" , This);
1104
1105     return IWineD3DDevice_GetCurrentTexturePalette(This->WineD3DDevice, PaletteNumber);
1106 }
1107
1108 static HRESULT WINAPI IDirect3DDevice8Impl_DrawPrimitive(LPDIRECT3DDEVICE8 iface, D3DPRIMITIVETYPE PrimitiveType, UINT StartVertex, UINT PrimitiveCount) {
1109     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1110     TRACE("(%p) Relay\n" , This);
1111
1112     return IWineD3DDevice_DrawPrimitive(This->WineD3DDevice, PrimitiveType, StartVertex, PrimitiveCount);
1113 }
1114
1115 static HRESULT WINAPI IDirect3DDevice8Impl_DrawIndexedPrimitive(LPDIRECT3DDEVICE8 iface, D3DPRIMITIVETYPE PrimitiveType,
1116                                                            UINT MinVertexIndex,UINT NumVertices,UINT startIndex,UINT primCount) {
1117     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1118     TRACE("(%p) Relay\n" , This);
1119
1120     return IWineD3DDevice_DrawIndexedPrimitive(This->WineD3DDevice, PrimitiveType, This->baseVertexIndex, MinVertexIndex, NumVertices, startIndex, primCount);
1121 }
1122
1123 static HRESULT WINAPI IDirect3DDevice8Impl_DrawPrimitiveUP(LPDIRECT3DDEVICE8 iface, D3DPRIMITIVETYPE PrimitiveType,UINT PrimitiveCount,CONST void* pVertexStreamZeroData,UINT VertexStreamZeroStride) {
1124     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1125     TRACE("(%p) Relay\n" , This);
1126
1127     return IWineD3DDevice_DrawPrimitiveUP(This->WineD3DDevice, PrimitiveType, PrimitiveCount, pVertexStreamZeroData, VertexStreamZeroStride);
1128 }
1129
1130 static HRESULT WINAPI IDirect3DDevice8Impl_DrawIndexedPrimitiveUP(LPDIRECT3DDEVICE8 iface, D3DPRIMITIVETYPE PrimitiveType,UINT MinVertexIndex,
1131                                                              UINT NumVertexIndices,UINT PrimitiveCount,CONST void* pIndexData,
1132                                                              D3DFORMAT IndexDataFormat,CONST void* pVertexStreamZeroData,
1133                                                              UINT VertexStreamZeroStride) {
1134     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1135     TRACE("(%p) Relay\n" , This);
1136
1137     return IWineD3DDevice_DrawIndexedPrimitiveUP(This->WineD3DDevice, PrimitiveType, MinVertexIndex, NumVertexIndices, PrimitiveCount,
1138                                                  pIndexData, IndexDataFormat, pVertexStreamZeroData, VertexStreamZeroStride);
1139 }
1140
1141 static HRESULT WINAPI IDirect3DDevice8Impl_ProcessVertices(LPDIRECT3DDEVICE8 iface, UINT SrcStartIndex,UINT DestIndex,UINT VertexCount,IDirect3DVertexBuffer8* pDestBuffer,DWORD Flags) {
1142     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1143     TRACE("(%p) Relay\n" , This);
1144
1145     return IWineD3DDevice_ProcessVertices(This->WineD3DDevice,SrcStartIndex, DestIndex, VertexCount, ((IDirect3DVertexBuffer8Impl *)pDestBuffer)->wineD3DVertexBuffer, NULL, Flags);
1146 }
1147
1148 static HRESULT WINAPI IDirect3DDevice8Impl_CreateVertexShader(LPDIRECT3DDEVICE8 iface, CONST DWORD* pDeclaration, CONST DWORD* pFunction, DWORD* ppShader, DWORD Usage) {
1149     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1150     HRESULT hrc = D3D_OK;
1151     IDirect3DVertexShader8Impl *object;
1152
1153     /* Setup a stub object for now */
1154     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*object));
1155     TRACE("(%p) : pFunction(%p), ppShader(%p)\n", This, pFunction, ppShader);
1156     if (NULL == object) {
1157         FIXME("Allocation of memory failed\n");
1158         *ppShader = 0;
1159         return D3DERR_OUTOFVIDEOMEMORY;
1160     }
1161
1162     object->ref = 1;
1163     object->lpVtbl = &Direct3DVertexShader8_Vtbl;
1164     /* Usage is missing ..*/
1165     hrc = IWineD3DDevice_CreateVertexShader(This->WineD3DDevice, pDeclaration, pFunction, &object->wineD3DVertexShader, (IUnknown *)object);
1166
1167     if (FAILED(hrc)) {
1168         /* free up object */
1169         FIXME("Call to IWineD3DDevice_CreateVertexShader failed\n");
1170         HeapFree(GetProcessHeap(), 0, object);
1171         *ppShader = 0;
1172     } else {
1173         /* TODO: Store the VS declarations locally so that they can be derefferenced with a value higher than VS_HIGHESTFIXEDFXF */
1174         shader_handle *handle = alloc_shader_handle(This);
1175         if (!handle) {
1176             ERR("Failed to allocate shader handle\n");
1177             IDirect3DVertexShader8_Release((IUnknown *)object);
1178             hrc = E_OUTOFMEMORY;
1179         } else {
1180             object->handle = handle;
1181             *handle = object;
1182             *ppShader = (handle - This->shader_handles) + VS_HIGHESTFIXEDFXF + 1;
1183         }
1184     }
1185     TRACE("(%p) : returning %p (handle %#x)\n", This, object, *ppShader);
1186
1187     return hrc;
1188 }
1189
1190 static HRESULT WINAPI IDirect3DDevice8Impl_SetVertexShader(LPDIRECT3DDEVICE8 iface, DWORD pShader) {
1191     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1192     HRESULT hrc = D3D_OK;
1193
1194     TRACE("(%p) : Relay\n", This);
1195     if (VS_HIGHESTFIXEDFXF >= pShader) {
1196         TRACE("Setting FVF, %d %d\n", VS_HIGHESTFIXEDFXF, pShader);
1197         IWineD3DDevice_SetFVF(This->WineD3DDevice, pShader);
1198
1199         /* Call SetVertexShader with a NULL shader to set the vertexshader in the stateblock to NULL. */
1200         IWineD3DDevice_SetVertexShader(This->WineD3DDevice, NULL);
1201     } else {
1202         TRACE("Setting shader\n");
1203         if (This->allocated_shader_handles <= pShader - (VS_HIGHESTFIXEDFXF + 1)) {
1204             FIXME("(%p) : Number of shaders exceeds the maximum number of possible shaders\n", This);
1205             hrc = D3DERR_INVALIDCALL;
1206         } else {
1207             IDirect3DVertexShader8Impl *shader = This->shader_handles[pShader - (VS_HIGHESTFIXEDFXF + 1)];
1208             hrc =  IWineD3DDevice_SetVertexShader(This->WineD3DDevice, 0 == shader ? NULL : shader->wineD3DVertexShader);
1209         }
1210     }
1211     TRACE("(%p) : returning hr(%u)\n", This, hrc);
1212
1213     return hrc;
1214 }
1215
1216 static HRESULT WINAPI IDirect3DDevice8Impl_GetVertexShader(LPDIRECT3DDEVICE8 iface, DWORD* ppShader) {
1217     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1218     IWineD3DVertexShader *pShader;
1219     HRESULT hrc = D3D_OK;
1220
1221     TRACE("(%p) : Relay  device@%p\n", This, This->WineD3DDevice);
1222     hrc = IWineD3DDevice_GetVertexShader(This->WineD3DDevice, &pShader);
1223     if (D3D_OK == hrc) {
1224         if(0 != pShader) {
1225             IDirect3DVertexShader8Impl *d3d8_shader;
1226             hrc = IWineD3DVertexShader_GetParent(pShader, (IUnknown **)&d3d8_shader);
1227             IWineD3DVertexShader_Release(pShader);
1228             *ppShader = (d3d8_shader->handle - This->shader_handles) + (VS_HIGHESTFIXEDFXF + 1);
1229         } else {
1230             WARN("(%p) : The shader has been set to NULL\n", This);
1231
1232             /* TODO: Find out what should be returned, e.g. the FVF */
1233             *ppShader = 0;
1234             hrc = D3DERR_INVALIDCALL;
1235         }
1236     } else {
1237         WARN("(%p) : Call to IWineD3DDevice_GetVertexShader failed %u (device %p)\n", This, hrc, This->WineD3DDevice);
1238     }
1239     TRACE("(%p) : returning %#x\n", This, *ppShader);
1240
1241     return hrc;
1242 }
1243
1244 static HRESULT  WINAPI  IDirect3DDevice8Impl_DeleteVertexShader(LPDIRECT3DDEVICE8 iface, DWORD pShader) {
1245     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1246
1247     TRACE("(%p) : pShader %#x\n", This, pShader);
1248
1249     if (pShader <= VS_HIGHESTFIXEDFXF || This->allocated_shader_handles <= pShader - (VS_HIGHESTFIXEDFXF + 1)) {
1250         ERR("(%p) : Trying to delete an invalid handle\n", This);
1251         return D3DERR_INVALIDCALL;
1252     } else {
1253         shader_handle *handle = &This->shader_handles[pShader - (VS_HIGHESTFIXEDFXF + 1)];
1254         IDirect3DVertexShader8Impl *shader = *handle;
1255         while(IUnknown_Release((IUnknown *)shader));
1256         free_shader_handle(This, handle);
1257     }
1258
1259     return D3D_OK;
1260 }
1261
1262 static HRESULT WINAPI IDirect3DDevice8Impl_SetVertexShaderConstant(LPDIRECT3DDEVICE8 iface, DWORD Register, CONST void* pConstantData, DWORD ConstantCount) {
1263     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1264     TRACE("(%p) : Relay\n", This);
1265
1266     return IWineD3DDevice_SetVertexShaderConstantF(This->WineD3DDevice, Register, (CONST float *)pConstantData, ConstantCount);
1267 }
1268
1269 static HRESULT WINAPI IDirect3DDevice8Impl_GetVertexShaderConstant(LPDIRECT3DDEVICE8 iface, DWORD Register, void* pConstantData, DWORD ConstantCount) {
1270     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1271     TRACE("(%p) : Relay\n", This);
1272
1273     return IWineD3DDevice_GetVertexShaderConstantF(This->WineD3DDevice, Register, (float *)pConstantData, ConstantCount);
1274 }
1275
1276 static HRESULT WINAPI IDirect3DDevice8Impl_GetVertexShaderDeclaration(LPDIRECT3DDEVICE8 iface, DWORD pVertexShader, void* pData, DWORD* pSizeOfData) {
1277     IDirect3DVertexShader8Impl *This = (IDirect3DVertexShader8Impl *)pVertexShader;
1278
1279     TRACE("(%p) : Relay\n", This);
1280 /*    return IWineD3DVertexShader_GetDeclaration(This->wineD3DVertexShader, pData, (UINT *)pSizeOfData); */
1281     return D3DERR_INVALIDCALL;
1282 }
1283 static HRESULT WINAPI IDirect3DDevice8Impl_GetVertexShaderFunction(LPDIRECT3DDEVICE8 iface, DWORD pVertexShader, void* pData, DWORD* pSizeOfData) {
1284     IDirect3DVertexShader8Impl *This = (IDirect3DVertexShader8Impl *)pVertexShader;
1285
1286     TRACE("(%p) : Relay\n", This);
1287     return IWineD3DVertexShader_GetFunction(This->wineD3DVertexShader, pData, (UINT *)pSizeOfData);
1288 }
1289
1290 static HRESULT WINAPI IDirect3DDevice8Impl_SetIndices(LPDIRECT3DDEVICE8 iface, IDirect3DIndexBuffer8* pIndexData, UINT baseVertexIndex) {
1291     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1292     TRACE("(%p) Relay\n", This);
1293 /* FIXME: store base vertex index properly */
1294     This->baseVertexIndex = baseVertexIndex;
1295     return IWineD3DDevice_SetIndices(This->WineD3DDevice,
1296                                      NULL == pIndexData ? NULL : ((IDirect3DIndexBuffer8Impl *)pIndexData)->wineD3DIndexBuffer,
1297                                      0);
1298 }
1299
1300 static HRESULT WINAPI IDirect3DDevice8Impl_GetIndices(LPDIRECT3DDEVICE8 iface, IDirect3DIndexBuffer8** ppIndexData,UINT* pBaseVertexIndex) {
1301     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1302     IWineD3DIndexBuffer *retIndexData = NULL;
1303     HRESULT rc = D3D_OK;
1304     UINT tmp;
1305
1306     TRACE("(%p) Relay\n", This);
1307
1308     if(ppIndexData == NULL){
1309         return D3DERR_INVALIDCALL;
1310     }
1311
1312     rc = IWineD3DDevice_GetIndices(This->WineD3DDevice, &retIndexData, &tmp);
1313     if (D3D_OK == rc && NULL != retIndexData) {
1314         IWineD3DVertexBuffer_GetParent(retIndexData, (IUnknown **)ppIndexData);
1315         IWineD3DVertexBuffer_Release(retIndexData);
1316     } else {
1317         if(rc != D3D_OK)  FIXME("Call to GetIndices failed\n");
1318         *ppIndexData = NULL;
1319     }
1320 /* FIXME: store base vertex index properly */
1321     *pBaseVertexIndex = This->baseVertexIndex;
1322     return rc;
1323 }
1324 static HRESULT WINAPI IDirect3DDevice8Impl_CreatePixelShader(LPDIRECT3DDEVICE8 iface, CONST DWORD* pFunction, DWORD* ppShader) {
1325     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1326     IDirect3DPixelShader8Impl *object;
1327     HRESULT hrc = D3D_OK;
1328
1329     TRACE("(%p) : pFunction(%p), ppShader(%p)\n", This, pFunction, ppShader);
1330
1331     if (NULL == ppShader) {
1332         TRACE("(%p) Invalid call\n", This);
1333         return D3DERR_INVALIDCALL;
1334     }
1335     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*object));
1336
1337     if (NULL == object) {
1338         return E_OUTOFMEMORY;
1339     } else {
1340
1341         object->ref    = 1;
1342         object->lpVtbl = &Direct3DPixelShader8_Vtbl;
1343         hrc = IWineD3DDevice_CreatePixelShader(This->WineD3DDevice, pFunction, &object->wineD3DPixelShader , (IUnknown *)object);
1344         if (D3D_OK != hrc) {
1345             FIXME("(%p) call to IWineD3DDevice_CreatePixelShader failed\n", This);
1346             HeapFree(GetProcessHeap(), 0 , object);
1347             *ppShader = 0;
1348         } else {
1349             shader_handle *handle = alloc_shader_handle(This);
1350             if (!handle) {
1351                 ERR("Failed to allocate shader handle\n");
1352                 IDirect3DVertexShader8_Release((IUnknown *)object);
1353                 hrc = E_OUTOFMEMORY;
1354             } else {
1355                 object->handle = handle;
1356                 *handle = object;
1357                 *ppShader = (handle - This->shader_handles) + VS_HIGHESTFIXEDFXF + 1;
1358             }
1359         }
1360
1361     }
1362
1363     TRACE("(%p) : returning %p (handle %#x)\n", This, object, *ppShader);
1364     return hrc;
1365 }
1366
1367 static HRESULT WINAPI IDirect3DDevice8Impl_SetPixelShader(LPDIRECT3DDEVICE8 iface, DWORD pShader) {
1368     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1369     IDirect3DPixelShader8Impl *shader = NULL;
1370
1371     TRACE("(%p) : pShader %#x\n", This, pShader);
1372
1373     if (pShader > VS_HIGHESTFIXEDFXF && This->allocated_shader_handles > pShader - (VS_HIGHESTFIXEDFXF + 1)) {
1374         shader = This->shader_handles[pShader - (VS_HIGHESTFIXEDFXF + 1)];
1375     } else if (pShader) {
1376         ERR("Trying to set an invalid handle.\n");
1377     }
1378
1379     TRACE("(%p) : Setting shader %p\n", This, shader);
1380     return IWineD3DDevice_SetPixelShader(This->WineD3DDevice, shader == NULL ? NULL :shader->wineD3DPixelShader);
1381 }
1382
1383 static HRESULT WINAPI IDirect3DDevice8Impl_GetPixelShader(LPDIRECT3DDEVICE8 iface, DWORD* ppShader) {
1384     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1385     IWineD3DPixelShader *object;
1386
1387     HRESULT hrc = D3D_OK;
1388     TRACE("(%p) Relay\n", This);
1389     if (NULL == ppShader) {
1390         TRACE("(%p) Invalid call\n", This);
1391         return D3DERR_INVALIDCALL;
1392     }
1393
1394     hrc = IWineD3DDevice_GetPixelShader(This->WineD3DDevice, &object);
1395     if (D3D_OK == hrc && NULL != object) {
1396         IDirect3DPixelShader8Impl *d3d8_shader;
1397         hrc = IWineD3DPixelShader_GetParent(object, (IUnknown **)&d3d8_shader);
1398         IWineD3DPixelShader_Release(object);
1399         *ppShader = (d3d8_shader->handle - This->shader_handles) + (VS_HIGHESTFIXEDFXF + 1);
1400     } else {
1401         *ppShader = (DWORD)NULL;
1402     }
1403
1404     TRACE("(%p) : returning %#x\n", This, *ppShader);
1405     return hrc;
1406 }
1407
1408 static HRESULT WINAPI IDirect3DDevice8Impl_DeletePixelShader(LPDIRECT3DDEVICE8 iface, DWORD pShader) {
1409     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1410
1411     TRACE("(%p) : pShader %#x\n", This, pShader);
1412
1413     if (pShader <= VS_HIGHESTFIXEDFXF || This->allocated_shader_handles <= pShader - (VS_HIGHESTFIXEDFXF + 1)) {
1414         ERR("(%p) : Trying to delete an invalid handle\n", This);
1415         return D3DERR_INVALIDCALL;
1416     } else {
1417         shader_handle *handle = &This->shader_handles[pShader - (VS_HIGHESTFIXEDFXF + 1)];
1418         IDirect3DPixelShader8Impl *shader = *handle;
1419         while(IUnknown_Release((IUnknown *)shader));
1420         free_shader_handle(This, handle);
1421     }
1422
1423     return D3D_OK;
1424 }
1425
1426 static HRESULT  WINAPI  IDirect3DDevice8Impl_SetPixelShaderConstant(LPDIRECT3DDEVICE8 iface, DWORD Register, CONST void* pConstantData, DWORD ConstantCount) {
1427     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1428     TRACE("(%p) Relay\n", This);
1429
1430     return IWineD3DDevice_SetPixelShaderConstantF(This->WineD3DDevice, Register, (CONST float *)pConstantData, ConstantCount);
1431 }
1432
1433 static HRESULT WINAPI IDirect3DDevice8Impl_GetPixelShaderConstant(LPDIRECT3DDEVICE8 iface, DWORD Register, void* pConstantData, DWORD ConstantCount) {
1434     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1435     TRACE("(%p) Relay\n", This);
1436
1437     return IWineD3DDevice_GetPixelShaderConstantF(This->WineD3DDevice, Register, (float *)pConstantData, ConstantCount);
1438 }
1439
1440 static HRESULT WINAPI IDirect3DDevice8Impl_GetPixelShaderFunction(LPDIRECT3DDEVICE8 iface, DWORD pPixelShader, void* pData, DWORD* pSizeOfData) {
1441     IDirect3DPixelShader8Impl *This = (IDirect3DPixelShader8Impl *)pPixelShader;
1442
1443     TRACE("(%p) : Relay\n", This);
1444     return IWineD3DPixelShader_GetFunction(This->wineD3DPixelShader, pData, (UINT *)pSizeOfData);
1445 }
1446
1447 static HRESULT WINAPI IDirect3DDevice8Impl_DrawRectPatch(LPDIRECT3DDEVICE8 iface, UINT Handle,CONST float* pNumSegs,CONST D3DRECTPATCH_INFO* pRectPatchInfo) {
1448     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1449     TRACE("(%p) Relay\n", This);
1450
1451     return IWineD3DDevice_DrawRectPatch(This->WineD3DDevice, Handle, pNumSegs, (CONST WINED3DRECTPATCH_INFO *)pRectPatchInfo);
1452 }
1453
1454 static HRESULT WINAPI IDirect3DDevice8Impl_DrawTriPatch(LPDIRECT3DDEVICE8 iface, UINT Handle,CONST float* pNumSegs,CONST D3DTRIPATCH_INFO* pTriPatchInfo) {
1455     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1456     TRACE("(%p) Relay\n", This);
1457
1458     return IWineD3DDevice_DrawTriPatch(This->WineD3DDevice, Handle, pNumSegs, (CONST WINED3DTRIPATCH_INFO *)pTriPatchInfo);
1459 }
1460
1461 static HRESULT WINAPI IDirect3DDevice8Impl_DeletePatch(LPDIRECT3DDEVICE8 iface, UINT Handle) {
1462     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1463     TRACE("(%p) Relay\n", This);
1464
1465     return IWineD3DDevice_DeletePatch(This->WineD3DDevice, Handle);
1466 }
1467
1468 static HRESULT WINAPI IDirect3DDevice8Impl_SetStreamSource(LPDIRECT3DDEVICE8 iface, UINT StreamNumber,IDirect3DVertexBuffer8* pStreamData,UINT Stride) {
1469     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1470     TRACE("(%p) Relay\n" , This);
1471
1472     return IWineD3DDevice_SetStreamSource(This->WineD3DDevice, StreamNumber,
1473                                           NULL == pStreamData ? NULL : ((IDirect3DVertexBuffer8Impl *)pStreamData)->wineD3DVertexBuffer,
1474                                           0/* Offset in bytes */, Stride);
1475 }
1476
1477 static HRESULT WINAPI IDirect3DDevice8Impl_GetStreamSource(LPDIRECT3DDEVICE8 iface, UINT StreamNumber,IDirect3DVertexBuffer8** pStream,UINT* pStride) {
1478     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1479     IWineD3DVertexBuffer *retStream = NULL;
1480     HRESULT rc = D3D_OK;
1481
1482     TRACE("(%p) Relay\n" , This);
1483
1484     if(pStream == NULL){
1485         return D3DERR_INVALIDCALL;
1486     }
1487
1488     rc = IWineD3DDevice_GetStreamSource(This->WineD3DDevice, StreamNumber, (IWineD3DVertexBuffer **)&retStream, 0 /* Offset in bytes */, pStride);
1489     if (rc == D3D_OK  && NULL != retStream) {
1490         IWineD3DVertexBuffer_GetParent(retStream, (IUnknown **)pStream);
1491         IWineD3DVertexBuffer_Release(retStream);
1492     }else{
1493          FIXME("Call to GetStreamSource failed %p\n",  pStride);
1494         *pStream = NULL;
1495     }
1496
1497     return rc;
1498 }
1499
1500
1501 const IDirect3DDevice8Vtbl Direct3DDevice8_Vtbl =
1502 {
1503     IDirect3DDevice8Impl_QueryInterface,
1504     IDirect3DDevice8Impl_AddRef,
1505     IDirect3DDevice8Impl_Release,
1506     IDirect3DDevice8Impl_TestCooperativeLevel,
1507     IDirect3DDevice8Impl_GetAvailableTextureMem,
1508     IDirect3DDevice8Impl_ResourceManagerDiscardBytes,
1509     IDirect3DDevice8Impl_GetDirect3D,
1510     IDirect3DDevice8Impl_GetDeviceCaps,
1511     IDirect3DDevice8Impl_GetDisplayMode,
1512     IDirect3DDevice8Impl_GetCreationParameters,
1513     IDirect3DDevice8Impl_SetCursorProperties,
1514     IDirect3DDevice8Impl_SetCursorPosition,
1515     IDirect3DDevice8Impl_ShowCursor,
1516     IDirect3DDevice8Impl_CreateAdditionalSwapChain,
1517     IDirect3DDevice8Impl_Reset,
1518     IDirect3DDevice8Impl_Present,
1519     IDirect3DDevice8Impl_GetBackBuffer,
1520     IDirect3DDevice8Impl_GetRasterStatus,
1521     IDirect3DDevice8Impl_SetGammaRamp,
1522     IDirect3DDevice8Impl_GetGammaRamp,
1523     IDirect3DDevice8Impl_CreateTexture,
1524     IDirect3DDevice8Impl_CreateVolumeTexture,
1525     IDirect3DDevice8Impl_CreateCubeTexture,
1526     IDirect3DDevice8Impl_CreateVertexBuffer,
1527     IDirect3DDevice8Impl_CreateIndexBuffer,
1528     IDirect3DDevice8Impl_CreateRenderTarget,
1529     IDirect3DDevice8Impl_CreateDepthStencilSurface,
1530     IDirect3DDevice8Impl_CreateImageSurface,
1531     IDirect3DDevice8Impl_CopyRects,
1532     IDirect3DDevice8Impl_UpdateTexture,
1533     IDirect3DDevice8Impl_GetFrontBuffer,
1534     IDirect3DDevice8Impl_SetRenderTarget,
1535     IDirect3DDevice8Impl_GetRenderTarget,
1536     IDirect3DDevice8Impl_GetDepthStencilSurface,
1537     IDirect3DDevice8Impl_BeginScene,
1538     IDirect3DDevice8Impl_EndScene,
1539     IDirect3DDevice8Impl_Clear,
1540     IDirect3DDevice8Impl_SetTransform,
1541     IDirect3DDevice8Impl_GetTransform,
1542     IDirect3DDevice8Impl_MultiplyTransform,
1543     IDirect3DDevice8Impl_SetViewport,
1544     IDirect3DDevice8Impl_GetViewport,
1545     IDirect3DDevice8Impl_SetMaterial,
1546     IDirect3DDevice8Impl_GetMaterial,
1547     IDirect3DDevice8Impl_SetLight,
1548     IDirect3DDevice8Impl_GetLight,
1549     IDirect3DDevice8Impl_LightEnable,
1550     IDirect3DDevice8Impl_GetLightEnable,
1551     IDirect3DDevice8Impl_SetClipPlane,
1552     IDirect3DDevice8Impl_GetClipPlane,
1553     IDirect3DDevice8Impl_SetRenderState,
1554     IDirect3DDevice8Impl_GetRenderState,
1555     IDirect3DDevice8Impl_BeginStateBlock,
1556     IDirect3DDevice8Impl_EndStateBlock,
1557     IDirect3DDevice8Impl_ApplyStateBlock,
1558     IDirect3DDevice8Impl_CaptureStateBlock,
1559     IDirect3DDevice8Impl_DeleteStateBlock,
1560     IDirect3DDevice8Impl_CreateStateBlock,
1561     IDirect3DDevice8Impl_SetClipStatus,
1562     IDirect3DDevice8Impl_GetClipStatus,
1563     IDirect3DDevice8Impl_GetTexture,
1564     IDirect3DDevice8Impl_SetTexture,
1565     IDirect3DDevice8Impl_GetTextureStageState,
1566     IDirect3DDevice8Impl_SetTextureStageState,
1567     IDirect3DDevice8Impl_ValidateDevice,
1568     IDirect3DDevice8Impl_GetInfo,
1569     IDirect3DDevice8Impl_SetPaletteEntries,
1570     IDirect3DDevice8Impl_GetPaletteEntries,
1571     IDirect3DDevice8Impl_SetCurrentTexturePalette,
1572     IDirect3DDevice8Impl_GetCurrentTexturePalette,
1573     IDirect3DDevice8Impl_DrawPrimitive,
1574     IDirect3DDevice8Impl_DrawIndexedPrimitive,
1575     IDirect3DDevice8Impl_DrawPrimitiveUP,
1576     IDirect3DDevice8Impl_DrawIndexedPrimitiveUP,
1577     IDirect3DDevice8Impl_ProcessVertices,
1578     IDirect3DDevice8Impl_CreateVertexShader,
1579     IDirect3DDevice8Impl_SetVertexShader,
1580     IDirect3DDevice8Impl_GetVertexShader,
1581     IDirect3DDevice8Impl_DeleteVertexShader,
1582     IDirect3DDevice8Impl_SetVertexShaderConstant,
1583     IDirect3DDevice8Impl_GetVertexShaderConstant,
1584     IDirect3DDevice8Impl_GetVertexShaderDeclaration,
1585     IDirect3DDevice8Impl_GetVertexShaderFunction,
1586     IDirect3DDevice8Impl_SetStreamSource,
1587     IDirect3DDevice8Impl_GetStreamSource,
1588     IDirect3DDevice8Impl_SetIndices,
1589     IDirect3DDevice8Impl_GetIndices,
1590     IDirect3DDevice8Impl_CreatePixelShader,
1591     IDirect3DDevice8Impl_SetPixelShader,
1592     IDirect3DDevice8Impl_GetPixelShader,
1593     IDirect3DDevice8Impl_DeletePixelShader,
1594     IDirect3DDevice8Impl_SetPixelShaderConstant,
1595     IDirect3DDevice8Impl_GetPixelShaderConstant,
1596     IDirect3DDevice8Impl_GetPixelShaderFunction,
1597     IDirect3DDevice8Impl_DrawRectPatch,
1598     IDirect3DDevice8Impl_DrawTriPatch,
1599     IDirect3DDevice8Impl_DeletePatch
1600 };
1601
1602 /* Internal function called back during the CreateDevice to create a render target  */
1603 HRESULT WINAPI D3D8CB_CreateSurface(IUnknown *device, UINT Width, UINT Height,
1604                                          WINED3DFORMAT Format, DWORD Usage, WINED3DPOOL Pool, UINT Level,
1605                                          IWineD3DSurface **ppSurface, HANDLE *pSharedHandle) {
1606
1607     HRESULT res = D3D_OK;
1608     IDirect3DSurface8Impl *d3dSurface = NULL;
1609     BOOL Lockable = TRUE;
1610
1611     if((WINED3DPOOL_DEFAULT == Pool && WINED3DUSAGE_DYNAMIC != Usage))
1612         Lockable = FALSE;
1613
1614     TRACE("relay\n");
1615     res = IDirect3DDevice8Impl_CreateSurface((IDirect3DDevice8 *)device, Width, Height, (D3DFORMAT)Format, Lockable, FALSE/*Discard*/, Level,  (IDirect3DSurface8 **)&d3dSurface, D3DRTYPE_SURFACE, Usage, Pool, D3DMULTISAMPLE_NONE, 0 /* MultisampleQuality */);
1616
1617     if (SUCCEEDED(res)) {
1618         *ppSurface = d3dSurface->wineD3DSurface;
1619         IUnknown_Release(d3dSurface->parentDevice);
1620         d3dSurface->parentDevice = NULL;
1621     } else {
1622         FIXME("(%p) IDirect3DDevice8_CreateSurface failed\n", device);
1623     }
1624     return res;
1625 }