oleaut32: Test the return value of VarCat in the tests.
[wine] / dlls / d3d8 / directx.c
1 /*
2  * IDirect3D8 implementation
3  *
4  * Copyright 2002-2004 Jason Edmeades
5  * Copyright 2003-2004 Raphael Junqueira
6  * Copyright 2004 Christian Costa
7  *
8  * This library is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * This library is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with this library; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21  */
22
23 #include "config.h"
24
25 #include <stdarg.h>
26
27 #define NONAMELESSUNION
28 #define NONAMELESSSTRUCT
29 #include "windef.h"
30 #include "winbase.h"
31 #include "wingdi.h"
32 #include "winuser.h"
33 #include "wine/debug.h"
34 #include "wine/unicode.h"
35
36 #include "d3d8_private.h"
37
38 WINE_DEFAULT_DEBUG_CHANNEL(d3d8);
39
40 /* IDirect3D IUnknown parts follow: */
41 static HRESULT WINAPI IDirect3D8Impl_QueryInterface(LPDIRECT3D8 iface, REFIID riid,LPVOID *ppobj)
42 {
43     IDirect3D8Impl *This = (IDirect3D8Impl *)iface;
44
45     if (IsEqualGUID(riid, &IID_IUnknown)
46         || IsEqualGUID(riid, &IID_IDirect3D8)) {
47         IUnknown_AddRef(iface);
48         *ppobj = This;
49         return S_OK;
50     }
51
52     WARN("(%p)->(%s,%p),not found\n", This, debugstr_guid(riid),ppobj);
53     *ppobj = NULL;
54     return E_NOINTERFACE;
55 }
56
57 static ULONG WINAPI IDirect3D8Impl_AddRef(LPDIRECT3D8 iface) {
58     IDirect3D8Impl *This = (IDirect3D8Impl *)iface;
59     ULONG ref = InterlockedIncrement(&This->ref);
60
61     TRACE("(%p) : AddRef from %ld\n", This, ref - 1);
62
63     return ref;
64 }
65
66 static ULONG WINAPI IDirect3D8Impl_Release(LPDIRECT3D8 iface) {
67     IDirect3D8Impl *This = (IDirect3D8Impl *)iface;
68     ULONG ref = InterlockedDecrement(&This->ref);
69
70     TRACE("(%p) : ReleaseRef to %ld\n", This, ref);
71
72     if (ref == 0) {
73         TRACE("Releasing wined3d %p\n", This->WineD3D);
74         IWineD3D_Release(This->WineD3D);
75         HeapFree(GetProcessHeap(), 0, This);
76     }
77
78     return ref;
79 }
80
81 /* IDirect3D8 Interface follow: */
82 static HRESULT WINAPI IDirect3D8Impl_RegisterSoftwareDevice (LPDIRECT3D8 iface, void* pInitializeFunction) {
83     IDirect3D8Impl *This = (IDirect3D8Impl *)iface;
84     return IWineD3D_RegisterSoftwareDevice(This->WineD3D, pInitializeFunction);
85 }
86
87 static UINT WINAPI IDirect3D8Impl_GetAdapterCount (LPDIRECT3D8 iface) {
88     IDirect3D8Impl *This = (IDirect3D8Impl *)iface;
89     return IWineD3D_GetAdapterCount(This->WineD3D);
90 }
91
92 static HRESULT  WINAPI  IDirect3D8Impl_GetAdapterIdentifier       (LPDIRECT3D8 iface,
93                                                             UINT Adapter, DWORD Flags, D3DADAPTER_IDENTIFIER8* pIdentifier) {
94     IDirect3D8Impl *This = (IDirect3D8Impl *)iface;
95     WINED3DADAPTER_IDENTIFIER adapter_id;
96
97     /* dx8 and dx9 have different structures to be filled in, with incompatible 
98        layouts so pass in pointers to the places to be filled via an internal 
99        structure                                                                */
100     adapter_id.Driver           = pIdentifier->Driver;
101     adapter_id.Description      = pIdentifier->Description;
102     adapter_id.DeviceName       = NULL; /* d3d9 only */
103     adapter_id.DriverVersion    = &pIdentifier->DriverVersion;
104     adapter_id.VendorId         = &pIdentifier->VendorId;
105     adapter_id.DeviceId         = &pIdentifier->DeviceId;
106     adapter_id.SubSysId         = &pIdentifier->SubSysId;
107     adapter_id.Revision         = &pIdentifier->Revision;
108     adapter_id.DeviceIdentifier = &pIdentifier->DeviceIdentifier;
109     adapter_id.WHQLLevel        = &pIdentifier->WHQLLevel;
110
111     return IWineD3D_GetAdapterIdentifier(This->WineD3D, Adapter, Flags, &adapter_id);
112 }
113
114 static UINT WINAPI IDirect3D8Impl_GetAdapterModeCount (LPDIRECT3D8 iface,UINT Adapter) {
115     IDirect3D8Impl *This = (IDirect3D8Impl *)iface;
116     return IWineD3D_GetAdapterModeCount(This->WineD3D, Adapter, 0 /* format */);
117 }
118
119 static HRESULT WINAPI IDirect3D8Impl_EnumAdapterModes (LPDIRECT3D8 iface, UINT Adapter, UINT Mode, D3DDISPLAYMODE* pMode) {
120     IDirect3D8Impl *This = (IDirect3D8Impl *)iface;
121     /* FIXME: USe a constant WINED3DFOTMAT_ANY, or something similar */
122     return IWineD3D_EnumAdapterModes(This->WineD3D, Adapter, 0 /* format */, Mode, (WINED3DDISPLAYMODE *) pMode);
123 }
124
125 static HRESULT WINAPI IDirect3D8Impl_GetAdapterDisplayMode (LPDIRECT3D8 iface, UINT Adapter, D3DDISPLAYMODE* pMode) {
126     IDirect3D8Impl *This = (IDirect3D8Impl *)iface;
127     return IWineD3D_GetAdapterDisplayMode(This->WineD3D, Adapter, (WINED3DDISPLAYMODE *) pMode);
128 }
129
130 static HRESULT  WINAPI  IDirect3D8Impl_CheckDeviceType            (LPDIRECT3D8 iface,
131                                                             UINT Adapter, D3DDEVTYPE CheckType, D3DFORMAT DisplayFormat,
132                                                             D3DFORMAT BackBufferFormat, BOOL Windowed) {
133     IDirect3D8Impl *This = (IDirect3D8Impl *)iface;
134     return IWineD3D_CheckDeviceType(This->WineD3D, Adapter, CheckType, DisplayFormat,
135                                     BackBufferFormat, Windowed);
136 }
137
138 static HRESULT  WINAPI  IDirect3D8Impl_CheckDeviceFormat          (LPDIRECT3D8 iface,
139                                                             UINT Adapter, D3DDEVTYPE DeviceType, D3DFORMAT AdapterFormat,
140                                                             DWORD Usage, D3DRESOURCETYPE RType, D3DFORMAT CheckFormat) {
141     IDirect3D8Impl *This = (IDirect3D8Impl *)iface;
142     return IWineD3D_CheckDeviceFormat(This->WineD3D, Adapter, DeviceType, AdapterFormat,
143                                     Usage, RType, CheckFormat);
144 }
145
146 static HRESULT  WINAPI  IDirect3D8Impl_CheckDeviceMultiSampleType(LPDIRECT3D8 iface,
147                                                            UINT Adapter, D3DDEVTYPE DeviceType, D3DFORMAT SurfaceFormat,
148                                                            BOOL Windowed, D3DMULTISAMPLE_TYPE MultiSampleType) {
149     IDirect3D8Impl *This = (IDirect3D8Impl *)iface;
150     return IWineD3D_CheckDeviceMultiSampleType(This->WineD3D, Adapter, DeviceType, SurfaceFormat,
151                                                Windowed, (WINED3DMULTISAMPLE_TYPE) MultiSampleType, NULL);
152 }
153
154 static HRESULT  WINAPI  IDirect3D8Impl_CheckDepthStencilMatch(LPDIRECT3D8 iface, 
155                                                        UINT Adapter, D3DDEVTYPE DeviceType, D3DFORMAT AdapterFormat,
156                                                        D3DFORMAT RenderTargetFormat, D3DFORMAT DepthStencilFormat) {
157     IDirect3D8Impl *This = (IDirect3D8Impl *)iface;
158     return IWineD3D_CheckDepthStencilMatch(This->WineD3D, Adapter, DeviceType, AdapterFormat,
159                                            RenderTargetFormat, DepthStencilFormat);
160 }
161
162 static HRESULT  WINAPI  IDirect3D8Impl_GetDeviceCaps(LPDIRECT3D8 iface, UINT Adapter, D3DDEVTYPE DeviceType, D3DCAPS8* pCaps) {
163     IDirect3D8Impl *This = (IDirect3D8Impl *)iface;
164     HRESULT hrc = D3D_OK;
165     WINED3DCAPS *pWineCaps;
166
167     TRACE("(%p) Relay %d %u %p\n", This, Adapter, DeviceType, pCaps);
168
169     if(NULL == pCaps){
170         return D3DERR_INVALIDCALL;
171     }
172     pWineCaps = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(WINED3DCAPS));
173     if(pWineCaps == NULL){
174         return D3DERR_INVALIDCALL; /*well this is what MSDN says to return*/
175     }
176     D3D8CAPSTOWINECAPS(pCaps, pWineCaps)
177     hrc = IWineD3D_GetDeviceCaps(This->WineD3D, Adapter, DeviceType, pWineCaps);
178     HeapFree(GetProcessHeap(), 0, pWineCaps);
179     TRACE("(%p) returning %p\n", This, pCaps);
180     return hrc;
181 }
182
183 static HMONITOR WINAPI  IDirect3D8Impl_GetAdapterMonitor(LPDIRECT3D8 iface, UINT Adapter) {
184     IDirect3D8Impl *This = (IDirect3D8Impl *)iface;
185     return IWineD3D_GetAdapterMonitor(This->WineD3D, Adapter);
186 }
187
188 /* Internal function called back during the CreateDevice to create a render target */
189 HRESULT WINAPI D3D8CB_CreateRenderTarget(IUnknown *device, UINT Width, UINT Height, 
190                                          WINED3DFORMAT Format, WINED3DMULTISAMPLE_TYPE MultiSample, 
191                                          DWORD MultisampleQuality, BOOL Lockable, 
192                                          IWineD3DSurface** ppSurface, HANDLE* pSharedHandle) {
193     HRESULT res = D3D_OK;
194     IDirect3DSurface8Impl *d3dSurface = NULL;
195
196     TRACE("(%p) call back\n", device);
197     res = IDirect3DDevice8_CreateRenderTarget((IDirect3DDevice8 *)device, Width, Height, 
198                                          (D3DFORMAT)Format, MultiSample, Lockable, 
199                                          (IDirect3DSurface8 **)&d3dSurface);
200
201     if (SUCCEEDED(res)) {
202         *ppSurface = d3dSurface->wineD3DSurface;
203         IUnknown_Release(d3dSurface->parentDevice);
204         d3dSurface->parentDevice = NULL;
205     } else {
206         *ppSurface = NULL;
207     }
208     return res;
209 }
210
211 /* Callback for creating the inplicite swapchain when the device is created */
212 static HRESULT WINAPI D3D8CB_CreateAdditionalSwapChain(IUnknown *device,
213                                                 WINED3DPRESENT_PARAMETERS* pPresentationParameters,
214                                                 IWineD3DSwapChain ** ppSwapChain){
215     HRESULT res = D3D_OK;
216     IDirect3DSwapChain8Impl *d3dSwapChain = NULL;
217     D3DPRESENT_PARAMETERS localParameters;
218     TRACE("(%p) call back\n", device);
219
220     localParameters.BackBufferWidth                = *(pPresentationParameters->BackBufferWidth);
221     localParameters.BackBufferHeight               = *(pPresentationParameters->BackBufferHeight);
222     localParameters.BackBufferFormat               = *(pPresentationParameters->BackBufferFormat);
223     localParameters.BackBufferCount                = *(pPresentationParameters->BackBufferCount);
224     localParameters.MultiSampleType                = *(pPresentationParameters->MultiSampleType);
225     /* d3d9 only */
226     /* localParameters.MultiSampleQuality             = *(pPresentationParameters->MultiSampleQuality); */
227     localParameters.SwapEffect                     = *(pPresentationParameters->SwapEffect);
228     localParameters.hDeviceWindow                  = *(pPresentationParameters->hDeviceWindow);
229     localParameters.Windowed                       = *(pPresentationParameters->Windowed);
230     localParameters.EnableAutoDepthStencil         = *(pPresentationParameters->EnableAutoDepthStencil);
231     localParameters.AutoDepthStencilFormat         = *(pPresentationParameters->AutoDepthStencilFormat);
232     localParameters.Flags                          = *(pPresentationParameters->Flags);
233     localParameters.FullScreen_RefreshRateInHz     = *(pPresentationParameters->FullScreen_RefreshRateInHz);
234     /* d3d9 only */
235     /*    localParameters.PresentationInterval           = *(pPresentationParameters->PresentationInterval); */
236
237     /*copy the presentation parameters*/
238     res = IDirect3DDevice8_CreateAdditionalSwapChain((IDirect3DDevice8 *)device, &localParameters, (IDirect3DSwapChain8 **)&d3dSwapChain);
239
240     if (SUCCEEDED(res)) {
241         *ppSwapChain = d3dSwapChain->wineD3DSwapChain;
242         IUnknown_Release(d3dSwapChain->parentDevice);
243         d3dSwapChain->parentDevice = NULL;
244     } else {
245         *ppSwapChain = NULL;
246     }
247
248     /*Copy back the presentation parameters*/
249     *pPresentationParameters->BackBufferWidth               = localParameters.BackBufferWidth;
250     *pPresentationParameters->BackBufferHeight              = localParameters.BackBufferHeight;
251     *pPresentationParameters->BackBufferFormat              = localParameters.BackBufferFormat;
252     *pPresentationParameters->BackBufferCount               = localParameters.BackBufferCount;
253     *pPresentationParameters->MultiSampleType               = localParameters.MultiSampleType;
254     /* d3d9 only */
255     /* *pPresentationParameters->MultiSampleQuality            = localParameters.MultiSampleQuality; */
256     *pPresentationParameters->SwapEffect                    = localParameters.SwapEffect;
257     *pPresentationParameters->hDeviceWindow                 = localParameters.hDeviceWindow;
258     *pPresentationParameters->Windowed                      = localParameters.Windowed;
259     *pPresentationParameters->EnableAutoDepthStencil        = localParameters.EnableAutoDepthStencil;
260     *pPresentationParameters->AutoDepthStencilFormat        = localParameters.AutoDepthStencilFormat;
261     *pPresentationParameters->Flags                         = localParameters.Flags;
262     *pPresentationParameters->FullScreen_RefreshRateInHz    = localParameters.FullScreen_RefreshRateInHz;
263     /* d3d9 only */
264     /* *pPresentationParameters->PresentationInterval          = localParameters.PresentationInterval; */
265
266    return res;
267 }
268
269 /* Internal function called back during the CreateDevice to create a render target */
270 HRESULT WINAPI D3D8CB_CreateDepthStencilSurface(IUnknown *device, UINT Width, UINT Height,
271                                          WINED3DFORMAT Format, WINED3DMULTISAMPLE_TYPE MultiSample,
272                                          DWORD MultisampleQuality, BOOL Discard,
273                                          IWineD3DSurface** ppSurface, HANDLE* pSharedHandle) {
274     HRESULT res = D3D_OK;
275     IDirect3DSurface8Impl *d3dSurface = NULL;
276     TRACE("(%p) call back\n", device);
277
278     res = IDirect3DDevice8_CreateDepthStencilSurface((IDirect3DDevice8 *)device, Width, Height, 
279                                          (D3DFORMAT)Format, MultiSample, (IDirect3DSurface8 **)&d3dSurface);
280     if (SUCCEEDED(res)) {
281         *ppSurface = d3dSurface->wineD3DSurface;
282         IUnknown_Release(d3dSurface->parentDevice);
283         d3dSurface->parentDevice = NULL;
284     }
285     return res;
286 }
287
288 static HRESULT WINAPI IDirect3D8Impl_CreateDevice(LPDIRECT3D8 iface, UINT Adapter, D3DDEVTYPE DeviceType, HWND hFocusWindow,
289                                             DWORD BehaviourFlags, D3DPRESENT_PARAMETERS* pPresentationParameters,
290                                             IDirect3DDevice8** ppReturnedDeviceInterface) {
291
292     IDirect3D8Impl       *This   = (IDirect3D8Impl *)iface;
293     IDirect3DDevice8Impl *object = NULL;
294     WINED3DPRESENT_PARAMETERS localParameters;
295     HRESULT hr;
296     TRACE("(%p) Relay\n", This);
297
298     /* Check the validity range of the adapter parameter */
299     if (Adapter >= IDirect3D8Impl_GetAdapterCount(iface)) {
300         *ppReturnedDeviceInterface = NULL;
301         return D3DERR_INVALIDCALL;
302     }
303
304     /* Allocate the storage for the device object */
305     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirect3DDevice8Impl));
306     if (NULL == object) {
307         FIXME("Allocation of memory failed\n");
308         *ppReturnedDeviceInterface = NULL;
309         return D3DERR_OUTOFVIDEOMEMORY;
310     }
311
312     object->lpVtbl = &Direct3DDevice8_Vtbl;
313     object->ref = 1;
314     *ppReturnedDeviceInterface = (IDirect3DDevice8 *)object;
315
316     /* Allocate an associated WineD3DDevice object */
317     localParameters.BackBufferWidth                = &pPresentationParameters->BackBufferWidth;             
318     localParameters.BackBufferHeight               = &pPresentationParameters->BackBufferHeight;
319     localParameters.BackBufferFormat               = (WINED3DFORMAT *)&pPresentationParameters->BackBufferFormat;
320     localParameters.BackBufferCount                = &pPresentationParameters->BackBufferCount;
321     localParameters.MultiSampleType                = (WINED3DMULTISAMPLE_TYPE *) &pPresentationParameters->MultiSampleType;
322     /* d3d9 only */
323     localParameters.MultiSampleQuality             = NULL;
324     localParameters.SwapEffect                     = (WINED3DSWAPEFFECT *) &pPresentationParameters->SwapEffect;
325     localParameters.hDeviceWindow                  = &pPresentationParameters->hDeviceWindow;
326     localParameters.Windowed                       = &pPresentationParameters->Windowed;
327     localParameters.EnableAutoDepthStencil         = &pPresentationParameters->EnableAutoDepthStencil;
328     localParameters.AutoDepthStencilFormat         = (WINED3DFORMAT *)&pPresentationParameters->AutoDepthStencilFormat;
329     localParameters.Flags                          = &pPresentationParameters->Flags;
330     localParameters.FullScreen_RefreshRateInHz     = &pPresentationParameters->FullScreen_RefreshRateInHz;
331     localParameters.PresentationInterval           = &pPresentationParameters->FullScreen_PresentationInterval;/* Renamed in dx9 */
332
333     hr =IWineD3D_CreateDevice(This->WineD3D, Adapter, DeviceType, hFocusWindow, BehaviourFlags, &object->WineD3DDevice, (IUnknown *)object);
334
335     if (hr != D3D_OK) {
336         HeapFree(GetProcessHeap(), 0, object);
337         *ppReturnedDeviceInterface = NULL;
338         return hr;
339     }
340
341     TRACE("(%p) : Created Device %p\n", This, object);
342
343     hr = IWineD3DDevice_Init3D(object->WineD3DDevice, &localParameters, D3D8CB_CreateAdditionalSwapChain);
344     if (hr != D3D_OK) {
345         FIXME("(%p) D3D Initialization failed for WineD3DDevice %p\n", This, object->WineD3DDevice);
346         HeapFree(GetProcessHeap(), 0, object);
347         *ppReturnedDeviceInterface = NULL;
348     }
349
350     return hr;
351 }
352
353 const IDirect3D8Vtbl Direct3D8_Vtbl =
354 {
355     /* IUnknown */
356     IDirect3D8Impl_QueryInterface,
357     IDirect3D8Impl_AddRef,
358     IDirect3D8Impl_Release,
359     /* IDirect3D8 */
360     IDirect3D8Impl_RegisterSoftwareDevice,
361     IDirect3D8Impl_GetAdapterCount,
362     IDirect3D8Impl_GetAdapterIdentifier,
363     IDirect3D8Impl_GetAdapterModeCount,
364     IDirect3D8Impl_EnumAdapterModes,
365     IDirect3D8Impl_GetAdapterDisplayMode,
366     IDirect3D8Impl_CheckDeviceType,
367     IDirect3D8Impl_CheckDeviceFormat,
368     IDirect3D8Impl_CheckDeviceMultiSampleType,
369     IDirect3D8Impl_CheckDepthStencilMatch,
370     IDirect3D8Impl_GetDeviceCaps,
371     IDirect3D8Impl_GetAdapterMonitor,
372     IDirect3D8Impl_CreateDevice
373 };