git.oblomov.eu Git - wine/blob - dlls/ddraw/direct3d.c

   1 /*
   2  * Copyright (c) 2006 Stefan Dösinger
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  17  */
  18
  19 #include "config.h"
  20 #include "wine/port.h"
  21 #include "wine/debug.h"
  22
  23 #include <assert.h>
  24 #include <stdarg.h>
  25 #include <string.h>
  26 #include <stdlib.h>
  27
  28 #define COBJMACROS
  29
  30 #include "windef.h"
  31 #include "winbase.h"
  32 #include "winnls.h"
  33 #include "winerror.h"
  34 #include "wingdi.h"
  35 #include "wine/exception.h"
  36 #include "excpt.h"
  37
  38 #include "ddraw.h"
  39 #include "d3d.h"
  40
  41 #include "ddraw_private.h"
  42
  43 WINE_DEFAULT_DEBUG_CHANNEL(d3d7);
  44
  45 /*****************************************************************************
  46  * IDirect3D7::QueryInterface
  47  *
  48  * QueryInterface implementation with thunks to IDirectDraw7
  49  *
  50  *****************************************************************************/
  51 static HRESULT WINAPI
  52 Thunk_IDirect3DImpl_7_QueryInterface(IDirect3D7 *iface,
  53                                     REFIID refiid,
  54                                     void **obj)
  55 {
  56     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D7, iface);
  57     TRACE("(%p)->(%s,%p): Thunking to IDirectDraw7\n", This, debugstr_guid(refiid), obj);
  58
  59     return IDirectDraw7_QueryInterface(ICOM_INTERFACE(This, IDirectDraw7),
  60                                        refiid,
  61                                        obj);
  62 }
  63
  64 static HRESULT WINAPI
  65 Thunk_IDirect3DImpl_3_QueryInterface(IDirect3D3 *iface,
  66                                     REFIID refiid,
  67                                     void **obj)
  68 {
  69     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D3, iface);
  70     TRACE("(%p)->(%s,%p): Thunking to IDirectDraw7\n", This, debugstr_guid(refiid), obj);
  71
  72     return IDirectDraw7_QueryInterface(ICOM_INTERFACE(This, IDirectDraw7),
  73                                        refiid,
  74                                        obj);
  75 }
  76
  77 static HRESULT WINAPI
  78 Thunk_IDirect3DImpl_2_QueryInterface(IDirect3D2 *iface,
  79                                     REFIID refiid,
  80                                     void **obj)
  81 {
  82     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D2, iface);
  83     TRACE("(%p)->(%s,%p): Thunking to IDirectDraw7\n", This, debugstr_guid(refiid), obj);
  84
  85     return IDirectDraw7_QueryInterface(ICOM_INTERFACE(This, IDirectDraw7),
  86                                        refiid,
  87                                        obj);
  88 }
  89
  90 static HRESULT WINAPI
  91 Thunk_IDirect3DImpl_1_QueryInterface(IDirect3D *iface,
  92                                     REFIID refiid,
  93                                     void **obj)
  94 {
  95     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D, iface);
  96     TRACE("(%p)->(%s,%p): Thunking to IDirectDraw7\n", This, debugstr_guid(refiid), obj);
  97
  98     return IDirectDraw7_QueryInterface(ICOM_INTERFACE(This, IDirectDraw7),
  99                                        refiid,
 100                                        obj);
 101 }
 102
 103 /*****************************************************************************
 104  * IDirect3D7::AddRef
 105  *
 106  * DirectDraw refcounting is a bit odd. Every version of the ddraw interface
 107  * has its own refcount, but IDirect3D 1/2/3 refcounts are linked to
 108  * IDirectDraw, and IDirect3D7 is linked to IDirectDraw7
 109  *
 110  * IDirect3D7 -> IDirectDraw7
 111  * IDirect3D3 -> IDirectDraw
 112  * IDirect3D2 -> IDirectDraw
 113  * IDirect3D  -> IDirectDraw
 114  *
 115  * So every AddRef implementation thunks to a different interface, and the
 116  * IDirectDrawX::AddRef implementations have different counters...
 117  *
 118  * Returns
 119  *  The new refcount
 120  *
 121  *****************************************************************************/
 122 static ULONG WINAPI
 123 Thunk_IDirect3DImpl_7_AddRef(IDirect3D7 *iface)
 124 {
 125     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D7, iface);
 126     TRACE("(%p) : Thunking to IDirectDraw7.\n", This);
 127
 128     return IDirectDraw7_AddRef(ICOM_INTERFACE(This, IDirectDraw7));
 129 }
 130
 131 static ULONG WINAPI
 132 Thunk_IDirect3DImpl_3_AddRef(IDirect3D3 *iface)
 133 {
 134     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D3, iface);
 135     TRACE("(%p) : Thunking to IDirectDraw.\n", This);
 136
 137     return IDirectDraw_AddRef(ICOM_INTERFACE(This, IDirectDraw));
 138 }
 139
 140 static ULONG WINAPI
 141 Thunk_IDirect3DImpl_2_AddRef(IDirect3D2 *iface)
 142 {
 143     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D2, iface);
 144     TRACE("(%p) : Thunking to IDirectDraw.\n", This);
 145
 146     return IDirectDraw_AddRef(ICOM_INTERFACE(This, IDirectDraw));
 147 }
 148
 149 static ULONG WINAPI
 150 Thunk_IDirect3DImpl_1_AddRef(IDirect3D *iface)
 151 {
 152     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D, iface);
 153     TRACE("(%p) : Thunking to IDirectDraw.\n", This);
 154
 155     return IDirectDraw_AddRef(ICOM_INTERFACE(This, IDirectDraw));
 156 }
 157
 158 /*****************************************************************************
 159  * IDirect3D7::Release
 160  *
 161  * Same story as IDirect3D7::AddRef
 162  *
 163  * Returns: The new refcount
 164  *
 165  *****************************************************************************/
 166 static ULONG WINAPI
 167 Thunk_IDirect3DImpl_7_Release(IDirect3D7 *iface)
 168 {
 169     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D7, iface);
 170     TRACE("(%p) : Thunking to IDirectDraw7.\n", This);
 171
 172     return IDirectDraw7_Release(ICOM_INTERFACE(This, IDirectDraw7));
 173 }
 174
 175 static ULONG WINAPI
 176 Thunk_IDirect3DImpl_3_Release(IDirect3D3 *iface)
 177 {
 178     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D3, iface);
 179     TRACE("(%p) : Thunking to IDirectDraw.\n", This);
 180
 181     return IDirectDraw_Release(ICOM_INTERFACE(This, IDirectDraw));
 182 }
 183
 184 static ULONG WINAPI
 185 Thunk_IDirect3DImpl_2_Release(IDirect3D2 *iface)
 186 {
 187     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D2, iface);
 188     TRACE("(%p) : Thunking to IDirectDraw.\n", This);
 189
 190     return IDirectDraw_Release(ICOM_INTERFACE(This, IDirectDraw));
 191 }
 192
 193 static ULONG WINAPI
 194 Thunk_IDirect3DImpl_1_Release(IDirect3D *iface)
 195 {
 196     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D, iface);
 197     TRACE("(%p) : Thunking to IDirectDraw.\n", This);
 198
 199     return IDirectDraw_Release(ICOM_INTERFACE(This, IDirectDraw));
 200 }
 201
 202 /*****************************************************************************
 203  * IDirect3D Methods
 204  *****************************************************************************/
 205
 206 /*****************************************************************************
 207  * IDirect3D::Initialize
 208  *
 209  * Initializes the IDirect3D interface. This is a no-op implementation,
 210  * as all initialization is done at create time.
 211  *
 212  * Version 1
 213  *
 214  * Params:
 215  *  refiid: ?
 216  *
 217  * Returns:
 218  *  D3D_OK, because it's a no-op
 219  *
 220  *****************************************************************************/
 221 static HRESULT WINAPI
 222 IDirect3DImpl_1_Initialize(IDirect3D *iface,
 223                            REFIID refiid)
 224 {
 225     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D, iface);
 226
 227     TRACE("(%p)->(%s) no-op...\n", This, debugstr_guid(refiid));
 228     return D3D_OK;
 229 }
 230
 231 /*****************************************************************************
 232  * IDirect3D7::EnumDevices
 233  *
 234  * The EnumDevices method for IDirect3D7. It enumerates all supported
 235  * D3D7 devices. Currently there's only one.
 236  *
 237  * Params:
 238  *  Callback: Function to call for each enumerated device
 239  *  Context: Pointer to pass back to the app
 240  *
 241  * Returns:
 242  *  D3D_OK, or the return value of the GetCaps call
 243  *
 244  *****************************************************************************/
 245 static HRESULT WINAPI
 246 IDirect3DImpl_7_EnumDevices(IDirect3D7 *iface,
 247                           LPD3DENUMDEVICESCALLBACK7 Callback,
 248                           void *Context)
 249 {
 250     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D7, iface);
 251     char interface_name[] = "WINE Direct3D7 using WineD3D";
 252     char device_name[] = "Wine D3D7 device";
 253     D3DDEVICEDESC7 ddesc;
 254     D3DDEVICEDESC oldDesc;
 255     HRESULT hr;
 256
 257     TRACE("(%p)->(%p,%p)\n", This, Callback, Context);
 258
 259     TRACE("(%p) Enumerating WineD3D D3Device7 interface\n", This);
 260     hr = IDirect3DImpl_GetCaps(This->wineD3D, &oldDesc, &ddesc);
 261     if(hr != D3D_OK) return hr;
 262     Callback(interface_name, device_name, &ddesc, Context);
 263
 264     TRACE("(%p) End of enumeration\n", This);
 265     return D3D_OK;
 266 }
 267
 268 /*****************************************************************************
 269  * IDirect3D3::EnumDevices
 270  *
 271  * Enumerates all supported Direct3DDevice interfaces. This is the
 272  * implementation for Direct3D 1 to Direc3D 3, Version 7 has its own.
 273  *
 274  * Version 1, 2 and 3
 275  *
 276  * Params:
 277  *  Callback: Application-provided routine to call for each enumerated device
 278  *  Context: Pointer to pass to the callback
 279  *
 280  * Returns:
 281  *  D3D_OK on success,
 282  *  The result of IDirect3DImpl_GetCaps if it failed
 283  *
 284  *****************************************************************************/
 285 static HRESULT WINAPI
 286 IDirect3DImpl_3_EnumDevices(IDirect3D3 *iface,
 287                             LPD3DENUMDEVICESCALLBACK Callback,
 288                             void *Context)
 289 {
 290     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D3, iface);
 291     D3DDEVICEDESC dref, d1, d2;
 292     D3DDEVICEDESC7 newDesc;
 293     static CHAR wined3d_description[] = "Wine D3DDevice using WineD3D and OpenGL";
 294     HRESULT hr;
 295
 296     /* Some games (Motoracer 2 demo) have the bad idea to modify the device name string.
 297        Let's put the string in a sufficiently sized array in writable memory. */
 298     char device_name[50];
 299     strcpy(device_name,"direct3d");
 300
 301     TRACE("(%p)->(%p,%p)\n", This, Callback, Context);
 302
 303     hr = IDirect3DImpl_GetCaps(This->wineD3D, &dref, &newDesc);
 304     if(hr != D3D_OK) return hr;
 305
 306     /* Do I have to enumerate the reference id? Note from old d3d7:
 307      * "It seems that enumerating the reference IID on Direct3D 1 games
 308      * (AvP / Motoracer2) breaks them". So do not enumerate this iid in V1
 309      *
 310      * There's a registry key HKLM\Software\Microsoft\Direct3D\Drivers, EnumReference
 311      * which enables / disables enumerating the reference rasterizer. It's a DWORD,
 312      * 0 means disabled, 2 means enabled. The enablerefrast.reg and disablerefrast.reg
 313      * files in the DirectX 7.0 sdk demo directory suggest this.
 314      *
 315      * Some games(GTA 2) seem to use the second enumerated device, so I have to enumerate
 316      * at least 2 devices. So enumerate the reference device to have 2 devices.
 317      */
 318
 319     if(This->d3dversion != 1)
 320     {
 321         static CHAR reference_description[] = "Reference Direct3D ID";
 322
 323         TRACE("(%p) Enumerating WineD3D D3DDevice interface\n", This);
 324         d1 = dref;
 325         d2 = dref;
 326         hr = Callback( (LPIID) &IID_IDirect3DRefDevice, reference_description, device_name, &d1, &d2, Context);
 327         if(hr != D3DENUMRET_OK)
 328         {
 329             TRACE("Application cancelled the enumeration\n");
 330             return D3D_OK;
 331         }
 332     }
 333
 334     TRACE("(%p) Enumerating WineD3D D3DDevice interface\n", This);
 335     d1 = dref;
 336     d2 = dref;
 337     hr = Callback( (LPIID) &IID_D3DDEVICE_WineD3D, wined3d_description, device_name, &d1, &d2, Context);
 338     if(hr != D3DENUMRET_OK)
 339     {
 340         TRACE("Application cancelled the enumeration\n");
 341         return D3D_OK;
 342     }
 343     TRACE("(%p) End of enumeration\n", This);
 344
 345     return D3D_OK;
 346 }
 347
 348 static HRESULT WINAPI
 349 Thunk_IDirect3DImpl_2_EnumDevices(IDirect3D2 *iface,
 350                                   LPD3DENUMDEVICESCALLBACK Callback,
 351                                   void *Context)
 352 {
 353     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D2, iface);
 354     TRACE("(%p)->(%p,%p) thunking to IDirect3D3 interface.\n", This, Callback, Context);
 355     return IDirect3D3_EnumDevices(ICOM_INTERFACE(This, IDirect3D3),
 356                                   Callback,
 357                                   Context);
 358 }
 359
 360 static HRESULT WINAPI
 361 Thunk_IDirect3DImpl_1_EnumDevices(IDirect3D *iface,
 362                                   LPD3DENUMDEVICESCALLBACK Callback,
 363                                   void *Context)
 364 {
 365     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D, iface);
 366     TRACE("(%p)->(%p,%p) thunking to IDirect3D3 interface.\n", This, Callback, Context);
 367     return IDirect3D3_EnumDevices(ICOM_INTERFACE(This, IDirect3D3),
 368                                   Callback,
 369                                   Context);
 370 }
 371
 372 /*****************************************************************************
 373  * IDirect3D3::CreateLight
 374  *
 375  * Creates an IDirect3DLight interface. This interface is used in
 376  * Direct3D3 or earlier for lighting. In Direct3D7 it has been replaced
 377  * by the DIRECT3DLIGHT7 structure. Wine's Direct3DLight implementation
 378  * uses the IDirect3DDevice7 interface with D3D7 lights.
 379  *
 380  * Version 1, 2 and 3
 381  *
 382  * Params:
 383  *  Light: Address to store the new interface pointer
 384  *  UnkOuter: Basically for aggregation, but ddraw doesn't support it.
 385  *            Must be NULL
 386  *
 387  * Returns:
 388  *  D3D_OK on success
 389  *  DDERR_OUTOFMEMORY if memory allocation failed
 390  *  CLASS_E_NOAGGREGATION if UnkOuter != NULL
 391  *
 392  *****************************************************************************/
 393 static HRESULT WINAPI
 394 IDirect3DImpl_3_CreateLight(IDirect3D3 *iface,
 395                             IDirect3DLight **Light,
 396                             IUnknown *UnkOuter )
 397 {
 398     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D3, iface);
 399     IDirect3DLightImpl *object;
 400
 401     TRACE("(%p)->(%p,%p)\n", This, Light, UnkOuter);
 402
 403     if(UnkOuter)
 404         return CLASS_E_NOAGGREGATION;
 405
 406     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirect3DLightImpl));
 407     if (object == NULL)
 408         return DDERR_OUTOFMEMORY;
 409
 410     ICOM_INIT_INTERFACE(object, IDirect3DLight, IDirect3DLight_Vtbl);
 411     object->ref = 1;
 412     object->ddraw = This;
 413     object->next = NULL;
 414     object->active_viewport = NULL;
 415
 416     /* Update functions */
 417     object->activate = light_update;
 418     object->desactivate = light_activate;
 419     object->update = light_desactivate;
 420     object->active_viewport = NULL;
 421
 422     *Light = ICOM_INTERFACE(object, IDirect3DLight);
 423
 424     TRACE("(%p) creating implementation at %p.\n", This, object);
 425
 426     return D3D_OK;
 427 }
 428
 429 static HRESULT WINAPI
 430 Thunk_IDirect3DImpl_2_CreateLight(IDirect3D2 *iface,
 431                                   IDirect3DLight **Direct3DLight,
 432                                   IUnknown *UnkOuter)
 433 {
 434     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D2, iface);
 435     TRACE("(%p)->(%p,%p) thunking to IDirect3D3 interface.\n", This, Direct3DLight, UnkOuter);
 436     return IDirect3D3_CreateLight(ICOM_INTERFACE(This, IDirect3D3),
 437                                   Direct3DLight,
 438                                   UnkOuter);
 439 }
 440
 441 static HRESULT WINAPI
 442 Thunk_IDirect3DImpl_1_CreateLight(IDirect3D *iface,
 443                                   IDirect3DLight **Direct3DLight,
 444                                   IUnknown *UnkOuter)
 445 {
 446     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D, iface);
 447     TRACE("(%p)->(%p,%p) thunking to IDirect3D3 interface.\n", This, Direct3DLight, UnkOuter);
 448     return IDirect3D3_CreateLight(ICOM_INTERFACE(This, IDirect3D3),
 449                                   Direct3DLight,
 450                                   UnkOuter);
 451 }
 452
 453 /*****************************************************************************
 454  * IDirect3D3::CreateMaterial
 455  *
 456  * Creates an IDirect3DMaterial interface. This interface is used by Direct3D3
 457  * and older versions. The IDirect3DMaterial implementation wraps its
 458  * functionality to IDirect3DDevice7::SetMaterial and friends.
 459  *
 460  * Version 1, 2 and 3
 461  *
 462  * Params:
 463  *  Material: Address to store the new interface's pointer to
 464  *  UnkOuter: Basically for aggregation, but ddraw doesn't support it.
 465  *            Must be NULL
 466  *
 467  * Returns:
 468  *  D3D_OK on success
 469  *  DDERR_OUTOFMEMORY if memory allocation failed
 470  *  CLASS_E_NOAGGREGATION if UnkOuter != NULL
 471  *
 472  *****************************************************************************/
 473 static HRESULT WINAPI
 474 IDirect3DImpl_3_CreateMaterial(IDirect3D3 *iface,
 475                                IDirect3DMaterial3 **Material,
 476                                IUnknown *UnkOuter )
 477 {
 478     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D3, iface);
 479     IDirect3DMaterialImpl *object;
 480
 481     TRACE("(%p)->(%p,%p)\n", This, Material, UnkOuter);
 482
 483     if(UnkOuter)
 484         return CLASS_E_NOAGGREGATION;
 485
 486     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirect3DMaterialImpl));
 487     if (object == NULL)
 488         return DDERR_OUTOFMEMORY;
 489
 490     ICOM_INIT_INTERFACE(object, IDirect3DMaterial3, IDirect3DMaterial3_Vtbl);
 491     ICOM_INIT_INTERFACE(object, IDirect3DMaterial2, IDirect3DMaterial2_Vtbl);
 492     ICOM_INIT_INTERFACE(object, IDirect3DMaterial, IDirect3DMaterial_Vtbl);
 493     object->ref = 1;
 494     object->ddraw = This;
 495     object->activate = material_activate;
 496
 497     *Material = ICOM_INTERFACE(object, IDirect3DMaterial3);
 498
 499     TRACE("(%p) creating implementation at %p.\n", This, object);
 500
 501     return D3D_OK;
 502 }
 503
 504 static HRESULT WINAPI
 505 Thunk_IDirect3DImpl_2_CreateMaterial(IDirect3D2 *iface,
 506                                      IDirect3DMaterial2 **Direct3DMaterial,
 507                                      IUnknown* UnkOuter)
 508 {
 509     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D2, iface);
 510     HRESULT ret;
 511     IDirect3DMaterial3 *ret_val;
 512
 513     TRACE("(%p)->(%p,%p) thunking to IDirect3D3 interface.\n", This, Direct3DMaterial, UnkOuter);
 514     ret = IDirect3D3_CreateMaterial(ICOM_INTERFACE(This, IDirect3D3),
 515                                     &ret_val,
 516                                     UnkOuter);
 517
 518     *Direct3DMaterial = COM_INTERFACE_CAST(IDirect3DMaterialImpl, IDirect3DMaterial3, IDirect3DMaterial2, ret_val);
 519
 520     TRACE(" returning interface %p.\n", *Direct3DMaterial);
 521
 522     return ret;
 523 }
 524
 525 static HRESULT WINAPI
 526 Thunk_IDirect3DImpl_1_CreateMaterial(IDirect3D *iface,
 527                                      IDirect3DMaterial **Direct3DMaterial,
 528                                      IUnknown* UnkOuter)
 529 {
 530     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D, iface);
 531     HRESULT ret;
 532     LPDIRECT3DMATERIAL3 ret_val;
 533
 534     TRACE("(%p)->(%p,%p) thunking to IDirect3D3 interface.\n", This, Direct3DMaterial, UnkOuter);
 535     ret = IDirect3D3_CreateMaterial(ICOM_INTERFACE(This, IDirect3D3),
 536                                     &ret_val,
 537                                     UnkOuter);
 538
 539     *Direct3DMaterial = COM_INTERFACE_CAST(IDirect3DMaterialImpl, IDirect3DMaterial3, IDirect3DMaterial, ret_val);
 540
 541     TRACE(" returning interface %p.\n", *Direct3DMaterial);
 542
 543     return ret;
 544 }
 545
 546 /*****************************************************************************
 547  * IDirect3D3::CreateViewport
 548  *
 549  * Creates an IDirect3DViewport interface. This interface is used
 550  * by Direct3D and earlier versions for Viewport management. In Direct3D7
 551  * it has been replaced by a viewport structure and
 552  * IDirect3DDevice7::*Viewport. Wine's IDirect3DViewport implementation
 553  * uses the IDirect3DDevice7 methods for its functionality
 554  *
 555  * Params:
 556  *  Viewport: Address to store the new interface pointer
 557  *  UnkOuter: Basically for aggregation, but ddraw doesn't support it.
 558  *            Must be NULL
 559  *
 560  * Returns:
 561  *  D3D_OK on success
 562  *  DDERR_OUTOFMEMORY if memory allocation failed
 563  *  CLASS_E_NOAGGREGATION if UnkOuter != NULL
 564  *
 565  *****************************************************************************/
 566 static HRESULT WINAPI
 567 IDirect3DImpl_3_CreateViewport(IDirect3D3 *iface,
 568                               IDirect3DViewport3 **Viewport,
 569                               IUnknown *UnkOuter )
 570 {
 571     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D3, iface);
 572     IDirect3DViewportImpl *object;
 573
 574     if(UnkOuter)
 575         return CLASS_E_NOAGGREGATION;
 576
 577     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirect3DViewportImpl));
 578     if (object == NULL)
 579         return DDERR_OUTOFMEMORY;
 580
 581     ICOM_INIT_INTERFACE(object, IDirect3DViewport3, IDirect3DViewport3_Vtbl);
 582     object->ref = 1;
 583     object->ddraw = This;
 584     object->activate = viewport_activate;
 585     object->use_vp2 = 0xFF;
 586     object->next = NULL;
 587     object->lights = NULL;
 588     object->num_lights = 0;
 589     object->map_lights = 0;
 590
 591     *Viewport = ICOM_INTERFACE(object, IDirect3DViewport3);
 592
 593     TRACE("(%p) creating implementation at %p.\n",This, object);
 594
 595     return D3D_OK;
 596 }
 597
 598 static HRESULT WINAPI
 599 Thunk_IDirect3DImpl_2_CreateViewport(IDirect3D2 *iface,
 600                                      IDirect3DViewport2 **D3DViewport2,
 601                                      IUnknown *UnkOuter)
 602 {
 603     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D2, iface);
 604     TRACE("(%p)->(%p,%p) thunking to IDirect3D3 interface.\n", This, D3DViewport2, UnkOuter);
 605
 606     return IDirect3D3_CreateViewport(ICOM_INTERFACE(This, IDirect3D3),
 607                                      (IDirect3DViewport3 **) D3DViewport2 /* No need to cast here */,
 608                                      UnkOuter);
 609 }
 610
 611 static HRESULT WINAPI
 612 Thunk_IDirect3DImpl_1_CreateViewport(IDirect3D *iface,
 613                                      IDirect3DViewport **D3DViewport,
 614                                      IUnknown* UnkOuter)
 615 {
 616     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D, iface);
 617     TRACE("(%p)->(%p,%p) thunking to IDirect3D3 interface.\n", This, D3DViewport, UnkOuter);
 618
 619     return IDirect3D3_CreateViewport(ICOM_INTERFACE(This, IDirect3D3),
 620                                      (IDirect3DViewport3 **) D3DViewport /* No need to cast here */,
 621                                      UnkOuter);
 622 }
 623
 624 /*****************************************************************************
 625  * IDirect3D3::FindDevice
 626  *
 627  * This method finds a device with the requested properties and returns a
 628  * device description
 629  *
 630  * Verion 1, 2 and 3
 631  * Params:
 632  *  D3DDFS: Describes the requested device characteristics
 633  *  D3DFDR: Returns the device description
 634  *
 635  * Returns:
 636  *  D3D_OK on success
 637  *  DDERR_INVALIDPARAMS if no device was found
 638  *
 639  *****************************************************************************/
 640 static HRESULT WINAPI
 641 IDirect3DImpl_3_FindDevice(IDirect3D3 *iface,
 642                            D3DFINDDEVICESEARCH *D3DDFS,
 643                            D3DFINDDEVICERESULT *D3DFDR)
 644 {
 645     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D3, iface);
 646     D3DDEVICEDESC desc;
 647     D3DDEVICEDESC7 newDesc;
 648     HRESULT hr;
 649
 650     TRACE("(%p)->(%p,%p)\n", This, D3DDFS, D3DFDR);
 651
 652     if ((D3DDFS->dwFlags & D3DFDS_COLORMODEL) &&
 653         (D3DDFS->dcmColorModel != D3DCOLOR_RGB))
 654     {
 655         TRACE(" trying to request a non-RGB D3D color model. Not supported.\n");
 656         return DDERR_INVALIDPARAMS; /* No real idea what to return here :-) */
 657     }
 658     if (D3DDFS->dwFlags & D3DFDS_GUID)
 659     {
 660         TRACE(" trying to match guid %s.\n", debugstr_guid(&(D3DDFS->guid)));
 661         if ((IsEqualGUID(&IID_D3DDEVICE_WineD3D, &(D3DDFS->guid)) == 0) &&
 662             (IsEqualGUID(&IID_IDirect3DHALDevice, &(D3DDFS->guid)) == 0) &&
 663             (IsEqualGUID(&IID_IDirect3DRefDevice, &(D3DDFS->guid)) == 0))
 664         {
 665             TRACE(" no match for this GUID.\n");
 666             return DDERR_INVALIDPARAMS;
 667         }
 668     }
 669
 670     /* Get the caps */
 671     hr = IDirect3DImpl_GetCaps(This->wineD3D, &desc, &newDesc);
 672     if(hr != D3D_OK) return hr;
 673
 674     /* Now return our own GUID */
 675     D3DFDR->guid = IID_D3DDEVICE_WineD3D;
 676     D3DFDR->ddHwDesc = desc;
 677     D3DFDR->ddSwDesc = desc;
 678
 679     TRACE(" returning Wine's WineD3D device with (undumped) capabilities\n");
 680
 681     return D3D_OK;
 682 }
 683
 684 static HRESULT WINAPI
 685 Thunk_IDirect3DImpl_2_FindDevice(IDirect3D2 *iface,
 686                                  D3DFINDDEVICESEARCH *D3DDFS,
 687                                  D3DFINDDEVICERESULT *D3DFDR)
 688 {
 689     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D2, iface);
 690     TRACE("(%p)->(%p,%p) thunking to IDirect3D3 interface.\n", iface, D3DDFS, D3DFDR);
 691     return IDirect3D3_FindDevice(ICOM_INTERFACE(This, IDirect3D3),
 692                                  D3DDFS,
 693                                  D3DFDR);
 694 }
 695
 696 static HRESULT WINAPI
 697 Thunk_IDirect3DImpl_1_FindDevice(IDirect3D *iface,
 698                                 D3DFINDDEVICESEARCH *D3DDFS,
 699                                 D3DFINDDEVICERESULT *D3DDevice)
 700 {
 701     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D, iface);
 702     TRACE("(%p)->(%p,%p) thunking to IDirect3D3 interface.\n", This, D3DDFS, D3DDevice);
 703     return IDirect3D3_FindDevice(ICOM_INTERFACE(This, IDirect3D3),
 704                                  D3DDFS,
 705                                  D3DDevice);
 706 }
 707
 708 /*****************************************************************************
 709  * IDirect3D7::CreateDevice
 710  *
 711  * Creates an IDirect3DDevice7 interface.
 712  *
 713  * Version 2, 3 and 7. IDirect3DDevice 1 interfaces are interfaces to
 714  * DirectDraw surfaces and are created with
 715  * IDirectDrawSurface::QueryInterface. This method uses CreateDevice to
 716  * create the device object and QueryInterfaces for IDirect3DDevice
 717  *
 718  * Params:
 719  *  refiid: IID of the device to create
 720  *  Surface: Inititial rendertarget
 721  *  Device: Address to return the interface pointer
 722  *
 723  * Returns:
 724  *  D3D_OK on success
 725  *  DDERR_OUTOFMEMORY if memory allocation failed
 726  *  DDERR_INVALIDPARAMS if a device exists already
 727  *
 728  *****************************************************************************/
 729 static HRESULT WINAPI
 730 IDirect3DImpl_7_CreateDevice(IDirect3D7 *iface,
 731                              REFCLSID refiid,
 732                              IDirectDrawSurface7 *Surface,
 733                              IDirect3DDevice7 **Device)
 734 {
 735     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D7, iface);
 736     IDirect3DDeviceImpl *object;
 737     IParentImpl *IndexBufferParent;
 738     HRESULT hr;
 739     IDirectDrawSurfaceImpl *target = ICOM_OBJECT(IDirectDrawSurfaceImpl, IDirectDrawSurface7, Surface);
 740     IDirectDrawSurface7 *depthbuffer = NULL;
 741     static DDSCAPS2 depthcaps = { DDSCAPS_ZBUFFER, 0, 0, 0 };
 742     TRACE("(%p)->(%s,%p,%p)\n", iface, debugstr_guid(refiid), Surface, Device);
 743
 744     *Device = NULL;
 745
 746     /* Fail device creation if non-opengl surfaces are used */
 747     if(This->ImplType != SURFACE_OPENGL)
 748     {
 749         ERR("The application wants to create a Direct3D device, but non-opengl surfaces are set in the registry. Please set the surface implementation to opengl or autodetection to allow 3D rendering\n");
 750
 751         /* We only hit this path if a default surface is set in the registry. Incorrect autodetection
 752          * is caught in CreateSurface or QueryInterface
 753          */
 754         return DDERR_NO3D;
 755     }
 756
 757     /* So far we can only create one device per ddraw object */
 758     if(This->d3ddevice)
 759     {
 760         FIXME("(%p): Only one Direct3D device per DirectDraw object supported\n", This);
 761         return DDERR_INVALIDPARAMS;
 762     }
 763
 764     object = HeapAlloc(GetProcessHeap(), 0, sizeof(IDirect3DDeviceImpl));
 765     if(!object)
 766     {
 767         ERR("Out of memory when allocating a IDirect3DDevice implementation\n");
 768         return DDERR_OUTOFMEMORY;
 769     }
 770
 771     ICOM_INIT_INTERFACE(object, IDirect3DDevice7, IDirect3DDevice7_Vtbl);
 772     ICOM_INIT_INTERFACE(object, IDirect3DDevice3, IDirect3DDevice3_Vtbl);
 773     ICOM_INIT_INTERFACE(object, IDirect3DDevice2, IDirect3DDevice2_Vtbl);
 774     ICOM_INIT_INTERFACE(object, IDirect3DDevice, IDirect3DDevice1_Vtbl);
 775
 776     object->ref = 1;
 777     object->ddraw = This;
 778     object->viewport_list = NULL;
 779     object->current_viewport = NULL;
 780     object->material = 0;
 781     object->target = target;
 782
 783     object->Handles = NULL;
 784     object->numHandles = 0;
 785
 786     /* This is for convenience */
 787     object->wineD3DDevice = This->wineD3DDevice;
 788
 789     /* Create an index buffer, it's needed for indexed drawing */
 790     IndexBufferParent = HeapAlloc(GetProcessHeap(), 0, sizeof(IParentImpl *));
 791     if(!IndexBufferParent)
 792     {
 793         ERR("Allocating memory for an index buffer parent failed\n");
 794         HeapFree(GetProcessHeap(), 0, object);
 795         return DDERR_OUTOFMEMORY;
 796     }
 797     ICOM_INIT_INTERFACE(IndexBufferParent, IParent, IParent_Vtbl);
 798     IndexBufferParent->ref = 1;
 799
 800     /* Create an Index Buffer. WineD3D needs one for Drawing indexed primitives
 801      * Create a (hopefully) long enough buffer, and copy the indices into it
 802      * Ideally, a IWineD3DIndexBuffer::SetData method could be created, which
 803      * takes the pointer and avoids the memcpy
 804      */
 805     hr = IWineD3DDevice_CreateIndexBuffer(This->wineD3DDevice,
 806                                           0x40000, /* Length. Don't know how long it should be */
 807                                           0, /* Usage */
 808                                           WINED3DFMT_INDEX16, /* Format. D3D7 uses WORDS */
 809                                           WINED3DPOOL_DEFAULT,
 810                                           &object->indexbuffer,
 811                                           0 /* Handle */,
 812                                           (IUnknown *) ICOM_INTERFACE(IndexBufferParent, IParent));
 813
 814     if(FAILED(hr))
 815     {
 816         ERR("Failed to create an index buffer\n");
 817         HeapFree(GetProcessHeap(), 0, object);
 818         return hr;
 819     }
 820     IndexBufferParent->child = (IUnknown *) object->indexbuffer;
 821
 822     /* No need to set the indices, it's done when necessary */
 823
 824     /* AddRef the WineD3D Device */
 825     IWineD3DDevice_AddRef(This->wineD3DDevice);
 826
 827     /* Don't forget to return the interface ;) */
 828     *Device = ICOM_INTERFACE(object, IDirect3DDevice7);
 829
 830     TRACE(" (%p) Created an IDirect3DDeviceImpl object at %p\n", This, object);
 831
 832     /* This is for apps which create a non-flip, non-d3d primary surface
 833      * and an offscreen D3DDEVICE surface, then render to the offscreen surface
 834      * and do a Blt from the offscreen to the primary surface.
 835      *
 836      * Set the offscreen D3DDDEVICE surface(=target) as the back buffer,
 837      * and the primary surface(=This->d3d_target) as the front buffer.
 838      *
 839      * This way the app will render to the D3DDEVICE surface and WineD3D
 840      * will catch the Blt was Back Buffer -> Front buffer blt and perform
 841      * a flip instead. This way we don't have to deal with a mixed GL / GDI
 842      * environment.
 843      *
 844      * This should be checked against windowed apps. The only app tested with
 845      * this is moto racer 2 during the loading screen.
 846      */
 847     TRACE("Isrendertarget: %s, d3d_target=%p\n", target->surface_desc.ddsCaps.dwCaps & DDSCAPS_PRIMARYSURFACE ? "true" : "false", This->d3d_target);
 848     if(!(target->surface_desc.ddsCaps.dwCaps & DDSCAPS_PRIMARYSURFACE) &&
 849        (This->d3d_target != target))
 850     {
 851         TRACE("(%p) Using %p as front buffer, %p as back buffer\n", This, This->d3d_target, target);
 852         hr = IWineD3DDevice_SetFrontBackBuffers(This->wineD3DDevice,
 853                                                 This->d3d_target->WineD3DSurface,
 854                                                 target->WineD3DSurface);
 855         if(hr != D3D_OK)
 856             ERR("(%p) Error %08x setting the front and back buffer\n", This, hr);
 857
 858         object->OffScreenTarget = TRUE;
 859     }
 860     else
 861     {
 862         object->OffScreenTarget = FALSE;
 863     }
 864
 865     /* AddRef the render target. Also AddRef the render target from ddraw,
 866      * because if it is released before the app releases the D3D device, the D3D capabilities
 867      * of WineD3D will be uninitialized, which has bad effects.
 868      *
 869      * In most cases, those surfaces are the surfaces are the same anyway, but this will simply
 870      * add another ref which is released when the device is destroyed.
 871      */
 872     IDirectDrawSurface7_AddRef(Surface);
 873     IDirectDrawSurface7_AddRef(ICOM_INTERFACE(This->d3d_target, IDirectDrawSurface7));
 874
 875     This->d3ddevice = object;
 876
 877     /* Look for a depth buffer and enable the Z test if one is found */
 878     hr = IDirectDrawSurface7_GetAttachedSurface(Surface,
 879                                                 &depthcaps,
 880                                                 &depthbuffer);
 881     if(depthbuffer)
 882     {
 883         TRACE("(%p) Depth buffer found, enabling Z test\n", object);
 884         IWineD3DDevice_SetRenderState(This->wineD3DDevice,
 885                                       WINED3DRS_ZENABLE,
 886                                       TRUE);
 887         IDirectDrawSurface7_Release(depthbuffer);
 888     }
 889
 890     return D3D_OK;
 891 }
 892
 893 static HRESULT WINAPI
 894 Thunk_IDirect3DImpl_3_CreateDevice(IDirect3D3 *iface,
 895                                    REFCLSID refiid,
 896                                    IDirectDrawSurface4 *Surface,
 897                                    IDirect3DDevice3 **Device,
 898                                    IUnknown *UnkOuter)
 899 {
 900     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D3, iface);
 901     HRESULT hr;
 902     TRACE("(%p)->(%s,%p,%p,%p): Thunking to IDirect3D7\n", This, debugstr_guid(refiid), Surface, Device, UnkOuter);
 903
 904     if(UnkOuter != NULL)
 905         return CLASS_E_NOAGGREGATION;
 906
 907     hr =  IDirect3D7_CreateDevice(ICOM_INTERFACE(This, IDirect3D7),
 908                                   refiid,
 909                                   (IDirectDrawSurface7 *) Surface /* Same VTables */,
 910                                   (IDirect3DDevice7 **) Device);
 911
 912     *Device = COM_INTERFACE_CAST(IDirect3DDeviceImpl, IDirect3DDevice7, IDirect3DDevice3, *Device);
 913     return hr;
 914 }
 915
 916 static HRESULT WINAPI
 917 Thunk_IDirect3DImpl_2_CreateDevice(IDirect3D2 *iface,
 918                                    REFCLSID refiid,
 919                                    IDirectDrawSurface *Surface,
 920                                    IDirect3DDevice2 **Device)
 921 {
 922     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D2, iface);
 923     HRESULT hr;
 924     TRACE("(%p)->(%s,%p,%p): Thunking to IDirect3D7\n", This, debugstr_guid(refiid), Surface, Device);
 925
 926     hr =  IDirect3D7_CreateDevice(ICOM_INTERFACE(This, IDirect3D7),
 927                                   refiid,
 928                                   COM_INTERFACE_CAST(IDirectDrawSurfaceImpl, IDirectDrawSurface3, IDirectDrawSurface7, Surface),
 929                                   (IDirect3DDevice7 **) Device);
 930
 931     *Device = COM_INTERFACE_CAST(IDirect3DDeviceImpl, IDirect3DDevice7, IDirect3DDevice2, *Device);
 932     return hr;
 933 }
 934
 935 /*****************************************************************************
 936  * IDirect3D7::CreateVertexBuffer
 937  *
 938  * Creates a new vertex buffer object and returns a IDirect3DVertexBuffer7
 939  * interface.
 940  *
 941  * Version 3 and 7
 942  *
 943  * Params:
 944  *  Desc: Requested Vertex buffer properties
 945  *  VertexBuffer: Address to return the interface pointer at
 946  *  Flags: Some flags, must be 0
 947  *
 948  * Returns
 949  *  D3D_OK on success
 950  *  DDERR_OUTOFMEMORY if memory allocation failed
 951  *  The return value of IWineD3DDevice::CreateVertexBuffer if this call fails
 952  *  DDERR_INVALIDPARAMS if Desc or VertexBuffer are NULL, or Flags != 0
 953  *
 954  *****************************************************************************/
 955 static HRESULT WINAPI
 956 IDirect3DImpl_7_CreateVertexBuffer(IDirect3D7 *iface,
 957                                    D3DVERTEXBUFFERDESC *Desc,
 958                                    IDirect3DVertexBuffer7 **VertexBuffer,
 959                                    DWORD Flags)
 960 {
 961     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D7, iface);
 962     IDirect3DVertexBufferImpl *object;
 963     HRESULT hr;
 964     TRACE("(%p)->(%p,%p,%08x)\n", This, Desc, VertexBuffer, Flags);
 965
 966     TRACE("(%p) Vertex buffer description:\n", This);
 967     TRACE("(%p)  dwSize=%d\n", This, Desc->dwSize);
 968     TRACE("(%p)  dwCaps=%08x\n", This, Desc->dwCaps);
 969     TRACE("(%p)  FVF=%08x\n", This, Desc->dwFVF);
 970     TRACE("(%p)  dwNumVertices=%d\n", This, Desc->dwNumVertices);
 971
 972     /* D3D7 SDK: "No Flags are currently defined for this method. This
 973      * parameter must be 0"
 974      *
 975      * Never trust the documentation - this is wrong
 976     if(Flags != 0)
 977     {
 978         ERR("(%p) Flags is %08lx, returning DDERR_INVALIDPARAMS\n", This, Flags);
 979         return DDERR_INVALIDPARAMS;
 980     }
 981      */
 982
 983     /* Well, this sounds sane */
 984     if( (!VertexBuffer) || (!Desc) )
 985         return DDERR_INVALIDPARAMS;
 986
 987     /* Now create the vertex buffer */
 988     object = HeapAlloc(GetProcessHeap(), 0, sizeof(IDirect3DVertexBufferImpl));
 989     if(!object)
 990     {
 991         ERR("(%p) Out of memory when allocating a IDirect3DVertexBufferImpl structure\n", This);
 992         return DDERR_OUTOFMEMORY;
 993     }
 994
 995     object->ref = 1;
 996     ICOM_INIT_INTERFACE(object, IDirect3DVertexBuffer7, IDirect3DVertexBuffer7_Vtbl);
 997     ICOM_INIT_INTERFACE(object, IDirect3DVertexBuffer, IDirect3DVertexBuffer1_Vtbl);
 998
 999     object->Caps = Desc->dwCaps;
