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