Revert "d3d: Remove AddRef from IWineD3DDevice_GetRenderTarget.".
[wine] / 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         IWineD3DResource_Release((IWineD3DResource *)pRenderTarget);
681     } else {
682         FIXME("Call to IWineD3DDevice_GetRenderTarget failed\n");
683         *ppRenderTarget = NULL;
684     }
685
686     return hr;
687 }
688
689 static HRESULT  WINAPI  IDirect3DDevice8Impl_GetDepthStencilSurface(LPDIRECT3DDEVICE8 iface, IDirect3DSurface8** ppZStencilSurface) {
690     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
691     HRESULT hr = D3D_OK;
692     IWineD3DSurface *pZStencilSurface;
693
694     TRACE("(%p) Relay\n" , This);
695     if(ppZStencilSurface == NULL){
696         return D3DERR_INVALIDCALL;
697     }
698
699     hr=IWineD3DDevice_GetDepthStencilSurface(This->WineD3DDevice,&pZStencilSurface);
700     if(hr == D3D_OK && pZStencilSurface != NULL){
701         IWineD3DResource_GetParent((IWineD3DResource *)pZStencilSurface,(IUnknown**)ppZStencilSurface);
702         IWineD3DResource_Release((IWineD3DResource *)pZStencilSurface);
703     }else{
704         FIXME("Call to IWineD3DDevice_GetDepthStencilSurface failed\n");
705         *ppZStencilSurface = NULL;
706     }
707
708     return D3D_OK;
709 }
710
711 static HRESULT WINAPI IDirect3DDevice8Impl_BeginScene(LPDIRECT3DDEVICE8 iface) {
712     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
713     return IWineD3DDevice_BeginScene(This->WineD3DDevice);
714 }
715
716 static HRESULT WINAPI IDirect3DDevice8Impl_EndScene(LPDIRECT3DDEVICE8 iface) {
717     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
718     TRACE("(%p) Relay\n" , This);
719
720     return IWineD3DDevice_EndScene(This->WineD3DDevice);
721 }
722
723 static HRESULT WINAPI IDirect3DDevice8Impl_Clear(LPDIRECT3DDEVICE8 iface, DWORD Count, CONST D3DRECT* pRects, DWORD Flags, D3DCOLOR Color, float Z, DWORD Stencil) {
724     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
725     TRACE("(%p) Relay\n" , This);
726
727     /* Note: D3DRECT is compatible with WINED3DRECT */
728     return IWineD3DDevice_Clear(This->WineD3DDevice, Count, (CONST WINED3DRECT*) pRects, Flags, Color, Z, Stencil);
729 }
730
731 static HRESULT WINAPI IDirect3DDevice8Impl_SetTransform(LPDIRECT3DDEVICE8 iface, D3DTRANSFORMSTATETYPE State, CONST D3DMATRIX* lpMatrix) {
732     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
733     TRACE("(%p) Relay\n" , This);
734
735     /* Note: D3DMATRIX is compatible with WINED3DMATRIX */
736     return IWineD3DDevice_SetTransform(This->WineD3DDevice, State, (CONST WINED3DMATRIX*) lpMatrix);
737 }
738
739 static HRESULT WINAPI IDirect3DDevice8Impl_GetTransform(LPDIRECT3DDEVICE8 iface, D3DTRANSFORMSTATETYPE State,D3DMATRIX* pMatrix) {
740     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
741     TRACE("(%p) Relay\n" , This);
742
743     /* Note: D3DMATRIX is compatible with WINED3DMATRIX */
744     return IWineD3DDevice_GetTransform(This->WineD3DDevice, State, (WINED3DMATRIX*) pMatrix);
745 }
746
747 static HRESULT WINAPI IDirect3DDevice8Impl_MultiplyTransform(LPDIRECT3DDEVICE8 iface, D3DTRANSFORMSTATETYPE State, CONST D3DMATRIX* pMatrix) {
748     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
749     TRACE("(%p) Relay\n" , This);
750
751     /* Note: D3DMATRIX is compatible with WINED3DMATRIX */
752     return IWineD3DDevice_MultiplyTransform(This->WineD3DDevice, State, (CONST WINED3DMATRIX*) pMatrix);
753 }
754
755 static HRESULT WINAPI IDirect3DDevice8Impl_SetViewport(LPDIRECT3DDEVICE8 iface, CONST D3DVIEWPORT8* pViewport) {
756     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
757     TRACE("(%p) Relay\n" , This);
758
759     /* Note: D3DVIEWPORT8 is compatible with WINED3DVIEWPORT */
760     return IWineD3DDevice_SetViewport(This->WineD3DDevice, (const WINED3DVIEWPORT *)pViewport);
761 }
762
763 static HRESULT WINAPI IDirect3DDevice8Impl_GetViewport(LPDIRECT3DDEVICE8 iface, D3DVIEWPORT8* pViewport) {
764     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
765     TRACE("(%p) Relay\n" , This);
766
767     /* Note: D3DVIEWPORT8 is compatible with WINED3DVIEWPORT */
768     return IWineD3DDevice_GetViewport(This->WineD3DDevice, (WINED3DVIEWPORT *)pViewport);
769 }
770
771 static HRESULT WINAPI IDirect3DDevice8Impl_SetMaterial(LPDIRECT3DDEVICE8 iface, CONST D3DMATERIAL8* pMaterial) {
772     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
773     TRACE("(%p) Relay\n" , This);
774
775     /* Note: D3DMATERIAL8 is compatible with WINED3DMATERIAL */
776     return IWineD3DDevice_SetMaterial(This->WineD3DDevice, (const WINED3DMATERIAL *)pMaterial);
777 }
778
779 static HRESULT WINAPI IDirect3DDevice8Impl_GetMaterial(LPDIRECT3DDEVICE8 iface, D3DMATERIAL8* pMaterial) {
780     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
781     TRACE("(%p) Relay\n" , This);
782
783     /* Note: D3DMATERIAL8 is compatible with WINED3DMATERIAL */
784     return IWineD3DDevice_GetMaterial(This->WineD3DDevice, (WINED3DMATERIAL *)pMaterial);
785 }
786
787 static HRESULT WINAPI IDirect3DDevice8Impl_SetLight(LPDIRECT3DDEVICE8 iface, DWORD Index, CONST D3DLIGHT8* pLight) {
788     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
789     TRACE("(%p) Relay\n" , This);
790  
791     /* Note: D3DLIGHT8 is compatible with WINED3DLIGHT */
792     return IWineD3DDevice_SetLight(This->WineD3DDevice, Index, (const WINED3DLIGHT *)pLight);
793 }
794
795 static HRESULT WINAPI IDirect3DDevice8Impl_GetLight(LPDIRECT3DDEVICE8 iface, DWORD Index,D3DLIGHT8* pLight) {
796     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
797     TRACE("(%p) Relay\n" , This);
798
799     /* Note: D3DLIGHT8 is compatible with WINED3DLIGHT */
800     return IWineD3DDevice_GetLight(This->WineD3DDevice, Index, (WINED3DLIGHT *)pLight);
801 }
802
803 static HRESULT WINAPI IDirect3DDevice8Impl_LightEnable(LPDIRECT3DDEVICE8 iface, DWORD Index,BOOL Enable) {
804     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
805     TRACE("(%p) Relay\n" , This);
806
807     return IWineD3DDevice_SetLightEnable(This->WineD3DDevice, Index, Enable);
808 }
809
810 static HRESULT WINAPI IDirect3DDevice8Impl_GetLightEnable(LPDIRECT3DDEVICE8 iface, DWORD Index,BOOL* pEnable) {
811     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
812     TRACE("(%p) Relay\n" , This);
813
814     return IWineD3DDevice_GetLightEnable(This->WineD3DDevice, Index, pEnable);
815 }
816
817 static HRESULT WINAPI IDirect3DDevice8Impl_SetClipPlane(LPDIRECT3DDEVICE8 iface, DWORD Index,CONST float* pPlane) {
818     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
819     TRACE("(%p) Relay\n" , This);
820
821     return IWineD3DDevice_SetClipPlane(This->WineD3DDevice, Index, pPlane);
822 }
823
824 static HRESULT WINAPI IDirect3DDevice8Impl_GetClipPlane(LPDIRECT3DDEVICE8 iface, DWORD Index,float* pPlane) {
825     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
826     TRACE("(%p) Relay\n" , This);
827
828     return IWineD3DDevice_GetClipPlane(This->WineD3DDevice, Index, pPlane);
829 }
830
831 static HRESULT WINAPI IDirect3DDevice8Impl_SetRenderState(LPDIRECT3DDEVICE8 iface, D3DRENDERSTATETYPE State,DWORD Value) {
832     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
833     TRACE("(%p) Relay\n" , This);
834
835     return IWineD3DDevice_SetRenderState(This->WineD3DDevice, State, Value);
836 }
837
838 static HRESULT WINAPI IDirect3DDevice8Impl_GetRenderState(LPDIRECT3DDEVICE8 iface, D3DRENDERSTATETYPE State,DWORD* pValue) {
839     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
840     TRACE("(%p) Relay\n" , This);
841
842     return IWineD3DDevice_GetRenderState(This->WineD3DDevice, State, pValue);
843 }
844
845 static HRESULT WINAPI IDirect3DDevice8Impl_BeginStateBlock(LPDIRECT3DDEVICE8 iface) {
846   IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
847
848   TRACE("(%p)\n", This);
849
850   return IWineD3DDevice_BeginStateBlock(This->WineD3DDevice);
851 }
852
853 static HRESULT WINAPI IDirect3DDevice8Impl_EndStateBlock(LPDIRECT3DDEVICE8 iface, DWORD* pToken) {
854     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
855     HRESULT hr;
856     IWineD3DStateBlock* wineD3DStateBlock;
857     IDirect3DStateBlock8Impl* object;
858
859     TRACE("(%p) Relay\n", This);
860
861     /* Tell wineD3D to endstatablock before anything else (in case we run out
862      * of memory later and cause locking problems)
863      */
864     hr = IWineD3DDevice_EndStateBlock(This->WineD3DDevice , &wineD3DStateBlock);
865     if (hr != D3D_OK) {
866        FIXME("IWineD3DDevice_EndStateBlock returned an error\n");
867        return hr;
868     }
869
870     /* allocate a new IDirectD3DStateBlock */
871     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY ,sizeof(IDirect3DStateBlock8Impl));
872     object->ref = 1;
873     object->lpVtbl = &Direct3DStateBlock8_Vtbl;
874
875     object->wineD3DStateBlock = wineD3DStateBlock;
876
877     *pToken = (DWORD)object;
878     TRACE("(%p)Returning %p %p\n", This, object, wineD3DStateBlock);
879
880     return hr;
881 }
882
883 static HRESULT WINAPI IDirect3DDevice8Impl_ApplyStateBlock(LPDIRECT3DDEVICE8 iface, DWORD Token) {
884     IDirect3DStateBlock8Impl *pSB  = (IDirect3DStateBlock8Impl*) Token;
885     IDirect3DDevice8Impl     *This = (IDirect3DDevice8Impl *)iface;
886
887     TRACE("(%p) %p Relay\n", This, pSB);
888
889     return  IWineD3DStateBlock_Apply(pSB->wineD3DStateBlock);
890 }
891
892 static HRESULT WINAPI IDirect3DDevice8Impl_CaptureStateBlock(LPDIRECT3DDEVICE8 iface, DWORD Token) {
893     IDirect3DStateBlock8Impl* pSB = (IDirect3DStateBlock8Impl *)Token;
894     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
895
896     TRACE("(%p) %p Relay\n", This, pSB);
897
898     return IWineD3DStateBlock_Capture(pSB->wineD3DStateBlock);
899 }
900
901 static HRESULT WINAPI IDirect3DDevice8Impl_DeleteStateBlock(LPDIRECT3DDEVICE8 iface, DWORD Token) {
902     IDirect3DStateBlock8Impl* pSB = (IDirect3DStateBlock8Impl *)Token;
903     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
904
905     TRACE("(%p) Relay\n", This);
906
907     while(IUnknown_Release((IUnknown *)pSB));
908
909     return D3D_OK;
910 }
911
912 static HRESULT WINAPI IDirect3DDevice8Impl_CreateStateBlock(LPDIRECT3DDEVICE8 iface, D3DSTATEBLOCKTYPE Type, DWORD* pToken) {
913    IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
914    IDirect3DStateBlock8Impl *object;
915    HRESULT hrc = D3D_OK;
916
917    TRACE("(%p) Relay\n", This);
918
919    object  = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirect3DStateBlock8Impl));
920    if (NULL == object) {
921       *pToken = 0;
922       return E_OUTOFMEMORY;
923    }
924    object->lpVtbl = &Direct3DStateBlock8_Vtbl;
925    object->ref = 1;
926
927    hrc = IWineD3DDevice_CreateStateBlock(This->WineD3DDevice, (WINED3DSTATEBLOCKTYPE)Type, &object->wineD3DStateBlock, (IUnknown *)object);
928    if(D3D_OK != hrc){
929        FIXME("(%p) Call to IWineD3DDevice_CreateStateBlock failed.\n", This);
930        HeapFree(GetProcessHeap(), 0, object);
931        *pToken = 0;
932    } else {
933        *pToken = (DWORD)object;
934    }
935    TRACE("(%p) returning token (ptr to stateblock) of %p\n", This, object);
936
937    return hrc;
938 }
939
940 static HRESULT WINAPI IDirect3DDevice8Impl_SetClipStatus(LPDIRECT3DDEVICE8 iface, CONST D3DCLIPSTATUS8* pClipStatus) {
941     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
942     TRACE("(%p) Relay\n" , This);
943 /* FIXME: Verify that D3DCLIPSTATUS8 ~= WINED3DCLIPSTATUS */
944     return IWineD3DDevice_SetClipStatus(This->WineD3DDevice, (const WINED3DCLIPSTATUS *)pClipStatus);
945 }
946
947 static HRESULT WINAPI IDirect3DDevice8Impl_GetClipStatus(LPDIRECT3DDEVICE8 iface, D3DCLIPSTATUS8* pClipStatus) {
948     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
949     TRACE("(%p) Relay\n" , This);
950
951     return IWineD3DDevice_GetClipStatus(This->WineD3DDevice, (WINED3DCLIPSTATUS *)pClipStatus);
952 }
953
954 static HRESULT WINAPI IDirect3DDevice8Impl_GetTexture(LPDIRECT3DDEVICE8 iface, DWORD Stage,IDirect3DBaseTexture8** ppTexture) {
955     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
956     IWineD3DBaseTexture *retTexture = NULL;
957     HRESULT rc = D3D_OK;
958
959     TRACE("(%p) Relay\n" , This);
960
961     if(ppTexture == NULL){
962         return D3DERR_INVALIDCALL;
963     }
964
965     rc = IWineD3DDevice_GetTexture(This->WineD3DDevice, Stage, (IWineD3DBaseTexture **)&retTexture);
966     if (rc == D3D_OK && NULL != retTexture) {
967         IWineD3DBaseTexture_GetParent(retTexture, (IUnknown **)ppTexture);
968         IWineD3DBaseTexture_Release(retTexture);
969     } else {
970         FIXME("Call to get texture  (%d) failed (%p)\n", Stage, retTexture);
971         *ppTexture = NULL;
972     }
973
974     return rc;
975 }
976
977 static HRESULT WINAPI IDirect3DDevice8Impl_SetTexture(LPDIRECT3DDEVICE8 iface, DWORD Stage, IDirect3DBaseTexture8* pTexture) {
978     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
979     TRACE("(%p) Relay %d %p\n" , This, Stage, pTexture);
980
981     return IWineD3DDevice_SetTexture(This->WineD3DDevice, Stage,
982                                      pTexture==NULL ? NULL : ((IDirect3DBaseTexture8Impl *)pTexture)->wineD3DBaseTexture);
983 }
984
985 static HRESULT  WINAPI  IDirect3DDevice8Impl_GetTextureStageState(LPDIRECT3DDEVICE8 iface, DWORD Stage,D3DTEXTURESTAGESTATETYPE Type,DWORD* pValue) {
986     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
987     TRACE("(%p) Relay\n" , This);
988
989     switch(Type) {
990     case D3DTSS_ADDRESSU:
991         Type = WINED3DSAMP_ADDRESSU;
992         break;
993     case D3DTSS_ADDRESSV:
994         Type = WINED3DSAMP_ADDRESSV;
995         break;
996     case D3DTSS_ADDRESSW:
997         Type = WINED3DSAMP_ADDRESSW;
998         break;
999     case D3DTSS_BORDERCOLOR:
1000         Type = WINED3DSAMP_BORDERCOLOR;
1001         break;
1002     case D3DTSS_MAGFILTER:
1003         Type = WINED3DSAMP_MAGFILTER;
1004         break;
1005     case D3DTSS_MAXANISOTROPY:
1006         Type = WINED3DSAMP_MAXANISOTROPY;
1007         break;
1008     case D3DTSS_MAXMIPLEVEL:
1009         Type = WINED3DSAMP_MAXMIPLEVEL;
1010         break;
1011     case D3DTSS_MINFILTER:
1012         Type = WINED3DSAMP_MINFILTER;
1013         break;
1014     case D3DTSS_MIPFILTER:
1015         Type = WINED3DSAMP_MIPFILTER;
1016         break;
1017     case D3DTSS_MIPMAPLODBIAS:
1018         Type = WINED3DSAMP_MIPMAPLODBIAS;
1019         break;
1020     default:
1021         return IWineD3DDevice_GetTextureStageState(This->WineD3DDevice, Stage, Type, pValue);
1022     }
1023
1024     return IWineD3DDevice_GetSamplerState(This->WineD3DDevice, Stage, Type, pValue);
1025 }
1026
1027 static HRESULT WINAPI IDirect3DDevice8Impl_SetTextureStageState(LPDIRECT3DDEVICE8 iface, DWORD Stage, D3DTEXTURESTAGESTATETYPE Type, DWORD Value) {
1028     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1029     TRACE("(%p) Relay\n" , This);
1030
1031     switch(Type) {
1032     case D3DTSS_ADDRESSU:
1033         Type = WINED3DSAMP_ADDRESSU;
1034         break;
1035     case D3DTSS_ADDRESSV:
1036         Type = WINED3DSAMP_ADDRESSV;
1037         break;
1038     case D3DTSS_ADDRESSW:
1039         Type = WINED3DSAMP_ADDRESSW;
1040         break;
1041     case D3DTSS_BORDERCOLOR:
1042         Type = WINED3DSAMP_BORDERCOLOR;
1043         break;
1044     case D3DTSS_MAGFILTER:
1045         Type = WINED3DSAMP_MAGFILTER;
1046         break;
1047     case D3DTSS_MAXANISOTROPY:
1048         Type = WINED3DSAMP_MAXANISOTROPY;
1049         break;
1050     case D3DTSS_MAXMIPLEVEL:
1051         Type = WINED3DSAMP_MAXMIPLEVEL;
1052         break;
1053     case D3DTSS_MINFILTER:
1054         Type = WINED3DSAMP_MINFILTER;
1055         break;
1056     case D3DTSS_MIPFILTER:
1057         Type = WINED3DSAMP_MIPFILTER;
1058         break;
1059     case D3DTSS_MIPMAPLODBIAS:
1060         Type = WINED3DSAMP_MIPMAPLODBIAS;
1061         break;
1062     default:
1063         return IWineD3DDevice_SetTextureStageState(This->WineD3DDevice, Stage, Type, Value);
1064     }
1065
1066     return IWineD3DDevice_SetSamplerState(This->WineD3DDevice, Stage, Type, Value);
1067 }
1068
1069 static HRESULT WINAPI IDirect3DDevice8Impl_ValidateDevice(LPDIRECT3DDEVICE8 iface, DWORD* pNumPasses) {
1070     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1071     TRACE("(%p) Relay\n" , This);
1072
1073     return IWineD3DDevice_ValidateDevice(This->WineD3DDevice, pNumPasses);
1074 }
1075
1076 static HRESULT WINAPI IDirect3DDevice8Impl_GetInfo(LPDIRECT3DDEVICE8 iface, DWORD DevInfoID, void* pDevInfoStruct, DWORD DevInfoStructSize) {
1077     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1078     FIXME("(%p) : stub\n", This);
1079     return D3D_OK;
1080 }
1081
1082 static HRESULT WINAPI IDirect3DDevice8Impl_SetPaletteEntries(LPDIRECT3DDEVICE8 iface, UINT PaletteNumber, CONST PALETTEENTRY* pEntries) {
1083     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1084     TRACE("(%p) Relay\n" , This);
1085
1086     return IWineD3DDevice_SetPaletteEntries(This->WineD3DDevice, PaletteNumber, pEntries);
1087 }
1088
1089 static HRESULT WINAPI IDirect3DDevice8Impl_GetPaletteEntries(LPDIRECT3DDEVICE8 iface, UINT PaletteNumber, PALETTEENTRY* pEntries) {
1090     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1091     TRACE("(%p) Relay\n" , This);
1092
1093     return IWineD3DDevice_GetPaletteEntries(This->WineD3DDevice, PaletteNumber, pEntries);
1094 }
1095
1096 static HRESULT WINAPI IDirect3DDevice8Impl_SetCurrentTexturePalette(LPDIRECT3DDEVICE8 iface, UINT PaletteNumber) {
1097     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1098     TRACE("(%p) Relay\n" , This);
1099
1100     return IWineD3DDevice_SetCurrentTexturePalette(This->WineD3DDevice, PaletteNumber);
1101 }
1102
1103 static HRESULT  WINAPI  IDirect3DDevice8Impl_GetCurrentTexturePalette(LPDIRECT3DDEVICE8 iface, UINT *PaletteNumber) {
1104     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1105     TRACE("(%p) Relay\n" , This);
1106
1107     return IWineD3DDevice_GetCurrentTexturePalette(This->WineD3DDevice, PaletteNumber);
1108 }
1109
1110 static HRESULT WINAPI IDirect3DDevice8Impl_DrawPrimitive(LPDIRECT3DDEVICE8 iface, D3DPRIMITIVETYPE PrimitiveType, UINT StartVertex, UINT PrimitiveCount) {
1111     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface; 
1112     TRACE("(%p) Relay\n" , This);
1113
1114     return IWineD3DDevice_DrawPrimitive(This->WineD3DDevice, PrimitiveType, StartVertex, PrimitiveCount);
1115 }
1116
1117 static HRESULT WINAPI IDirect3DDevice8Impl_DrawIndexedPrimitive(LPDIRECT3DDEVICE8 iface, D3DPRIMITIVETYPE PrimitiveType,
1118                                                            UINT MinVertexIndex,UINT NumVertices,UINT startIndex,UINT primCount) {
1119     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1120     TRACE("(%p) Relay\n" , This);
1121
1122     return IWineD3DDevice_DrawIndexedPrimitive(This->WineD3DDevice, PrimitiveType, This->baseVertexIndex, MinVertexIndex, NumVertices, startIndex, primCount);
1123 }
1124
1125 static HRESULT WINAPI IDirect3DDevice8Impl_DrawPrimitiveUP(LPDIRECT3DDEVICE8 iface, D3DPRIMITIVETYPE PrimitiveType,UINT PrimitiveCount,CONST void* pVertexStreamZeroData,UINT VertexStreamZeroStride) {
1126     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1127     TRACE("(%p) Relay\n" , This);
1128
1129     return IWineD3DDevice_DrawPrimitiveUP(This->WineD3DDevice, PrimitiveType, PrimitiveCount, pVertexStreamZeroData, VertexStreamZeroStride);
1130 }
1131
1132 static HRESULT WINAPI IDirect3DDevice8Impl_DrawIndexedPrimitiveUP(LPDIRECT3DDEVICE8 iface, D3DPRIMITIVETYPE PrimitiveType,UINT MinVertexIndex,
1133                                                              UINT NumVertexIndices,UINT PrimitiveCount,CONST void* pIndexData,
1134                                                              D3DFORMAT IndexDataFormat,CONST void* pVertexStreamZeroData,
1135                                                              UINT VertexStreamZeroStride) {
1136     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1137     TRACE("(%p) Relay\n" , This);
1138
1139     return IWineD3DDevice_DrawIndexedPrimitiveUP(This->WineD3DDevice, PrimitiveType, MinVertexIndex, NumVertexIndices, PrimitiveCount,
1140                                                  pIndexData, IndexDataFormat, pVertexStreamZeroData, VertexStreamZeroStride);
1141 }
1142
1143 static HRESULT WINAPI IDirect3DDevice8Impl_ProcessVertices(LPDIRECT3DDEVICE8 iface, UINT SrcStartIndex,UINT DestIndex,UINT VertexCount,IDirect3DVertexBuffer8* pDestBuffer,DWORD Flags) {
1144     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1145     TRACE("(%p) Relay\n" , This);
1146
1147     return IWineD3DDevice_ProcessVertices(This->WineD3DDevice,SrcStartIndex, DestIndex, VertexCount, ((IDirect3DVertexBuffer8Impl *)pDestBuffer)->wineD3DVertexBuffer, NULL, Flags);
1148 }
1149
1150 static HRESULT WINAPI IDirect3DDevice8Impl_CreateVertexShader(LPDIRECT3DDEVICE8 iface, CONST DWORD* pDeclaration, CONST DWORD* pFunction, DWORD* ppShader, DWORD Usage) {
1151     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1152     HRESULT hrc = D3D_OK;
1153     IDirect3DVertexShader8Impl *object;
1154
1155     /* Setup a stub object for now */
1156     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*object));
1157     TRACE("(%p) : pFunction(%p), ppShader(%p)\n", This, pFunction, ppShader);
1158     if (NULL == object) {
1159         FIXME("Allocation of memory failed\n");
1160         *ppShader = 0;
1161         return D3DERR_OUTOFVIDEOMEMORY;
1162     }
1163
1164     object->ref = 1;
1165     object->lpVtbl = &Direct3DVertexShader8_Vtbl;
1166     /* Usage is missing ..*/
1167     hrc = IWineD3DDevice_CreateVertexShader(This->WineD3DDevice, pDeclaration, pFunction, &object->wineD3DVertexShader, (IUnknown *)object);
1168
1169     if (FAILED(hrc)) {
1170         /* free up object */
1171         FIXME("Call to IWineD3DDevice_CreateVertexShader failed\n");
1172         HeapFree(GetProcessHeap(), 0, object);
1173         *ppShader = 0;
1174     } else {
1175         /* TODO: Store the VS declarations locally so that they can be derefferenced with a value higher than VS_HIGHESTFIXEDFXF */
1176         shader_handle *handle = alloc_shader_handle(This);
1177         if (!handle) {
1178             ERR("Failed to allocate shader handle\n");
1179             IDirect3DVertexShader8_Release((IUnknown *)object);
1180             hrc = E_OUTOFMEMORY;
1181         } else {
1182             object->handle = handle;
1183             *handle = object;
1184             *ppShader = (handle - This->shader_handles) + VS_HIGHESTFIXEDFXF + 1;
1185         }
1186     }
1187     TRACE("(%p) : returning %p (handle %#x)\n", This, object, *ppShader);
1188
1189     return hrc;
1190 }
1191
1192 static HRESULT WINAPI IDirect3DDevice8Impl_SetVertexShader(LPDIRECT3DDEVICE8 iface, DWORD pShader) {
1193     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1194     HRESULT hrc = D3D_OK;
1195
1196     TRACE("(%p) : Relay\n", This);
1197     if (VS_HIGHESTFIXEDFXF >= pShader) {
1198         TRACE("Setting FVF, %d %d\n", VS_HIGHESTFIXEDFXF, pShader);
1199         IWineD3DDevice_SetFVF(This->WineD3DDevice, pShader);
1200
1201         /* Call SetVertexShader with a NULL shader to set the vertexshader in the stateblock to NULL. */
1202         IWineD3DDevice_SetVertexShader(This->WineD3DDevice, NULL);
1203     } else {
1204         TRACE("Setting shader\n");
1205         if (This->allocated_shader_handles <= pShader - (VS_HIGHESTFIXEDFXF + 1)) {
1206             FIXME("(%p) : Number of shaders exceeds the maximum number of possible shaders\n", This);
1207             hrc = D3DERR_INVALIDCALL;
1208         } else {
1209             IDirect3DVertexShader8Impl *shader = This->shader_handles[pShader - (VS_HIGHESTFIXEDFXF + 1)];
1210             hrc =  IWineD3DDevice_SetVertexShader(This->WineD3DDevice, 0 == shader ? NULL : shader->wineD3DVertexShader);
1211         }
1212     }
1213     TRACE("(%p) : returning hr(%u)\n", This, hrc);
1214
1215     return hrc;
1216 }
1217
1218 static HRESULT WINAPI IDirect3DDevice8Impl_GetVertexShader(LPDIRECT3DDEVICE8 iface, DWORD* ppShader) {
1219     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1220     IWineD3DVertexShader *pShader;
1221     HRESULT hrc = D3D_OK;
1222
1223     TRACE("(%p) : Relay  device@%p\n", This, This->WineD3DDevice);
1224     hrc = IWineD3DDevice_GetVertexShader(This->WineD3DDevice, &pShader);
1225     if (D3D_OK == hrc) {
1226         if(0 != pShader) {
1227             IDirect3DVertexShader8Impl *d3d8_shader;
1228             hrc = IWineD3DVertexShader_GetParent(pShader, (IUnknown **)&d3d8_shader);
1229             IWineD3DVertexShader_Release(pShader);
1230             *ppShader = (d3d8_shader->handle - This->shader_handles) + (VS_HIGHESTFIXEDFXF + 1);
1231         } else {
1232             WARN("(%p) : The shader has been set to NULL\n", This);
1233
1234             /* TODO: Find out what should be returned, e.g. the FVF */
1235             *ppShader = 0;
1236             hrc = D3DERR_INVALIDCALL;
1237         }
1238     } else {
1239         WARN("(%p) : Call to IWineD3DDevice_GetVertexShader failed %u (device %p)\n", This, hrc, This->WineD3DDevice);
1240     }
1241     TRACE("(%p) : returning %#x\n", This, *ppShader);
1242
1243     return hrc;
1244 }
1245
1246 static HRESULT  WINAPI  IDirect3DDevice8Impl_DeleteVertexShader(LPDIRECT3DDEVICE8 iface, DWORD pShader) {
1247     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1248
1249     TRACE("(%p) : pShader %#x\n", This, pShader);
1250
1251     if (pShader <= VS_HIGHESTFIXEDFXF || This->allocated_shader_handles <= pShader - (VS_HIGHESTFIXEDFXF + 1)) {
1252         ERR("(%p) : Trying to delete an invalid handle\n", This);
1253         return D3DERR_INVALIDCALL;
1254     } else {
1255         shader_handle *handle = &This->shader_handles[pShader - (VS_HIGHESTFIXEDFXF + 1)];
1256         IDirect3DVertexShader8Impl *shader = *handle;
1257         while(IUnknown_Release((IUnknown *)shader));
1258         free_shader_handle(This, handle);
1259     }
1260
1261     return D3D_OK;
1262 }
1263
1264 static HRESULT WINAPI IDirect3DDevice8Impl_SetVertexShaderConstant(LPDIRECT3DDEVICE8 iface, DWORD Register, CONST void* pConstantData, DWORD ConstantCount) {
1265     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1266     TRACE("(%p) : Relay\n", This);
1267
1268     return IWineD3DDevice_SetVertexShaderConstantF(This->WineD3DDevice, Register, (CONST float *)pConstantData, ConstantCount);
1269 }
1270
1271 static HRESULT WINAPI IDirect3DDevice8Impl_GetVertexShaderConstant(LPDIRECT3DDEVICE8 iface, DWORD Register, void* pConstantData, DWORD ConstantCount) {
1272     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1273     TRACE("(%p) : Relay\n", This);
1274
1275     return IWineD3DDevice_GetVertexShaderConstantF(This->WineD3DDevice, Register, (float *)pConstantData, ConstantCount);
1276 }
1277
1278 static HRESULT WINAPI IDirect3DDevice8Impl_GetVertexShaderDeclaration(LPDIRECT3DDEVICE8 iface, DWORD pVertexShader, void* pData, DWORD* pSizeOfData) {
1279     IDirect3DVertexShader8Impl *This = (IDirect3DVertexShader8Impl *)pVertexShader;
1280
1281     TRACE("(%p) : Relay\n", This);
1282 /*    return IWineD3DVertexShader_GetDeclaration(This->wineD3DVertexShader, pData, (UINT *)pSizeOfData); */
1283     return D3DERR_INVALIDCALL;
1284 }
1285 static HRESULT WINAPI IDirect3DDevice8Impl_GetVertexShaderFunction(LPDIRECT3DDEVICE8 iface, DWORD pVertexShader, void* pData, DWORD* pSizeOfData) {
1286     IDirect3DVertexShader8Impl *This = (IDirect3DVertexShader8Impl *)pVertexShader;
1287
1288     TRACE("(%p) : Relay\n", This);
1289     return IWineD3DVertexShader_GetFunction(This->wineD3DVertexShader, pData, (UINT *)pSizeOfData);
1290 }
1291
1292 static HRESULT WINAPI IDirect3DDevice8Impl_SetIndices(LPDIRECT3DDEVICE8 iface, IDirect3DIndexBuffer8* pIndexData, UINT baseVertexIndex) {
1293     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1294     TRACE("(%p) Relay\n", This);
1295 /* FIXME: store base vertex index properly */
1296     This->baseVertexIndex = baseVertexIndex;
1297     return IWineD3DDevice_SetIndices(This->WineD3DDevice,
1298                                      NULL == pIndexData ? NULL : ((IDirect3DIndexBuffer8Impl *)pIndexData)->wineD3DIndexBuffer,
1299                                      0);
1300 }
1301
1302 static HRESULT WINAPI IDirect3DDevice8Impl_GetIndices(LPDIRECT3DDEVICE8 iface, IDirect3DIndexBuffer8** ppIndexData,UINT* pBaseVertexIndex) {
1303     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1304     IWineD3DIndexBuffer *retIndexData = NULL;
1305     HRESULT rc = D3D_OK;
1306     UINT tmp;
1307
1308     TRACE("(%p) Relay\n", This);
1309
1310     if(ppIndexData == NULL){
1311         return D3DERR_INVALIDCALL;
1312     }
1313
1314     rc = IWineD3DDevice_GetIndices(This->WineD3DDevice, &retIndexData, &tmp);
1315     if (D3D_OK == rc && NULL != retIndexData) {
1316         IWineD3DVertexBuffer_GetParent(retIndexData, (IUnknown **)ppIndexData);
1317         IWineD3DVertexBuffer_Release(retIndexData);
1318     } else {
1319         if(rc != D3D_OK)  FIXME("Call to GetIndices failed\n");
1320         *ppIndexData = NULL;
1321     }
1322 /* FIXME: store base vertex index properly */
1323     *pBaseVertexIndex = This->baseVertexIndex;
1324     return rc;
1325 }
1326 static HRESULT WINAPI IDirect3DDevice8Impl_CreatePixelShader(LPDIRECT3DDEVICE8 iface, CONST DWORD* pFunction, DWORD* ppShader) {
1327     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1328     IDirect3DPixelShader8Impl *object;
1329     HRESULT hrc = D3D_OK;
1330
1331     TRACE("(%p) : pFunction(%p), ppShader(%p)\n", This, pFunction, ppShader);
1332
1333     if (NULL == ppShader) {
1334         TRACE("(%p) Invalid call\n", This);
1335         return D3DERR_INVALIDCALL;
1336     }
1337     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*object));
1338
1339     if (NULL == object) {
1340         return E_OUTOFMEMORY;
1341     } else {
1342
1343         object->ref    = 1;
1344         object->lpVtbl = &Direct3DPixelShader8_Vtbl;
1345         hrc = IWineD3DDevice_CreatePixelShader(This->WineD3DDevice, pFunction, &object->wineD3DPixelShader , (IUnknown *)object);
1346         if (D3D_OK != hrc) {
1347             FIXME("(%p) call to IWineD3DDevice_CreatePixelShader failed\n", This);
1348             HeapFree(GetProcessHeap(), 0 , object);
1349             *ppShader = 0;
1350         } else {
1351             shader_handle *handle = alloc_shader_handle(This);
1352             if (!handle) {
1353                 ERR("Failed to allocate shader handle\n");
1354                 IDirect3DVertexShader8_Release((IUnknown *)object);
1355                 hrc = E_OUTOFMEMORY;
1356             } else {
1357                 object->handle = handle;
1358                 *handle = object;
1359                 *ppShader = (handle - This->shader_handles) + VS_HIGHESTFIXEDFXF + 1;
1360             }
1361         }
1362
1363     }
1364
1365     TRACE("(%p) : returning %p (handle %#x)\n", This, object, *ppShader);
1366     return hrc;
1367 }
1368
1369 static HRESULT WINAPI IDirect3DDevice8Impl_SetPixelShader(LPDIRECT3DDEVICE8 iface, DWORD pShader) {
1370     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1371     IDirect3DPixelShader8Impl *shader = NULL;
1372
1373     TRACE("(%p) : pShader %#x\n", This, pShader);
1374
1375     if (pShader > VS_HIGHESTFIXEDFXF && This->allocated_shader_handles > pShader - (VS_HIGHESTFIXEDFXF + 1)) {
1376         shader = This->shader_handles[pShader - (VS_HIGHESTFIXEDFXF + 1)];
1377     } else if (pShader) {
1378         ERR("Trying to set an invalid handle.\n");
1379     }
1380
1381     TRACE("(%p) : Setting shader %p\n", This, shader);
1382     return IWineD3DDevice_SetPixelShader(This->WineD3DDevice, shader == NULL ? NULL :shader->wineD3DPixelShader);
1383 }
1384
1385 static HRESULT WINAPI IDirect3DDevice8Impl_GetPixelShader(LPDIRECT3DDEVICE8 iface, DWORD* ppShader) {
1386     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1387     IWineD3DPixelShader *object;
1388
1389     HRESULT hrc = D3D_OK;
1390     TRACE("(%p) Relay\n", This);
1391     if (NULL == ppShader) {
1392         TRACE("(%p) Invalid call\n", This);
1393         return D3DERR_INVALIDCALL;
1394     }
1395
1396     hrc = IWineD3DDevice_GetPixelShader(This->WineD3DDevice, &object);
1397     if (D3D_OK == hrc && NULL != object) {
1398         IDirect3DPixelShader8Impl *d3d8_shader;
1399         hrc = IWineD3DPixelShader_GetParent(object, (IUnknown **)&d3d8_shader);
1400         IWineD3DPixelShader_Release(object);
1401         *ppShader = (d3d8_shader->handle - This->shader_handles) + (VS_HIGHESTFIXEDFXF + 1);
1402     } else {
1403         *ppShader = (DWORD)NULL;
1404     }
1405
1406     TRACE("(%p) : returning %#x\n", This, *ppShader);
1407     return hrc;
1408 }
1409
1410 static HRESULT WINAPI IDirect3DDevice8Impl_DeletePixelShader(LPDIRECT3DDEVICE8 iface, DWORD pShader) {
1411     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1412
1413     TRACE("(%p) : pShader %#x\n", This, pShader);
1414
1415     if (pShader <= VS_HIGHESTFIXEDFXF || This->allocated_shader_handles <= pShader - (VS_HIGHESTFIXEDFXF + 1)) {
1416         ERR("(%p) : Trying to delete an invalid handle\n", This);
1417         return D3DERR_INVALIDCALL;
1418     } else {
1419         shader_handle *handle = &This->shader_handles[pShader - (VS_HIGHESTFIXEDFXF + 1)];
1420         IDirect3DPixelShader8Impl *shader = *handle;
1421         while(IUnknown_Release((IUnknown *)shader));
1422         free_shader_handle(This, handle);
1423     }
1424
1425     return D3D_OK;
1426 }
1427
1428 static HRESULT  WINAPI  IDirect3DDevice8Impl_SetPixelShaderConstant(LPDIRECT3DDEVICE8 iface, DWORD Register, CONST void* pConstantData, DWORD ConstantCount) {
1429     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1430     TRACE("(%p) Relay\n", This);
1431
1432     return IWineD3DDevice_SetPixelShaderConstantF(This->WineD3DDevice, Register, (CONST float *)pConstantData, ConstantCount);
1433 }
1434
1435 static HRESULT WINAPI IDirect3DDevice8Impl_GetPixelShaderConstant(LPDIRECT3DDEVICE8 iface, DWORD Register, void* pConstantData, DWORD ConstantCount) {
1436     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1437     TRACE("(%p) Relay\n", This);
1438
1439     return IWineD3DDevice_GetPixelShaderConstantF(This->WineD3DDevice, Register, (float *)pConstantData, ConstantCount);
1440 }
1441
1442 static HRESULT WINAPI IDirect3DDevice8Impl_GetPixelShaderFunction(LPDIRECT3DDEVICE8 iface, DWORD pPixelShader, void* pData, DWORD* pSizeOfData) {
1443     IDirect3DPixelShader8Impl *This = (IDirect3DPixelShader8Impl *)pPixelShader;
1444
1445     TRACE("(%p) : Relay\n", This);
1446     return IWineD3DPixelShader_GetFunction(This->wineD3DPixelShader, pData, (UINT *)pSizeOfData);
1447 }
1448
1449 static HRESULT WINAPI IDirect3DDevice8Impl_DrawRectPatch(LPDIRECT3DDEVICE8 iface, UINT Handle,CONST float* pNumSegs,CONST D3DRECTPATCH_INFO* pRectPatchInfo) {
1450     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1451     TRACE("(%p) Relay\n", This);
1452
1453     return IWineD3DDevice_DrawRectPatch(This->WineD3DDevice, Handle, pNumSegs, (CONST WINED3DRECTPATCH_INFO *)pRectPatchInfo);
1454 }
1455
1456 static HRESULT WINAPI IDirect3DDevice8Impl_DrawTriPatch(LPDIRECT3DDEVICE8 iface, UINT Handle,CONST float* pNumSegs,CONST D3DTRIPATCH_INFO* pTriPatchInfo) {
1457     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1458     TRACE("(%p) Relay\n", This);
1459
1460     return IWineD3DDevice_DrawTriPatch(This->WineD3DDevice, Handle, pNumSegs, (CONST WINED3DTRIPATCH_INFO *)pTriPatchInfo);
1461 }
1462
1463 static HRESULT WINAPI IDirect3DDevice8Impl_DeletePatch(LPDIRECT3DDEVICE8 iface, UINT Handle) {
1464     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1465     TRACE("(%p) Relay\n", This);
1466
1467     return IWineD3DDevice_DeletePatch(This->WineD3DDevice, Handle);
1468 }
1469
1470 static HRESULT WINAPI IDirect3DDevice8Impl_SetStreamSource(LPDIRECT3DDEVICE8 iface, UINT StreamNumber,IDirect3DVertexBuffer8* pStreamData,UINT Stride) {
1471     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1472     TRACE("(%p) Relay\n" , This);
1473
1474     return IWineD3DDevice_SetStreamSource(This->WineD3DDevice, StreamNumber,
1475                                           NULL == pStreamData ? NULL : ((IDirect3DVertexBuffer8Impl *)pStreamData)->wineD3DVertexBuffer,
1476                                           0/* Offset in bytes */, Stride);
1477 }
1478
1479 static HRESULT WINAPI IDirect3DDevice8Impl_GetStreamSource(LPDIRECT3DDEVICE8 iface, UINT StreamNumber,IDirect3DVertexBuffer8** pStream,UINT* pStride) {
1480     IDirect3DDevice8Impl *This = (IDirect3DDevice8Impl *)iface;
1481     IWineD3DVertexBuffer *retStream = NULL;
1482     HRESULT rc = D3D_OK;
1483
1484     TRACE("(%p) Relay\n" , This);
1485
1486     if(pStream == NULL){
1487         return D3DERR_INVALIDCALL;
1488     }
1489
1490     rc = IWineD3DDevice_GetStreamSource(This->WineD3DDevice, StreamNumber, (IWineD3DVertexBuffer **)&retStream, 0 /* Offset in bytes */, pStride);
1491     if (rc == D3D_OK  && NULL != retStream) {
1492         IWineD3DVertexBuffer_GetParent(retStream, (IUnknown **)pStream);
1493         IWineD3DVertexBuffer_Release(retStream);
1494     }else{
1495          FIXME("Call to GetStreamSource failed %p\n",  pStride);
1496         *pStream = NULL;
1497     }
1498
1499     return rc;
1500 }
1501
1502
1503 const IDirect3DDevice8Vtbl Direct3DDevice8_Vtbl =
1504 {
1505     IDirect3DDevice8Impl_QueryInterface,
1506     IDirect3DDevice8Impl_AddRef,
1507     IDirect3DDevice8Impl_Release,
1508     IDirect3DDevice8Impl_TestCooperativeLevel,
1509     IDirect3DDevice8Impl_GetAvailableTextureMem,
1510     IDirect3DDevice8Impl_ResourceManagerDiscardBytes,
1511     IDirect3DDevice8Impl_GetDirect3D,
1512     IDirect3DDevice8Impl_GetDeviceCaps,
1513     IDirect3DDevice8Impl_GetDisplayMode,
1514     IDirect3DDevice8Impl_GetCreationParameters,
1515     IDirect3DDevice8Impl_SetCursorProperties,
1516     IDirect3DDevice8Impl_SetCursorPosition,
1517     IDirect3DDevice8Impl_ShowCursor,
1518     IDirect3DDevice8Impl_CreateAdditionalSwapChain,
1519     IDirect3DDevice8Impl_Reset,
1520     IDirect3DDevice8Impl_Present,
1521     IDirect3DDevice8Impl_GetBackBuffer,
1522     IDirect3DDevice8Impl_GetRasterStatus,
1523     IDirect3DDevice8Impl_SetGammaRamp,
1524     IDirect3DDevice8Impl_GetGammaRamp,
1525     IDirect3DDevice8Impl_CreateTexture,
1526     IDirect3DDevice8Impl_CreateVolumeTexture,
1527     IDirect3DDevice8Impl_CreateCubeTexture,
1528     IDirect3DDevice8Impl_CreateVertexBuffer,
1529     IDirect3DDevice8Impl_CreateIndexBuffer,
1530     IDirect3DDevice8Impl_CreateRenderTarget,
1531     IDirect3DDevice8Impl_CreateDepthStencilSurface,
1532     IDirect3DDevice8Impl_CreateImageSurface,
1533     IDirect3DDevice8Impl_CopyRects,
1534     IDirect3DDevice8Impl_UpdateTexture,
1535     IDirect3DDevice8Impl_GetFrontBuffer,
1536     IDirect3DDevice8Impl_SetRenderTarget,
1537     IDirect3DDevice8Impl_GetRenderTarget,
1538     IDirect3DDevice8Impl_GetDepthStencilSurface,
1539     IDirect3DDevice8Impl_BeginScene,
1540     IDirect3DDevice8Impl_EndScene,
1541     IDirect3DDevice8Impl_Clear,
1542     IDirect3DDevice8Impl_SetTransform,
1543     IDirect3DDevice8Impl_GetTransform,
1544     IDirect3DDevice8Impl_MultiplyTransform,
1545     IDirect3DDevice8Impl_SetViewport,
1546     IDirect3DDevice8Impl_GetViewport,
1547     IDirect3DDevice8Impl_SetMaterial,
1548     IDirect3DDevice8Impl_GetMaterial,
1549     IDirect3DDevice8Impl_SetLight,
1550     IDirect3DDevice8Impl_GetLight,
1551     IDirect3DDevice8Impl_LightEnable,
1552     IDirect3DDevice8Impl_GetLightEnable,
1553     IDirect3DDevice8Impl_SetClipPlane,
1554     IDirect3DDevice8Impl_GetClipPlane,
1555     IDirect3DDevice8Impl_SetRenderState,
1556     IDirect3DDevice8Impl_GetRenderState,
1557     IDirect3DDevice8Impl_BeginStateBlock,
1558     IDirect3DDevice8Impl_EndStateBlock,
1559     IDirect3DDevice8Impl_ApplyStateBlock,
1560     IDirect3DDevice8Impl_CaptureStateBlock,
1561     IDirect3DDevice8Impl_DeleteStateBlock,
1562     IDirect3DDevice8Impl_CreateStateBlock,
1563     IDirect3DDevice8Impl_SetClipStatus,
1564     IDirect3DDevice8Impl_GetClipStatus,
1565     IDirect3DDevice8Impl_GetTexture,
1566     IDirect3DDevice8Impl_SetTexture,
1567     IDirect3DDevice8Impl_GetTextureStageState,
1568     IDirect3DDevice8Impl_SetTextureStageState,
1569     IDirect3DDevice8Impl_ValidateDevice,
1570     IDirect3DDevice8Impl_GetInfo,
1571     IDirect3DDevice8Impl_SetPaletteEntries,
1572     IDirect3DDevice8Impl_GetPaletteEntries,
1573     IDirect3DDevice8Impl_SetCurrentTexturePalette,
1574     IDirect3DDevice8Impl_GetCurrentTexturePalette,
1575     IDirect3DDevice8Impl_DrawPrimitive,
1576     IDirect3DDevice8Impl_DrawIndexedPrimitive,
1577     IDirect3DDevice8Impl_DrawPrimitiveUP,
1578     IDirect3DDevice8Impl_DrawIndexedPrimitiveUP,
1579     IDirect3DDevice8Impl_ProcessVertices,
1580     IDirect3DDevice8Impl_CreateVertexShader,
1581     IDirect3DDevice8Impl_SetVertexShader,
1582     IDirect3DDevice8Impl_GetVertexShader,
1583     IDirect3DDevice8Impl_DeleteVertexShader,
1584     IDirect3DDevice8Impl_SetVertexShaderConstant,
1585     IDirect3DDevice8Impl_GetVertexShaderConstant,
1586     IDirect3DDevice8Impl_GetVertexShaderDeclaration,
1587     IDirect3DDevice8Impl_GetVertexShaderFunction,
1588     IDirect3DDevice8Impl_SetStreamSource,
1589     IDirect3DDevice8Impl_GetStreamSource,
1590     IDirect3DDevice8Impl_SetIndices,
1591     IDirect3DDevice8Impl_GetIndices,
1592     IDirect3DDevice8Impl_CreatePixelShader,
1593     IDirect3DDevice8Impl_SetPixelShader,
1594     IDirect3DDevice8Impl_GetPixelShader,
1595     IDirect3DDevice8Impl_DeletePixelShader,
1596     IDirect3DDevice8Impl_SetPixelShaderConstant,
1597     IDirect3DDevice8Impl_GetPixelShaderConstant,
1598     IDirect3DDevice8Impl_GetPixelShaderFunction,
1599     IDirect3DDevice8Impl_DrawRectPatch,
1600     IDirect3DDevice8Impl_DrawTriPatch,
1601     IDirect3DDevice8Impl_DeletePatch
1602 };
1603
1604 /* Internal function called back during the CreateDevice to create a render target  */
1605 HRESULT WINAPI D3D8CB_CreateSurface(IUnknown *device, UINT Width, UINT Height, 
1606                                          WINED3DFORMAT Format, DWORD Usage, WINED3DPOOL Pool, UINT Level,
1607                                          IWineD3DSurface **ppSurface, HANDLE *pSharedHandle) {
1608
1609     HRESULT res = D3D_OK;
1610     IDirect3DSurface8Impl *d3dSurface = NULL;
1611     BOOL Lockable = TRUE;
1612
1613     if((WINED3DPOOL_DEFAULT == Pool && WINED3DUSAGE_DYNAMIC != Usage))
1614         Lockable = FALSE;
1615
1616     TRACE("relay\n");
1617     res = IDirect3DDevice8Impl_CreateSurface((IDirect3DDevice8 *)device, Width, Height, (D3DFORMAT)Format, Lockable, FALSE/*Discard*/, Level,  (IDirect3DSurface8 **)&d3dSurface, D3DRTYPE_SURFACE, Usage, Pool, D3DMULTISAMPLE_NONE, 0 /* MultisampleQuality */);
1618
1619     if (SUCCEEDED(res)) {
1620         *ppSurface = d3dSurface->wineD3DSurface;
1621         IUnknown_Release(d3dSurface->parentDevice);
1622         d3dSurface->parentDevice = NULL;
1623     } else {
1624         FIXME("(%p) IDirect3DDevice8_CreateSurface failed\n", device);
1625     }
1626     return res;
1627 }