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