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