setupapi: Implement SetupGetFileCompressionInfo on top of SetupGetFileCompressionInfoEx.
[wine] / dlls / ddraw / ddraw.c
1 /*
2  * Copyright 1997-2000 Marcus Meissner
3  * Copyright 1998-2000 Lionel Ulmer
4  * Copyright 2000-2001 TransGaming Technologies Inc.
5  * Copyright 2006 Stefan Dösinger
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 #include "wine/port.h"
24
25 #include <assert.h>
26 #include <stdarg.h>
27 #include <string.h>
28 #include <stdlib.h>
29
30 #define COBJMACROS
31 #define NONAMELESSUNION
32
33 #include "windef.h"
34 #include "winbase.h"
35 #include "winnls.h"
36 #include "winerror.h"
37 #include "wingdi.h"
38 #include "wine/exception.h"
39 #include "excpt.h"
40
41 #include "ddraw.h"
42 #include "d3d.h"
43
44 #include "ddraw_private.h"
45 #include "wine/debug.h"
46
47 WINE_DEFAULT_DEBUG_CHANNEL(ddraw);
48
49 static BOOL IDirectDrawImpl_DDSD_Match(const DDSURFACEDESC2* requested, const DDSURFACEDESC2* provided);
50 static HRESULT WINAPI IDirectDrawImpl_AttachD3DDevice(IDirectDrawImpl *This, IDirectDrawSurfaceImpl *primary);
51 static HRESULT WINAPI IDirectDrawImpl_CreateNewSurface(IDirectDrawImpl *This, DDSURFACEDESC2 *pDDSD, IDirectDrawSurfaceImpl **ppSurf, UINT level);
52
53 /* Device identifier. Don't relay it to WineD3D */
54 static const DDDEVICEIDENTIFIER2 deviceidentifier =
55 {
56     "display",
57     "DirectDraw HAL",
58     { { 0x00010001, 0x00010001 } },
59     0, 0, 0, 0,
60     /* a8373c10-7ac4-4deb-849a-009844d08b2d */
61     {0xa8373c10,0x7ac4,0x4deb, {0x84,0x9a,0x00,0x98,0x44,0xd0,0x8b,0x2d}},
62     0
63 };
64
65 /*****************************************************************************
66  * IUnknown Methods
67  *****************************************************************************/
68
69 /*****************************************************************************
70  * IDirectDraw7::QueryInterface
71  *
72  * Queries different interfaces of the DirectDraw object. It can return
73  * IDirectDraw interfaces in version 1, 2, 4 and 7, and IDirect3D interfaces
74  * in version 1, 2, 3 and 7. An IDirect3DDevice can be created with this
75  * method.
76  * The returned interface is AddRef()-ed before it's returned
77  *
78  * Rules for QueryInterface:
79  *  http://msdn.microsoft.com/library/default.asp? \
80  *    url=/library/en-us/com/html/6db17ed8-06e4-4bae-bc26-113176cc7e0e.asp
81  *
82  * Used for version 1, 2, 4 and 7
83  *
84  * Params:
85  *  refiid: Interface ID asked for
86  *  obj: Used to return the interface pointer
87  *
88  * Returns:
89  *  S_OK if an interface was found
90  *  E_NOINTERFACE if the requested interface wasn't found
91  *
92  *****************************************************************************/
93 static HRESULT WINAPI
94 IDirectDrawImpl_QueryInterface(IDirectDraw7 *iface,
95                                REFIID refiid,
96                                void **obj)
97 {
98     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
99
100     TRACE("(%p)->(%s,%p)\n", This, debugstr_guid(refiid), obj);
101
102     /* According to COM docs, if the QueryInterface fails, obj should be set to NULL */
103     *obj = NULL;
104
105     if(!refiid)
106         return DDERR_INVALIDPARAMS;
107
108     /* Check DirectDraw Interfaces */
109     if ( IsEqualGUID( &IID_IUnknown, refiid ) ||
110          IsEqualGUID( &IID_IDirectDraw7, refiid ) )
111     {
112         *obj = ICOM_INTERFACE(This, IDirectDraw7);
113         TRACE("(%p) Returning IDirectDraw7 interface at %p\n", This, *obj);
114     }
115     else if ( IsEqualGUID( &IID_IDirectDraw4, refiid ) )
116     {
117         *obj = ICOM_INTERFACE(This, IDirectDraw4);
118         TRACE("(%p) Returning IDirectDraw4 interface at %p\n", This, *obj);
119     }
120     else if ( IsEqualGUID( &IID_IDirectDraw3, refiid ) )
121     {
122         *obj = ICOM_INTERFACE(This, IDirectDraw3);
123         TRACE("(%p) Returning IDirectDraw3 interface at %p\n", This, *obj);
124     }
125     else if ( IsEqualGUID( &IID_IDirectDraw2, refiid ) )
126     {
127         *obj = ICOM_INTERFACE(This, IDirectDraw2);
128         TRACE("(%p) Returning IDirectDraw2 interface at %p\n", This, *obj);
129     }
130     else if ( IsEqualGUID( &IID_IDirectDraw, refiid ) )
131     {
132         *obj = ICOM_INTERFACE(This, IDirectDraw);
133         TRACE("(%p) Returning IDirectDraw interface at %p\n", This, *obj);
134     }
135
136     /* Direct3D
137      * The refcount unit test revealed that an IDirect3D7 interface can only be queried
138      * from a DirectDraw object that was created as an IDirectDraw7 interface. No idea
139      * who had this idea and why. The older interfaces can query and IDirect3D version
140      * because they are all created as IDirectDraw(1). This isn't really crucial behavior,
141      * and messy to implement with the common creation function, so it has been left out here.
142      */
143     else if ( IsEqualGUID( &IID_IDirect3D  , refiid ) ||
144               IsEqualGUID( &IID_IDirect3D2 , refiid ) ||
145               IsEqualGUID( &IID_IDirect3D3 , refiid ) ||
146               IsEqualGUID( &IID_IDirect3D7 , refiid ) )
147     {
148         /* Check the surface implementation */
149         if(This->ImplType == SURFACE_UNKNOWN)
150         {
151             /* Apps may create the IDirect3D Interface before the primary surface.
152              * set the surface implementation */
153             This->ImplType = SURFACE_OPENGL;
154             TRACE("(%p) Choosing OpenGL surfaces because a Direct3D interface was requested\n", This);
155         }
156         else if(This->ImplType != SURFACE_OPENGL && DefaultSurfaceType == SURFACE_UNKNOWN)
157         {
158             ERR("(%p) The App is requesting a D3D device, but a non-OpenGL surface type was choosen. Prepare for trouble!\n", This);
159             ERR(" (%p) You may want to contact wine-devel for help\n", This);
160             /* Should I assert(0) here??? */
161         }
162         else if(This->ImplType != SURFACE_OPENGL)
163         {
164             WARN("The app requests a Direct3D interface, but non-opengl surfaces where set in winecfg\n");
165             /* Do not abort here, only reject 3D Device creation */
166         }
167
168         if ( IsEqualGUID( &IID_IDirect3D  , refiid ) )
169         {
170             This->d3dversion = 1;
171             *obj = ICOM_INTERFACE(This, IDirect3D);
172             TRACE(" returning Direct3D interface at %p.\n", *obj);
173         }
174         else if ( IsEqualGUID( &IID_IDirect3D2  , refiid ) )
175         {
176             This->d3dversion = 2;
177             *obj = ICOM_INTERFACE(This, IDirect3D2);
178             TRACE(" returning Direct3D2 interface at %p.\n", *obj);
179         }
180         else if ( IsEqualGUID( &IID_IDirect3D3  , refiid ) )
181         {
182             This->d3dversion = 3;
183             *obj = ICOM_INTERFACE(This, IDirect3D3);
184             TRACE(" returning Direct3D3 interface at %p.\n", *obj);
185         }
186         else if(IsEqualGUID( &IID_IDirect3D7  , refiid ))
187         {
188             This->d3dversion = 7;
189             *obj = ICOM_INTERFACE(This, IDirect3D7);
190             TRACE(" returning Direct3D7 interface at %p.\n", *obj);
191         }
192     }
193
194     /* Unknown interface */
195     else
196     {
197         ERR("(%p)->(%s, %p): No interface found\n", This, debugstr_guid(refiid), obj);
198         return E_NOINTERFACE;
199     }
200
201     IUnknown_AddRef( (IUnknown *) *obj );
202     return S_OK;
203 }
204
205 /*****************************************************************************
206  * IDirectDraw7::AddRef
207  *
208  * Increases the interfaces refcount, basically
209  *
210  * DDraw refcounting is a bit tricky. The different DirectDraw interface
211  * versions have individual refcounts, but the IDirect3D interfaces do not.
212  * All interfaces are from one object, that means calling QueryInterface on an
213  * IDirectDraw7 interface for an IDirectDraw4 interface does not create a new
214  * IDirectDrawImpl object.
215  *
216  * That means all AddRef and Release implementations of IDirectDrawX work
217  * with their own counter, and IDirect3DX::AddRef thunk to IDirectDraw (1),
218  * except of IDirect3D7 which thunks to IDirectDraw7
219  *
220  * Returns: The new refcount
221  *
222  *****************************************************************************/
223 static ULONG WINAPI
224 IDirectDrawImpl_AddRef(IDirectDraw7 *iface)
225 {
226     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
227     ULONG ref = InterlockedIncrement(&This->ref7);
228
229     TRACE("(%p) : incrementing IDirectDraw7 refcount from %u.\n", This, ref -1);
230
231     if(ref == 1) InterlockedIncrement(&This->numIfaces);
232
233     return ref;
234 }
235
236 /*****************************************************************************
237  * IDirectDrawImpl_Destroy
238  *
239  * Destroys a ddraw object if all refcounts are 0. This is to share code
240  * between the IDirectDrawX::Release functions
241  *
242  * Params:
243  *  This: DirectDraw object to destroy
244  *
245  *****************************************************************************/
246 void
247 IDirectDrawImpl_Destroy(IDirectDrawImpl *This)
248 {
249     /* Clear the cooplevel to restore window and display mode */
250     IDirectDraw7_SetCooperativeLevel(ICOM_INTERFACE(This, IDirectDraw7),
251                                         NULL,
252                                         DDSCL_NORMAL);
253
254     /* Destroy the device window if we created one */
255     if(This->devicewindow != 0)
256     {
257         TRACE(" (%p) Destroying the device window %p\n", This, This->devicewindow);
258         DestroyWindow(This->devicewindow);
259         This->devicewindow = 0;
260     }
261
262     /* Unregister the window class */
263     UnregisterClassA(This->classname, 0);
264
265     remove_ddraw_object(This);
266
267     /* Release the attached WineD3D stuff */
268     IWineD3DDevice_Release(This->wineD3DDevice);
269     IWineD3D_Release(This->wineD3D);
270
271     /* Now free the object */
272     HeapFree(GetProcessHeap(), 0, This);
273 }
274
275 /*****************************************************************************
276  * IDirectDraw7::Release
277  *
278  * Decreases the refcount. If the refcount falls to 0, the object is destroyed
279  *
280  * Returns: The new refcount
281  *****************************************************************************/
282 static ULONG WINAPI
283 IDirectDrawImpl_Release(IDirectDraw7 *iface)
284 {
285     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
286     ULONG ref = InterlockedDecrement(&This->ref7);
287
288     TRACE("(%p)->() decrementing IDirectDraw7 refcount from %u.\n", This, ref +1);
289
290     if(ref == 0)
291     {
292         ULONG ifacecount = InterlockedDecrement(&This->numIfaces);
293         if(ifacecount == 0) IDirectDrawImpl_Destroy(This);
294     }
295
296     return ref;
297 }
298
299 /*****************************************************************************
300  * IDirectDraw methods
301  *****************************************************************************/
302
303 /*****************************************************************************
304  * IDirectDraw7::SetCooperativeLevel
305  *
306  * Sets the cooperative level for the DirectDraw object, and the window
307  * assigned to it. The cooperative level determines the general behavior
308  * of the DirectDraw application
309  *
310  * Warning: This is quite tricky, as it's not really documented which
311  * cooperative levels can be combined with each other. If a game fails
312  * after this function, try to check the cooperative levels passed on
313  * Windows, and if it returns something different.
314  *
315  * If you think that this function caused the failure because it writes a
316  * fixme, be sure to run again with a +ddraw trace.
317  *
318  * What is known about cooperative levels (See the ddraw modes test):
319  * DDSCL_EXCLUSIVE and DDSCL_FULLSCREEN must be used with each other
320  * DDSCL_NORMAL is not compatible with DDSCL_EXCLUSIVE or DDSCL_FULLSCREEN
321  * DDSCL_SETFOCUSWINDOW can be passed only in DDSCL_NORMAL mode, but after that
322  * DDSCL_FULLSCREEN can be activated
323  * DDSCL_SETFOCUSWINDOW may only be used with DDSCL_NOWINDOWCHANGES
324  *
325  * Handled flags: DDSCL_NORMAL, DDSCL_FULLSCREEN, DDSCL_EXCLUSIVE,
326  *                DDSCL_SETFOCUSWINDOW (partially),
327  *                DDSCL_MULTITHREADED (work in progress)
328  *
329  * Unhandled flags, which should be implemented
330  *  DDSCL_SETDEVICEWINDOW: Sets a window specially used for rendering (I don't
331  *  expect any difference to a normal window for wine)
332  *  DDSCL_CREATEDEVICEWINDOW: Tells ddraw to create its own window for
333  *  rendering (Possible test case: Half-life)
334  *
335  * Unsure about these: DDSCL_FPUSETUP DDSCL_FPURESERVE
336  *
337  * These seem not really imporant for wine
338  *  DDSCL_ALLOWREBOOT, DDSCL_NOWINDOWCHANGES, DDSCL_ALLOWMODEX
339  *
340  * Returns:
341  *  DD_OK if the cooperative level was set successfully
342  *  DDERR_INVALIDPARAMS if the passed cooperative level combination is invalid
343  *  DDERR_HWNDALREADYSET if DDSCL_SETFOCUSWINDOW is passed in exclusive mode
344  *   (Probably others too, have to investigate)
345  *
346  *****************************************************************************/
347 static HRESULT WINAPI
348 IDirectDrawImpl_SetCooperativeLevel(IDirectDraw7 *iface,
349                                     HWND hwnd,
350                                     DWORD cooplevel)
351 {
352     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
353     HWND window;
354     HRESULT hr;
355
356     FIXME("(%p)->(%p,%08x)\n",This,hwnd,cooplevel);
357     DDRAW_dump_cooperativelevel(cooplevel);
358
359     /* Get the old window */
360     hr = IWineD3DDevice_GetHWND(This->wineD3DDevice, &window);
361     if(hr != D3D_OK)
362     {
363         ERR("IWineD3DDevice::GetHWND failed, hr = %08x\n", hr);
364         return hr;
365     }
366
367     /* Tests suggest that we need one of them: */
368     if(!(cooplevel & (DDSCL_SETFOCUSWINDOW |
369                       DDSCL_NORMAL         |
370                       DDSCL_EXCLUSIVE      )))
371     {
372         TRACE("Incorrect cooplevel flags, returning DDERR_INVALIDPARAMS\n");
373         return DDERR_INVALIDPARAMS;
374     }
375
376     /* Handle those levels first which set various hwnds */
377     if(cooplevel & DDSCL_SETFOCUSWINDOW)
378     {
379         /* This isn't compatible with a lot of flags */
380         if(cooplevel & ( DDSCL_MULTITHREADED   |
381                          DDSCL_FPUSETUP        |
382                          DDSCL_FPUPRESERVE     |
383                          DDSCL_ALLOWREBOOT     |
384                          DDSCL_ALLOWMODEX      |
385                          DDSCL_SETDEVICEWINDOW |
386                          DDSCL_NORMAL          |
387                          DDSCL_EXCLUSIVE       |
388                          DDSCL_FULLSCREEN      ) )
389         {
390             TRACE("Called with incompatible flags, returning DDERR_INVALIDPARAMS\n");
391             return DDERR_INVALIDPARAMS;
392         }
393         else if( (This->cooperative_level & DDSCL_FULLSCREEN) && window)
394         {
395             TRACE("Setting DDSCL_SETFOCUSWINDOW with an already set window, returning DDERR_HWNDALREADYSET\n");
396             return DDERR_HWNDALREADYSET;
397         }
398
399         This->focuswindow = hwnd;
400         /* Won't use the hwnd param for anything else */
401         hwnd = NULL;
402
403         /* Use the focus window for drawing too */
404         IWineD3DDevice_SetHWND(This->wineD3DDevice, This->focuswindow);
405
406         /* Destroy the device window, if we have one */
407         if(This->devicewindow)
408         {
409             DestroyWindow(This->devicewindow);
410             This->devicewindow = NULL;
411         }
412     }
413     /* DDSCL_NORMAL or DDSCL_FULLSCREEN | DDSCL_EXCLUSIVE */
414     if(cooplevel & DDSCL_NORMAL)
415     {
416         /* Can't coexist with fullscreen or exclusive */
417         if(cooplevel & (DDSCL_FULLSCREEN | DDSCL_EXCLUSIVE) )
418         {
419             TRACE("(%p) DDSCL_NORMAL is not compative with DDSCL_FULLSCREEN or DDSCL_EXCLUSIVE\n", This);
420             return DDERR_INVALIDPARAMS;
421         }
422
423         /* Switching from fullscreen? */
424         if(This->cooperative_level & DDSCL_FULLSCREEN)
425         {
426             /* Restore the display mode */
427             IDirectDraw7_RestoreDisplayMode(iface);
428
429             This->cooperative_level &= ~DDSCL_FULLSCREEN;
430             This->cooperative_level &= ~DDSCL_EXCLUSIVE;
431             This->cooperative_level &= ~DDSCL_ALLOWMODEX;
432         }
433
434         /* Don't override focus windows or private device windows */
435         if( hwnd &&
436             !(This->focuswindow) &&
437             !(This->devicewindow) &&
438             (hwnd != window) )
439         {
440             IWineD3DDevice_SetHWND(This->wineD3DDevice, hwnd);
441         }
442
443         IWineD3DDevice_SetFullscreen(This->wineD3DDevice,
444                                      FALSE);
445     }
446     else if(cooplevel & DDSCL_FULLSCREEN)
447     {
448         /* Needs DDSCL_EXCLUSIVE */
449         if(!(cooplevel & DDSCL_EXCLUSIVE) )
450         {
451             TRACE("(%p) DDSCL_FULLSCREEN needs DDSCL_EXCLUSIVE\n", This);
452             return DDERR_INVALIDPARAMS;
453         }
454         /* Need a HWND
455         if(hwnd == 0)
456         {
457             TRACE("(%p) DDSCL_FULLSCREEN needs a HWND\n", This);
458             return DDERR_INVALIDPARAMS;
459         }
460         */
461
462         /* Switch from normal to full screen mode? */
463         if(This->cooperative_level & DDSCL_NORMAL)
464         {
465             This->cooperative_level &= ~DDSCL_NORMAL;
466             IWineD3DDevice_SetFullscreen(This->wineD3DDevice,
467                                          TRUE);
468         }
469
470         /* Don't override focus windows or private device windows */
471         if( hwnd &&
472             !(This->focuswindow) &&
473             !(This->devicewindow) &&
474             (hwnd != window) )
475         {
476             IWineD3DDevice_SetHWND(This->wineD3DDevice, hwnd);
477         }
478     }
479     else if(cooplevel & DDSCL_EXCLUSIVE)
480     {
481         TRACE("(%p) DDSCL_EXCLUSIVE needs DDSCL_FULLSCREEN\n", This);
482         return DDERR_INVALIDPARAMS;
483     }
484
485     if(cooplevel & DDSCL_CREATEDEVICEWINDOW)
486     {
487         /* Don't create a device window if a focus window is set */
488         if( !(This->focuswindow) )
489         {
490             HWND devicewindow = CreateWindowExA(0, This->classname, "DDraw device window",
491                                                 WS_POPUP, 0, 0,
492                                                 GetSystemMetrics(SM_CXSCREEN),
493                                                 GetSystemMetrics(SM_CYSCREEN),
494                                                 NULL, NULL, GetModuleHandleA(0), NULL);
495
496             ShowWindow(devicewindow, SW_SHOW);   /* Just to be sure */
497             TRACE("(%p) Created a DDraw device window. HWND=%p\n", This, devicewindow);
498
499             IWineD3DDevice_SetHWND(This->wineD3DDevice, devicewindow);
500             This->devicewindow = devicewindow;
501         }
502     }
503
504     if(cooplevel & DDSCL_MULTITHREADED && !(This->cooperative_level & DDSCL_MULTITHREADED))
505     {
506         FIXME("DirectDraw is not thread safe yet\n");
507
508         /* Enable thread safety in wined3d */
509         IWineD3DDevice_SetMultithreaded(This->wineD3DDevice);
510     }
511
512     /* Unhandled flags */
513     if(cooplevel & DDSCL_ALLOWREBOOT)
514         WARN("(%p) Unhandled flag DDSCL_ALLOWREBOOT, harmless\n", This);
515     if(cooplevel & DDSCL_ALLOWMODEX)
516         WARN("(%p) Unhandled flag DDSCL_ALLOWMODEX, harmless\n", This);
517     if(cooplevel & DDSCL_FPUSETUP)
518         WARN("(%p) Unhandled flag DDSCL_FPUSETUP, harmless\n", This);
519     if(cooplevel & DDSCL_FPUPRESERVE)
520         WARN("(%p) Unhandled flag DDSCL_FPUPRESERVE, harmless\n", This);
521
522     /* Store the cooperative_level */
523     This->cooperative_level |= cooplevel;
524     TRACE("SetCooperativeLevel retuning DD_OK\n");
525     return DD_OK;
526 }
527
528 /*****************************************************************************
529  * IDirectDraw7::SetDisplayMode
530  *
531  * Sets the display screen resolution, color depth and refresh frequency
532  * when in fullscreen mode (in theory).
533  * Possible return values listed in the SDK suggest that this method fails
534  * when not in fullscreen mode, but this is wrong. Windows 2000 happily sets
535  * the display mode in DDSCL_NORMAL mode without an hwnd specified.
536  * It seems to be valid to pass 0 for With and Height, this has to be tested
537  * It could mean that the current video mode should be left as-is. (But why
538  * call it then?)
539  *
540  * Params:
541  *  Height, Width: Screen dimension
542  *  BPP: Color depth in Bits per pixel
543  *  Refreshrate: Screen refresh rate
544  *  Flags: Other stuff
545  *
546  * Returns
547  *  DD_OK on success
548  *
549  *****************************************************************************/
550 static HRESULT WINAPI
551 IDirectDrawImpl_SetDisplayMode(IDirectDraw7 *iface,
552                                DWORD Width,
553                                DWORD Height,
554                                DWORD BPP,
555                                DWORD RefreshRate,
556                                DWORD Flags)
557 {
558     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
559     WINED3DDISPLAYMODE Mode;
560     TRACE("(%p)->(%d,%d,%d,%d,%x: Relay!\n", This, Width, Height, BPP, RefreshRate, Flags);
561
562     if( !Width || !Height )
563     {
564         ERR("Width=%d, Height=%d, what to do?\n", Width, Height);
565         /* It looks like Need for Speed Porsche Unleashed expects DD_OK here */
566         return DD_OK;
567     }
568
569     /* Check the exclusive mode
570     if(!(This->cooperative_level & DDSCL_EXCLUSIVE))
571         return DDERR_NOEXCLUSIVEMODE;
572      * This is WRONG. Don't know if the SDK is completely
573      * wrong and if there are any conditions when DDERR_NOEXCLUSIVE
574      * is returned, but Half-Life 1.1.1.1 (Steam version)
575      * depends on this
576      */
577
578     Mode.Width = Width;
579     Mode.Height = Height;
580     Mode.RefreshRate = RefreshRate;
581     switch(BPP)
582     {
583         case 8:  Mode.Format = WINED3DFMT_P8;       break;
584         case 15: Mode.Format = WINED3DFMT_X1R5G5B5; break;
585         case 16: Mode.Format = WINED3DFMT_R5G6B5;   break;
586         case 24: Mode.Format = WINED3DFMT_R8G8B8;   break;
587         case 32: Mode.Format = WINED3DFMT_A8R8G8B8; break;
588     }
589
590     /* TODO: The possible return values from msdn suggest that
591      * the screen mode can't be changed if a surface is locked
592      * or some drawing is in progress
593      */
594
595     /* TODO: Lose the primary surface */
596     return IWineD3DDevice_SetDisplayMode(This->wineD3DDevice,
597                                          0, /* First swapchain */
598                                          &Mode);
599
600 }
601
602 /*****************************************************************************
603  * IDirectDraw7::RestoreDisplayMode
604  *
605  * Restores the display mode to what it was at creation time. Basically.
606  *
607  * A problem arises when there are 2 DirectDraw objects using the same hwnd:
608  *  -> DD_1 finds the screen at 1400x1050x32 when created, sets it to 640x480x16
609  *  -> DD_2 is created, finds the screen at 640x480x16, sets it to 1024x768x32
610  *  -> DD_1 is released. The screen should be left at 1024x768x32.
611  *  -> DD_2 is released. The screen should be set to 1400x1050x32
612  * This case is unhandled right now, but Empire Earth does it this way.
613  * (But perhaps there is something in SetCooperativeLevel to prevent this)
614  *
615  * The msdn says that this method resets the display mode to what it was before
616  * SetDisplayMode was called. What if SetDisplayModes is called 2 times??
617  *
618  * Returns
619  *  DD_OK on success
620  *  DDERR_NOEXCLUSIVE mode if the device isn't in fullscreen mode
621  *
622  *****************************************************************************/
623 static HRESULT WINAPI
624 IDirectDrawImpl_RestoreDisplayMode(IDirectDraw7 *iface)
625 {
626     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
627     TRACE("(%p)\n", This);
628
629     return IDirectDraw7_SetDisplayMode(ICOM_INTERFACE(This, IDirectDraw7),
630                                        This->orig_width,
631                                        This->orig_height,
632                                        This->orig_bpp,
633                                        0,
634                                        0);
635 }
636
637 /*****************************************************************************
638  * IDirectDraw7::GetCaps
639  *
640  * Returns the drives capabilities
641  *
642  * Used for version 1, 2, 4 and 7
643  *
644  * Params:
645  *  DriverCaps: Structure to write the Hardware accelerated caps to
646  *  HelCaps: Structure to write the emulation caps to
647  *
648  * Returns
649  *  This implementation returns DD_OK only
650  *
651  *****************************************************************************/
652 static HRESULT WINAPI
653 IDirectDrawImpl_GetCaps(IDirectDraw7 *iface,
654                         DDCAPS *DriverCaps,
655                         DDCAPS *HELCaps)
656 {
657     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
658     TRACE("(%p)->(%p,%p)\n", This, DriverCaps, HELCaps);
659
660     /* One structure must be != NULL */
661     if( (!DriverCaps) && (!HELCaps) )
662     {
663         ERR("(%p) Invalid params to IDirectDrawImpl_GetCaps\n", This);
664         return DDERR_INVALIDPARAMS;
665     }
666
667     if(DriverCaps)
668     {
669         DD_STRUCT_COPY_BYSIZE(DriverCaps, &This->caps);
670         if (TRACE_ON(ddraw))
671         {
672             TRACE("Driver Caps :\n");
673             DDRAW_dump_DDCAPS(DriverCaps);
674         }
675
676     }
677     if(HELCaps)
678     {
679         DD_STRUCT_COPY_BYSIZE(HELCaps, &This->caps);
680         if (TRACE_ON(ddraw))
681         {
682             TRACE("HEL Caps :\n");
683             DDRAW_dump_DDCAPS(HELCaps);
684         }
685     }
686
687     return DD_OK;
688 }
689
690 /*****************************************************************************
691  * IDirectDraw7::Compact
692  *
693  * No idea what it does, MSDN says it's not implemented.
694  *
695  * Returns
696  *  DD_OK, but this is unchecked
697  *
698  *****************************************************************************/
699 static HRESULT WINAPI
700 IDirectDrawImpl_Compact(IDirectDraw7 *iface)
701 {
702     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
703     TRACE("(%p)\n", This);
704
705     return DD_OK;
706 }
707
708 /*****************************************************************************
709  * IDirectDraw7::GetDisplayMode
710  *
711  * Returns information about the current display mode
712  *
713  * Exists in Version 1, 2, 4 and 7
714  *
715  * Params:
716  *  DDSD: Address of a surface description structure to write the info to
717  *
718  * Returns
719  *  DD_OK
720  *
721  *****************************************************************************/
722 static HRESULT WINAPI
723 IDirectDrawImpl_GetDisplayMode(IDirectDraw7 *iface,
724                                DDSURFACEDESC2 *DDSD)
725 {
726     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
727     HRESULT hr;
728     WINED3DDISPLAYMODE Mode;
729     DWORD Size;
730     TRACE("(%p)->(%p): Relay\n", This, DDSD);
731
732     /* This seems sane */
733     if(!DDSD) 
734     {
735         return DDERR_INVALIDPARAMS;
736     }
737
738     /* The necessary members of LPDDSURFACEDESC and LPDDSURFACEDESC2 are equal,
739      * so one method can be used for all versions (Hopefully)
740      */
741     hr = IWineD3DDevice_GetDisplayMode(This->wineD3DDevice,
742                                       0 /* swapchain 0 */,
743                                       &Mode);
744     if( hr != D3D_OK )
745     {
746         ERR(" (%p) IWineD3DDevice::GetDisplayMode returned %08x\n", This, hr);
747         return hr;
748     }
749
750     Size = DDSD->dwSize;
751     memset(DDSD, 0, Size);
752
753     DDSD->dwSize = Size;
754     DDSD->dwFlags |= DDSD_HEIGHT | DDSD_WIDTH | DDSD_PIXELFORMAT | DDSD_PITCH | DDSD_REFRESHRATE;
755     DDSD->dwWidth = Mode.Width;
756     DDSD->dwHeight = Mode.Height; 
757     DDSD->u2.dwRefreshRate = 60;
758     DDSD->ddsCaps.dwCaps = 0;
759     DDSD->u4.ddpfPixelFormat.dwSize = sizeof(DDSD->u4.ddpfPixelFormat);
760     PixelFormat_WineD3DtoDD(&DDSD->u4.ddpfPixelFormat, Mode.Format);
761     DDSD->u1.lPitch = Mode.Width * DDSD->u4.ddpfPixelFormat.u1.dwRGBBitCount / 8;
762
763     if(TRACE_ON(ddraw))
764     {
765         TRACE("Returning surface desc :\n");
766         DDRAW_dump_surface_desc(DDSD);
767     }
768
769     return DD_OK;
770 }
771
772 /*****************************************************************************
773  * IDirectDraw7::GetFourCCCodes
774  *
775  * Returns an array of supported FourCC codes.
776  *
777  * Exists in Version 1, 2, 4 and 7
778  *
779  * Params:
780  *  NumCodes: Contains the number of Codes that Codes can carry. Returns the number
781  *            of enumerated codes
782  *  Codes: Pointer to an array of DWORDs where the supported codes are written
783  *         to
784  *
785  * Returns
786  *  Always returns DD_OK, as it's a stub for now
787  *
788  *****************************************************************************/
789 static HRESULT WINAPI
790 IDirectDrawImpl_GetFourCCCodes(IDirectDraw7 *iface,
791                                DWORD *NumCodes, DWORD *Codes)
792 {
793     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
794     FIXME("(%p)->(%p, %p): Stub!\n", This, NumCodes, Codes);
795
796     if(NumCodes) *NumCodes = 0;
797
798     return DD_OK;
799 }
800
801 /*****************************************************************************
802  * IDirectDraw7::GetMonitorFrequency
803  *
804  * Returns the monitor's frequency
805  *
806  * Exists in Version 1, 2, 4 and 7
807  *
808  * Params:
809  *  Freq: Pointer to a DWORD to write the frequency to
810  *
811  * Returns
812  *  Always returns DD_OK
813  *
814  *****************************************************************************/
815 static HRESULT WINAPI
816 IDirectDrawImpl_GetMonitorFrequency(IDirectDraw7 *iface,
817                                     DWORD *Freq)
818 {
819     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
820     TRACE("(%p)->(%p)\n", This, Freq);
821
822     /* Ideally this should be in WineD3D, as it concerns the screen setup,
823      * but for now this should make the games happy
824      */
825     *Freq = 60;
826     return DD_OK;
827 }
828
829 /*****************************************************************************
830  * IDirectDraw7::GetVerticalBlankStatus
831  *
832  * Returns the Vertical blank status of the monitor. This should be in WineD3D
833  * too basically, but as it's a semi stub, I didn't create a function there
834  *
835  * Params:
836  *  status: Pointer to a BOOL to be filled with the vertical blank status
837  *
838  * Returns
839  *  DD_OK on success
840  *  DDERR_INVALIDPARAMS if status is NULL
841  *
842  *****************************************************************************/
843 static HRESULT WINAPI
844 IDirectDrawImpl_GetVerticalBlankStatus(IDirectDraw7 *iface,
845                                        BOOL *status)
846 {
847     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
848     TRACE("(%p)->(%p)\n", This, status);
849
850     /* This looks sane, the MSDN suggests it too */
851     if(!status) return DDERR_INVALIDPARAMS;
852
853     *status = This->fake_vblank;
854     This->fake_vblank = !This->fake_vblank;
855     return DD_OK;
856 }
857
858 /*****************************************************************************
859  * IDirectDraw7::GetAvailableVidMem
860  *
861  * Returns the total and free video memory
862  *
863  * Params:
864  *  Caps: Specifies the memory type asked for
865  *  total: Pointer to a DWORD to be filled with the total memory
866  *  free: Pointer to a DWORD to be filled with the free memory
867  *
868  * Returns
869  *  DD_OK on success
870  *  DDERR_INVALIDPARAMS of free and total are NULL
871  *
872  *****************************************************************************/
873 static HRESULT WINAPI
874 IDirectDrawImpl_GetAvailableVidMem(IDirectDraw7 *iface, DDSCAPS2 *Caps, DWORD *total, DWORD *free)
875 {
876     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
877     TRACE("(%p)->(%p, %p, %p)\n", This, Caps, total, free);
878
879     if(TRACE_ON(ddraw))
880     {
881         TRACE("(%p) Asked for memory with description: ", This);
882         DDRAW_dump_DDSCAPS2(Caps);
883         TRACE("\n");
884     }
885
886     /* Todo: System memory vs local video memory vs non-local video memory
887      * The MSDN also mentions differences between texture memory and other
888      * resources, but that's not important
889      */
890
891     if( (!total) && (!free) ) return DDERR_INVALIDPARAMS;
892
893     if(total) *total = This->total_vidmem;
894     if(free) *free = IWineD3DDevice_GetAvailableTextureMem(This->wineD3DDevice);
895
896     return DD_OK;
897 }
898
899 /*****************************************************************************
900  * IDirectDraw7::Initialize
901  *
902  * Initializes a DirectDraw interface.
903  *
904  * Params:
905  *  GUID: Interface identifier. Well, don't know what this is really good
906  *   for
907  *
908  * Returns
909  *  Returns DD_OK on the first call,
910  *  DDERR_ALREADYINITIALIZED on repeated calls
911  *
912  *****************************************************************************/
913 static HRESULT WINAPI
914 IDirectDrawImpl_Initialize(IDirectDraw7 *iface,
915                            GUID *Guid)
916 {
917     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
918     TRACE("(%p)->(%s): No-op\n", This, debugstr_guid(Guid));
919
920     if(This->initialized)
921     {
922         return DDERR_ALREADYINITIALIZED;
923     }
924     else
925     {
926         return DD_OK;
927     }
928 }
929
930 /*****************************************************************************
931  * IDirectDraw7::FlipToGDISurface
932  *
933  * "Makes the surface that the GDI writes to the primary surface"
934  * Looks like some windows specific thing we don't have to care about.
935  * According to MSDN it permits GDI dialog boxes in FULLSCREEN mode. Good to
936  * show error boxes ;)
937  * Well, just return DD_OK.
938  *
939  * Returns:
940  *  Always returns DD_OK
941  *
942  *****************************************************************************/
943 static HRESULT WINAPI
944 IDirectDrawImpl_FlipToGDISurface(IDirectDraw7 *iface)
945 {
946     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
947     TRACE("(%p)\n", This);
948
949     return DD_OK;
950 }
951
952 /*****************************************************************************
953  * IDirectDraw7::WaitForVerticalBlank
954  *
955  * This method allows applications to get in sync with the vertical blank
956  * interval.
957  * The wormhole demo in the DirectX 7 sdk uses this call, and it doesn't
958  * redraw the screen, most likely because of this stub
959  *
960  * Parameters:
961  *  Flags: one of DDWAITVB_BLOCKBEGIN, DDWAITVB_BLOCKBEGINEVENT
962  *         or DDWAITVB_BLOCKEND
963  *  h: Not used, according to MSDN
964  *
965  * Returns:
966  *  Always returns DD_OK
967  *
968  *****************************************************************************/ 
969 static HRESULT WINAPI
970 IDirectDrawImpl_WaitForVerticalBlank(IDirectDraw7 *iface,
971                                      DWORD Flags,
972                                      HANDLE h)
973 {
974     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
975     FIXME("(%p)->(%x,%p): Stub\n", This, Flags, h);
976
977     /* MSDN says DDWAITVB_BLOCKBEGINEVENT is not supported */
978     if(Flags & DDWAITVB_BLOCKBEGINEVENT)
979         return DDERR_UNSUPPORTED; /* unchecked */
980
981     return DD_OK;
982 }
983
984 /*****************************************************************************
985  * IDirectDraw7::GetScanLine
986  *
987  * Returns the scan line that is being drawn on the monitor
988  *
989  * Parameters:
990  *  Scanline: Address to write the scan line value to
991  *
992  * Returns:
993  *  Always returns DD_OK
994  *
995  *****************************************************************************/ 
996 static HRESULT WINAPI IDirectDrawImpl_GetScanLine(IDirectDraw7 *iface, DWORD *Scanline)
997 {
998     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
999     static BOOL hide = FALSE;
1000     WINED3DDISPLAYMODE Mode;
1001
1002     /* This function is called often, so print the fixme only once */
1003     if(!hide)
1004     {
1005         FIXME("(%p)->(%p): Semi-Stub\n", This, Scanline);
1006         hide = TRUE;
1007     }
1008
1009     IWineD3DDevice_GetDisplayMode(This->wineD3DDevice,
1010                                   0,
1011                                   &Mode);
1012
1013     /* Fake the line sweeping of the monitor */
1014     /* FIXME: We should synchronize with a source to keep the refresh rate */ 
1015     *Scanline = This->cur_scanline++;
1016     /* Assume 20 scan lines in the vertical blank */
1017     if (This->cur_scanline >= Mode.Height + 20)
1018         This->cur_scanline = 0;
1019
1020     return DD_OK;
1021 }
1022
1023 /*****************************************************************************
1024  * IDirectDraw7::TestCooperativeLevel
1025  *
1026  * Informs the application about the state of the video adapter, depending
1027  * on the cooperative level
1028  *
1029  * Returns:
1030  *  DD_OK if the device is in a sane state
1031  *  DDERR_NOEXCLUSIVEMODE or DDERR_EXCLUSIVEMODEALREADYSET
1032  *  if the state is not correct(See below)
1033  *
1034  *****************************************************************************/ 
1035 static HRESULT WINAPI
1036 IDirectDrawImpl_TestCooperativeLevel(IDirectDraw7 *iface)
1037 {
1038     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
1039     HRESULT hr;
1040     TRACE("(%p)\n", This);
1041
1042     /* Description from MSDN:
1043      * For fullscreen apps return DDERR_NOEXCLUSIVEMODE if the user switched
1044      * away from the app with e.g. alt-tab. Windowed apps receive 
1045      * DDERR_EXCLUSIVEMODEALREADYSET if another application created a 
1046      * DirectDraw object in exclusive mode. DDERR_WRONGMODE is returned,
1047      * when the video mode has changed
1048      */
1049
1050     hr =  IWineD3DDevice_TestCooperativeLevel(This->wineD3DDevice);
1051
1052     /* Fix the result value. These values are mapped from their
1053      * d3d9 counterpart.
1054      */
1055     switch(hr)
1056     {
1057         case WINED3DERR_DEVICELOST:
1058             if(This->cooperative_level & DDSCL_EXCLUSIVE)
1059             {
1060                 return DDERR_NOEXCLUSIVEMODE;
1061             }
1062             else
1063             {
1064                 return DDERR_EXCLUSIVEMODEALREADYSET;
1065             }
1066
1067         case WINED3DERR_DEVICENOTRESET:
1068             return DD_OK;
1069
1070         case WINED3D_OK:
1071             return DD_OK;
1072
1073         case WINED3DERR_DRIVERINTERNALERROR:
1074         default:
1075             ERR("(%p) Unexpected return value %08x from wineD3D, "
1076                 " returning DD_OK\n", This, hr);
1077     }
1078
1079     return DD_OK;
1080 }
1081
1082 /*****************************************************************************
1083  * IDirectDraw7::GetGDISurface
1084  *
1085  * Returns the surface that GDI is treating as the primary surface.
1086  * For Wine this is the front buffer
1087  *
1088  * Params:
1089  *  GDISurface: Address to write the surface pointer to
1090  *
1091  * Returns:
1092  *  DD_OK if the surface was found
1093  *  DDERR_NOTFOUND if the GDI surface wasn't found
1094  *
1095  *****************************************************************************/ 
1096 static HRESULT WINAPI
1097 IDirectDrawImpl_GetGDISurface(IDirectDraw7 *iface,
1098                               IDirectDrawSurface7 **GDISurface)
1099 {
1100     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
1101     IWineD3DSurface *Surf;
1102     IDirectDrawSurface7 *ddsurf;
1103     HRESULT hr;
1104     DDSCAPS2 ddsCaps;
1105     TRACE("(%p)->(%p)\n", This, GDISurface);
1106
1107     /* Get the back buffer from the wineD3DDevice and search its
1108      * attached surfaces for the front buffer
1109      */
1110     hr = IWineD3DDevice_GetBackBuffer(This->wineD3DDevice,
1111                                       0, /* SwapChain */
1112                                       0, /* first back buffer*/
1113                                       WINED3DBACKBUFFER_TYPE_MONO,
1114                                       &Surf);
1115
1116     if( (hr != D3D_OK) ||
1117         (!Surf) )
1118     {
1119         ERR("IWineD3DDevice::GetBackBuffer failed\n");
1120         return DDERR_NOTFOUND;
1121     }
1122
1123     /* GetBackBuffer AddRef()ed the surface, release it */
1124     IWineD3DSurface_Release(Surf);
1125
1126     IWineD3DSurface_GetParent(Surf,
1127                               (IUnknown **) &ddsurf);
1128     IDirectDrawSurface7_Release(ddsurf);  /* For the GetParent */
1129
1130     /* Find the front buffer */
1131     ddsCaps.dwCaps = DDSCAPS_FRONTBUFFER;
1132     hr = IDirectDrawSurface7_GetAttachedSurface(ddsurf,
1133                                                 &ddsCaps,
1134                                                 GDISurface);
1135     if(hr != DD_OK)
1136     {
1137         ERR("IDirectDrawSurface7::GetAttachedSurface failed, hr = %x\n", hr);
1138     }
1139
1140     /* The AddRef is OK this time */
1141     return hr;
1142 }
1143
1144 /*****************************************************************************
1145  * IDirectDraw7::EnumDisplayModes
1146  *
1147  * Enumerates the supported Display modes. The modes can be filtered with
1148  * the DDSD parameter.
1149  *
1150  * Params:
1151  *  Flags: can be DDEDM_REFRESHRATES and DDEDM_STANDARDVGAMODES
1152  *  DDSD: Surface description to filter the modes
1153  *  Context: Pointer passed back to the callback function
1154  *  cb: Application-provided callback function
1155  *
1156  * Returns:
1157  *  DD_OK on success
1158  *  DDERR_INVALIDPARAMS if the callback wasn't set
1159  *
1160  *****************************************************************************/ 
1161 static HRESULT WINAPI
1162 IDirectDrawImpl_EnumDisplayModes(IDirectDraw7 *iface,
1163                                  DWORD Flags,
1164                                  DDSURFACEDESC2 *DDSD,
1165                                  void *Context,
1166                                  LPDDENUMMODESCALLBACK2 cb)
1167 {
1168     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
1169     unsigned int modenum = 0;
1170     WINED3DFORMAT pixelformat = WINED3DFMT_UNKNOWN;
1171     WINED3DDISPLAYMODE mode;
1172     DDSURFACEDESC2 callback_sd;
1173
1174     TRACE("(%p)->(%p,%p,%p): Relay\n", This, DDSD, Context, cb);
1175
1176     /* This looks sane */
1177     if(!cb) return DDERR_INVALIDPARAMS;
1178
1179     if(DDSD)
1180     {
1181         if ((DDSD->dwFlags & DDSD_PIXELFORMAT) && (DDSD->u4.ddpfPixelFormat.dwFlags & DDPF_RGB) )
1182             pixelformat = PixelFormat_DD2WineD3D(&DDSD->u4.ddpfPixelFormat);
1183     }
1184
1185     while(IWineD3D_EnumAdapterModes(This->wineD3D,
1186                                     WINED3DADAPTER_DEFAULT,
1187                                     pixelformat,
1188                                     modenum++,
1189                                     &mode) == WINED3D_OK) {
1190         if(DDSD)
1191         {
1192             if(DDSD->dwFlags & DDSD_WIDTH && mode.Width != DDSD->dwWidth) continue;
1193             if(DDSD->dwFlags & DDSD_HEIGHT && mode.Height != DDSD->dwHeight) continue;
1194         }
1195
1196         memset(&callback_sd, 0, sizeof(callback_sd));
1197         callback_sd.dwSize = sizeof(callback_sd);
1198         callback_sd.u4.ddpfPixelFormat.dwSize = sizeof(DDPIXELFORMAT);
1199
1200         callback_sd.dwFlags = DDSD_HEIGHT|DDSD_WIDTH|DDSD_PIXELFORMAT|DDSD_PITCH;
1201         if(Flags & DDEDM_REFRESHRATES)
1202         {
1203             callback_sd.dwFlags |= DDSD_REFRESHRATE;
1204             callback_sd.u2.dwRefreshRate = mode.RefreshRate;
1205         }
1206
1207         callback_sd.dwWidth = mode.Width;
1208         callback_sd.dwHeight = mode.Height;
1209
1210         PixelFormat_WineD3DtoDD(&callback_sd.u4.ddpfPixelFormat, mode.Format);
1211
1212         TRACE("Enumerating %dx%d@%d\n", callback_sd.dwWidth, callback_sd.dwHeight, callback_sd.u4.ddpfPixelFormat.u1.dwRGBBitCount);
1213
1214         if(cb(&callback_sd, Context) == DDENUMRET_CANCEL)
1215         {
1216             TRACE("Application asked to terminate the enumeration\n");
1217             return DD_OK;
1218         }
1219     }
1220     TRACE("End of enumeration\n");
1221     return DD_OK;
1222 }
1223
1224 /*****************************************************************************
1225  * IDirectDraw7::EvaluateMode
1226  *
1227  * Used with IDirectDraw7::StartModeTest to test video modes.
1228  * EvaluateMode is used to pass or fail a mode, and continue with the next
1229  * mode
1230  *
1231  * Params:
1232  *  Flags: DDEM_MODEPASSED or DDEM_MODEFAILED
1233  *  Timeout: Returns the amount of seconds left before the mode would have
1234  *           been failed automatically
1235  *
1236  * Returns:
1237  *  This implementation always DD_OK, because it's a stub
1238  *
1239  *****************************************************************************/
1240 static HRESULT WINAPI
1241 IDirectDrawImpl_EvaluateMode(IDirectDraw7 *iface,
1242                              DWORD Flags,
1243                              DWORD *Timeout)
1244 {
1245     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
1246     FIXME("(%p)->(%d,%p): Stub!\n", This, Flags, Timeout);
1247
1248     /* When implementing this, implement it in WineD3D */
1249
1250     return DD_OK;
1251 }
1252
1253 /*****************************************************************************
1254  * IDirectDraw7::GetDeviceIdentifier
1255  *
1256  * Returns the device identifier, which gives information about the driver
1257  * Our device identifier is defined at the beginning of this file.
1258  *
1259  * Params:
1260  *  DDDI: Address for the returned structure
1261  *  Flags: Can be DDGDI_GETHOSTIDENTIFIER
1262  *
1263  * Returns:
1264  *  On success it returns DD_OK
1265  *  DDERR_INVALIDPARAMS if DDDI is NULL
1266  *
1267  *****************************************************************************/
1268 static HRESULT WINAPI
1269 IDirectDrawImpl_GetDeviceIdentifier(IDirectDraw7 *iface,
1270                                     DDDEVICEIDENTIFIER2 *DDDI,
1271                                     DWORD Flags)
1272 {
1273     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
1274     TRACE("(%p)->(%p,%08x)\n", This, DDDI, Flags);
1275
1276     if(!DDDI)
1277         return DDERR_INVALIDPARAMS;
1278
1279     /* The DDGDI_GETHOSTIDENTIFIER returns the information about the 2D
1280      * host adapter, if there's a secondary 3D adapter. This doesn't apply
1281      * to any modern hardware, nor is it interesting for Wine, so ignore it
1282      */
1283
1284     *DDDI = deviceidentifier;
1285     return DD_OK;
1286 }
1287
1288 /*****************************************************************************
1289  * IDirectDraw7::GetSurfaceFromDC
1290  *
1291  * Returns the Surface for a GDI device context handle.
1292  * Is this related to IDirectDrawSurface::GetDC ???
1293  *
1294  * Params:
1295  *  hdc: hdc to return the surface for
1296  *  Surface: Address to write the surface pointer to
1297  *
1298  * Returns:
1299  *  Always returns DD_OK because it's a stub
1300  *
1301  *****************************************************************************/
1302 static HRESULT WINAPI
1303 IDirectDrawImpl_GetSurfaceFromDC(IDirectDraw7 *iface,
1304                                  HDC hdc,
1305                                  IDirectDrawSurface7 **Surface)
1306 {
1307     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
1308     FIXME("(%p)->(%p,%p): Stub!\n", This, hdc, Surface);
1309
1310     /* Implementation idea if needed: Loop through all surfaces and compare
1311      * their hdc with hdc. Implement it in WineD3D! */
1312     return DDERR_NOTFOUND;
1313 }
1314
1315 /*****************************************************************************
1316  * IDirectDraw7::RestoreAllSurfaces
1317  *
1318  * Calls the restore method of all surfaces
1319  *
1320  * Params:
1321  *
1322  * Returns:
1323  *  Always returns DD_OK because it's a stub
1324  *
1325  *****************************************************************************/
1326 static HRESULT WINAPI
1327 IDirectDrawImpl_RestoreAllSurfaces(IDirectDraw7 *iface)
1328 {
1329     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
1330     FIXME("(%p): Stub\n", This);
1331
1332     /* This isn't hard to implement: Enumerate all WineD3D surfaces,
1333      * get their parent and call their restore method. Do not implement
1334      * it in WineD3D, as restoring a surface means re-creating the
1335      * WineD3DDSurface
1336      */
1337     return DD_OK;
1338 }
1339
1340 /*****************************************************************************
1341  * IDirectDraw7::StartModeTest
1342  *
1343  * Tests the specified video modes to update the system registry with
1344  * refresh rate information. StartModeTest starts the mode test,
1345  * EvaluateMode is used to fail or pass a mode. If EvaluateMode
1346  * isn't called within 15 seconds, the mode is failed automatically
1347  *
1348  * As refresh rates are handled by the X server, I don't think this
1349  * Method is important
1350  *
1351  * Params:
1352  *  Modes: An array of mode specifications
1353  *  NumModes: The number of modes in Modes
1354  *  Flags: Some flags...
1355  *
1356  * Returns:
1357  *  Returns DDERR_TESTFINISHED if flags contains DDSMT_ISTESTREQUIRED,
1358  *  if no modes are passed, DDERR_INVALIDPARAMS is returned,
1359  *  otherwise DD_OK
1360  *
1361  *****************************************************************************/
1362 static HRESULT WINAPI
1363 IDirectDrawImpl_StartModeTest(IDirectDraw7 *iface,
1364                               SIZE *Modes,
1365                               DWORD NumModes,
1366                               DWORD Flags)
1367 {
1368     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
1369     WARN("(%p)->(%p, %d, %x): Semi-Stub, most likely harmless\n", This, Modes, NumModes, Flags);
1370
1371     /* This looks sane */
1372     if( (!Modes) || (NumModes == 0) ) return DDERR_INVALIDPARAMS;
1373
1374     /* DDSMT_ISTESTREQUIRED asks if a mode test is necessary.
1375      * As it is not, DDERR_TESTFINISHED is returned
1376      * (hopefully that's correct
1377      *
1378     if(Flags & DDSMT_ISTESTREQUIRED) return DDERR_TESTFINISHED;
1379      * well, that value doesn't (yet) exist in the wine headers, so ignore it
1380      */
1381
1382     return DD_OK;
1383 }
1384
1385 /*****************************************************************************
1386  * IDirectDrawImpl_RecreateSurfacesCallback
1387  *
1388  * Enumeration callback for IDirectDrawImpl_RecreateAllSurfaces.
1389  * It re-recreates the WineD3DSurface. It's pretty straightforward
1390  *
1391  *****************************************************************************/
1392 HRESULT WINAPI
1393 IDirectDrawImpl_RecreateSurfacesCallback(IDirectDrawSurface7 *surf,
1394                                          DDSURFACEDESC2 *desc,
1395                                          void *Context)
1396 {
1397     IDirectDrawSurfaceImpl *surfImpl = ICOM_OBJECT(IDirectDrawSurfaceImpl,
1398                                                    IDirectDrawSurface7,
1399                                                    surf);
1400     IDirectDrawImpl *This = surfImpl->ddraw;
1401     IUnknown *Parent;
1402     IParentImpl *parImpl = NULL;
1403     IWineD3DSurface *wineD3DSurface;
1404     HRESULT hr;
1405     void *tmp;
1406
1407     WINED3DSURFACE_DESC     Desc;
1408     WINED3DFORMAT           Format;
1409     WINED3DRESOURCETYPE     Type;
1410     DWORD                   Usage;
1411     WINED3DPOOL             Pool;
1412     UINT                    Size;
1413
1414     WINED3DMULTISAMPLE_TYPE MultiSampleType;
1415     DWORD                   MultiSampleQuality;
1416     UINT                    Width;
1417     UINT                    Height;
1418
1419     TRACE("(%p): Enumerated Surface %p\n", This, surfImpl);
1420
1421     /* For the enumeration */
1422     IDirectDrawSurface7_Release(surf);
1423
1424     if(surfImpl->ImplType == This->ImplType) return DDENUMRET_OK; /* Continue */
1425
1426     /* Get the objects */
1427     wineD3DSurface = surfImpl->WineD3DSurface;
1428     IWineD3DSurface_GetParent(wineD3DSurface, &Parent);
1429     IUnknown_Release(Parent); /* For the getParent */
1430
1431     /* Is the parent an IParent interface? */
1432     if(IUnknown_QueryInterface(Parent, &IID_IParent, &tmp) == S_OK)
1433     {
1434         /* It is a IParent interface! */
1435         IUnknown_Release(Parent); /* For the QueryInterface */
1436         parImpl = ICOM_OBJECT(IParentImpl, IParent, Parent);
1437         /* Release the reference the parent interface is holding */
1438         IWineD3DSurface_Release(wineD3DSurface);
1439     }
1440
1441
1442     /* Get the surface properties */
1443     Desc.Format = &Format;
1444     Desc.Type = &Type;
1445     Desc.Usage = &Usage;
1446     Desc.Pool = &Pool;
1447     Desc.Size = &Size;
1448     Desc.MultiSampleType = &MultiSampleType;
1449     Desc.MultiSampleQuality = &MultiSampleQuality;
1450     Desc.Width = &Width;
1451     Desc.Height = &Height;
1452
1453     hr = IWineD3DSurface_GetDesc(wineD3DSurface, &Desc);
1454     if(hr != D3D_OK) return hr;
1455
1456     /* Create the new surface */
1457     hr = IWineD3DDevice_CreateSurface(This->wineD3DDevice,
1458                                       Width, Height, Format,
1459                                       TRUE /* Lockable */,
1460                                       FALSE /* Discard */,
1461                                       surfImpl->mipmap_level,
1462                                       &surfImpl->WineD3DSurface,
1463                                       Type,
1464                                       Usage,
1465                                       Pool,
1466                                       MultiSampleType,
1467                                       MultiSampleQuality,
1468                                       0 /* SharedHandle */,
1469                                       This->ImplType,
1470                                       Parent);
1471
1472     if(hr != D3D_OK)
1473         return hr;
1474
1475     /* Update the IParent if it exists */
1476     if(parImpl)
1477     {
1478         parImpl->child = (IUnknown *) surfImpl->WineD3DSurface;
1479         /* Add a reference for the IParent */
1480         IWineD3DSurface_AddRef(surfImpl->WineD3DSurface);
1481     }
1482     /* TODO: Copy the surface content, except for render targets */
1483
1484     if(IWineD3DSurface_Release(wineD3DSurface) == 0)
1485         TRACE("Surface released successful, next surface\n");
1486     else
1487         ERR("Something's still holding the old WineD3DSurface\n");
1488
1489     surfImpl->ImplType = This->ImplType;
1490
1491     return DDENUMRET_OK;
1492 }
1493
1494 /*****************************************************************************
1495  * IDirectDrawImpl_RecreateAllSurfaces
1496  *
1497  * A function, that converts all wineD3DSurfaces to the new implementation type
1498  * It enumerates all surfaces with IWineD3DDevice::EnumSurfaces, creates a
1499  * new WineD3DSurface, copies the content and releases the old surface
1500  *
1501  *****************************************************************************/
1502 static HRESULT
1503 IDirectDrawImpl_RecreateAllSurfaces(IDirectDrawImpl *This)
1504 {
1505     DDSURFACEDESC2 desc;
1506     TRACE("(%p): Switch to implementation %d\n", This, This->ImplType);
1507
1508     if(This->ImplType != SURFACE_OPENGL && This->d3d_initialized)
1509     {
1510         /* Should happen almost never */
1511         FIXME("(%p) Switching to non-opengl surfaces with d3d started. Is this a bug?\n", This);
1512         /* Shutdown d3d */
1513         IWineD3DDevice_Uninit3D(This->wineD3DDevice, D3D7CB_DestroyDepthStencilSurface, D3D7CB_DestroySwapChain);
1514     }
1515     /* Contrary: D3D starting is handled by the caller, because it knows the render target */
1516
1517     memset(&desc, 0, sizeof(desc));
1518     desc.dwSize = sizeof(desc);
1519
1520     return IDirectDraw7_EnumSurfaces(ICOM_INTERFACE(This, IDirectDraw7),
1521                                      0,
1522                                      &desc,
1523                                      This,
1524                                      IDirectDrawImpl_RecreateSurfacesCallback);
1525 }
1526
1527 /*****************************************************************************
1528  * D3D7CB_CreateSurface
1529  *
1530  * Callback function for IDirect3DDevice_CreateTexture. It searches for the
1531  * correct mipmap sublevel, and returns it to WineD3D.
1532  * The surfaces are created already by IDirectDraw7::CreateSurface
1533  *
1534  * Params:
1535  *  With, Height: With and height of the surface
1536  *  Format: The requested format
1537  *  Usage, Pool: D3DUSAGE and D3DPOOL of the surface
1538  *  level: The mipmap level
1539  *  Surface: Pointer to pass the created surface back at
1540  *  SharedHandle: NULL
1541  *
1542  * Returns:
1543  *  D3D_OK
1544  *
1545  *****************************************************************************/
1546 static HRESULT WINAPI
1547 D3D7CB_CreateSurface(IUnknown *device,
1548                      IUnknown *pSuperior,
1549                      UINT Width, UINT Height,
1550                      WINED3DFORMAT Format,
1551                      DWORD Usage, WINED3DPOOL Pool, UINT level,
1552                      IWineD3DSurface **Surface,
1553                      HANDLE *SharedHandle)
1554 {
1555     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, device);
1556     IDirectDrawSurfaceImpl *surf = This->tex_root;
1557     int i;
1558     TRACE("(%p) call back. surf=%p\n", device, surf);
1559
1560     /* Find the wanted mipmap. There are enough mipmaps in the chain */
1561     for(i = 0; i < level; i++)
1562         surf = surf->next_complex;
1563
1564     /* Return the surface */
1565     *Surface = surf->WineD3DSurface;
1566
1567     TRACE("Returning wineD3DSurface %p, it belongs to surface %p\n", *Surface, surf);
1568     return D3D_OK;
1569 }
1570
1571 ULONG WINAPI D3D7CB_DestroySwapChain(IWineD3DSwapChain *pSwapChain) {
1572     IUnknown* swapChainParent;
1573     TRACE("(%p) call back\n", pSwapChain);
1574
1575     IWineD3DSwapChain_GetParent(pSwapChain, &swapChainParent);
1576     IUnknown_Release(swapChainParent);
1577     return IUnknown_Release(swapChainParent);
1578 }
1579
1580 ULONG WINAPI D3D7CB_DestroyDepthStencilSurface(IWineD3DSurface *pSurface) {
1581     IUnknown* surfaceParent;
1582     TRACE("(%p) call back\n", pSurface);
1583
1584     IWineD3DSurface_GetParent(pSurface, (IUnknown **) &surfaceParent);
1585     IUnknown_Release(surfaceParent);
1586     return IUnknown_Release(surfaceParent);
1587 }
1588
1589 /*****************************************************************************
1590  * IDirectDrawImpl_CreateNewSurface
1591  *
1592  * A helper function for IDirectDraw7::CreateSurface. It creates a new surface
1593  * with the passed parameters.
1594  *
1595  * Params:
1596  *  DDSD: Description of the surface to create
1597  *  Surf: Address to store the interface pointer at
1598  *
1599  * Returns:
1600  *  DD_OK on success
1601  *
1602  *****************************************************************************/
1603 static HRESULT WINAPI
1604 IDirectDrawImpl_CreateNewSurface(IDirectDrawImpl *This,
1605                                  DDSURFACEDESC2 *pDDSD,
1606                                  IDirectDrawSurfaceImpl **ppSurf,
1607                                  UINT level)
1608 {
1609     HRESULT hr;
1610     UINT Width = 0, Height = 0;
1611     WINED3DFORMAT Format = WINED3DFMT_UNKNOWN;
1612     WINED3DRESOURCETYPE ResType = WINED3DRTYPE_SURFACE;
1613     DWORD Usage = 0;
1614     WINED3DSURFTYPE ImplType = This->ImplType;
1615     WINED3DSURFACE_DESC Desc;
1616     IUnknown *Parent;
1617     IParentImpl *parImpl = NULL;
1618     WINED3DPOOL Pool = WINED3DPOOL_DEFAULT;
1619
1620     /* Dummies for GetDesc */
1621     WINED3DPOOL dummy_d3dpool;
1622     WINED3DMULTISAMPLE_TYPE dummy_mst;
1623     UINT dummy_uint;
1624     DWORD dummy_dword;
1625
1626     if (TRACE_ON(ddraw))
1627     {
1628         TRACE(" (%p) Requesting surface desc :\n", This);
1629         DDRAW_dump_surface_desc(pDDSD);
1630     }
1631
1632     /* Select the surface type, if it wasn't choosen yet */
1633     if(ImplType == SURFACE_UNKNOWN)
1634     {
1635         /* Use GL Surfaces if a D3DDEVICE Surface is requested */
1636         if(pDDSD->ddsCaps.dwCaps & DDSCAPS_3DDEVICE)
1637         {
1638             TRACE("(%p) Choosing GL surfaces because a 3DDEVICE Surface was requested\n", This);
1639             ImplType = SURFACE_OPENGL;
1640         }
1641
1642         /* Otherwise use GDI surfaces for now */
1643         else
1644         {
1645             TRACE("(%p) Choosing GDI surfaces for 2D rendering\n", This);
1646             ImplType = SURFACE_GDI;
1647         }
1648
1649         /* Policy if all surface implementations are available:
1650          * First, check if a default type was set with winecfg. If not,
1651          * try Xrender surfaces, and use them if they work. Next, check if
1652          * accelerated OpenGL is available, and use GL surfaces in this
1653          * case. If all else fails, use GDI surfaces. If a 3DDEVICE surface
1654          * was created, always use OpenGL surfaces.
1655          *
1656          * (Note: Xrender surfaces are not implemented for now, the
1657          * unaccelerated implementation uses GDI to render in Software)
1658          */
1659
1660         /* Store the type. If it needs to be changed, all WineD3DSurfaces have to
1661          * be re-created. This could be done with IDirectDrawSurface7::Restore
1662          */
1663         This->ImplType = ImplType;
1664     }
1665     else
1666     {
1667          if((pDDSD->ddsCaps.dwCaps & DDSCAPS_3DDEVICE ) && 
1668             (This->ImplType != SURFACE_OPENGL ) && DefaultSurfaceType == SURFACE_UNKNOWN)
1669         {
1670             /* We have to change to OpenGL,
1671              * and re-create all WineD3DSurfaces
1672              */
1673             ImplType = SURFACE_OPENGL;
1674             This->ImplType = ImplType;
1675             TRACE("(%p) Re-creating all surfaces\n", This);
1676             IDirectDrawImpl_RecreateAllSurfaces(This);
1677             TRACE("(%p) Done recreating all surfaces\n", This);
1678         }
1679         else if(This->ImplType != SURFACE_OPENGL)
1680         {
1681             WARN("The application requests a 3D capable surface, but a non-opengl surface was set in the registry\n");
1682             /* Do not fail surface creation, only fail 3D device creation */
1683         }
1684     }
1685
1686     /* Get the correct wined3d usage */
1687     if (pDDSD->ddsCaps.dwCaps & (DDSCAPS_PRIMARYSURFACE |
1688                                  DDSCAPS_BACKBUFFER     |
1689                                  DDSCAPS_3DDEVICE       ) )
1690     {
1691         Usage |= WINED3DUSAGE_RENDERTARGET;
1692
1693         pDDSD->ddsCaps.dwCaps |= DDSCAPS_VIDEOMEMORY |
1694                                  DDSCAPS_VISIBLE     |
1695                                  DDSCAPS_LOCALVIDMEM;
1696     }
1697     if (pDDSD->ddsCaps.dwCaps & (DDSCAPS_OVERLAY))
1698     {
1699         Usage |= WINED3DUSAGE_OVERLAY;
1700     }
1701     if(This->depthstencil)
1702     {
1703         /* The depth stencil creation callback sets this flag.
1704          * Set the WineD3D usage to let it know that it's a depth
1705          * Stencil surface.
1706          */
1707         Usage |= WINED3DUSAGE_DEPTHSTENCIL;
1708     }
1709     if(pDDSD->ddsCaps.dwCaps & DDSCAPS_SYSTEMMEMORY)
1710     {
1711         Pool = WINED3DPOOL_SYSTEMMEM;
1712     }
1713     else if(pDDSD->ddsCaps.dwCaps2 & DDSCAPS2_TEXTUREMANAGE)
1714     {
1715         Pool = WINED3DPOOL_MANAGED;
1716     }
1717
1718     Format = PixelFormat_DD2WineD3D(&pDDSD->u4.ddpfPixelFormat);
1719     if(Format == WINED3DFMT_UNKNOWN)
1720     {
1721         ERR("Unsupported / Unknown pixelformat\n");
1722         return DDERR_INVALIDPIXELFORMAT;
1723     }
1724
1725     /* Create the Surface object */
1726     *ppSurf = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirectDrawSurfaceImpl));
1727     if(!*ppSurf)
1728     {
1729         ERR("(%p) Error allocating memory for a surface\n", This);
1730         return DDERR_OUTOFVIDEOMEMORY;
1731     }
1732     ICOM_INIT_INTERFACE(*ppSurf, IDirectDrawSurface7, IDirectDrawSurface7_Vtbl);
1733     ICOM_INIT_INTERFACE(*ppSurf, IDirectDrawSurface3, IDirectDrawSurface3_Vtbl);
1734     ICOM_INIT_INTERFACE(*ppSurf, IDirectDrawGammaControl, IDirectDrawGammaControl_Vtbl);
1735     ICOM_INIT_INTERFACE(*ppSurf, IDirect3DTexture2, IDirect3DTexture2_Vtbl);
1736     ICOM_INIT_INTERFACE(*ppSurf, IDirect3DTexture, IDirect3DTexture1_Vtbl);
1737     (*ppSurf)->ref = 1;
1738     (*ppSurf)->version = 7;
1739     (*ppSurf)->ddraw = This;
1740     (*ppSurf)->surface_desc.dwSize = sizeof(DDSURFACEDESC2);
1741     (*ppSurf)->surface_desc.u4.ddpfPixelFormat.dwSize = sizeof(DDPIXELFORMAT);
1742     DD_STRUCT_COPY_BYSIZE(&(*ppSurf)->surface_desc, pDDSD);
1743
1744     /* Surface attachments */
1745     (*ppSurf)->next_attached = NULL;
1746     (*ppSurf)->first_attached = *ppSurf;
1747
1748     (*ppSurf)->next_complex = NULL;
1749     (*ppSurf)->first_complex = *ppSurf;
1750
1751     /* Needed to re-create the surface on an implementation change */
1752     (*ppSurf)->ImplType = ImplType;
1753
1754     /* For D3DDevice creation */
1755     (*ppSurf)->isRenderTarget = FALSE;
1756
1757     /* A trace message for debugging */
1758     TRACE("(%p) Created IDirectDrawSurface implementation structure at %p\n", This, *ppSurf);
1759
1760     if(pDDSD->ddsCaps.dwCaps & ( DDSCAPS_PRIMARYSURFACE | DDSCAPS_TEXTURE | DDSCAPS_3DDEVICE) )
1761     {
1762         /* Render targets and textures need a IParent interface,
1763          * because WineD3D will destroy them when the swapchain
1764          * is released
1765          */
1766         parImpl = HeapAlloc(GetProcessHeap(), 0, sizeof(IParentImpl));
1767         if(!parImpl)
1768         {
1769             ERR("Out of memory when allocating memory for a IParent implementation\n");
1770             return DDERR_OUTOFMEMORY;
1771         }
1772         parImpl->ref = 1;
1773         ICOM_INIT_INTERFACE(parImpl, IParent, IParent_Vtbl);
1774         Parent = (IUnknown *) ICOM_INTERFACE(parImpl, IParent);
1775         TRACE("Using IParent interface %p as parent\n", parImpl);
1776     }
1777     else
1778     {
1779         /* Use the surface as parent */
1780         Parent = (IUnknown *) ICOM_INTERFACE(*ppSurf, IDirectDrawSurface7);
1781         TRACE("Using Surface interface %p as parent\n", *ppSurf);
1782     }
1783
1784     /* Now create the WineD3D Surface */
1785     hr = IWineD3DDevice_CreateSurface(This->wineD3DDevice,
1786                                       pDDSD->dwWidth,
1787                                       pDDSD->dwHeight,
1788                                       Format,
1789                                       TRUE /* Lockable */,
1790                                       FALSE /* Discard */,
1791                                       level,
1792                                       &(*ppSurf)->WineD3DSurface,
1793                                       ResType, Usage,
1794                                       Pool,
1795                                       WINED3DMULTISAMPLE_NONE,
1796                                       0 /* MultiSampleQuality */,
1797                                       0 /* SharedHandle */,
1798                                       ImplType,
1799                                       Parent);
1800
1801     if(hr != D3D_OK)
1802     {
1803         ERR("IWineD3DDevice::CreateSurface failed. hr = %08x\n", hr);
1804         return hr;
1805     }
1806
1807     /* Set the child of the parent implementation if it exists */
1808     if(parImpl)
1809     {
1810         parImpl->child = (IUnknown *) (*ppSurf)->WineD3DSurface;
1811         /* The IParent releases the WineD3DSurface, and
1812          * the ddraw surface does that too. Hold a reference
1813          */
1814         IWineD3DSurface_AddRef((*ppSurf)->WineD3DSurface);
1815     }
1816
1817     /* Increase the surface counter, and attach the surface */
1818     InterlockedIncrement(&This->surfaces);
1819     list_add_head(&This->surface_list, &(*ppSurf)->surface_list_entry);
1820
1821     /* Here we could store all created surfaces in the DirectDrawImpl structure,
1822      * But this could also be delegated to WineDDraw, as it keeps track of all its
1823      * resources. Not implemented for now, as there are more important things ;)
1824      */
1825
1826     /* Get the pixel format of the WineD3DSurface and store it.
1827      * Don't use the Format choosen above, WineD3D might have
1828      * changed it
1829      */
1830     Desc.Format = &Format;
1831     Desc.Type = &ResType;
1832     Desc.Usage = &Usage;
1833     Desc.Pool = &dummy_d3dpool;
1834     Desc.Size = &dummy_uint;
1835     Desc.MultiSampleType = &dummy_mst;
1836     Desc.MultiSampleQuality = &dummy_dword;
1837     Desc.Width = &Width;
1838     Desc.Height = &Height;
1839
1840     (*ppSurf)->surface_desc.dwFlags |= DDSD_PIXELFORMAT;
1841     hr = IWineD3DSurface_GetDesc((*ppSurf)->WineD3DSurface, &Desc);
1842     if(hr != D3D_OK)
1843     {
1844         ERR("IWineD3DSurface::GetDesc failed\n");
1845         IDirectDrawSurface7_Release( (IDirectDrawSurface7 *) *ppSurf);
1846         return hr;
1847     }
1848
1849     if(Format == WINED3DFMT_UNKNOWN)
1850     {
1851         FIXME("IWineD3DSurface::GetDesc returned WINED3DFMT_UNKNOWN\n");
1852     }
1853     PixelFormat_WineD3DtoDD( &(*ppSurf)->surface_desc.u4.ddpfPixelFormat, Format);
1854
1855     /* Anno 1602 stores the pitch right after surface creation, so make sure it's there.
1856      * I can't LockRect() the surface here because if OpenGL surfaces are in use, the
1857      * WineD3DDevice might not be useable for 3D yet, so an extra method was created
1858      */
1859     (*ppSurf)->surface_desc.dwFlags |= DDSD_PITCH;
1860     (*ppSurf)->surface_desc.u1.lPitch = IWineD3DSurface_GetPitch((*ppSurf)->WineD3DSurface);
1861
1862     /* Application passed a color key? Set it! */
1863     if(pDDSD->dwFlags & DDSD_CKDESTOVERLAY)
1864     {
1865         IWineD3DSurface_SetColorKey((*ppSurf)->WineD3DSurface,
1866                                     DDCKEY_DESTOVERLAY,
1867                                     &pDDSD->u3.ddckCKDestOverlay);
1868     }
1869     if(pDDSD->dwFlags & DDSD_CKDESTBLT)
1870     {
1871         IWineD3DSurface_SetColorKey((*ppSurf)->WineD3DSurface,
1872                                     DDCKEY_DESTBLT,
1873                                     &pDDSD->ddckCKDestBlt);
1874     }
1875     if(pDDSD->dwFlags & DDSD_CKSRCOVERLAY)
1876     {
1877         IWineD3DSurface_SetColorKey((*ppSurf)->WineD3DSurface,
1878                                     DDCKEY_SRCOVERLAY,
1879                                     &pDDSD->ddckCKSrcOverlay);
1880     }
1881     if(pDDSD->dwFlags & DDSD_CKSRCBLT)
1882     {
1883         IWineD3DSurface_SetColorKey((*ppSurf)->WineD3DSurface,
1884                                     DDCKEY_SRCBLT,
1885                                     &pDDSD->ddckCKSrcBlt);
1886     }
1887     if ( pDDSD->dwFlags & DDSD_LPSURFACE)
1888     {
1889         hr = IWineD3DSurface_SetMem((*ppSurf)->WineD3DSurface, pDDSD->lpSurface);
1890         if(hr != WINED3D_OK)
1891         {
1892             /* No need for a trace here, wined3d does that for us */
1893             IDirectDrawSurface7_Release(ICOM_INTERFACE((*ppSurf), IDirectDrawSurface7));
1894             return hr;
1895         }
1896     }
1897
1898     return DD_OK;
1899 }
1900
1901 /*****************************************************************************
1902  * IDirectDraw7::CreateSurface
1903  *
1904  * Creates a new IDirectDrawSurface object and returns its interface.
1905  *
1906  * The surface connections with wined3d are a bit tricky. Basically it works
1907  * like this:
1908  *
1909  * |------------------------|               |-----------------|
1910  * | DDraw surface          |               | WineD3DSurface  |
1911  * |                        |               |                 |
1912  * |        WineD3DSurface  |-------------->|                 |
1913  * |        Child           |<------------->| Parent          |
1914  * |------------------------|               |-----------------|
1915  *
1916  * The DDraw surface is the parent of the wined3d surface, and it releases
1917  * the WineD3DSurface when the ddraw surface is destroyed.
1918  *
1919  * However, for all surfaces which can be in a container in WineD3D,
1920  * we have to do this. These surfaces are ususally complex surfaces,
1921  * so this concerns primary surfaces with a front and a back buffer,
1922  * and textures.
1923  *
1924  * |------------------------|               |-----------------|
1925  * | DDraw surface          |               | Containter      |
1926  * |                        |               |                 |
1927  * |                  Child |<------------->| Parent          |
1928  * |                Texture |<------------->|                 |
1929  * |         WineD3DSurface |<----|         |          Levels |<--|
1930  * | Complex connection     |     |         |                 |   |
1931  * |------------------------|     |         |-----------------|   |
1932  *  ^                             |                               |
1933  *  |                             |                               |
1934  *  |                             |                               |
1935  *  |    |------------------|     |         |-----------------|   |
1936  *  |    | IParent          |     |-------->| WineD3DSurface  |   |
1937  *  |    |                  |               |                 |   |
1938  *  |    |            Child |<------------->| Parent          |   |
1939  *  |    |                  |               |       Container |<--|
1940  *  |    |------------------|               |-----------------|   |
1941  *  |                                                             |
1942  *  |   |----------------------|                                  |
1943  *  |   | DDraw surface 2      |                                  |
1944  *  |   |                      |                                  |
1945  *  |<->| Complex root   Child |                                  |
1946  *  |   |              Texture |                                  |
1947  *  |   |       WineD3DSurface |<----|                            |
1948  *  |   |----------------------|     |                            |
1949  *  |                                |                            |
1950  *  |    |---------------------|     |      |-----------------|   |
1951  *  |    | IParent             |     |----->| WineD3DSurface  |   |
1952  *  |    |                     |            |                 |   |
1953  *  |    |               Child |<---------->| Parent          |   |
1954  *  |    |---------------------|            |       Container |<--|
1955  *  |                                       |-----------------|   |
1956  *  |                                                             |
1957  *  |             ---More surfaces can follow---                  |
1958  *
1959  * The reason is that the IWineD3DSwapchain(render target container)
1960  * and the IWineD3DTexure(Texture container) release the parents
1961  * of their surface's children, but by releasing the complex root
1962  * the surfaces which are complexly attached to it are destroyed
1963  * too. See IDirectDrawSurface::Release for a more detailed
1964  * explanation.
1965  *
1966  * Params:
1967  *  DDSD: Description of the surface to create
1968  *  Surf: Address to store the interface pointer at
1969  *  UnkOuter: Basically for aggregation support, but ddraw doesn't support
1970  *            aggregation, so it has to be NULL
1971  *
1972  * Returns:
1973  *  DD_OK on success
1974  *  CLASS_E_NOAGGREGATION if UnkOuter != NULL
1975  *  DDERR_* if an error occurs
1976  *
1977  *****************************************************************************/
1978 static HRESULT WINAPI
1979 IDirectDrawImpl_CreateSurface(IDirectDraw7 *iface,
1980                               DDSURFACEDESC2 *DDSD,
1981                               IDirectDrawSurface7 **Surf,
1982                               IUnknown *UnkOuter)
1983 {
1984     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
1985     IDirectDrawSurfaceImpl *object = NULL;
1986     HRESULT hr;
1987     LONG extra_surfaces = 0, i;
1988     DDSURFACEDESC2 desc2;
1989     UINT level = 0;
1990     WINED3DDISPLAYMODE Mode;
1991
1992     TRACE("(%p)->(%p,%p,%p)\n", This, DDSD, Surf, UnkOuter);
1993
1994     /* Some checks before we start */
1995     if (TRACE_ON(ddraw))
1996     {
1997         TRACE(" (%p) Requesting surface desc :\n", This);
1998         DDRAW_dump_surface_desc(DDSD);
1999     }
2000
2001     if (UnkOuter != NULL)
2002     {
2003         FIXME("(%p) : outer != NULL?\n", This);
2004         return CLASS_E_NOAGGREGATION; /* unchecked */
2005     }
2006
2007     if (!(DDSD->dwFlags & DDSD_CAPS))
2008     {
2009         /* DVIDEO.DLL does forget the DDSD_CAPS flag ... *sigh* */
2010         DDSD->dwFlags |= DDSD_CAPS;
2011     }
2012     if (DDSD->ddsCaps.dwCaps == 0)
2013     {
2014         /* This has been checked on real Windows */
2015         DDSD->ddsCaps.dwCaps = DDSCAPS_LOCALVIDMEM | DDSCAPS_VIDEOMEMORY;
2016     }
2017
2018     if (DDSD->ddsCaps.dwCaps & DDSCAPS_ALLOCONLOAD)
2019     {
2020         /* If the surface is of the 'alloconload' type, ignore the LPSURFACE field */
2021         DDSD->dwFlags &= ~DDSD_LPSURFACE;
2022     }
2023
2024     if ((DDSD->dwFlags & DDSD_LPSURFACE) && (DDSD->lpSurface == NULL))
2025     {
2026         /* Frank Herbert's Dune specifies a null pointer for the surface, ignore the LPSURFACE field */
2027         WARN("(%p) Null surface pointer specified, ignore it!\n", This);
2028         DDSD->dwFlags &= ~DDSD_LPSURFACE;
2029     }
2030
2031     if((DDSD->ddsCaps.dwCaps & (DDSCAPS_FLIP | DDSCAPS_PRIMARYSURFACE)) == (DDSCAPS_FLIP | DDSCAPS_PRIMARYSURFACE) &&
2032        !(This->cooperative_level & DDSCL_EXCLUSIVE))
2033     {
2034         TRACE("(%p): Attempt to create a flipable primary surface without DDSCL_EXCLUSIVE set\n", This);
2035         *Surf = NULL;
2036         return DDERR_NOEXCLUSIVEMODE;
2037     }
2038
2039     if (Surf == NULL)
2040     {
2041         FIXME("(%p) You want to get back a surface? Don't give NULL ptrs!\n", This);
2042         return E_POINTER; /* unchecked */
2043     }
2044
2045     /* According to the msdn this flag is ignored by CreateSurface */
2046     if (DDSD->dwSize >= sizeof(DDSURFACEDESC2))
2047         DDSD->ddsCaps.dwCaps2 &= ~DDSCAPS2_MIPMAPSUBLEVEL;
2048
2049     /* Modify some flags */
2050     memset(&desc2, 0, sizeof(desc2));
2051     desc2.dwSize = sizeof(desc2);   /* For the struct copy */
2052     DD_STRUCT_COPY_BYSIZE(&desc2, DDSD);
2053     desc2.dwSize = sizeof(desc2);   /* To override a possibly smaller size */
2054     desc2.u4.ddpfPixelFormat.dwSize=sizeof(DDPIXELFORMAT); /* Just to be sure */
2055
2056     /* Get the video mode from WineD3D - we will need it */
2057     hr = IWineD3DDevice_GetDisplayMode(This->wineD3DDevice,
2058                                        0, /* Swapchain 0 */
2059                                        &Mode);
2060     if(FAILED(hr))
2061     {
2062         ERR("Failed to read display mode from wined3d\n");
2063         switch(This->orig_bpp)
2064         {
2065             case 8:
2066                 Mode.Format = WINED3DFMT_P8;
2067                 break;
2068
2069             case 15:
2070                 Mode.Format = WINED3DFMT_X1R5G5B5;
2071                 break;
2072
2073             case 16:
2074                 Mode.Format = WINED3DFMT_R5G6B5;
2075                 break;
2076
2077             case 24:
2078                 Mode.Format = WINED3DFMT_R8G8B8;
2079                 break;
2080
2081             case 32:
2082                 Mode.Format = WINED3DFMT_X8R8G8B8;
2083                 break;
2084         }
2085         Mode.Width = This->orig_width;
2086         Mode.Height = This->orig_height;
2087     }
2088
2089     /* No pixelformat given? Use the current screen format */
2090     if(!(desc2.dwFlags & DDSD_PIXELFORMAT))
2091     {
2092         desc2.dwFlags |= DDSD_PIXELFORMAT;
2093         desc2.u4.ddpfPixelFormat.dwSize=sizeof(DDPIXELFORMAT);
2094
2095         /* Wait: It could be a Z buffer */
2096         if(desc2.ddsCaps.dwCaps & DDSCAPS_ZBUFFER)
2097         {
2098             switch(desc2.u2.dwMipMapCount) /* Who had this glorious idea? */
2099             {
2100                 case 15:
2101                     PixelFormat_WineD3DtoDD(&desc2.u4.ddpfPixelFormat, WINED3DFMT_D15S1);
2102                     break;
2103                 case 16:
2104                     PixelFormat_WineD3DtoDD(&desc2.u4.ddpfPixelFormat, WINED3DFMT_D16);
2105                     break;
2106                 case 24:
2107                     PixelFormat_WineD3DtoDD(&desc2.u4.ddpfPixelFormat, WINED3DFMT_D24X8);
2108                     break;
2109                 case 32:
2110                     PixelFormat_WineD3DtoDD(&desc2.u4.ddpfPixelFormat, WINED3DFMT_D32);
2111                     break;
2112                 default:
2113                     ERR("Unknown Z buffer bit depth\n");
2114             }
2115         }
2116         else
2117         {
2118             PixelFormat_WineD3DtoDD(&desc2.u4.ddpfPixelFormat, Mode.Format);
2119         }
2120     }
2121
2122     /* No Width or no Height? Use the current window size or
2123      * the original screen size
2124      */
2125     if(!(desc2.dwFlags & DDSD_WIDTH) ||
2126        !(desc2.dwFlags & DDSD_HEIGHT) )
2127     {
2128         HWND window;
2129
2130         /* Fallback: From WineD3D / original mode */
2131         desc2.dwFlags |= DDSD_WIDTH | DDSD_HEIGHT;
2132         desc2.dwWidth = Mode.Width;
2133         desc2.dwHeight = Mode.Height;
2134
2135         hr = IWineD3DDevice_GetHWND(This->wineD3DDevice,
2136                                     &window);
2137         if( (hr == D3D_OK) && (window != 0) )
2138         {
2139             RECT rect;
2140             if(GetWindowRect(window, &rect) )
2141             {
2142                 /* This is a hack until I find a better solution */
2143                 if( (rect.right - rect.left) <= 1 ||
2144                     (rect.bottom - rect.top) <= 1 )
2145                 {
2146                     FIXME("Wanted to get surface dimensions from window %p, but it has only "
2147                            "a size of %dx%d. Using full screen dimensions\n",
2148                            window, rect.right - rect.left, rect.bottom - rect.top);
2149                 }
2150                 else
2151                 {
2152                     /* Not sure if this is correct */
2153                     desc2.dwWidth = rect.right - rect.left;
2154                     desc2.dwHeight = rect.bottom - rect.top;
2155                     TRACE("Using window %p's dimensions: %dx%d\n", window, desc2.dwWidth, desc2.dwHeight);
2156                 }
2157             }
2158         }
2159     }
2160
2161     /* Mipmap count fixes */
2162     if(desc2.ddsCaps.dwCaps & DDSCAPS_MIPMAP)
2163     {
2164         if(desc2.ddsCaps.dwCaps & DDSCAPS_COMPLEX)
2165         {
2166             if(desc2.dwFlags & DDSD_MIPMAPCOUNT)
2167             {
2168                 /* Mipmap count is given, nothing to do */
2169             }
2170             else
2171             {
2172                 /* Undocumented feature: Create sublevels until
2173                  * either the width or the height is 1
2174                  */
2175                 DWORD min = desc2.dwWidth < desc2.dwHeight ?
2176                             desc2.dwWidth : desc2.dwHeight;
2177                 desc2.u2.dwMipMapCount = 0;
2178                 while( min )
2179                 {
2180                     desc2.u2.dwMipMapCount += 1;
2181                     min >>= 1;
2182                 }
2183             }
2184         }
2185         else
2186         {
2187             /* Not-complex mipmap -> Mipmapcount = 1 */
2188             desc2.u2.dwMipMapCount = 1;
2189         }
2190         extra_surfaces = desc2.u2.dwMipMapCount - 1;
2191
2192         /* There's a mipmap count in the created surface in any case */
2193         desc2.dwFlags |= DDSD_MIPMAPCOUNT;
2194     }
2195     /* If no mipmap is given, the texture has only one level */
2196
2197     /* The first surface is a front buffer, the back buffer is created afterwards */
2198     if( (desc2.dwFlags & DDSD_CAPS) && (desc2.ddsCaps.dwCaps & DDSCAPS_PRIMARYSURFACE) )
2199     {
2200         desc2.ddsCaps.dwCaps |= DDSCAPS_FRONTBUFFER;
2201     }
2202
2203     /* Create the first surface */
2204     hr = IDirectDrawImpl_CreateNewSurface(This, &desc2, &object, 0);
2205     if( hr != DD_OK)
2206     {
2207         ERR("IDirectDrawImpl_CreateNewSurface failed with %08x\n", hr);
2208         return hr;
2209     }
2210
2211     *Surf = ICOM_INTERFACE(object, IDirectDrawSurface7);
2212
2213     /* Create Additional surfaces if necessary
2214      * This applies to Primary surfaces which have a back buffer count
2215      * set, but not to mipmap textures. In case of Mipmap textures,
2216      * wineD3D takes care of the creation of additional surfaces
2217      */
2218     if(DDSD->dwFlags & DDSD_BACKBUFFERCOUNT)
2219     {
2220         extra_surfaces = DDSD->dwBackBufferCount;
2221         desc2.ddsCaps.dwCaps &= ~DDSCAPS_FRONTBUFFER; /* It's not a front buffer */
2222         desc2.ddsCaps.dwCaps |= DDSCAPS_BACKBUFFER;
2223     }
2224     /* Set the DDSCAPS2_MIPMAPSUBLEVEL flag on mipmap sublevels according to the msdn */
2225     if(DDSD->ddsCaps.dwCaps & DDSCAPS_MIPMAP)
2226     {
2227         desc2.ddsCaps.dwCaps2 |= DDSCAPS2_MIPMAPSUBLEVEL;
2228     }
2229
2230     for(i = 0; i < extra_surfaces; i++)
2231     {
2232         IDirectDrawSurfaceImpl *object2 = NULL;
2233         IDirectDrawSurfaceImpl *iterator;
2234
2235         /* increase the mipmap level, but only if a mipmap is created
2236          * In this case, also halve the size
2237          */
2238         if(DDSD->ddsCaps.dwCaps & DDSCAPS_MIPMAP)
2239         {
2240             level++;
2241             if(desc2.dwWidth > 1) desc2.dwWidth /= 2;
2242             if(desc2.dwHeight > 1) desc2.dwHeight /= 2;
2243         }
2244
2245         hr = IDirectDrawImpl_CreateNewSurface(This,
2246                                               &desc2,
2247                                               &object2,
2248                                               level);
2249         if(hr != DD_OK)
2250         {
2251             /* This destroys and possibly created surfaces too */
2252             IDirectDrawSurface_Release( ICOM_INTERFACE(object, IDirectDrawSurface7) );
2253             return hr;
2254         }
2255
2256         /* Add the new surface to the complex attachment list */
2257         object2->first_complex = object;
2258         object2->next_complex = NULL;
2259         iterator = object;
2260         while(iterator->next_complex) iterator = iterator->next_complex;
2261         iterator->next_complex = object2;
2262
2263         /* Remove the (possible) back buffer cap from the new surface description,
2264          * because only one surface in the flipping chain is a back buffer, one
2265          * is a front buffer, the others are just primary surfaces.
2266          */
2267         desc2.ddsCaps.dwCaps &= ~DDSCAPS_BACKBUFFER;
2268     }
2269
2270     /* Addref the ddraw interface to keep an reference for each surface */
2271     IDirectDraw7_AddRef(iface);
2272     object->ifaceToRelease = (IUnknown *) iface;
2273
2274     /* If the implementation is OpenGL and there's no d3ddevice, attach a d3ddevice
2275      * But attach the d3ddevice only if the currently created surface was
2276      * a primary surface (2D app in 3D mode) or a 3DDEVICE surface (3D app)
2277      * The only case I can think of where this doesn't apply is when a
2278      * 2D app was configured by the user to run with OpenGL and it didn't create
2279      * the render target as first surface. In this case the render target creation
2280      * will cause the 3D init.
2281      */
2282     if( (This->ImplType == SURFACE_OPENGL) && !(This->d3d_initialized) &&
2283         desc2.ddsCaps.dwCaps & (DDSCAPS_PRIMARYSURFACE | DDSCAPS_3DDEVICE) )
2284     {
2285         IDirectDrawSurfaceImpl *target = object, *surface;
2286         struct list *entry;
2287
2288         /* Search for the primary to use as render target */
2289         LIST_FOR_EACH(entry, &This->surface_list)
2290         {
2291             surface = LIST_ENTRY(entry, IDirectDrawSurfaceImpl, surface_list_entry);
2292             if(surface->surface_desc.ddsCaps.dwCaps & DDSCAPS_PRIMARYSURFACE)
2293             {
2294                 /* found */
2295                 target = surface;
2296                 TRACE("Using primary %p as render target\n", target);
2297                 break;
2298             }
2299         }
2300
2301         TRACE("(%p) Attaching a D3DDevice, rendertarget = %p\n", This, target);
2302         hr = IDirectDrawImpl_AttachD3DDevice(This, target->first_complex);
2303         if(hr != D3D_OK)
2304         {
2305             ERR("IDirectDrawImpl_AttachD3DDevice failed, hr = %x\n", hr);
2306         }
2307     }
2308
2309     /* Create a WineD3DTexture if a texture was requested */
2310     if(DDSD->ddsCaps.dwCaps & DDSCAPS_TEXTURE)
2311     {
2312         UINT levels;
2313         WINED3DFORMAT Format;
2314         WINED3DPOOL Pool = WINED3DPOOL_DEFAULT;
2315
2316         This->tex_root = object;
2317
2318         if(desc2.ddsCaps.dwCaps & DDSCAPS_MIPMAP)
2319         {
2320             /* a mipmap is created, create enough levels */
2321             levels = desc2.u2.dwMipMapCount;
2322         }
2323         else
2324         {
2325             /* No mipmap is created, create one level */
2326             levels = 1;
2327         }
2328
2329         /* DDSCAPS_SYSTEMMEMORY textures are in WINED3DPOOL_SYSTEMMEM */
2330         if(DDSD->ddsCaps.dwCaps & DDSCAPS_SYSTEMMEMORY)
2331         {
2332             Pool = WINED3DPOOL_SYSTEMMEM;
2333         }
2334         /* Should I forward the MANEGED cap to the managed pool ? */
2335
2336         /* Get the format. It's set already by CreateNewSurface */
2337         Format = PixelFormat_DD2WineD3D(&object->surface_desc.u4.ddpfPixelFormat);
2338
2339         /* The surfaces are already created, the callback only
2340          * passes the IWineD3DSurface to WineD3D
2341          */
2342         hr = IWineD3DDevice_CreateTexture( This->wineD3DDevice,
2343                                            DDSD->dwWidth, DDSD->dwHeight,
2344                                            levels, /* MipMapCount = Levels */
2345                                            0, /* usage */
2346                                            Format,
2347                                            Pool,
2348                                            &object->wineD3DTexture,
2349                                            0, /* SharedHandle */
2350                                            (IUnknown *) ICOM_INTERFACE(object, IDirectDrawSurface7),
2351                                            D3D7CB_CreateSurface );
2352         This->tex_root = NULL;
2353     }
2354
2355     return hr;
2356 }
2357
2358 #define DDENUMSURFACES_SEARCHTYPE (DDENUMSURFACES_CANBECREATED|DDENUMSURFACES_DOESEXIST)
2359 #define DDENUMSURFACES_MATCHTYPE (DDENUMSURFACES_ALL|DDENUMSURFACES_MATCH|DDENUMSURFACES_NOMATCH)
2360
2361 static BOOL
2362 Main_DirectDraw_DDPIXELFORMAT_Match(const DDPIXELFORMAT *requested,
2363                                     const DDPIXELFORMAT *provided)
2364 {
2365     /* Some flags must be present in both or neither for a match. */
2366     static const DWORD must_match = DDPF_PALETTEINDEXED1 | DDPF_PALETTEINDEXED2
2367         | DDPF_PALETTEINDEXED4 | DDPF_PALETTEINDEXED8 | DDPF_FOURCC
2368         | DDPF_ZBUFFER | DDPF_STENCILBUFFER;
2369
2370     if ((requested->dwFlags & provided->dwFlags) != requested->dwFlags)
2371         return FALSE;
2372
2373     if ((requested->dwFlags & must_match) != (provided->dwFlags & must_match))
2374         return FALSE;
2375
2376     if (requested->dwFlags & DDPF_FOURCC)
2377         if (requested->dwFourCC != provided->dwFourCC)
2378             return FALSE;
2379
2380     if (requested->dwFlags & (DDPF_RGB|DDPF_YUV|DDPF_ZBUFFER|DDPF_ALPHA
2381                               |DDPF_LUMINANCE|DDPF_BUMPDUDV))
2382         if (requested->u1.dwRGBBitCount != provided->u1.dwRGBBitCount)
2383             return FALSE;
2384
2385     if (requested->dwFlags & (DDPF_RGB|DDPF_YUV|DDPF_STENCILBUFFER
2386                               |DDPF_LUMINANCE|DDPF_BUMPDUDV))
2387         if (requested->u2.dwRBitMask != provided->u2.dwRBitMask)
2388             return FALSE;
2389
2390     if (requested->dwFlags & (DDPF_RGB|DDPF_YUV|DDPF_ZBUFFER|DDPF_BUMPDUDV))
2391         if (requested->u3.dwGBitMask != provided->u3.dwGBitMask)
2392             return FALSE;
2393
2394     /* I could be wrong about the bumpmapping. MSDN docs are vague. */
2395     if (requested->dwFlags & (DDPF_RGB|DDPF_YUV|DDPF_STENCILBUFFER
2396                               |DDPF_BUMPDUDV))
2397         if (requested->u4.dwBBitMask != provided->u4.dwBBitMask)
2398             return FALSE;
2399
2400     if (requested->dwFlags & (DDPF_ALPHAPIXELS|DDPF_ZPIXELS))
2401         if (requested->u5.dwRGBAlphaBitMask != provided->u5.dwRGBAlphaBitMask)
2402             return FALSE;
2403
2404     return TRUE;
2405 }
2406
2407 static BOOL
2408 IDirectDrawImpl_DDSD_Match(const DDSURFACEDESC2* requested,
2409                            const DDSURFACEDESC2* provided)
2410 {
2411     struct compare_info
2412     {
2413         DWORD flag;
2414         ptrdiff_t offset;
2415         size_t size;
2416     };
2417
2418 #define CMP(FLAG, FIELD)                                \
2419         { DDSD_##FLAG, offsetof(DDSURFACEDESC2, FIELD), \
2420           sizeof(((DDSURFACEDESC2 *)(NULL))->FIELD) }
2421
2422     static const struct compare_info compare[] =
2423     {
2424         CMP(ALPHABITDEPTH, dwAlphaBitDepth),
2425         CMP(BACKBUFFERCOUNT, dwBackBufferCount),
2426         CMP(CAPS, ddsCaps),
2427         CMP(CKDESTBLT, ddckCKDestBlt),
2428         CMP(CKDESTOVERLAY, u3 /* ddckCKDestOverlay */),
2429         CMP(CKSRCBLT, ddckCKSrcBlt),
2430         CMP(CKSRCOVERLAY, ddckCKSrcOverlay),
2431         CMP(HEIGHT, dwHeight),
2432         CMP(LINEARSIZE, u1 /* dwLinearSize */),
2433         CMP(LPSURFACE, lpSurface),
2434         CMP(MIPMAPCOUNT, u2 /* dwMipMapCount */),
2435         CMP(PITCH, u1 /* lPitch */),
2436         /* PIXELFORMAT: manual */
2437         CMP(REFRESHRATE, u2 /* dwRefreshRate */),
2438         CMP(TEXTURESTAGE, dwTextureStage),
2439         CMP(WIDTH, dwWidth),
2440         /* ZBUFFERBITDEPTH: "obsolete" */
2441     };
2442
2443 #undef CMP
2444
2445     unsigned int i;
2446
2447     if ((requested->dwFlags & provided->dwFlags) != requested->dwFlags)
2448         return FALSE;
2449
2450     for (i=0; i < sizeof(compare)/sizeof(compare[0]); i++)
2451     {
2452         if (requested->dwFlags & compare[i].flag
2453             && memcmp((const char *)provided + compare[i].offset,
2454                       (const char *)requested + compare[i].offset,
2455                       compare[i].size) != 0)
2456             return FALSE;
2457     }
2458
2459     if (requested->dwFlags & DDSD_PIXELFORMAT)
2460     {
2461         if (!Main_DirectDraw_DDPIXELFORMAT_Match(&requested->u4.ddpfPixelFormat,
2462                                                 &provided->u4.ddpfPixelFormat))
2463             return FALSE;
2464     }
2465
2466     return TRUE;
2467 }
2468
2469 #undef DDENUMSURFACES_SEARCHTYPE
2470 #undef DDENUMSURFACES_MATCHTYPE
2471
2472 /*****************************************************************************
2473  * IDirectDraw7::EnumSurfaces
2474  *
2475  * Loops through all surfaces attached to this device and calls the
2476  * application callback. This can't be relayed to WineD3DDevice,
2477  * because some WineD3DSurfaces' parents are IParent objects
2478  *
2479  * Params:
2480  *  Flags: Some filtering flags. See IDirectDrawImpl_EnumSurfacesCallback
2481  *  DDSD: Description to filter for
2482  *  Context: Application-provided pointer, it's passed unmodified to the
2483  *           Callback function
2484  *  Callback: Address to call for each surface
2485  *
2486  * Returns:
2487  *  DDERR_INVALIDPARAMS if the callback is NULL
2488  *  DD_OK on success
2489  *
2490  *****************************************************************************/
2491 static HRESULT WINAPI
2492 IDirectDrawImpl_EnumSurfaces(IDirectDraw7 *iface,
2493                              DWORD Flags,
2494                              DDSURFACEDESC2 *DDSD,
2495                              void *Context,
2496                              LPDDENUMSURFACESCALLBACK7 Callback)
2497 {
2498     /* The surface enumeration is handled by WineDDraw,
2499      * because it keeps track of all surfaces attached to
2500      * it. The filtering is done by our callback function,
2501      * because WineDDraw doesn't handle ddraw-like surface
2502      * caps structures
2503      */
2504     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
2505     IDirectDrawSurfaceImpl *surf;
2506     BOOL all, nomatch;
2507     DDSURFACEDESC2 desc;
2508     struct list *entry, *entry2;
2509
2510     all = Flags & DDENUMSURFACES_ALL;
2511     nomatch = Flags & DDENUMSURFACES_NOMATCH;
2512
2513     TRACE("(%p)->(%x,%p,%p,%p)\n", This, Flags, DDSD, Context, Callback);
2514
2515     if(!Callback)
2516         return DDERR_INVALIDPARAMS;
2517
2518     /* Use the _SAFE enumeration, the app may destroy enumerated surfaces */
2519     LIST_FOR_EACH_SAFE(entry, entry2, &This->surface_list)
2520     {
2521         surf = LIST_ENTRY(entry, IDirectDrawSurfaceImpl, surface_list_entry);
2522         if (all || (nomatch != IDirectDrawImpl_DDSD_Match(DDSD, &surf->surface_desc)))
2523         {
2524             desc = surf->surface_desc;
2525             IDirectDrawSurface7_AddRef(ICOM_INTERFACE(surf, IDirectDrawSurface7));
2526             if(Callback( ICOM_INTERFACE(surf, IDirectDrawSurface7), &desc, Context) != DDENUMRET_OK)
2527                 return DD_OK;
2528         }
2529     }
2530     return DD_OK;
2531 }
2532
2533 /*****************************************************************************
2534  * D3D7CB_CreateRenderTarget
2535  *
2536  * Callback called by WineD3D to create Surfaces for render target usage
2537  * This function takes the D3D target from the IDirectDrawImpl structure,
2538  * and returns the WineD3DSurface. To avoid double usage, the surface
2539  * is marked as render target afterwards
2540  *
2541  * Params
2542  *  device: The WineD3DDevice's parent
2543  *  Width, Height, Format: Dimensions and pixelformat of the render target
2544  *                         Ignored, because the surface already exists
2545  *  MultiSample, MultisampleQuality, Lockable: Ignored for the same reason
2546  *  Lockable: ignored
2547  *  ppSurface: Address to pass the surface pointer back at
2548  *  pSharedHandle: Ignored
2549  *
2550  * Returns:
2551  *  Always returns D3D_OK
2552  *
2553  *****************************************************************************/
2554 static HRESULT WINAPI
2555 D3D7CB_CreateRenderTarget(IUnknown *device, IUnknown *pSuperior,
2556                           UINT Width, UINT Height,
2557                           WINED3DFORMAT Format,
2558                           WINED3DMULTISAMPLE_TYPE MultiSample,
2559                           DWORD MultisampleQuality,
2560                           BOOL Lockable,
2561                           IWineD3DSurface** ppSurface,
2562                           HANDLE* pSharedHandle)
2563 {
2564     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, device);
2565     IDirectDrawSurfaceImpl *d3dSurface = (IDirectDrawSurfaceImpl *) This->d3d_target->first_complex;
2566     TRACE("(%p) call back\n", device);
2567
2568     /* Loop through the complex chain and try to find unused primary surfaces */
2569     while(d3dSurface->isRenderTarget)
2570     {
2571         d3dSurface = d3dSurface->next_complex;
2572         if(!d3dSurface) break;
2573     }
2574     if(!d3dSurface)
2575     {
2576         d3dSurface = This->d3d_target;
2577         ERR(" (%p) : No DirectDrawSurface found to create the back buffer. Using the front buffer as back buffer. Uncertain consequences\n", This);
2578     }
2579
2580     /* TODO: Return failure if the dimensions do not match, but this shouldn't happen */
2581
2582     *ppSurface = d3dSurface->WineD3DSurface;
2583     d3dSurface->isRenderTarget = TRUE;
2584     TRACE("Returning wineD3DSurface %p, it belongs to surface %p\n", *ppSurface, d3dSurface);
2585     return D3D_OK;
2586 }
2587
2588 static HRESULT WINAPI
2589 D3D7CB_CreateDepthStencilSurface(IUnknown *device,
2590                                  IUnknown *pSuperior,
2591                                  UINT Width,
2592                                  UINT Height,
2593                                  WINED3DFORMAT Format,
2594                                  WINED3DMULTISAMPLE_TYPE MultiSample,
2595                                  DWORD MultisampleQuality,
2596                                  BOOL Discard,
2597                                  IWineD3DSurface** ppSurface,
2598                                  HANDLE* pSharedHandle)
2599 {
2600     /* Create a Depth Stencil surface to make WineD3D happy */
2601     HRESULT hr = D3D_OK;
2602     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, device);
2603     DDSURFACEDESC2 ddsd;
2604
2605     TRACE("(%p) call back\n", device);
2606
2607     *ppSurface = NULL;
2608
2609     /* Create a DirectDraw surface */
2610     memset(&ddsd, 0, sizeof(ddsd));
2611     ddsd.dwSize = sizeof(ddsd);
2612     ddsd.u4.ddpfPixelFormat.dwSize = sizeof(DDPIXELFORMAT);
2613     ddsd.dwFlags = DDSD_PIXELFORMAT | DDSD_WIDTH | DDSD_HEIGHT | DDSD_CAPS;
2614     ddsd.ddsCaps.dwCaps = DDSCAPS_OFFSCREENPLAIN;
2615     ddsd.dwHeight = Height;
2616     ddsd.dwWidth = Width;
2617     if(Format != 0)
2618     {
2619       PixelFormat_WineD3DtoDD(&ddsd.u4.ddpfPixelFormat, Format);
2620     }
2621     else
2622     {
2623       ddsd.dwFlags ^= DDSD_PIXELFORMAT;
2624     }
2625
2626     This->depthstencil = TRUE;
2627     hr = IDirectDraw7_CreateSurface((IDirectDraw7 *) This,
2628                                     &ddsd,
2629                                     (IDirectDrawSurface7 **) &This->DepthStencilBuffer,
2630                                     NULL);
2631     This->depthstencil = FALSE;
2632     if(FAILED(hr))
2633     {
2634         ERR(" (%p) Creating a DepthStencil Surface failed, result = %x\n", This, hr);
2635         return hr;
2636     }
2637     *ppSurface = This->DepthStencilBuffer->WineD3DSurface;
2638     return D3D_OK;
2639 }
2640
2641 /*****************************************************************************
2642  * D3D7CB_CreateAdditionalSwapChain
2643  *
2644  * Callback function for WineD3D which creates a new WineD3DSwapchain
2645  * interface. It also creates an IParent interface to store that pointer,
2646  * so the WineD3DSwapchain has a parent and can be released when the D3D
2647  * device is destroyed
2648  *****************************************************************************/
2649 static HRESULT WINAPI
2650 D3D7CB_CreateAdditionalSwapChain(IUnknown *device,
2651                                  WINED3DPRESENT_PARAMETERS* pPresentationParameters,
2652                                  IWineD3DSwapChain ** ppSwapChain)
2653 {
2654     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, device);
2655     IParentImpl *object = NULL;
2656     HRESULT res = D3D_OK;
2657     IWineD3DSwapChain *swapchain;
2658     TRACE("(%p) call back\n", device);
2659
2660     object = HeapAlloc(GetProcessHeap(),  HEAP_ZERO_MEMORY, sizeof(IParentImpl));
2661     if (NULL == object)
2662     {
2663         FIXME("Allocation of memory failed\n");
2664         *ppSwapChain = NULL;
2665         return DDERR_OUTOFVIDEOMEMORY;
2666     }
2667
2668     ICOM_INIT_INTERFACE(object, IParent, IParent_Vtbl);
2669     object->ref = 1;
2670
2671     res = IWineD3DDevice_CreateAdditionalSwapChain(This->wineD3DDevice,
2672                                                    pPresentationParameters, 
2673                                                    &swapchain, 
2674                                                    (IUnknown*) ICOM_INTERFACE(object, IParent),
2675                                                    D3D7CB_CreateRenderTarget,
2676                                                    D3D7CB_CreateDepthStencilSurface);
2677     if (res != D3D_OK)
2678     {
2679         FIXME("(%p) call to IWineD3DDevice_CreateAdditionalSwapChain failed\n", This);
2680         HeapFree(GetProcessHeap(), 0 , object);
2681         *ppSwapChain = NULL;
2682     }
2683     else
2684     {
2685         *ppSwapChain = swapchain;
2686         object->child = (IUnknown *) swapchain;
2687     }
2688
2689     return res;
2690 }
2691
2692 /*****************************************************************************
2693  * IDirectDrawImpl_AttachD3DDevice
2694  *
2695  * Initializes the D3D capabilities of WineD3D
2696  *
2697  * Params:
2698  *  primary: The primary surface for D3D
2699  *
2700  * Returns
2701  *  DD_OK on success,
2702  *  DDERR_* otherwise
2703  *
2704  *****************************************************************************/
2705 static HRESULT WINAPI
2706 IDirectDrawImpl_AttachD3DDevice(IDirectDrawImpl *This,
2707                                 IDirectDrawSurfaceImpl *primary)
2708 {
2709     HRESULT hr;
2710     HWND                  window;
2711
2712     WINED3DPRESENT_PARAMETERS localParameters;
2713
2714     TRACE("(%p)->(%p)\n", This, primary);
2715
2716     /* Get the window */
2717     hr = IWineD3DDevice_GetHWND(This->wineD3DDevice,
2718                                 &window);
2719     if(hr != D3D_OK)
2720     {
2721         ERR("IWineD3DDevice::GetHWND failed\n");
2722         return hr;
2723     }
2724
2725     /* If there's no window, create a hidden window. WineD3D needs it */
2726     if(window == 0)
2727     {
2728         window = CreateWindowExA(0, This->classname, "Hidden D3D Window",
2729                                  WS_DISABLED, 0, 0,
2730                                  GetSystemMetrics(SM_CXSCREEN),
2731                                  GetSystemMetrics(SM_CYSCREEN),
2732                                  NULL, NULL, GetModuleHandleA(0), NULL);
2733
2734         ShowWindow(window, SW_HIDE);   /* Just to be sure */
2735         WARN("(%p) No window for the Direct3DDevice, created a hidden window. HWND=%p\n", This, window);
2736         This->d3d_window = window;
2737     }
2738     else
2739     {
2740         TRACE("(%p) Using existing window %p for Direct3D rendering\n", This, window);
2741     }
2742
2743     /* Store the future Render Target surface */
2744     This->d3d_target = primary;
2745
2746     /* Use the surface description for the device parameters, not the
2747      * Device settings. The app might render to an offscreen surface
2748      */
2749     localParameters.BackBufferWidth                 = primary->surface_desc.dwWidth;
2750     localParameters.BackBufferHeight                = primary->surface_desc.dwHeight;
2751     localParameters.BackBufferFormat                = PixelFormat_DD2WineD3D(&primary->surface_desc.u4.ddpfPixelFormat);
2752     localParameters.BackBufferCount                 = (primary->surface_desc.dwFlags & DDSD_BACKBUFFERCOUNT) ? primary->surface_desc.dwBackBufferCount : 0;
2753     localParameters.MultiSampleType                 = WINED3DMULTISAMPLE_NONE;
2754     localParameters.MultiSampleQuality              = 0;
2755     localParameters.SwapEffect                      = WINED3DSWAPEFFECT_COPY;
2756     localParameters.hDeviceWindow                   = window;
2757     localParameters.Windowed                        = !(This->cooperative_level & DDSCL_FULLSCREEN);
2758     localParameters.EnableAutoDepthStencil          = FALSE;
2759     localParameters.AutoDepthStencilFormat          = WINED3DFMT_D16;
2760     localParameters.Flags                           = 0;
2761     localParameters.FullScreen_RefreshRateInHz      = WINED3DPRESENT_RATE_DEFAULT; /* Default rate: It's already set */
2762     localParameters.PresentationInterval            = WINED3DPRESENT_INTERVAL_DEFAULT;
2763
2764     TRACE("Passing mode %d\n", localParameters.BackBufferFormat);
2765
2766     /* Set this NOW, otherwise creating the depth stencil surface will cause a
2767      * recursive loop until ram or emulated video memory is full
2768      */
2769     This->d3d_initialized = TRUE;
2770
2771     hr = IWineD3DDevice_Init3D(This->wineD3DDevice,
2772                                &localParameters,
2773                                D3D7CB_CreateAdditionalSwapChain);
2774     if(FAILED(hr))
2775     {
2776         This->wineD3DDevice = NULL;
2777         return hr;
2778     }
2779
2780     /* Create an Index Buffer parent */
2781     TRACE("(%p) Successfully initialized 3D\n", This);
2782     return DD_OK;
2783 }
2784
2785 /*****************************************************************************
2786  * DirectDrawCreateClipper (DDRAW.@)
2787  *
2788  * Creates a new IDirectDrawClipper object.
2789  *
2790  * Params:
2791  *  Clipper: Address to write the interface pointer to
2792  *  UnkOuter: For aggregation support, which ddraw doesn't have. Has to be
2793  *            NULL
2794  *
2795  * Returns:
2796  *  CLASS_E_NOAGGREGATION if UnkOuter != NULL
2797  *  E_OUTOFMEMORY if allocating the object failed
2798  *
2799  *****************************************************************************/
2800 HRESULT WINAPI
2801 DirectDrawCreateClipper(DWORD Flags,
2802                         IDirectDrawClipper **Clipper,
2803                         IUnknown *UnkOuter)
2804 {
2805     IDirectDrawClipperImpl* object;
2806     TRACE("(%08x,%p,%p)\n", Flags, Clipper, UnkOuter);
2807
2808     if (UnkOuter != NULL) return CLASS_E_NOAGGREGATION;
2809
2810     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
2811                      sizeof(IDirectDrawClipperImpl));
2812     if (object == NULL) return E_OUTOFMEMORY;
2813
2814     ICOM_INIT_INTERFACE(object, IDirectDrawClipper, IDirectDrawClipper_Vtbl);
2815     object->ref = 1;
2816     object->hWnd = 0;
2817     object->ddraw_owner = NULL;
2818
2819     *Clipper = (IDirectDrawClipper *) object;
2820     return DD_OK;
2821 }
2822
2823 /*****************************************************************************
2824  * IDirectDraw7::CreateClipper
2825  *
2826  * Creates a DDraw clipper. See DirectDrawCreateClipper for details
2827  *
2828  *****************************************************************************/
2829 static HRESULT WINAPI
2830 IDirectDrawImpl_CreateClipper(IDirectDraw7 *iface,
2831                               DWORD Flags,
2832                               IDirectDrawClipper **Clipper,
2833                               IUnknown *UnkOuter)
2834 {
2835     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
2836     TRACE("(%p)->(%x,%p,%p)\n", This, Flags, Clipper, UnkOuter);
2837     return DirectDrawCreateClipper(Flags, Clipper, UnkOuter);
2838 }
2839
2840 /*****************************************************************************
2841  * IDirectDraw7::CreatePalette
2842  *
2843  * Creates a new IDirectDrawPalette object
2844  *
2845  * Params:
2846  *  Flags: The flags for the new clipper
2847  *  ColorTable: Color table to assign to the new clipper
2848  *  Palette: Address to write the interface pointer to
2849  *  UnkOuter: For aggregation support, which ddraw doesn't have. Has to be
2850  *            NULL
2851  *
2852  * Returns:
2853  *  CLASS_E_NOAGGREGATION if UnkOuter != NULL
2854  *  E_OUTOFMEMORY if allocating the object failed
2855  *
2856  *****************************************************************************/
2857 static HRESULT WINAPI
2858 IDirectDrawImpl_CreatePalette(IDirectDraw7 *iface,
2859                               DWORD Flags,
2860                               PALETTEENTRY *ColorTable,
2861                               IDirectDrawPalette **Palette,
2862                               IUnknown *pUnkOuter)
2863 {
2864     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
2865     IDirectDrawPaletteImpl *object;
2866     HRESULT hr = DDERR_GENERIC;
2867     TRACE("(%p)->(%x,%p,%p,%p)\n", This, Flags, ColorTable, Palette, pUnkOuter);
2868
2869     if(pUnkOuter != NULL)
2870     {
2871         WARN("pUnkOuter is %p, returning CLASS_E_NOAGGREGATION\n", pUnkOuter);
2872         return CLASS_E_NOAGGREGATION;
2873     }
2874
2875     /* The refcount test shows that a cooplevel is required for this */
2876     if(!This->cooperative_level)
2877     {
2878         WARN("No cooperative level set, returning DDERR_NOCOOPERATIVELEVELSET\n");
2879         return DDERR_NOCOOPERATIVELEVELSET;
2880     }
2881
2882     object = HeapAlloc(GetProcessHeap(), 0, sizeof(IDirectDrawPaletteImpl));
2883     if(!object)
2884     {
2885         ERR("Out of memory when allocating memory for a palette implementation\n");
2886         return E_OUTOFMEMORY;
2887     }
2888
2889     ICOM_INIT_INTERFACE(object, IDirectDrawPalette, IDirectDrawPalette_Vtbl);
2890     object->ref = 1;
2891     object->ddraw_owner = This;
2892
2893     hr = IWineD3DDevice_CreatePalette(This->wineD3DDevice, Flags, ColorTable, &object->wineD3DPalette, (IUnknown *) ICOM_INTERFACE(object, IDirectDrawPalette) );
2894     if(hr != DD_OK)
2895     {
2896         HeapFree(GetProcessHeap(), 0, object);
2897         return hr;
2898     }
2899
2900     IDirectDraw7_AddRef(iface);
2901     object->ifaceToRelease = (IUnknown *) iface;
2902     *Palette = ICOM_INTERFACE(object, IDirectDrawPalette);
2903     return DD_OK;
2904 }
2905
2906 /*****************************************************************************
2907  * IDirectDraw7::DuplicateSurface
2908  *
2909  * Duplicates a surface. The surface memory points to the same memory as
2910  * the original surface, and it's released when the last surface referencing
2911  * it is released. I guess that's beyond Wine's surface management right now
2912  * (Idea: create a new DDraw surface with the same WineD3DSurface. I need a
2913  * test application to implement this)
2914  *
2915  * Params:
2916  *  Src: Address of the source surface
2917  *  Dest: Address to write the new surface pointer to
2918  *
2919  * Returns:
2920  *  See IDirectDraw7::CreateSurface
2921  *
2922  *****************************************************************************/
2923 static HRESULT WINAPI
2924 IDirectDrawImpl_DuplicateSurface(IDirectDraw7 *iface,
2925                                  IDirectDrawSurface7 *Src,
2926                                  IDirectDrawSurface7 **Dest)
2927 {
2928     ICOM_THIS_FROM(IDirectDrawImpl, IDirectDraw7, iface);
2929     IDirectDrawSurfaceImpl *Surf = ICOM_OBJECT(IDirectDrawSurfaceImpl, IDirectDrawSurface7, Src);
2930
2931     FIXME("(%p)->(%p,%p)\n", This, Surf, Dest);
2932
2933     /* For now, simply create a new, independent surface */
2934     return IDirectDraw7_CreateSurface(iface,
2935                                       &Surf->surface_desc,
2936                                       Dest,
2937                                       NULL);
2938 }
2939
2940 /*****************************************************************************
2941  * IDirectDraw7 VTable
2942  *****************************************************************************/
2943 const IDirectDraw7Vtbl IDirectDraw7_Vtbl =
2944 {
2945     /*** IUnknown ***/
2946     IDirectDrawImpl_QueryInterface,
2947     IDirectDrawImpl_AddRef,
2948     IDirectDrawImpl_Release,
2949     /*** IDirectDraw ***/
2950     IDirectDrawImpl_Compact,
2951     IDirectDrawImpl_CreateClipper,
2952     IDirectDrawImpl_CreatePalette,
2953     IDirectDrawImpl_CreateSurface,
2954     IDirectDrawImpl_DuplicateSurface,
2955     IDirectDrawImpl_EnumDisplayModes,
2956     IDirectDrawImpl_EnumSurfaces,
2957     IDirectDrawImpl_FlipToGDISurface,
2958     IDirectDrawImpl_GetCaps,
2959     IDirectDrawImpl_GetDisplayMode,
2960     IDirectDrawImpl_GetFourCCCodes,
2961     IDirectDrawImpl_GetGDISurface,
2962     IDirectDrawImpl_GetMonitorFrequency,
2963     IDirectDrawImpl_GetScanLine,
2964     IDirectDrawImpl_GetVerticalBlankStatus,
2965     IDirectDrawImpl_Initialize,
2966     IDirectDrawImpl_RestoreDisplayMode,
2967     IDirectDrawImpl_SetCooperativeLevel,
2968     IDirectDrawImpl_SetDisplayMode,
2969     IDirectDrawImpl_WaitForVerticalBlank,
2970     /*** IDirectDraw2 ***/
2971     IDirectDrawImpl_GetAvailableVidMem,
2972     /*** IDirectDraw7 ***/
2973     IDirectDrawImpl_GetSurfaceFromDC,
2974     IDirectDrawImpl_RestoreAllSurfaces,
2975     IDirectDrawImpl_TestCooperativeLevel,
2976     IDirectDrawImpl_GetDeviceIdentifier,
2977     /*** IDirectDraw7 ***/
2978     IDirectDrawImpl_StartModeTest,
2979     IDirectDrawImpl_EvaluateMode
2980 };