1000     object->ddraw = This;
1001
1002     hr = IWineD3DDevice_CreateVertexBuffer(This->wineD3DDevice,
1003                                            get_flexible_vertex_size(Desc->dwFVF) * Desc->dwNumVertices,
1004                                            Desc->dwCaps & D3DVBCAPS_WRITEONLY ? WINED3DUSAGE_WRITEONLY : 0,
1005                                            Desc->dwFVF,
1006                                            Desc->dwCaps & D3DVBCAPS_SYSTEMMEMORY ? WINED3DPOOL_SYSTEMMEM : WINED3DPOOL_DEFAULT,
1007                                            &object->wineD3DVertexBuffer,
1008                                            0 /* SharedHandle */,
1009                                            (IUnknown *) ICOM_INTERFACE(object, IDirect3DVertexBuffer7));
1010     if(hr != D3D_OK)
1011     {
1012         ERR("(%p) IWineD3DDevice::CreateVertexBuffer failed with hr=%08x\n", This, hr);
1013         HeapFree(GetProcessHeap(), 0, object);
1014         if (hr == WINED3DERR_INVALIDCALL)
1015             return DDERR_INVALIDPARAMS;
1016         else
1017             return hr;
1018     }
1019
1020     /* Return the interface */
1021     *VertexBuffer = ICOM_INTERFACE(object, IDirect3DVertexBuffer7);
1022
1023     TRACE("(%p) Created new vertex buffer implementation at %p, returning interface at %p\n", This, object, *VertexBuffer);
1024     return D3D_OK;
1025 }
1026
1027 static HRESULT WINAPI
1028 Thunk_IDirect3DImpl_3_CreateVertexBuffer(IDirect3D3 *iface,
1029                                          D3DVERTEXBUFFERDESC *Desc,
1030                                          IDirect3DVertexBuffer **VertexBuffer,
1031                                          DWORD Flags,
1032                                          IUnknown *UnkOuter)
1033 {
1034     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D3, iface);
1035     HRESULT hr;
1036     TRACE("(%p)->(%p,%p,%08x,%p): Relaying to IDirect3D7\n", This, Desc, VertexBuffer, Flags, UnkOuter);
1037
1038     if(UnkOuter != NULL) return CLASS_E_NOAGGREGATION;
1039
1040     hr = IDirect3D7_CreateVertexBuffer(ICOM_INTERFACE(This, IDirect3D7),
1041                                        Desc,
1042                                        (IDirect3DVertexBuffer7 **) VertexBuffer,
1043                                        Flags);
1044
1045     *VertexBuffer = COM_INTERFACE_CAST(IDirect3DVertexBufferImpl, IDirect3DVertexBuffer7, IDirect3DVertexBuffer, *VertexBuffer);
1046     return hr;
1047 }
1048
1049
1050 /*****************************************************************************
1051  * IDirect3D7::EnumZBufferFormats
1052  *
1053  * Enumerates all supported Z buffer pixel formats
1054  *
1055  * Version 3 and 7
1056  *
1057  * Params:
1058  *  refiidDevice:
1059  *  Callback: Callback to call for each pixel format
1060  *  Context: Pointer to pass back to the callback
1061  *
1062  * Returns:
1063  *  D3D_OK on success
1064  *  DDERR_INVALIDPARAMS if Callback is NULL
1065  *  For details, see IWineD3DDevice::EnumZBufferFormats
1066  *
1067  *****************************************************************************/
1068 static HRESULT WINAPI
1069 IDirect3DImpl_7_EnumZBufferFormats(IDirect3D7 *iface,
1070                                    REFCLSID refiidDevice,
1071                                    LPD3DENUMPIXELFORMATSCALLBACK Callback,
1072                                    void *Context)
1073 {
1074     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D7, iface);
1075     HRESULT hr;
1076     int i;
1077
1078     /* Order matters. Specifically, BattleZone II (full version) expects the
1079      * 16-bit depth formats to be listed before the 24 and 32 ones. */
1080     WINED3DFORMAT FormatList[] = {
1081         WINED3DFMT_D15S1,
1082         WINED3DFMT_D16,
1083         WINED3DFMT_D24X8,
1084         WINED3DFMT_D24X4S4,
1085         WINED3DFMT_D24S8,
1086         WINED3DFMT_D32
1087     };
1088
1089     TRACE("(%p)->(%s,%p,%p): Relay\n", iface, debugstr_guid(refiidDevice), Callback, Context);
1090
1091     if(!Callback)
1092         return DDERR_INVALIDPARAMS;
1093
1094     for(i = 0; i < sizeof(FormatList) / sizeof(WINED3DFORMAT); i++)
1095     {
1096         hr = IWineD3D_CheckDeviceFormat(This->wineD3D,
1097                                         0 /* Adapter */,
1098                                         0 /* DeviceType */,
1099                                         0 /* AdapterFormat */,
1100                                         WINED3DUSAGE_DEPTHSTENCIL /* Usage */,
1101                                         0 /* ResourceType */,
1102                                         FormatList[i]);
1103         if(hr == D3D_OK)
1104         {
1105             DDPIXELFORMAT pformat;
1106
1107             memset(&pformat, 0, sizeof(pformat));
1108             pformat.dwSize = sizeof(pformat);
1109             PixelFormat_WineD3DtoDD(&pformat, FormatList[i]);
1110
1111             TRACE("Enumerating WineD3DFormat %d\n", FormatList[i]);
1112             hr = Callback(&pformat, Context);
1113             if(hr != DDENUMRET_OK)
1114             {
1115                 TRACE("Format enumeration cancelled by application\n");
1116                 return D3D_OK;
1117             }
1118         }
1119     }
1120     TRACE("End of enumeration\n");
1121     return D3D_OK;
1122 }
1123
1124 static HRESULT WINAPI
1125 Thunk_IDirect3DImpl_3_EnumZBufferFormats(IDirect3D3 *iface,
1126                                          REFCLSID riidDevice,
1127                                          LPD3DENUMPIXELFORMATSCALLBACK Callback,
1128                                          void *Context)
1129 {
1130     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D3, iface);
1131     TRACE("(%p)->(%s,%p,%p) thunking to IDirect3D7 interface.\n", This, debugstr_guid(riidDevice), Callback, Context);
1132     return IDirect3D7_EnumZBufferFormats(ICOM_INTERFACE(This, IDirect3D7),
1133                                          riidDevice,
1134                                          Callback,
1135                                          Context);
1136 }
1137
1138 /*****************************************************************************
1139  * IDirect3D7::EvictManagedTextures
1140  *
1141  * Removes all managed textures (=surfaces with DDSCAPS2_TEXTUREMANAGE or
1142  * DDSCAPS2_D3DTEXTUREMANAGE caps) to be removed from video memory.
1143  *
1144  * Version 3 and 7
1145  *
1146  * Returns:
1147  *  D3D_OK, because it's a stub
1148  *
1149  *****************************************************************************/
1150 static HRESULT WINAPI
1151 IDirect3DImpl_7_EvictManagedTextures(IDirect3D7 *iface)
1152 {
1153     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D7, iface);
1154     FIXME("(%p): Stub!\n", This);
1155
1156     /* Implementation idea:
1157      * Add an IWineD3DSurface method which sets the opengl texture
1158      * priority low or even removes the opengl texture.
1159      */
1160
1161     return D3D_OK;
1162 }
1163
1164 static HRESULT WINAPI
1165 Thunk_IDirect3DImpl_3_EvictManagedTextures(IDirect3D3 *iface)
1166 {
1167     ICOM_THIS_FROM(IDirectDrawImpl, IDirect3D3, iface);
1168     TRACE("(%p)->() thunking to IDirect3D7 interface.\n", This);
1169     return IDirect3D7_EvictManagedTextures(ICOM_INTERFACE(This, IDirect3D7));
1170 }
1171
1172 /*****************************************************************************
1173  * IDirect3DImpl_GetCaps
1174  *
1175  * This function retrieves the device caps from wined3d
1176  * and converts it into a D3D7 and D3D - D3D3 structure
1177  * This is a helper function called from various places in ddraw
1178  *
1179  * Params:
1180  *  WineD3D: The interface to get the caps from
1181  *  Desc123: Old D3D <3 structure to fill (needed)
1182  *  Desc7: D3D7 device desc structure to fill (needed)
1183  *
1184  * Returns
1185  *  D3D_OK on success, or the return value of IWineD3D::GetCaps
1186  *
1187  *****************************************************************************/
1188 HRESULT
1189 IDirect3DImpl_GetCaps(IWineD3D *WineD3D,
1190                       D3DDEVICEDESC *Desc123,
1191                       D3DDEVICEDESC7 *Desc7)
1192 {
1193     WINED3DCAPS WCaps;
1194     HRESULT hr;
1195
1196     /* Some Variables to asign to the pointers in WCaps */
1197     WINED3DDEVTYPE DevType;
1198     UINT dummy_uint;
1199     float dummy_float;
1200     DWORD dummy_dword, MaxTextureBlendStages, MaxSimultaneousTextures;
1201     DWORD MaxUserClipPlanes, MaxVertexBlendMatrices;
1202
1203     TRACE("()->(%p,%p,%p\n", WineD3D, Desc123, Desc7);
1204
1205     /* Asign the pointers in WCaps */
1206     WCaps.DeviceType = &DevType;
1207     WCaps.AdapterOrdinal = &dummy_uint;
1208
1209     WCaps.Caps = &dummy_dword;
1210     WCaps.Caps2 = &dummy_dword;
1211     WCaps.Caps3 = &dummy_dword;
1212     WCaps.PresentationIntervals = &dummy_dword;
1213
1214     WCaps.CursorCaps = &dummy_dword;
1215
1216     WCaps.DevCaps = &Desc7->dwDevCaps;
1217     WCaps.PrimitiveMiscCaps = &dummy_dword;
1218     WCaps.RasterCaps = &Desc7->dpcLineCaps.dwRasterCaps;
1219     WCaps.ZCmpCaps = &Desc7->dpcLineCaps.dwZCmpCaps;
1220     WCaps.SrcBlendCaps = &Desc7->dpcLineCaps.dwSrcBlendCaps;
1221     WCaps.DestBlendCaps = &Desc7->dpcLineCaps.dwDestBlendCaps;
1222     WCaps.AlphaCmpCaps = &Desc7->dpcLineCaps.dwAlphaCmpCaps;
1223     WCaps.ShadeCaps = &Desc7->dpcLineCaps.dwShadeCaps;
1224     WCaps.TextureCaps = &Desc7->dpcLineCaps.dwTextureCaps;
1225     WCaps.TextureFilterCaps = &Desc7->dpcLineCaps.dwTextureFilterCaps;
1226     WCaps.CubeTextureFilterCaps = &dummy_dword;
1227     WCaps.VolumeTextureFilterCaps = &dummy_dword;
1228     WCaps.TextureAddressCaps = &Desc7->dpcLineCaps.dwTextureAddressCaps;
1229     WCaps.VolumeTextureAddressCaps = &dummy_dword;
1230
1231     WCaps.LineCaps = &dummy_dword;
1232     WCaps.MaxTextureWidth = &Desc7->dwMaxTextureWidth;
1233     WCaps.MaxTextureHeight = &Desc7->dwMaxTextureHeight;
1234     WCaps.MaxVolumeExtent = &dummy_dword;
1235
1236     WCaps.MaxTextureRepeat = &Desc7->dwMaxTextureRepeat;
1237     WCaps.MaxTextureAspectRatio = &Desc7->dwMaxTextureAspectRatio;
1238     WCaps.MaxAnisotropy = &Desc7->dwMaxAnisotropy;
1239     WCaps.MaxVertexW = &Desc7->dvMaxVertexW;
1240
1241     WCaps.GuardBandLeft = &Desc7->dvGuardBandLeft;
1242     WCaps.GuardBandTop = &Desc7->dvGuardBandTop;
1243     WCaps.GuardBandRight = &Desc7->dvGuardBandRight;
1244     WCaps.GuardBandBottom = &Desc7->dvGuardBandBottom;
1245
1246     WCaps.ExtentsAdjust = &Desc7->dvExtentsAdjust;
1247     WCaps.StencilCaps = &Desc7->dwStencilCaps;
1248
1249     WCaps.FVFCaps = &Desc7->dwFVFCaps;
1250     WCaps.TextureOpCaps = &Desc7->dwTextureOpCaps;
1251     WCaps.MaxTextureBlendStages = &MaxTextureBlendStages;
1252     WCaps.MaxSimultaneousTextures = &MaxSimultaneousTextures;
1253
1254     WCaps.VertexProcessingCaps = &Desc7->dwVertexProcessingCaps;
1255     WCaps.MaxActiveLights = &Desc7->dwMaxActiveLights;
1256     WCaps.MaxUserClipPlanes = &MaxUserClipPlanes;
1257     WCaps.MaxVertexBlendMatrices = &MaxVertexBlendMatrices;
1258     WCaps.MaxVertexBlendMatrixIndex = &dummy_dword;
1259
1260     WCaps.MaxPointSize = &dummy_float;
1261     WCaps.MaxPrimitiveCount = &dummy_dword;
1262     WCaps.MaxVertexIndex = &dummy_dword;
1263     WCaps.MaxStreams = &dummy_dword;
1264     WCaps.MaxStreamStride = &dummy_dword;
1265
1266     WCaps.VertexShaderVersion = &dummy_dword;
1267     WCaps.MaxVertexShaderConst = &dummy_dword;
1268
1269     WCaps.PixelShaderVersion = &dummy_dword;
1270     WCaps.PixelShader1xMaxValue = &dummy_float;
1271
1272     /* These are dx9 only, set them to NULL */
1273     WCaps.DevCaps2 = NULL;
1274     WCaps.MaxNpatchTessellationLevel = NULL;
1275     WCaps.Reserved5 = NULL;
1276     WCaps.MasterAdapterOrdinal = NULL;
1277     WCaps.AdapterOrdinalInGroup = NULL;
1278     WCaps.NumberOfAdaptersInGroup = NULL;
1279     WCaps.DeclTypes = NULL;
1280     WCaps.NumSimultaneousRTs = NULL;
1281     WCaps.StretchRectFilterCaps = NULL;
1282     /* WCaps.VS20Caps = NULL; */
1283     /* WCaps.PS20Caps = NULL; */
1284     WCaps.VertexTextureFilterCaps = NULL;
1285     WCaps.MaxVShaderInstructionsExecuted = NULL;
1286     WCaps.MaxPShaderInstructionsExecuted = NULL;
1287     WCaps.MaxVertexShader30InstructionSlots = NULL;
1288     WCaps.MaxPixelShader30InstructionSlots = NULL;
1289     WCaps.Reserved2 = NULL;
1290     WCaps.Reserved3 = NULL;
1291
1292     /* Now get the caps */
1293     hr = IWineD3D_GetDeviceCaps(WineD3D, 0, WINED3DDEVTYPE_HAL, &WCaps);
1294     if(hr != D3D_OK) return hr;
1295
1296     /* Fill the missing members, and do some fixup */
1297     Desc7->dpcLineCaps.dwSize = sizeof(Desc7->dpcLineCaps);
1298     Desc7->dpcLineCaps.dwTextureBlendCaps = D3DPTBLENDCAPS_ADD | D3DPTBLENDCAPS_MODULATEMASK |
1299                                             D3DPTBLENDCAPS_COPY | D3DPTBLENDCAPS_DECAL |
1300                                             D3DPTBLENDCAPS_DECALALPHA | D3DPTBLENDCAPS_DECALMASK |
1301                                             D3DPTBLENDCAPS_MODULATE | D3DPTBLENDCAPS_MODULATEALPHA;
1302     Desc7->dpcLineCaps.dwStippleWidth = 32;
1303     Desc7->dpcLineCaps.dwStippleHeight = 32;
1304     /* Use the same for the TriCaps */
1305     Desc7->dpcTriCaps = Desc7->dpcLineCaps;
1306
1307     Desc7->dwDeviceRenderBitDepth = DDBD_16 | DDBD_24 | DDBD_32;
1308     Desc7->dwDeviceZBufferBitDepth = DDBD_16 | DDBD_24;
1309     Desc7->dwMinTextureWidth = 1;
1310     Desc7->dwMinTextureHeight = 1;
1311
1312     /* Convert DWORDs safely to WORDs */
1313     if(MaxTextureBlendStages > 65535) Desc7->wMaxTextureBlendStages = 65535;
1314     else Desc7->wMaxTextureBlendStages = (WORD) MaxTextureBlendStages;
1315     if(MaxSimultaneousTextures > 65535) Desc7->wMaxSimultaneousTextures = 65535;
1316     else Desc7->wMaxSimultaneousTextures = (WORD) MaxSimultaneousTextures;
1317
1318     if(MaxUserClipPlanes > 65535) Desc7->wMaxUserClipPlanes = 65535;
1319     else Desc7->wMaxUserClipPlanes = (WORD) MaxUserClipPlanes;
1320     if(MaxVertexBlendMatrices > 65535) Desc7->wMaxVertexBlendMatrices = 65535;
1321     else Desc7->wMaxVertexBlendMatrices = (WORD) MaxVertexBlendMatrices;
1322
1323     Desc7->deviceGUID = IID_IDirect3DTnLHalDevice;
1324
1325     Desc7->dwReserved1 = 0;
1326     Desc7->dwReserved2 = 0;
1327     Desc7->dwReserved3 = 0;
1328     Desc7->dwReserved4 = 0;
1329
1330     /* Fill the old structure */
1331     memset(Desc123, 0x0, sizeof(D3DDEVICEDESC));
1332     Desc123->dwSize = sizeof(D3DDEVICEDESC);
1333     Desc123->dwFlags = D3DDD_COLORMODEL            |
1334                        D3DDD_DEVCAPS               |
1335                        D3DDD_TRANSFORMCAPS         |
1336                        D3DDD_BCLIPPING             |
1337                        D3DDD_LIGHTINGCAPS          |
1338                        D3DDD_LINECAPS              |
1339                        D3DDD_TRICAPS               |
1340                        D3DDD_DEVICERENDERBITDEPTH  |
1341                        D3DDD_DEVICEZBUFFERBITDEPTH |
1342                        D3DDD_MAXBUFFERSIZE         |
1343                        D3DDD_MAXVERTEXCOUNT;
1344     Desc123->dcmColorModel = D3DCOLOR_RGB;
1345     Desc123->dwDevCaps = Desc7->dwDevCaps;
1346     Desc123->dtcTransformCaps.dwSize = sizeof(D3DTRANSFORMCAPS);
1347     Desc123->dtcTransformCaps.dwCaps = D3DTRANSFORMCAPS_CLIP;
1348     Desc123->bClipping = TRUE;
1349     Desc123->dlcLightingCaps.dwSize = sizeof(D3DLIGHTINGCAPS);
1350     Desc123->dlcLightingCaps.dwCaps = D3DLIGHTCAPS_DIRECTIONAL | D3DLIGHTCAPS_PARALLELPOINT | D3DLIGHTCAPS_POINT | D3DLIGHTCAPS_SPOT;
1351     Desc123->dlcLightingCaps.dwLightingModel = D3DLIGHTINGMODEL_RGB;
1352     Desc123->dlcLightingCaps.dwNumLights = Desc7->dwMaxActiveLights;
1353
1354     Desc123->dpcLineCaps.dwSize = sizeof(D3DPRIMCAPS);
1355     Desc123->dpcLineCaps.dwMiscCaps = Desc7->dpcLineCaps.dwMiscCaps;
1356     Desc123->dpcLineCaps.dwRasterCaps = Desc7->dpcLineCaps.dwRasterCaps;
1357     Desc123->dpcLineCaps.dwZCmpCaps = Desc7->dpcLineCaps.dwZCmpCaps;
1358     Desc123->dpcLineCaps.dwSrcBlendCaps = Desc7->dpcLineCaps.dwSrcBlendCaps;
1359     Desc123->dpcLineCaps.dwDestBlendCaps = Desc7->dpcLineCaps.dwDestBlendCaps;
1360     Desc123->dpcLineCaps.dwShadeCaps = Desc7->dpcLineCaps.dwShadeCaps;
1361     Desc123->dpcLineCaps.dwTextureCaps = Desc7->dpcLineCaps.dwTextureCaps;
1362     Desc123->dpcLineCaps.dwTextureFilterCaps = Desc7->dpcLineCaps.dwTextureFilterCaps;
1363     Desc123->dpcLineCaps.dwTextureBlendCaps = Desc7->dpcLineCaps.dwTextureBlendCaps;
1364     Desc123->dpcLineCaps.dwTextureAddressCaps = Desc7->dpcLineCaps.dwTextureAddressCaps;
1365     Desc123->dpcLineCaps.dwStippleWidth = Desc7->dpcLineCaps.dwStippleWidth;
1366     Desc123->dpcLineCaps.dwAlphaCmpCaps = Desc7->dpcLineCaps.dwAlphaCmpCaps;
1367
1368     Desc123->dpcTriCaps.dwSize = sizeof(D3DPRIMCAPS);
1369     Desc123->dpcTriCaps.dwMiscCaps = Desc7->dpcTriCaps.dwMiscCaps;
1370     Desc123->dpcTriCaps.dwRasterCaps = Desc7->dpcTriCaps.dwRasterCaps;
1371     Desc123->dpcTriCaps.dwZCmpCaps = Desc7->dpcTriCaps.dwZCmpCaps;
1372     Desc123->dpcTriCaps.dwSrcBlendCaps = Desc7->dpcTriCaps.dwSrcBlendCaps;
1373     Desc123->dpcTriCaps.dwDestBlendCaps = Desc7->dpcTriCaps.dwDestBlendCaps;
1374     Desc123->dpcTriCaps.dwShadeCaps = Desc7->dpcTriCaps.dwShadeCaps;
1375     Desc123->dpcTriCaps.dwTextureCaps = Desc7->dpcTriCaps.dwTextureCaps;
1376     Desc123->dpcTriCaps.dwTextureFilterCaps = Desc7->dpcTriCaps.dwTextureFilterCaps;
1377     Desc123->dpcTriCaps.dwTextureBlendCaps = Desc7->dpcTriCaps.dwTextureBlendCaps;
1378     Desc123->dpcTriCaps.dwTextureAddressCaps = Desc7->dpcTriCaps.dwTextureAddressCaps;
1379     Desc123->dpcTriCaps.dwStippleWidth = Desc7->dpcTriCaps.dwStippleWidth;
1380     Desc123->dpcTriCaps.dwAlphaCmpCaps = Desc7->dpcTriCaps.dwAlphaCmpCaps;
1381
1382     Desc123->dwDeviceRenderBitDepth = Desc7->dwDeviceRenderBitDepth;
1383     Desc123->dwDeviceZBufferBitDepth = Desc7->dwDeviceZBufferBitDepth;
1384     Desc123->dwMaxBufferSize = 0;
1385     Desc123->dwMaxVertexCount = 65536;
1386     Desc123->dwMinTextureWidth  = Desc7->dwMinTextureWidth;
1387     Desc123->dwMinTextureHeight = Desc7->dwMinTextureHeight;
1388     Desc123->dwMaxTextureWidth  = Desc7->dwMaxTextureWidth;
1389     Desc123->dwMaxTextureHeight = Desc7->dwMaxTextureHeight;
1390     Desc123->dwMinStippleWidth  = 1;
1391     Desc123->dwMinStippleHeight = 1;
1392     Desc123->dwMaxStippleWidth  = 32;
1393     Desc123->dwMaxStippleHeight = 32;
1394     Desc123->dwMaxTextureRepeat = Desc7->dwMaxTextureRepeat;
1395     Desc123->dwMaxTextureAspectRatio = Desc7->dwMaxTextureAspectRatio;
1396     Desc123->dwMaxAnisotropy = Desc7->dwMaxAnisotropy;
1397     Desc123->dvGuardBandLeft = Desc7->dvGuardBandLeft;
1398     Desc123->dvGuardBandRight = Desc7->dvGuardBandRight;
1399     Desc123->dvGuardBandTop = Desc7->dvGuardBandTop;
1400     Desc123->dvGuardBandBottom = Desc7->dvGuardBandBottom;
1401     Desc123->dvExtentsAdjust = Desc7->dvExtentsAdjust;
1402     Desc123->dwStencilCaps = Desc7->dwStencilCaps;
1403     Desc123->dwFVFCaps = Desc7->dwFVFCaps;
1404     Desc123->dwTextureOpCaps = Desc7->dwTextureOpCaps;
1405     Desc123->wMaxTextureBlendStages = Desc7->wMaxTextureBlendStages;
1406     Desc123->wMaxSimultaneousTextures = Desc7->wMaxSimultaneousTextures;
1407
1408     return DD_OK;
1409 }
1410 /*****************************************************************************
1411  * IDirect3D vtables in various versions
1412  *****************************************************************************/
1413
1414 const IDirect3DVtbl IDirect3D1_Vtbl =
1415 {
1416     /*** IUnknown methods ***/
1417     Thunk_IDirect3DImpl_1_QueryInterface,
1418     Thunk_IDirect3DImpl_1_AddRef,
1419     Thunk_IDirect3DImpl_1_Release,
1420     /*** IDirect3D methods ***/
1421     IDirect3DImpl_1_Initialize,
1422     Thunk_IDirect3DImpl_1_EnumDevices,
1423     Thunk_IDirect3DImpl_1_CreateLight,
1424     Thunk_IDirect3DImpl_1_CreateMaterial,
1425     Thunk_IDirect3DImpl_1_CreateViewport,
1426     Thunk_IDirect3DImpl_1_FindDevice
1427 };
1428
1429 const IDirect3D2Vtbl IDirect3D2_Vtbl =
1430 {
1431     /*** IUnknown methods ***/
1432     Thunk_IDirect3DImpl_2_QueryInterface,
1433     Thunk_IDirect3DImpl_2_AddRef,
1434     Thunk_IDirect3DImpl_2_Release,
1435     /*** IDirect3D2 methods ***/
1436     Thunk_IDirect3DImpl_2_EnumDevices,
1437     Thunk_IDirect3DImpl_2_CreateLight,
1438     Thunk_IDirect3DImpl_2_CreateMaterial,
1439     Thunk_IDirect3DImpl_2_CreateViewport,
1440     Thunk_IDirect3DImpl_2_FindDevice,
1441     Thunk_IDirect3DImpl_2_CreateDevice
1442 };
1443
1444 const IDirect3D3Vtbl IDirect3D3_Vtbl =
1445 {
1446     /*** IUnknown methods ***/
1447     Thunk_IDirect3DImpl_3_QueryInterface,
1448     Thunk_IDirect3DImpl_3_AddRef,
1449     Thunk_IDirect3DImpl_3_Release,
1450     /*** IDirect3D3 methods ***/
1451     IDirect3DImpl_3_EnumDevices,
1452     IDirect3DImpl_3_CreateLight,
1453     IDirect3DImpl_3_CreateMaterial,
1454     IDirect3DImpl_3_CreateViewport,
1455     IDirect3DImpl_3_FindDevice,
1456     Thunk_IDirect3DImpl_3_CreateDevice,
1457     Thunk_IDirect3DImpl_3_CreateVertexBuffer,
1458     Thunk_IDirect3DImpl_3_EnumZBufferFormats,
1459     Thunk_IDirect3DImpl_3_EvictManagedTextures
1460 };
1461
1462 const IDirect3D7Vtbl IDirect3D7_Vtbl =
1463 {
1464     /*** IUnknown methods ***/
1465     Thunk_IDirect3DImpl_7_QueryInterface,
1466     Thunk_IDirect3DImpl_7_AddRef,
1467     Thunk_IDirect3DImpl_7_Release,
1468     /*** IDirect3D7 methods ***/
1469     IDirect3DImpl_7_EnumDevices,
1470     IDirect3DImpl_7_CreateDevice,
1471     IDirect3DImpl_7_CreateVertexBuffer,
1472     IDirect3DImpl_7_EnumZBufferFormats,
1473     IDirect3DImpl_7_EvictManagedTextures
1474 };