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

   1 /*
   2  * Copyright (c) 1998-2004 Lionel Ulmer
   3  * Copyright (c) 2002-2005 Christian Costa
   4  * Copyright (c) 2006 Stefan Dösinger
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  *
  20  * IDirect3DDevice implementation, version 1, 2, 3 and 7. Rendering is relayed
  21  * to WineD3D, some minimal DirectDraw specific management is handled here.
  22  * The Direct3DDevice is NOT the parent of the WineD3DDevice, because d3d
  23  * is initialized when DirectDraw creates the primary surface.
  24  * Some type management is necessary, because some D3D types changed between
  25  * D3D7 and D3D9.
  26  *
  27  */
  28
  29 #include "config.h"
  30 #include "wine/port.h"
  31 #include "wine/debug.h"
  32
  33 #include <assert.h>
  34 #include <stdarg.h>
  35 #include <string.h>
  36 #include <stdlib.h>
  37
  38 #define COBJMACROS
  39
  40 #include "windef.h"
  41 #include "winbase.h"
  42 #include "winnls.h"
  43 #include "winerror.h"
  44 #include "wingdi.h"
  45 #include "wine/exception.h"
  46 #include "excpt.h"
  47
  48 #include "ddraw.h"
  49 #include "d3d.h"
  50
  51 #include "ddraw_private.h"
  52
  53 WINE_DEFAULT_DEBUG_CHANNEL(d3d7);
  54 WINE_DECLARE_DEBUG_CHANNEL(ddraw_thunk);
  55
  56 /* The device ID */
  57 const GUID IID_D3DDEVICE_WineD3D = {
  58   0xaef72d43,
  59   0xb09a,
  60   0x4b7b,
  61   { 0xb7,0x98,0xc6,0x8a,0x77,0x2d,0x72,0x2a }
  62 };
  63
  64 /*****************************************************************************
  65  * IUnknown Methods. Common for Version 1, 2, 3 and 7
  66  *****************************************************************************/
  67
  68 /*****************************************************************************
  69  * IDirect3DDevice7::QueryInterface
  70  *
  71  * Used to query other interfaces from a Direct3DDevice interface.
  72  * It can return interface pointers to all Direct3DDevice versions as well
  73  * as IDirectDraw and IDirect3D. For a link to QueryInterface
  74  * rules see ddraw.c, IDirectDraw7::QueryInterface
  75  *
  76  * Exists in Version 1, 2, 3 and 7
  77  *
  78  * Params:
  79  *  refiid: Interface ID queried for
  80  *  obj: Used to return the interface pointer
  81  *
  82  * Returns:
  83  *  D3D_OK or E_NOINTERFACE
  84  *
  85  *****************************************************************************/
  86 static HRESULT WINAPI
  87 IDirect3DDeviceImpl_7_QueryInterface(IDirect3DDevice7 *iface,
  88                                      REFIID refiid,
  89                                      void **obj)
  90 {
  91     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
  92     TRACE("(%p)->(%s,%p)\n", This, debugstr_guid(refiid), obj);
  93
  94     /* According to COM docs, if the QueryInterface fails, obj should be set to NULL */
  95     *obj = NULL;
  96
  97     if(!refiid)
  98         return DDERR_INVALIDPARAMS;
  99
 100     if ( IsEqualGUID( &IID_IUnknown, refiid ) )
 101     {
 102         *obj = ICOM_INTERFACE(This, IDirect3DDevice7);
 103     }
 104
 105     /* Check DirectDraw Interfac\ 1s */
 106     else if( IsEqualGUID( &IID_IDirectDraw7, refiid ) )
 107     {
 108         *obj = ICOM_INTERFACE(This->ddraw, IDirectDraw7);
 109         TRACE("(%p) Returning IDirectDraw7 interface at %p\n", This, *obj);
 110     }
 111     else if ( IsEqualGUID( &IID_IDirectDraw4, refiid ) )
 112     {
 113         *obj = ICOM_INTERFACE(This->ddraw, IDirectDraw4);
 114         TRACE("(%p) Returning IDirectDraw4 interface at %p\n", This, *obj);
 115     }
 116     else if ( IsEqualGUID( &IID_IDirectDraw2, refiid ) )
 117     {
 118         *obj = ICOM_INTERFACE(This->ddraw, IDirectDraw2);
 119         TRACE("(%p) Returning IDirectDraw2 interface at %p\n", This, *obj);
 120     }
 121     else if( IsEqualGUID( &IID_IDirectDraw, refiid ) )
 122     {
 123         *obj = ICOM_INTERFACE(This->ddraw, IDirectDraw);
 124         TRACE("(%p) Returning IDirectDraw interface at %p\n", This, *obj);
 125     }
 126
 127     /* Direct3D */
 128     else if ( IsEqualGUID( &IID_IDirect3D  , refiid ) )
 129     {
 130         *obj = ICOM_INTERFACE(This->ddraw, IDirect3D);
 131         TRACE("(%p) Returning IDirect3D interface at %p\n", This, *obj);
 132     }
 133     else if ( IsEqualGUID( &IID_IDirect3D2 , refiid ) )
 134     {
 135         *obj = ICOM_INTERFACE(This->ddraw, IDirect3D2);
 136         TRACE("(%p) Returning IDirect3D2 interface at %p\n", This, *obj);
 137     }
 138     else if ( IsEqualGUID( &IID_IDirect3D3 , refiid ) )
 139     {
 140         *obj = ICOM_INTERFACE(This->ddraw, IDirect3D3);
 141         TRACE("(%p) Returning IDirect3D3 interface at %p\n", This, *obj);
 142     }
 143     else if ( IsEqualGUID( &IID_IDirect3D7 , refiid ) )
 144     {
 145         *obj = ICOM_INTERFACE(This->ddraw, IDirect3D7);
 146         TRACE("(%p) Returning IDirect3D7 interface at %p\n", This, *obj);
 147     }
 148
 149     /* Direct3DDevice */
 150     else if ( IsEqualGUID( &IID_IDirect3DDevice  , refiid ) )
 151     {
 152         *obj = ICOM_INTERFACE(This, IDirect3DDevice);
 153         TRACE("(%p) Returning IDirect3DDevice interface at %p\n", This, *obj);
 154     }
 155     else if ( IsEqualGUID( &IID_IDirect3DDevice2  , refiid ) ) {
 156         *obj = ICOM_INTERFACE(This, IDirect3DDevice2);
 157         TRACE("(%p) Returning IDirect3DDevice2 interface at %p\n", This, *obj);
 158     }
 159     else if ( IsEqualGUID( &IID_IDirect3DDevice3  , refiid ) ) {
 160         *obj = ICOM_INTERFACE(This, IDirect3DDevice3);
 161         TRACE("(%p) Returning IDirect3DDevice3 interface at %p\n", This, *obj);
 162     }
 163     else if ( IsEqualGUID( &IID_IDirect3DDevice7  , refiid ) ) {
 164         *obj = ICOM_INTERFACE(This, IDirect3DDevice7);
 165         TRACE("(%p) Returning IDirect3DDevice7 interface at %p\n", This, *obj);
 166     }
 167
 168     /* Unknown interface */
 169     else
 170     {
 171         ERR("(%p)->(%s, %p): No interface found\n", This, debugstr_guid(refiid), obj);
 172         return E_NOINTERFACE;
 173     }
 174
 175     /* AddRef the returned interface */
 176     IUnknown_AddRef( (IUnknown *) *obj);
 177     return D3D_OK;
 178 }
 179
 180 static HRESULT WINAPI
 181 Thunk_IDirect3DDeviceImpl_3_QueryInterface(IDirect3DDevice3 *iface,
 182                                            REFIID riid,
 183                                            void **obj)
 184 {
 185     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
 186     TRACE_(ddraw_thunk)("(%p)->(%s,%p) thunking to IDirect3DDevice7 interface.\n", This, debugstr_guid(riid), obj);
 187     return IDirect3DDevice7_QueryInterface(ICOM_INTERFACE(This, IDirect3DDevice7),
 188                                            riid,
 189                                            obj);
 190 }
 191
 192 static HRESULT WINAPI
 193 Thunk_IDirect3DDeviceImpl_2_QueryInterface(IDirect3DDevice2 *iface,
 194                                            REFIID riid,
 195                                            void **obj)
 196 {
 197     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
 198     TRACE_(ddraw_thunk)("(%p)->(%s,%p) thunking to IDirect3DDevice7 interface.\n", This, debugstr_guid(riid), obj);
 199     return IDirect3DDevice7_QueryInterface(ICOM_INTERFACE(This, IDirect3DDevice7),
 200                                            riid,
 201                                            obj);
 202 }
 203
 204 static HRESULT WINAPI
 205 Thunk_IDirect3DDeviceImpl_1_QueryInterface(IDirect3DDevice *iface,
 206                                            REFIID riid,
 207                                            void **obp)
 208 {
 209     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
 210     TRACE_(ddraw_thunk)("(%p)->(%s,%p) thunking to IDirect3DDevice7 interface.\n", This, debugstr_guid(riid), obp);
 211     return IDirect3DDevice7_QueryInterface(ICOM_INTERFACE(This, IDirect3DDevice7),
 212                                            riid,
 213                                            obp);
 214 }
 215
 216 /*****************************************************************************
 217  * IDirect3DDevice7::AddRef
 218  *
 219  * Increases the refcount....
 220  * The most exciting Method, definitely
 221  *
 222  * Exists in Version 1, 2, 3 and 7
 223  *
 224  * Returns:
 225  *  The new refcount
 226  *
 227  *****************************************************************************/
 228 static ULONG WINAPI
 229 IDirect3DDeviceImpl_7_AddRef(IDirect3DDevice7 *iface)
 230 {
 231     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
 232     ULONG ref = InterlockedIncrement(&This->ref);
 233
 234     TRACE("(%p) : incrementing from %u.\n", This, ref -1);
 235
 236     return ref;
 237 }
 238
 239 static ULONG WINAPI
 240 Thunk_IDirect3DDeviceImpl_3_AddRef(IDirect3DDevice3 *iface)
 241 {
 242     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
 243     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DDevice7 interface.\n", This);
 244     return IDirect3DDevice7_AddRef(ICOM_INTERFACE(This, IDirect3DDevice7));
 245 }
 246
 247 static ULONG WINAPI
 248 Thunk_IDirect3DDeviceImpl_2_AddRef(IDirect3DDevice2 *iface)
 249 {
 250     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
 251     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DDevice7 interface.\n", This);
 252     return IDirect3DDevice7_AddRef(ICOM_INTERFACE(This, IDirect3DDevice7));
 253 }
 254
 255 static ULONG WINAPI
 256 Thunk_IDirect3DDeviceImpl_1_AddRef(IDirect3DDevice *iface)
 257 {
 258     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DDevice7 interface.\n", iface);
 259     return IDirect3DDevice7_AddRef(COM_INTERFACE_CAST(IDirect3DDeviceImpl, IDirect3DDevice, IDirect3DDevice7, iface));
 260 }
 261
 262 /*****************************************************************************
 263  * IDirect3DDevice7::Release
 264  *
 265  * Decreases the refcount of the interface
 266  * When the refcount is reduced to 0, the object is destroyed.
 267  *
 268  * Exists in Version 1, 2, 3 and 7
 269  *
 270  * Returns:d
 271  *  The new refcount
 272  *
 273  *****************************************************************************/
 274 static ULONG WINAPI
 275 IDirect3DDeviceImpl_7_Release(IDirect3DDevice7 *iface)
 276 {
 277     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
 278     ULONG ref = InterlockedDecrement(&This->ref);
 279
 280     TRACE("(%p)->() decrementing from %u.\n", This, ref +1);
 281
 282     /* This method doesn't destroy the WineD3DDevice, because it's still in use for
 283      * 2D rendering. IDirectDrawSurface7::Release will destroy the WineD3DDevice
 284      * when the render target is released
 285      */
 286     if (ref == 0)
 287     {
 288         IParent *IndexBufferParent;
 289         DWORD i;
 290
 291         /* Free the index buffer. */
 292         IWineD3DDevice_SetIndices(This->wineD3DDevice,
 293                                   NULL,
 294                                   0);
 295         IWineD3DIndexBuffer_GetParent(This->indexbuffer,
 296                                       (IUnknown **) &IndexBufferParent);
 297         IParent_Release(IndexBufferParent); /* Once for the getParent */
 298         if( IParent_Release(IndexBufferParent) != 0)  /* And now to destroy it */
 299         {
 300             ERR(" (%p) Something is still holding the index buffer parent %p\n", This, IndexBufferParent);
 301         }
 302
 303         /* There is no need to unset the vertex buffer here, IWineD3DDevice_Uninit3D will do that when
 304          * destroying the primary stateblock. If a vertex buffer is destroyed while it is bound
 305          * IDirect3DVertexBuffer::Release will unset it.
 306          */
 307
 308         /* Restore the render targets */
 309         if(This->OffScreenTarget)
 310         {
 311             /* Set the device up to render to the front buffer since the back buffer will
 312              * vanish soon.
 313              */
 314             IWineD3DDevice_SetRenderTarget(This->wineD3DDevice, 0,
 315                                            This->ddraw->d3d_target->WineD3DSurface);
 316             /* This->target is the offscreen target.
 317              * This->ddraw->d3d_target is the target used by DDraw
 318              */
 319             TRACE("(%p) Release: Using %p as front buffer, %p as back buffer\n", This, This->ddraw->d3d_target, NULL);
 320             IWineD3DDevice_SetFrontBackBuffers(This->wineD3DDevice,
 321                                                This->ddraw->d3d_target->WineD3DSurface,
 322                                                NULL);
 323         }
 324
 325         /* Release the WineD3DDevice. This won't destroy it */
 326         if(IWineD3DDevice_Release(This->wineD3DDevice) <= 0)
 327         {
 328             ERR(" (%p) The wineD3D device %p was destroyed unexpectadely. Prepare for trouble\n", This, This->wineD3DDevice);
 329         }
 330
 331         /* The texture handles should be unset by now, but there might be some bits
 332          * missing in our reference counting(needs test). Do a sanity check
 333          */
 334         for(i = 0; i < This->numHandles; i++)
 335         {
 336             if(This->Handles[i].ptr)
 337             {
 338                 switch(This->Handles[i].type)
 339                 {
 340                     case DDrawHandle_Texture:
 341                     {
 342                         IDirectDrawSurfaceImpl *surf = (IDirectDrawSurfaceImpl *) This->Handles[i].ptr;
 343                         FIXME("Texture Handle %d not unset properly\n", i + 1);
 344                         surf->Handle = 0;
 345                     }
 346                     break;
 347
 348                     case DDrawHandle_Material:
 349                     {
 350                         IDirect3DMaterialImpl *mat = (IDirect3DMaterialImpl *) This->Handles[i].ptr;
 351                         FIXME("Material handle %d not unset properly\n", i + 1);
 352                         mat->Handle = 0;
 353                     }
 354                     break;
 355
 356                     case DDrawHandle_Matrix:
 357                     {
 358                         /* No fixme here because this might happen because of sloppy apps */
 359                         WARN("Leftover matrix handle %d, deleting\n", i + 1);
 360                         IDirect3DDevice_DeleteMatrix(ICOM_INTERFACE(This, IDirect3DDevice),
 361                                                      i + 1);
 362                     }
 363                     break;
 364
 365                     case DDrawHandle_StateBlock:
 366                     {
 367                         /* No fixme here because this might happen because of sloppy apps */
 368                         WARN("Leftover stateblock handle %d, deleting\n", i + 1);
 369                         IDirect3DDevice7_DeleteStateBlock(ICOM_INTERFACE(This, IDirect3DDevice7),
 370                                                           i + 1);
 371                     }
 372                     break;
 373
 374                     default:
 375                         FIXME("Unknown handle %d not unset properly\n", i + 1);
 376                 }
 377             }
 378         }
 379
 380         HeapFree(GetProcessHeap(), 0, This->Handles);
 381
 382         /* Release the render target and the WineD3D render target
 383          * (See IDirect3D7::CreateDevice for more comments on this)
 384          */
 385         IDirectDrawSurface7_Release(ICOM_INTERFACE(This->target, IDirectDrawSurface7));
 386         IDirectDrawSurface7_Release(ICOM_INTERFACE(This->ddraw->d3d_target,IDirectDrawSurface7));
 387
 388         This->ddraw->d3ddevice = NULL;
 389
 390         /* Now free the structure */
 391         HeapFree(GetProcessHeap(), 0, This);
 392     }
 393
 394     return ref;
 395 }
 396
 397 static ULONG WINAPI
 398 Thunk_IDirect3DDeviceImpl_3_Release(IDirect3DDevice3 *iface)
 399 {
 400     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
 401     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DDevice7 interface.\n", This);
 402     return IDirect3DDevice7_Release(ICOM_INTERFACE(This, IDirect3DDevice7));
 403 }
 404
 405 static ULONG WINAPI
 406 Thunk_IDirect3DDeviceImpl_2_Release(IDirect3DDevice2 *iface)
 407 {
 408     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
 409     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DDevice7 interface.\n", This);
 410     return IDirect3DDevice7_Release(ICOM_INTERFACE(This, IDirect3DDevice7));
 411 }
 412
 413 static ULONG WINAPI
 414 Thunk_IDirect3DDeviceImpl_1_Release(IDirect3DDevice *iface)
 415 {
 416     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
 417     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DDevice7 interface.\n", This);
 418     return IDirect3DDevice7_Release(ICOM_INTERFACE(This, IDirect3DDevice7));
 419 }
 420
 421 /*****************************************************************************
 422  * IDirect3DDevice Methods
 423  *****************************************************************************/
 424
 425 /*****************************************************************************
 426  * IDirect3DDevice::Initialize
 427  *
 428  * Initializes a Direct3DDevice. This implementation is a no-op, as all
 429  * initialization is done at create time.
 430  *
 431  * Exists in Version 1
 432  *
 433  * Parameters:
 434  *  No idea what they mean, as the MSDN page is gone
 435  *
 436  * Returns: DD_OK
 437  *
 438  *****************************************************************************/
 439 static HRESULT WINAPI
 440 IDirect3DDeviceImpl_1_Initialize(IDirect3DDevice *iface,
 441                                  IDirect3D *Direct3D, GUID *guid,
 442                                  D3DDEVICEDESC *Desc)
 443 {
 444     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
 445
 446     /* It shouldn't be crucial, but print a FIXME, I'm interested if
 447      * any game calls it and when
 448      */
 449     FIXME("(%p)->(%p,%p,%p): No-op!\n", This, Direct3D, guid, Desc);
 450
 451     return D3D_OK;
 452 }
 453
 454 /*****************************************************************************
 455  * IDirect3DDevice7::GetCaps
 456  *
 457  * Retrieves the device's capabilities
 458  *
 459  * This implementation is used for Version 7 only, the older versions have
 460  * their own implementation.
 461  *
 462  * Parameters:
 463  *  Desc: Pointer to a D3DDEVICEDESC7 structure to fill
 464  *
 465  * Returns:
 466  *  D3D_OK on success
 467  *  D3DERR_* if a problem occurs. See WineD3D
 468  *
 469  *****************************************************************************/
 470 static HRESULT WINAPI
 471 IDirect3DDeviceImpl_7_GetCaps(IDirect3DDevice7 *iface,
 472                               D3DDEVICEDESC7 *Desc)
 473 {
 474     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
 475     D3DDEVICEDESC OldDesc;
 476     TRACE("(%p)->(%p)\n", This, Desc);
 477
 478     /* Call the same function used by IDirect3D, this saves code */
 479     return IDirect3DImpl_GetCaps(This->ddraw->wineD3D, &OldDesc, Desc);
 480 }
 481
 482 /*****************************************************************************
 483  * IDirect3DDevice3::GetCaps
 484  *
 485  * Retrieves the capabilities of the hardware device and the emulation
 486  * device. For Wine, hardware and emulation are the same (it's all HW).
 487  *
 488  * This implementation is used for Version 1, 2, and 3. Version 7 has its own
 489  *
 490  * Parameters:
 491  *  HWDesc: Structure to fill with the HW caps
 492  *  HelDesc: Structure to fill with the hardare emulation caps
 493  *
 494  * Returns:
 495  *  D3D_OK on success
 496  *  D3DERR_* if a problem occurs. See WineD3D
 497  *
 498  *****************************************************************************/
 499 static HRESULT WINAPI
 500 IDirect3DDeviceImpl_3_GetCaps(IDirect3DDevice3 *iface,
 501                               D3DDEVICEDESC *HWDesc,
 502                               D3DDEVICEDESC *HelDesc)
 503 {
 504     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
 505     D3DDEVICEDESC7 newDesc;
 506     HRESULT hr;
 507     TRACE("(%p)->(%p,%p)\n", iface, HWDesc, HelDesc);
 508
 509     hr = IDirect3DImpl_GetCaps(This->ddraw->wineD3D, HWDesc, &newDesc);
 510     if(hr != D3D_OK) return hr;
 511
 512     *HelDesc = *HWDesc;
 513     return D3D_OK;
 514 }
 515
 516 static HRESULT WINAPI
 517 Thunk_IDirect3DDeviceImpl_2_GetCaps(IDirect3DDevice2 *iface,
 518                                     D3DDEVICEDESC *D3DHWDevDesc,
 519                                     D3DDEVICEDESC *D3DHELDevDesc)
 520 {
 521     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
 522     TRACE_(ddraw_thunk)("(%p)->(%p,%p) thunking to IDirect3DDevice3 interface.\n", This, D3DHWDevDesc, D3DHELDevDesc);
 523     return IDirect3DDevice3_GetCaps(ICOM_INTERFACE(This, IDirect3DDevice3),
 524                                     D3DHWDevDesc,
 525                                     D3DHELDevDesc);
 526 }
 527
 528 static HRESULT WINAPI
 529 Thunk_IDirect3DDeviceImpl_1_GetCaps(IDirect3DDevice *iface,
 530                                     D3DDEVICEDESC *D3DHWDevDesc,
 531                                     D3DDEVICEDESC *D3DHELDevDesc)
 532 {
 533     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
 534     TRACE_(ddraw_thunk)("(%p)->(%p,%p) thunking to IDirect3DDevice3 interface.\n", This, D3DHWDevDesc, D3DHELDevDesc);
 535     return IDirect3DDevice3_GetCaps(ICOM_INTERFACE(This, IDirect3DDevice3),
 536                                     D3DHWDevDesc,
 537                                     D3DHELDevDesc);
 538 }
 539
 540 /*****************************************************************************
 541  * IDirect3DDevice2::SwapTextureHandles
 542  *
 543  * Swaps the texture handles of 2 Texture interfaces. Version 1 and 2
 544  *
 545  * Parameters:
 546  *  Tex1, Tex2: The 2 Textures to swap
 547  *
 548  * Returns:
 549  *  D3D_OK
 550  *
 551  *****************************************************************************/
 552 static HRESULT WINAPI
 553 IDirect3DDeviceImpl_2_SwapTextureHandles(IDirect3DDevice2 *iface,
 554                                          IDirect3DTexture2 *Tex1,
 555                                          IDirect3DTexture2 *Tex2)
 556 {
 557     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
 558     DWORD swap;
 559     IDirectDrawSurfaceImpl *surf1 = ICOM_OBJECT(IDirectDrawSurfaceImpl, IDirect3DTexture2, Tex1);
 560     IDirectDrawSurfaceImpl *surf2 = ICOM_OBJECT(IDirectDrawSurfaceImpl, IDirect3DTexture2, Tex2);
 561     TRACE("(%p)->(%p,%p)\n", This, surf1, surf2);
 562
 563     This->Handles[surf1->Handle - 1].ptr = surf2;
 564     This->Handles[surf2->Handle - 1].ptr = surf1;
 565
 566     swap = surf2->Handle;
 567     surf2->Handle = surf1->Handle;
 568     surf1->Handle = swap;
 569
 570     return D3D_OK;
 571 }
 572
 573 static HRESULT WINAPI
 574 Thunk_IDirect3DDeviceImpl_1_SwapTextureHandles(IDirect3DDevice *iface,
 575                                                IDirect3DTexture *D3DTex1,
 576                                                IDirect3DTexture *D3DTex2)
 577 {
 578     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
 579     IDirectDrawSurfaceImpl *surf1 = ICOM_OBJECT(IDirectDrawSurfaceImpl, IDirect3DTexture, D3DTex1);
 580     IDirectDrawSurfaceImpl *surf2 = ICOM_OBJECT(IDirectDrawSurfaceImpl, IDirect3DTexture, D3DTex2);
 581     TRACE_(ddraw_thunk)("(%p)->(%p,%p) thunking to IDirect3DDevice2 interface.\n", This, surf1, surf2);
 582     return IDirect3DDevice2_SwapTextureHandles(ICOM_INTERFACE(This, IDirect3DDevice2),
 583                                                ICOM_INTERFACE(surf1, IDirect3DTexture2),
 584                                                ICOM_INTERFACE(surf2, IDirect3DTexture2));
 585 }
 586
 587 /*****************************************************************************
 588  * IDirect3DDevice3::GetStats
 589  *
 590  * This method seems to retrieve some stats from the device.
 591  * The MSDN documentation doesn't exist any more, but the D3DSTATS
 592  * structure suggests that the amout of drawn primitives and processed
 593  * vertices is returned.
 594  *
 595  * Exists in Version 1, 2 and 3
 596  *
 597  * Parameters:
 598  *  Stats: Pointer to a D3DSTATS structure to be filled
 599  *
 600  * Returns:
 601  *  D3D_OK on success
 602  *  DDERR_INVALIDPARAMS if Stats == NULL
 603  *
 604  *****************************************************************************/
 605 static HRESULT WINAPI
 606 IDirect3DDeviceImpl_3_GetStats(IDirect3DDevice3 *iface,
 607                                D3DSTATS *Stats)
 608 {
 609     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
 610     FIXME("(%p)->(%p): Stub!\n", This, Stats);
 611
 612     if(!Stats)
 613         return DDERR_INVALIDPARAMS;
 614
 615     /* Fill the Stats with 0 */
 616     Stats->dwTrianglesDrawn = 0;
 617     Stats->dwLinesDrawn = 0;
 618     Stats->dwPointsDrawn = 0;
 619     Stats->dwSpansDrawn = 0;
 620     Stats->dwVerticesProcessed = 0;
 621
 622     return D3D_OK;
 623 }
 624
 625 static HRESULT WINAPI
 626 Thunk_IDirect3DDeviceImpl_2_GetStats(IDirect3DDevice2 *iface,
 627                                      D3DSTATS *Stats)
 628 {
 629     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
 630     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice3 interface.\n", This, Stats);
 631     return IDirect3DDevice3_GetStats(ICOM_INTERFACE(This, IDirect3DDevice3),
 632                                      Stats);
 633 }
 634
 635 static HRESULT WINAPI
 636 Thunk_IDirect3DDeviceImpl_1_GetStats(IDirect3DDevice *iface,
 637                                      D3DSTATS *Stats)
 638 {
 639     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
 640     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice3 interface.\n", This, Stats);
 641     return IDirect3DDevice3_GetStats(ICOM_INTERFACE(This, IDirect3DDevice3),
 642                                      Stats);
 643 }
 644
 645 /*****************************************************************************
 646  * IDirect3DDevice::CreateExecuteBuffer
 647  *
 648  * Creates an IDirect3DExecuteBuffer, used for rendering with a
 649  * Direct3DDevice.
 650  *
 651  * Version 1 only.
 652  *
 653  * Params:
 654  *  Desc: Buffer description
 655  *  ExecuteBuffer: Address to return the Interface pointer at
 656  *  UnkOuter: Must be NULL. Basically for aggregation, which ddraw doesn't
 657  *            support
 658  *
 659  * Returns:
 660  *  CLASS_E_NOAGGREGATION if UnkOuter != NULL
 661  *  DDERR_OUTOFMEMORY if we ran out of memory
 662  *  D3D_OK on success
 663  *
 664  *****************************************************************************/
 665 static HRESULT WINAPI
 666 IDirect3DDeviceImpl_1_CreateExecuteBuffer(IDirect3DDevice *iface,
 667                                           D3DEXECUTEBUFFERDESC *Desc,
 668                                           IDirect3DExecuteBuffer **ExecuteBuffer,
 669                                           IUnknown *UnkOuter)
 670 {
 671     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
 672     IDirect3DExecuteBufferImpl* object;
 673     TRACE("(%p)->(%p,%p,%p)!\n", This, Desc, ExecuteBuffer, UnkOuter);
 674
 675     if(UnkOuter)
 676         return CLASS_E_NOAGGREGATION;
 677
 678     /* Allocate the new Execute Buffer */
 679     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirect3DExecuteBufferImpl));
 680     if(!object)
 681     {
 682         ERR("Out of memory when allocating a IDirect3DExecuteBufferImpl structure\n");
 683         return DDERR_OUTOFMEMORY;
 684     }
 685
 686     ICOM_INIT_INTERFACE(object, IDirect3DExecuteBuffer, IDirect3DExecuteBuffer_Vtbl);
 687
 688     object->ref = 1;
 689     object->d3ddev = This;
 690
 691     /* Initializes memory */
 692     memcpy(&object->desc, Desc, Desc->dwSize);
 693
 694     /* No buffer given */
 695     if ((object->desc.dwFlags & D3DDEB_LPDATA) == 0)
 696         object->desc.lpData = NULL;
 697
 698     /* No buffer size given */
 699     if ((object->desc.dwFlags & D3DDEB_BUFSIZE) == 0)
 700         object->desc.dwBufferSize = 0;
 701
 702     /* Create buffer if asked */
 703     if ((object->desc.lpData == NULL) && (object->desc.dwBufferSize > 0))
 704     {
 705         object->need_free = TRUE;
 706         object->desc.lpData = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,object->desc.dwBufferSize);
 707         if(!object->desc.lpData)
 708         {
 709             ERR("Out of memory when allocating the execute buffer data\n");
 710             HeapFree(GetProcessHeap(), 0, object);
 711             return DDERR_OUTOFMEMORY;
 712         }
 713     }
 714     else
 715     {
 716         object->need_free = FALSE;
 717     }
 718
 719     /* No vertices for the moment */
 720     object->vertex_data = NULL;
 721
 722     object->desc.dwFlags |= D3DDEB_LPDATA;
 723
 724     object->indices = NULL;
 725     object->nb_indices = 0;
 726
 727     *ExecuteBuffer = ICOM_INTERFACE(object, IDirect3DExecuteBuffer);
 728
 729     TRACE(" Returning IDirect3DExecuteBuffer at %p, implementation is at %p\n", *ExecuteBuffer, object);
 730
 731     return D3D_OK;
 732 }
 733
 734 /*****************************************************************************
 735  * IDirect3DDevice::Execute
 736  *
 737  * Executes all the stuff in an execute buffer.
 738  *
 739  * Params:
 740  *  ExecuteBuffer: The buffer to execute
 741  *  Viewport: The viewport used for rendering
 742  *  Flags: Some flags
 743  *
 744  * Returns:
 745  *  DDERR_INVALIDPARAMS if ExecuteBuffer == NULL
 746  *  D3D_OK on success
 747  *
 748  *****************************************************************************/
 749 static HRESULT WINAPI
 750 IDirect3DDeviceImpl_1_Execute(IDirect3DDevice *iface,
 751                               IDirect3DExecuteBuffer *ExecuteBuffer,
 752                               IDirect3DViewport *Viewport,
 753                               DWORD Flags)
 754 {
 755     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
 756     IDirect3DExecuteBufferImpl *Direct3DExecuteBufferImpl = ICOM_OBJECT(IDirect3DExecuteBufferImpl, IDirect3DExecuteBuffer, ExecuteBuffer);
 757     IDirect3DViewportImpl *Direct3DViewportImpl = ICOM_OBJECT(IDirect3DViewportImpl, IDirect3DViewport3, Viewport);
 758
 759     TRACE("(%p)->(%p,%p,%08x)\n", This, Direct3DExecuteBufferImpl, Direct3DViewportImpl, Flags);
 760
 761     if(!Direct3DExecuteBufferImpl)
 762         return DDERR_INVALIDPARAMS;
 763
 764     /* Execute... */
 765     IDirect3DExecuteBufferImpl_Execute(Direct3DExecuteBufferImpl, This, Direct3DViewportImpl);
 766
 767     return D3D_OK;
 768 }
 769
 770 /*****************************************************************************
 771  * IDirect3DDevice3::AddViewport
 772  *
 773  * Add a Direct3DViewport to the device's viewport list. These viewports
 774  * are wrapped to IDirect3DDevice7 viewports in viewport.c
 775  *
 776  * Exists in Version 1, 2 and 3. Note that IDirect3DViewport 1, 2 and 3
 777  * are the same interfaces.
 778  *
 779  * Params:
 780  *  Viewport: The viewport to add
 781  *
 782  * Returns:
 783  *  DDERR_INVALIDPARAMS if Viewport == NULL
 784  *  D3D_OK on success
 785  *
 786  *****************************************************************************/
 787 static HRESULT WINAPI
 788 IDirect3DDeviceImpl_3_AddViewport(IDirect3DDevice3 *iface,
 789                                   IDirect3DViewport3 *Viewport)
 790 {
 791     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
 792     IDirect3DViewportImpl *vp = ICOM_OBJECT(IDirect3DViewportImpl, IDirect3DViewport3, Viewport);
 793
 794     TRACE("(%p)->(%p)\n", This, vp);
 795
 796     /* Sanity check */
 797     if(!vp)
 798         return DDERR_INVALIDPARAMS;
 799
 800     vp->next = This->viewport_list;
 801     This->viewport_list = vp;
 802
 803     return D3D_OK;
 804 }
 805
 806 static HRESULT WINAPI
 807 Thunk_IDirect3DDeviceImpl_2_AddViewport(IDirect3DDevice2 *iface,
 808                                         IDirect3DViewport2 *Direct3DViewport2)
 809 {
 810     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
 811     IDirect3DViewportImpl *vp = ICOM_OBJECT(IDirect3DViewportImpl, IDirect3DViewport3, Direct3DViewport2);
 812     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice3 interface.\n", This, vp);
 813     return IDirect3DDevice3_AddViewport(ICOM_INTERFACE(This, IDirect3DDevice3),
 814                                         ICOM_INTERFACE(vp, IDirect3DViewport3));
 815 }
 816
 817 static HRESULT WINAPI
 818 Thunk_IDirect3DDeviceImpl_1_AddViewport(IDirect3DDevice *iface,
 819                                         IDirect3DViewport *Direct3DViewport)
 820 {
 821     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
 822     IDirect3DViewportImpl *vp = ICOM_OBJECT(IDirect3DViewportImpl, IDirect3DViewport3, Direct3DViewport);
 823     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice3 interface.\n", This, vp);
 824     return IDirect3DDevice3_AddViewport(ICOM_INTERFACE(This, IDirect3DDevice3),
 825                                         ICOM_INTERFACE(vp, IDirect3DViewport3));
 826 }
 827
 828 /*****************************************************************************
 829  * IDirect3DDevice3::DeleteViewport
 830  *
 831  * Deletes a Direct3DViewport from the device's viewport list.
 832  *
 833  * Exists in Version 1, 2 and 3. Note that all Viewport interface versions
 834  * are equal.
 835  *
 836  * Params:
 837  *  Viewport: The viewport to delete
 838  *
 839  * Returns:
 840  *  D3D_OK on success
 841  *  DDERR_INVALIDPARAMS if the viewport wasn't found in the list
 842  *
 843  *****************************************************************************/
 844 static HRESULT WINAPI
 845 IDirect3DDeviceImpl_3_DeleteViewport(IDirect3DDevice3 *iface,
 846                                      IDirect3DViewport3 *Viewport)
 847 {
 848     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
 849     IDirect3DViewportImpl *vp = (IDirect3DViewportImpl *) Viewport;
 850     IDirect3DViewportImpl *cur_viewport, *prev_viewport = NULL;
 851
 852     TRACE("(%p)->(%p)\n", This, vp);
 853
 854     cur_viewport = This->viewport_list;
 855     while (cur_viewport != NULL)
 856     {
 857         if (cur_viewport == vp)
 858         {
 859             if (prev_viewport == NULL) This->viewport_list = cur_viewport->next;
 860             else prev_viewport->next = cur_viewport->next;
 861             /* TODO : add desactivate of the viewport and all associated lights... */
 862             return D3D_OK;
 863         }
 864         prev_viewport = cur_viewport;
 865         cur_viewport = cur_viewport->next;
 866     }
 867
 868     return DDERR_INVALIDPARAMS;
 869 }
 870
 871 static HRESULT WINAPI
 872 Thunk_IDirect3DDeviceImpl_2_DeleteViewport(IDirect3DDevice2 *iface,
 873                                            IDirect3DViewport2 *Direct3DViewport2)
 874 {
 875     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
 876     IDirect3DViewportImpl *vp = ICOM_OBJECT(IDirect3DViewportImpl, IDirect3DViewport3, Direct3DViewport2);
 877     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice3 interface.\n", This, vp);
 878     return IDirect3DDevice3_DeleteViewport(ICOM_INTERFACE(This, IDirect3DDevice3),
 879                                            ICOM_INTERFACE(vp, IDirect3DViewport3));
 880 }
 881
 882 static HRESULT WINAPI
 883 Thunk_IDirect3DDeviceImpl_1_DeleteViewport(IDirect3DDevice *iface,
 884                                            IDirect3DViewport *Direct3DViewport)
 885 {
 886     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
 887     IDirect3DViewportImpl *vp = ICOM_OBJECT(IDirect3DViewportImpl, IDirect3DViewport3, Direct3DViewport);
 888     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice3 interface.\n", This, vp);
 889     return IDirect3DDevice3_DeleteViewport(ICOM_INTERFACE(This, IDirect3DDevice3),
 890                                            ICOM_INTERFACE(vp, IDirect3DViewport3));
 891 }
 892
 893 /*****************************************************************************
 894  * IDirect3DDevice3::NextViewport
 895  *
 896  * Returns a viewport from the viewport list, depending on the
 897  * passed viewport and the flags.
 898  *
 899  * Exists in Version 1, 2 and 3. Note that all Viewport interface versions
 900  * are equal.
 901  *
 902  * Params:
 903  *  Viewport: Viewport to use for beginning the search
 904  *  Flags: D3DNEXT_NEXT, D3DNEXT_HEAD or D3DNEXT_TAIL
 905  *
 906  * Returns:
 907  *  D3D_OK on success
 908  *  DDERR_INVALIDPARAMS if the flags were wrong, or Viewport was NULL
 909  *
 910  *****************************************************************************/
 911 static HRESULT WINAPI
 912 IDirect3DDeviceImpl_3_NextViewport(IDirect3DDevice3 *iface,
 913                                    IDirect3DViewport3 *Viewport3,
 914                                    IDirect3DViewport3 **lplpDirect3DViewport3,
 915                                    DWORD Flags)
 916 {
 917     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
 918     IDirect3DViewportImpl *vp = ICOM_OBJECT(IDirect3DViewportImpl, IDirect3DViewport3, Viewport3);
 919     IDirect3DViewportImpl *res = NULL;
 920
 921     TRACE("(%p)->(%p,%p,%08x)\n", This, vp, lplpDirect3DViewport3, Flags);
 922
 923     if(!vp)
 924     {
 925         *lplpDirect3DViewport3 = NULL;
 926         return DDERR_INVALIDPARAMS;
 927     }
 928
 929
 930     switch (Flags)
 931     {
 932         case D3DNEXT_NEXT:
 933         {
 934             res = vp->next;
 935         }
 936         break;
 937         case D3DNEXT_HEAD:
 938         {
 939             res = This->viewport_list;
 940         }
 941         break;
 942         case D3DNEXT_TAIL:
 943         {
 944             IDirect3DViewportImpl *cur_viewport = This->viewport_list;
 945             if (cur_viewport != NULL)
 946             {
 947                 while (cur_viewport->next != NULL) cur_viewport = cur_viewport->next;
 948             }
 949             res = cur_viewport;
 950         }
 951         break;
 952         default:
 953             *lplpDirect3DViewport3 = NULL;
 954             return DDERR_INVALIDPARAMS;
 955     }
 956
 957     *lplpDirect3DViewport3 = ICOM_INTERFACE(res, IDirect3DViewport3);
 958     return D3D_OK;
 959 }
 960
 961 static HRESULT WINAPI
 962 Thunk_IDirect3DDeviceImpl_2_NextViewport(IDirect3DDevice2 *iface,
 963                                          IDirect3DViewport2 *Viewport2,
 964                                          IDirect3DViewport2 **lplpDirect3DViewport2,
 965                                          DWORD Flags)
 966 {
 967     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
 968     IDirect3DViewportImpl *vp = ICOM_OBJECT(IDirect3DViewportImpl, IDirect3DViewport3, Viewport2);
 969     IDirect3DViewport3 *res;
 970     HRESULT hr;
 971     TRACE_(ddraw_thunk)("(%p)->(%p,%p,%08x) thunking to IDirect3DDevice3 interface.\n", This, vp, lplpDirect3DViewport2, Flags);
 972     hr = IDirect3DDevice3_NextViewport(ICOM_INTERFACE(This, IDirect3DDevice3),
 973                                        ICOM_INTERFACE(vp, IDirect3DViewport3),
 974                                        &res,
 975                                        Flags);
 976     *lplpDirect3DViewport2 = (IDirect3DViewport2 *) COM_INTERFACE_CAST(IDirect3DViewportImpl, IDirect3DViewport3, IDirect3DViewport3, res);
 977     return hr;
 978 }
 979
 980 static HRESULT WINAPI
 981 Thunk_IDirect3DDeviceImpl_1_NextViewport(IDirect3DDevice *iface,
 982                                          IDirect3DViewport *Viewport,
 983                                          IDirect3DViewport **lplpDirect3DViewport,
 984                                          DWORD Flags)
 985 {
 986     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
 987     IDirect3DViewportImpl *vp = ICOM_OBJECT(IDirect3DViewportImpl, IDirect3DViewport3, Viewport);
 988     IDirect3DViewport3 *res;
 989     HRESULT hr;
 990     TRACE_(ddraw_thunk)("(%p)->(%p,%p,%08x) thunking to IDirect3DDevice3 interface.\n", This, vp, lplpDirect3DViewport, Flags);
 991     hr = IDirect3DDevice3_NextViewport(ICOM_INTERFACE(This, IDirect3DDevice3),
 992                                        ICOM_INTERFACE(vp, IDirect3DViewport3),
 993                                        &res,
 994                                        Flags);
 995     *lplpDirect3DViewport = (IDirect3DViewport *) COM_INTERFACE_CAST(IDirect3DViewportImpl, IDirect3DViewport3, IDirect3DViewport3, res);
 996     return hr;
 997 }
 998
 999 /*****************************************************************************
1000  * IDirect3DDevice::Pick
1001  *
1002  * Executes an execute buffer without performing rendering. Instead, a
1003  * list of primitives that intersect with (x1,y1) of the passed rectangle
1004  * is created. IDirect3DDevice::GetPickRecords can be used to retrieve
1005  * this list.
1006  *
1007  * Version 1 only
1008  *
1009  * Params:
1010  *  ExecuteBuffer: Buffer to execute
1011  *  Viewport: Viewport to use for execution
1012  *  Flags: None are defined, according to the SDK
1013  *  Rect: Specifies the coordinates to be picked. Only x1 and y2 are used,
1014  *        x2 and y2 are ignored.
1015  *
1016  * Returns:
1017  *  D3D_OK because it's a stub
1018  *
1019  *****************************************************************************/
1020 static HRESULT WINAPI
1021 IDirect3DDeviceImpl_1_Pick(IDirect3DDevice *iface,
1022                            IDirect3DExecuteBuffer *ExecuteBuffer,
1023                            IDirect3DViewport *Viewport,
1024                            DWORD Flags,
1025                            D3DRECT *Rect)
1026 {
1027     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
1028     IDirect3DExecuteBufferImpl *execbuf = ICOM_OBJECT(IDirect3DExecuteBufferImpl, IDirect3DExecuteBuffer, ExecuteBuffer);
1029     IDirect3DViewportImpl *vp = ICOM_OBJECT(IDirect3DViewportImpl, IDirect3DViewport3, Viewport);
1030     FIXME("(%p)->(%p,%p,%08x,%p): stub!\n", This, execbuf, vp, Flags, Rect);
1031
1032     return D3D_OK;
1033 }
1034
1035 /*****************************************************************************
1036  * IDirect3DDevice::GetPickRecords
1037  *
1038  * Retrieves the pick records generated by IDirect3DDevice::GetPickRecords
1039  *
1040  * Version 1 only
1041  *
1042  * Params:
1043  *  Count: Pointer to a DWORD containing the numbers of pick records to
1044  *         retrieve
1045  *  D3DPickRec: Address to store the resulting D3DPICKRECORD arry.
1046  *
1047  * Returns:
1048  *  D3D_OK, because it's a stub
1049  *
1050  *****************************************************************************/
1051 static HRESULT WINAPI
1052 IDirect3DDeviceImpl_1_GetPickRecords(IDirect3DDevice *iface,
1053                                      DWORD *Count,
1054                                      D3DPICKRECORD *D3DPickRec)
1055 {
1056     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
1057     FIXME("(%p)->(%p,%p): stub!\n", This, Count, D3DPickRec);
1058
1059     return D3D_OK;
1060 }
1061
1062 /*****************************************************************************
1063  * IDirect3DDevice7::EnumTextureformats
1064  *
1065  * Enumerates the supported texture formats. It has a list of all possible
1066  * formats and calls IWineD3D::CheckDeviceFormat for each format to see if
1067  * WineD3D supports it. If so, then it is passed to the app.
1068  *
1069  * This is for Version 7 and 3, older versions have a different
1070  * callback function and their own implementation
1071  *
1072  * Params:
1073  *  Callback: Callback to call for each enumerated format
1074  *  Arg: Argument to pass to the callback
1075  *
1076  * Returns:
1077  *  D3D_OK on success
1078  *  DDERR_INVALIDPARAMS if Callback == NULL
1079  *
1080  *****************************************************************************/
1081 static HRESULT WINAPI
1082 IDirect3DDeviceImpl_7_EnumTextureFormats(IDirect3DDevice7 *iface,
1083                                          LPD3DENUMPIXELFORMATSCALLBACK Callback,
1084                                          void *Arg)
1085 {
1086     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
1087     HRESULT hr;
1088     int i;
1089
1090     WINED3DFORMAT FormatList[] = {
1091         /* 32 bit */
1092         WINED3DFMT_A8R8G8B8,
1093         WINED3DFMT_X8R8G8B8,
1094         /* 24 bit */
1095         WINED3DFMT_R8G8B8,
1096         /* 16 Bit */
1097         WINED3DFMT_A1R5G5B5,
1098         WINED3DFMT_A4R4G4B4,
1099         WINED3DFMT_R5G6B5,
1100         WINED3DFMT_X1R5G5B5,
1101         /* 8 Bit */
1102         WINED3DFMT_R3G3B2,
1103         WINED3DFMT_P8,
1104         /* FOURCC codes */
1105         WINED3DFMT_DXT1,
1106         WINED3DFMT_DXT3,
1107         WINED3DFMT_DXT5,
1108     };
1109
1110     TRACE("(%p)->(%p,%p): Relay\n", This, Callback, Arg);
1111
1112     if(!Callback)
1113         return DDERR_INVALIDPARAMS;
1114
1115     for(i = 0; i < sizeof(FormatList) / sizeof(WINED3DFORMAT); i++)
1116     {
1117         hr = IWineD3D_CheckDeviceFormat(This->ddraw->wineD3D,
1118                                         0 /* Adapter */,
1119                                         0 /* DeviceType */,
1120                                         0 /* AdapterFormat */,
1121                                         0 /* Usage */,
1122                                         0 /* ResourceType */,
1123                                         FormatList[i]);
1124         if(hr == D3D_OK)
1125         {
1126             DDPIXELFORMAT pformat;
1127
1128             memset(&pformat, 0, sizeof(pformat));
1129             pformat.dwSize = sizeof(pformat);
1130             PixelFormat_WineD3DtoDD(&pformat, FormatList[i]);
1131
1132             TRACE("Enumerating WineD3DFormat %d\n", FormatList[i]);
1133             hr = Callback(&pformat, Arg);
1134             if(hr != DDENUMRET_OK)
1135             {
1136                 TRACE("Format enumeration cancelled by application\n");
1137                 return D3D_OK;
1138             }
1139         }
1140     }
1141     TRACE("End of enumeration\n");
1142     return D3D_OK;
1143 }
1144
1145 static HRESULT WINAPI
1146 Thunk_IDirect3DDeviceImpl_3_EnumTextureFormats(IDirect3DDevice3 *iface,
1147                                                LPD3DENUMPIXELFORMATSCALLBACK Callback,
1148                                                void *Arg)
1149 {
1150     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
1151     TRACE_(ddraw_thunk)("(%p)->(%p,%p) thunking to IDirect3DDevice7 interface.\n", This, Callback, Arg);
1152     return IDirect3DDevice7_EnumTextureFormats(ICOM_INTERFACE(This, IDirect3DDevice7),
1153                                                Callback,
1154                                                Arg);
1155 }
1156
1157 /*****************************************************************************
1158  * IDirect3DDevice2::EnumTextureformats
1159  *
1160  * EnumTextureFormats for Version 1 and 2, see
1161  * IDirect3DDevice7::EnumTexureFormats for a more detailed description.
1162  *
1163  * This version has a different callback and does not enumerate FourCC
1164  * formats
1165  *
1166  *****************************************************************************/
1167 static HRESULT WINAPI
1168 IDirect3DDeviceImpl_2_EnumTextureFormats(IDirect3DDevice2 *iface,
1169                                          LPD3DENUMTEXTUREFORMATSCALLBACK Callback,
1170                                          void *Arg)
1171 {
1172     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
1173     HRESULT hr;
1174     int i;
1175
1176     WINED3DFORMAT FormatList[] = {
1177         /* 32 bit */
1178         WINED3DFMT_A8R8G8B8,
1179         WINED3DFMT_X8R8G8B8,
1180         /* 24 bit */
1181         WINED3DFMT_R8G8B8,
1182         /* 16 Bit */
1183         WINED3DFMT_A1R5G5B5,
1184         WINED3DFMT_A4R4G4B4,
1185         WINED3DFMT_R5G6B5,
1186         WINED3DFMT_X1R5G5B5,
1187         /* 8 Bit */
1188         WINED3DFMT_R3G3B2,
1189         WINED3DFMT_P8,
1190         /* FOURCC codes - Not in this version*/
1191     };
1192
1193     TRACE("(%p)->(%p,%p): Relay\n", This, Callback, Arg);
1194
1195     if(!Callback)
1196         return DDERR_INVALIDPARAMS;
1197
1198     for(i = 0; i < sizeof(FormatList) / sizeof(WINED3DFORMAT); i++)
1199     {
1200         hr = IWineD3D_CheckDeviceFormat(This->ddraw->wineD3D,
1201                                         0 /* Adapter */,
1202                                         0 /* DeviceType */,
1203                                         0 /* AdapterFormat */,
1204                                         0 /* Usage */,
1205                                         0 /* ResourceType */,
1206                                         FormatList[i]);
1207         if(hr == D3D_OK)
1208         {
1209             DDSURFACEDESC sdesc;
1210
1211             memset(&sdesc, 0, sizeof(sdesc));
1212             sdesc.dwSize = sizeof(sdesc);
1213             sdesc.dwFlags = DDSD_PIXELFORMAT | DDSD_CAPS;
1214             sdesc.ddsCaps.dwCaps = DDSCAPS_TEXTURE;
1215             sdesc.ddpfPixelFormat.dwSize = sizeof(sdesc.ddpfPixelFormat);
1216             PixelFormat_WineD3DtoDD(&sdesc.ddpfPixelFormat, FormatList[i]);
1217
1218             TRACE("Enumerating WineD3DFormat %d\n", FormatList[i]);
1219             hr = Callback(&sdesc, Arg);
1220             if(hr != DDENUMRET_OK)
1221             {
1222                 TRACE("Format enumeration cancelled by application\n");
1223                 return D3D_OK;
1224             }
1225         }
1226     }
1227     TRACE("End of enumeration\n");
1228     return D3D_OK;
1229 }
1230
1231 static HRESULT WINAPI
1232 Thunk_IDirect3DDeviceImpl_1_EnumTextureFormats(IDirect3DDevice *iface,
1233                                                LPD3DENUMTEXTUREFORMATSCALLBACK Callback,
1234                                                void *Arg)
1235 {
1236     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
1237     TRACE_(ddraw_thunk)("(%p)->(%p,%p) thunking to IDirect3DDevice2 interface.\n", This, Callback, Arg);
1238     return IDirect3DDevice2_EnumTextureFormats(ICOM_INTERFACE(This, IDirect3DDevice2),
1239                                                Callback,
1240                                                Arg);
1241 }
1242
1243 /*****************************************************************************
1244  * IDirect3DDevice::CreateMatrix
1245  *
1246  * Creates a matrix handle. A handle is created and memory for a D3DMATRIX is
1247  * allocated for the handle.
1248  *
1249  * Version 1 only
1250  *
1251  * Params
1252  *  D3DMatHandle: Address to return the handle at
1253  *
1254  * Returns:
1255  *  D3D_OK on success
1256  *  DDERR_INVALIDPARAMS if D3DMatHandle = NULL
1257  *
1258  *****************************************************************************/
1259 static HRESULT WINAPI
1260 IDirect3DDeviceImpl_1_CreateMatrix(IDirect3DDevice *iface, D3DMATRIXHANDLE *D3DMatHandle)
1261 {
1262     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
1263     D3DMATRIX *Matrix;
1264     TRACE("(%p)->(%p)\n", This, D3DMatHandle);
1265
1266     if(!D3DMatHandle)
1267         return DDERR_INVALIDPARAMS;
1268
1269     Matrix = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(D3DMATRIX));
1270     if(!Matrix)
1271     {
1272         ERR("Out of memory when allocating a D3DMATRIX\n");
1273         return DDERR_OUTOFMEMORY;
1274     }
1275     *D3DMatHandle = IDirect3DDeviceImpl_CreateHandle(This);
1276     if(!(*D3DMatHandle))
1277     {
1278         ERR("Failed to create a matrix handle\n");
1279         HeapFree(GetProcessHeap(), 0, Matrix);
1280         return DDERR_OUTOFMEMORY;
1281     }
1282     This->Handles[(DWORD) *D3DMatHandle - 1].ptr = Matrix;
1283     This->Handles[(DWORD) *D3DMatHandle - 1].type = DDrawHandle_Matrix;
1284     TRACE(" returning matrix handle %d\n", *D3DMatHandle);
1285
1286     return D3D_OK;
1287 }
1288
1289 /*****************************************************************************
1290  * IDirect3DDevice::SetMatrix
1291  *
1292  * Sets a matrix for a matrix handle. The matrix is copied into the memory
1293  * allocated for the handle
1294  *
1295  * Version 1 only
1296  *
1297  * Params:
1298  *  D3DMatHandle: Handle to set the matrix to
1299  *  D3DMatrix: Matrix to set
1300  *
1301  * Returns:
1302  *  D3D_OK on success
1303  *  DDERR_INVALIDPARAMS if the handle of the matrix is invalid or the matrix
1304  *   to set is NULL
1305  *
1306  *****************************************************************************/
1307 static HRESULT WINAPI
1308 IDirect3DDeviceImpl_1_SetMatrix(IDirect3DDevice *iface,
1309                                 D3DMATRIXHANDLE D3DMatHandle,
1310                                 D3DMATRIX *D3DMatrix)
1311 {
1312     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
1313     TRACE("(%p)->(%08x,%p)\n", This, (DWORD) D3DMatHandle, D3DMatrix);
1314
1315     if( (!D3DMatHandle) || (!D3DMatrix) )
1316         return DDERR_INVALIDPARAMS;
1317
1318     if(D3DMatHandle > This->numHandles)
1319     {
1320         ERR("Handle %d out of range\n", D3DMatHandle);
1321         return DDERR_INVALIDPARAMS;
1322     }
1323     else if(This->Handles[D3DMatHandle - 1].type != DDrawHandle_Matrix)
1324     {
1325         ERR("Handle %d is not a matrix handle\n", D3DMatHandle);
1326         return DDERR_INVALIDPARAMS;
1327     }
1328
1329     if (TRACE_ON(d3d7))
1330         dump_D3DMATRIX(D3DMatrix);
1331
1332     *((D3DMATRIX *) This->Handles[D3DMatHandle - 1].ptr) = *D3DMatrix;
1333
1334     return D3D_OK;
1335 }
1336
1337 /*****************************************************************************
1338  * IDirect3DDevice::SetMatrix
1339  *
1340  * Returns the content of a D3DMATRIX handle
1341  *
1342  * Version 1 only
1343  *
1344  * Params:
1345  *  D3DMatHandle: Matrix handle to read the content from
1346  *  D3DMatrix: Address to store the content at
1347  *
1348  * Returns:
1349  *  D3D_OK on success
1350  *  DDERR_INVALIDPARAMS if D3DMatHandle is invalid or D3DMatrix is NULL
1351  *
1352  *****************************************************************************/
1353 static HRESULT WINAPI
1354 IDirect3DDeviceImpl_1_GetMatrix(IDirect3DDevice *iface,
1355                                 D3DMATRIXHANDLE D3DMatHandle,
1356                                 D3DMATRIX *D3DMatrix)
1357 {
1358     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
1359     TRACE("(%p)->(%08x,%p)\n", This, (DWORD) D3DMatHandle, D3DMatrix);
1360
1361     if(!D3DMatrix)
1362         return DDERR_INVALIDPARAMS;
1363     if(!D3DMatHandle)
1364         return DDERR_INVALIDPARAMS;
1365
1366     if(D3DMatHandle > This->numHandles)
1367     {
1368         ERR("Handle %d out of range\n", D3DMatHandle);
1369         return DDERR_INVALIDPARAMS;
1370     }
1371     else if(This->Handles[D3DMatHandle - 1].type != DDrawHandle_Matrix)
1372     {
1373         ERR("Handle %d is not a matrix handle\n", D3DMatHandle);
1374         return DDERR_INVALIDPARAMS;
1375     }
1376
1377     /* The handle is simply a pointer to a D3DMATRIX structure */
1378     *D3DMatrix = *((D3DMATRIX *) This->Handles[D3DMatHandle - 1].ptr);
1379
1380     return D3D_OK;
1381 }
1382
1383 /*****************************************************************************
1384  * IDirect3DDevice::DeleteMatrix
1385  *
1386  * Destroys a Matrix handle. Frees the memory and unsets the handle data
1387  *
1388  * Version 1 only
1389  *
1390  * Params:
1391  *  D3DMatHandle: Handle to destroy
1392  *
1393  * Returns:
1394  *  D3D_OK on success
1395  *  DDERR_INVALIDPARAMS if D3DMatHandle is invalid
1396  *
1397  *****************************************************************************/
1398 static HRESULT WINAPI
1399 IDirect3DDeviceImpl_1_DeleteMatrix(IDirect3DDevice *iface,
1400                                    D3DMATRIXHANDLE D3DMatHandle)
1401 {
1402     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
1403     TRACE("(%p)->(%08x)\n", This, (DWORD) D3DMatHandle);
1404
1405     if(!D3DMatHandle)
1406         return DDERR_INVALIDPARAMS;
1407
1408     if(D3DMatHandle > This->numHandles)
1409     {
1410         ERR("Handle %d out of range\n", D3DMatHandle);
1411         return DDERR_INVALIDPARAMS;
1412     }
1413     else if(This->Handles[D3DMatHandle - 1].type != DDrawHandle_Matrix)
1414     {
1415         ERR("Handle %d is not a matrix handle\n", D3DMatHandle);
1416         return DDERR_INVALIDPARAMS;
1417     }
1418
1419     HeapFree(GetProcessHeap(), 0, This->Handles[D3DMatHandle - 1].ptr);
1420     This->Handles[D3DMatHandle - 1].ptr = NULL;
1421     This->Handles[D3DMatHandle - 1].type = DDrawHandle_Unknown;
1422
1423     return D3D_OK;
1424 }
1425
1426 /*****************************************************************************
1427  * IDirect3DDevice7::BeginScene
1428  *
1429  * This method must be called before any rendering is performed.
1430  * IDirect3DDevice::EndScene has to be called after the scene is complete
1431  *
1432  * Version 1, 2, 3 and 7
1433  *
1434  * Returns:
1435  *  D3D_OK on success, for details see IWineD3DDevice::BeginScene
1436  *  D3DERR_SCENE_IN_SCENE if WineD3D returns an error(Only in case of an already
1437  *  started scene).
1438  *
1439  *****************************************************************************/
1440 static HRESULT WINAPI
1441 IDirect3DDeviceImpl_7_BeginScene(IDirect3DDevice7 *iface)
1442 {
1443     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
1444     HRESULT hr;
1445     TRACE("(%p): Relay\n", This);
1446
1447     hr = IWineD3DDevice_BeginScene(This->wineD3DDevice);
1448     if(hr == WINED3D_OK) return D3D_OK;
1449     else return D3DERR_SCENE_IN_SCENE; /* TODO: Other possible causes of failure */
1450 }
1451
1452 static HRESULT WINAPI
1453 Thunk_IDirect3DDeviceImpl_3_BeginScene(IDirect3DDevice3 *iface)
1454 {
1455     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
1456     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DDevice7 interface.\n", This);
1457     return IDirect3DDevice7_BeginScene(ICOM_INTERFACE(This, IDirect3DDevice7));
1458 }
1459
1460 static HRESULT WINAPI
1461 Thunk_IDirect3DDeviceImpl_2_BeginScene(IDirect3DDevice2 *iface)
1462 {
1463     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
1464     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DDevice7 interface.\n", This);
1465     return IDirect3DDevice7_BeginScene(ICOM_INTERFACE(This, IDirect3DDevice7));
1466 }
1467
1468 static HRESULT WINAPI
1469 Thunk_IDirect3DDeviceImpl_1_BeginScene(IDirect3DDevice *iface)
1470 {
1471     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
1472     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DDevice7 interface.\n", This);
1473     return IDirect3DDevice7_BeginScene(ICOM_INTERFACE(This, IDirect3DDevice7));
1474 }
1475
1476 /*****************************************************************************
1477  * IDirect3DDevice7::EndScene
1478  *
1479  * Ends a scene that has been begun with IDirect3DDevice7::BeginScene.
1480  * This method must be called after rendering is finished.
1481  *
1482  * Version 1, 2, 3 and 7
1483  *
1484  * Returns:
1485  *  D3D_OK on success, for details see IWineD3DDevice::EndScene
1486  *  D3DERR_SCENE_NOT_IN_SCENE is returned if WineD3D returns an error. It does
1487  *  that only if the scene was already ended.
1488  *
1489  *****************************************************************************/
1490 static HRESULT WINAPI
1491 IDirect3DDeviceImpl_7_EndScene(IDirect3DDevice7 *iface)
1492 {
1493     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
1494     HRESULT hr;
1495     TRACE("(%p): Relay\n", This);
1496
1497     hr = IWineD3DDevice_EndScene(This->wineD3DDevice);
1498     if(hr == WINED3D_OK) return D3D_OK;
1499     else return D3DERR_SCENE_NOT_IN_SCENE;
1500 }
1501
1502 static HRESULT WINAPI
1503 Thunk_IDirect3DDeviceImpl_3_EndScene(IDirect3DDevice3 *iface)
1504 {
1505     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
1506     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DDevice7 interface.\n", This);
1507     return IDirect3DDevice7_EndScene(ICOM_INTERFACE(This, IDirect3DDevice7));
1508 }
1509
1510 static HRESULT WINAPI
1511 Thunk_IDirect3DDeviceImpl_2_EndScene(IDirect3DDevice2 *iface)
1512 {
1513     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
1514     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DDevice7 interface.\n", This);
1515     return IDirect3DDevice7_EndScene(ICOM_INTERFACE(This, IDirect3DDevice7));
1516 }
1517
1518 static HRESULT WINAPI
1519 Thunk_IDirect3DDeviceImpl_1_EndScene(IDirect3DDevice *iface)
1520 {
1521     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
1522     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DDevice7 interface.\n", This);
1523     return IDirect3DDevice7_EndScene(ICOM_INTERFACE(This, IDirect3DDevice7));
1524 }
1525
1526 /*****************************************************************************
1527  * IDirect3DDevice7::GetDirect3D
1528  *
1529  * Returns the IDirect3D(= interface to the DirectDraw object) used to create
1530  * this device.
1531  *
1532  * Params:
1533  *  Direct3D7: Address to store the interface pointer at
1534  *
1535  * Returns:
1536  *  D3D_OK on success
1537  *  DDERR_INVALIDPARAMS if Direct3D7 == NULL
1538  *
1539  *****************************************************************************/
1540 static HRESULT WINAPI
1541 IDirect3DDeviceImpl_7_GetDirect3D(IDirect3DDevice7 *iface,
1542                                   IDirect3D7 **Direct3D7)
1543 {
1544     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
1545     TRACE("(%p)->(%p)\n", This, Direct3D7);
1546
1547     if(!Direct3D7)
1548         return DDERR_INVALIDPARAMS;
1549
1550     *Direct3D7 = ICOM_INTERFACE(This->ddraw, IDirect3D7);
1551     IDirect3D7_AddRef(*Direct3D7);
1552
1553     TRACE(" returning interface %p\n", *Direct3D7);
1554     return D3D_OK;
1555 }
1556
1557 static HRESULT WINAPI
1558 Thunk_IDirect3DDeviceImpl_3_GetDirect3D(IDirect3DDevice3 *iface,
1559                                         IDirect3D3 **Direct3D3)
1560 {
1561     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
1562     HRESULT ret;
1563     IDirect3D7 *ret_ptr;
1564
1565     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice7 interface.\n", This, Direct3D3);
1566     ret = IDirect3DDevice7_GetDirect3D(ICOM_INTERFACE(This, IDirect3DDevice7),
1567                                        &ret_ptr);
1568     if(ret != D3D_OK)
1569         return ret;
1570     *Direct3D3 = COM_INTERFACE_CAST(IDirectDrawImpl, IDirect3D7, IDirect3D3, ret_ptr);
1571     TRACE(" returning interface %p\n", *Direct3D3);
1572     return D3D_OK;
1573 }
1574
1575 static HRESULT WINAPI
1576 Thunk_IDirect3DDeviceImpl_2_GetDirect3D(IDirect3DDevice2 *iface,
1577                                         IDirect3D2 **Direct3D2)
1578 {
1579     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
1580     HRESULT ret;
1581     IDirect3D7 *ret_ptr;
1582
1583     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice7 interface.\n", This, Direct3D2);
1584     ret = IDirect3DDevice7_GetDirect3D(ICOM_INTERFACE(This, IDirect3DDevice7),
1585                                        &ret_ptr);
1586     if(ret != D3D_OK)
1587         return ret;
1588     *Direct3D2 = COM_INTERFACE_CAST(IDirectDrawImpl, IDirect3D7, IDirect3D2, ret_ptr);
1589     TRACE(" returning interface %p\n", *Direct3D2);
1590     return D3D_OK;
1591 }
1592
1593 static HRESULT WINAPI
1594 Thunk_IDirect3DDeviceImpl_1_GetDirect3D(IDirect3DDevice *iface,
1595                                         IDirect3D **Direct3D)
1596 {
1597     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice, iface);
1598     HRESULT ret;
1599     IDirect3D7 *ret_ptr;
1600
1601     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice7 interface.\n", This, Direct3D);
1602     ret = IDirect3DDevice7_GetDirect3D(ICOM_INTERFACE(This, IDirect3DDevice7),
1603                                        &ret_ptr);
1604     if(ret != D3D_OK)
1605         return ret;
1606     *Direct3D = COM_INTERFACE_CAST(IDirectDrawImpl, IDirect3D7, IDirect3D, ret_ptr);
1607     TRACE(" returning interface %p\n", *Direct3D);
1608     return D3D_OK;
1609 }
1610
1611 /*****************************************************************************
1612  * IDirect3DDevice3::SetCurrentViewport
1613  *
1614  * Sets a Direct3DViewport as the current viewport.
1615  * For the thunks note that all viewport interface versions are equal
1616  *
1617  * Params:
1618  *  Direct3DViewport3: The viewport to set
1619  *
1620  * Version 2 and 3
1621  *
1622  * Returns:
1623  *  D3D_OK on success
1624  *  (Is a NULL viewport valid?)
1625  *
1626  *****************************************************************************/
1627 static HRESULT WINAPI
1628 IDirect3DDeviceImpl_3_SetCurrentViewport(IDirect3DDevice3 *iface,
1629                                          IDirect3DViewport3 *Direct3DViewport3)
1630 {
1631     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
1632     IDirect3DViewportImpl *vp = ICOM_OBJECT(IDirect3DViewportImpl, IDirect3DViewport3, Direct3DViewport3);
1633     TRACE("(%p)->(%p)\n", This, Direct3DViewport3);
1634
1635     /* Do nothing if the specified viewport is the same as the current one */
1636     if (This->current_viewport == vp )
1637       return D3D_OK;
1638
1639     /* Should check if the viewport was added or not */
1640
1641     /* Release previous viewport and AddRef the new one */
1642     if (This->current_viewport)
1643     {
1644         TRACE("ViewportImpl is at %p, interface is at %p\n", This->current_viewport, ICOM_INTERFACE(This->current_viewport, IDirect3DViewport3));
1645         IDirect3DViewport3_Release( ICOM_INTERFACE(This->current_viewport, IDirect3DViewport3) );
1646     }
1647     IDirect3DViewport3_AddRef(Direct3DViewport3);
1648
1649     /* Set this viewport as the current viewport */
1650     This->current_viewport = vp;
1651
1652     /* Activate this viewport */
1653     This->current_viewport->active_device = This;
1654     This->current_viewport->activate(This->current_viewport);
1655
1656     return D3D_OK;
1657 }
1658
1659 static HRESULT WINAPI
1660 Thunk_IDirect3DDeviceImpl_2_SetCurrentViewport(IDirect3DDevice2 *iface,
1661                                                IDirect3DViewport2 *Direct3DViewport2)
1662 {
1663     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
1664     IDirect3DViewportImpl *vp = ICOM_OBJECT(IDirect3DViewportImpl, IDirect3DViewport3, Direct3DViewport2);
1665     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice3 interface.\n", This, vp);
1666     return IDirect3DDevice3_SetCurrentViewport(ICOM_INTERFACE(This, IDirect3DDevice3),
1667                                                ICOM_INTERFACE(vp, IDirect3DViewport3));
1668 }
1669
1670 /*****************************************************************************
1671  * IDirect3DDevice3::GetCurrentViewport
1672  *
1673  * Returns the currently active viewport.
1674  *
1675  * Version 2 and 3
1676  *
1677  * Params:
1678  *  Direct3DViewport3: Address to return the interface pointer at
1679  *
1680  * Returns:
1681  *  D3D_OK on success
1682  *  DDERR_INVALIDPARAMS if Direct3DViewport == NULL
1683  *
1684  *****************************************************************************/
1685 static HRESULT WINAPI
1686 IDirect3DDeviceImpl_3_GetCurrentViewport(IDirect3DDevice3 *iface,
1687                                          IDirect3DViewport3 **Direct3DViewport3)
1688 {
1689     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
1690     TRACE("(%p)->(%p)\n", This, Direct3DViewport3);
1691
1692     if(!Direct3DViewport3)
1693         return DDERR_INVALIDPARAMS;
1694
1695     *Direct3DViewport3 = ICOM_INTERFACE(This->current_viewport, IDirect3DViewport3);
1696
1697     /* AddRef the returned viewport */
1698     if(*Direct3DViewport3) IDirect3DViewport3_AddRef(*Direct3DViewport3);
1699
1700     TRACE(" returning interface %p\n", *Direct3DViewport3);
1701
1702     return D3D_OK;
1703 }
1704
1705 static HRESULT WINAPI
1706 Thunk_IDirect3DDeviceImpl_2_GetCurrentViewport(IDirect3DDevice2 *iface,
1707                                                IDirect3DViewport2 **Direct3DViewport2)
1708 {
1709     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
1710     HRESULT hr;
1711     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice3 interface.\n", This, Direct3DViewport2);
1712     hr = IDirect3DDevice3_GetCurrentViewport(ICOM_INTERFACE(This, IDirect3DDevice3),
1713                                             (IDirect3DViewport3 **) Direct3DViewport2);
1714     if(hr != D3D_OK) return hr;
1715     *Direct3DViewport2 = (IDirect3DViewport2 *) COM_INTERFACE_CAST(IDirect3DViewportImpl, IDirect3DViewport3, IDirect3DViewport3, *Direct3DViewport2);
1716     return D3D_OK;
1717 }
1718
1719 /*****************************************************************************
1720  * IDirect3DDevice7::SetRenderTarget
1721  *
1722  * Sets the render target for the Direct3DDevice.
1723  * For the thunks note that IDirectDrawSurface7 == IDirectDrawSurface4 and
1724  * IDirectDrawSurface3 == IDirectDrawSurface
1725  *
1726  * Version 2, 3 and 7
1727  *
1728  * Params:
1729  *  NewTarget: Pointer to an IDirectDrawSurface7 interface to set as the new
1730  *             render target
1731  *  Flags: Some flags
1732  *
1733  * Returns:
1734  *  D3D_OK on success, for details see IWineD3DDevice::SetRenderTarget
1735  *
1736  *****************************************************************************/
1737 static HRESULT WINAPI
1738 IDirect3DDeviceImpl_7_SetRenderTarget(IDirect3DDevice7 *iface,
1739                                       IDirectDrawSurface7 *NewTarget,
1740                                       DWORD Flags)
1741 {
1742     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
1743     IDirectDrawSurfaceImpl *Target = ICOM_OBJECT(IDirectDrawSurfaceImpl, IDirectDrawSurface7, NewTarget);
1744     TRACE("(%p)->(%p,%08x): Relay\n", This, NewTarget, Flags);
1745
1746     /* Flags: Not used */
1747
1748     return IWineD3DDevice_SetRenderTarget(This->wineD3DDevice,
1749                                           0,
1750                                           Target ? Target->WineD3DSurface : NULL);
1751 }
1752
1753 static HRESULT WINAPI
1754 Thunk_IDirect3DDeviceImpl_3_SetRenderTarget(IDirect3DDevice3 *iface,
1755                                             IDirectDrawSurface4 *NewRenderTarget,
1756                                             DWORD Flags)
1757 {
1758     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
1759     IDirectDrawSurfaceImpl *Target = ICOM_OBJECT(IDirectDrawSurfaceImpl, IDirectDrawSurface7, NewRenderTarget);
1760     TRACE_(ddraw_thunk)("(%p)->(%p,%08x) thunking to IDirect3DDevice7 interface.\n", This, Target, Flags);
1761     return IDirect3DDevice7_SetRenderTarget(ICOM_INTERFACE(This, IDirect3DDevice7),
1762                                             ICOM_INTERFACE(Target, IDirectDrawSurface7),
1763                                             Flags);
1764 }
1765
1766 static HRESULT WINAPI
1767 Thunk_IDirect3DDeviceImpl_2_SetRenderTarget(IDirect3DDevice2 *iface,
1768                                             IDirectDrawSurface *NewRenderTarget,
1769                                             DWORD Flags)
1770 {
1771     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
1772     IDirectDrawSurfaceImpl *Target = ICOM_OBJECT(IDirectDrawSurfaceImpl, IDirectDrawSurface3, NewRenderTarget);
1773     TRACE_(ddraw_thunk)("(%p)->(%p,%08x) thunking to IDirect3DDevice7 interface.\n", This, Target, Flags);
1774     return IDirect3DDevice7_SetRenderTarget(ICOM_INTERFACE(This, IDirect3DDevice7),
1775                                             ICOM_INTERFACE(Target, IDirectDrawSurface7),
1776                                             Flags);
1777 }
1778
1779 /*****************************************************************************
1780  * IDirect3DDevice7::GetRenderTarget
1781  *
1782  * Returns the current render target.
1783  * This is handled locally, because the WineD3D render target's parent
1784  * is an IParent
1785  *
1786  * Version 2, 3 and 7
1787  *
1788  * Params:
1789  *  RenderTarget: Address to store the surface interface pointer
1790  *
1791  * Returns:
1792  *  D3D_OK on success
1793  *  DDERR_INVALIDPARAMS if RenderTarget == NULL
1794  *
1795  *****************************************************************************/
1796 static HRESULT WINAPI
1797 IDirect3DDeviceImpl_7_GetRenderTarget(IDirect3DDevice7 *iface,
1798                                       IDirectDrawSurface7 **RenderTarget)
1799 {
1800     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
1801     TRACE("(%p)->(%p): Relay\n", This, RenderTarget);
1802
1803     if(!RenderTarget)
1804         return DDERR_INVALIDPARAMS;
1805
1806     *RenderTarget = ICOM_INTERFACE(This->target, IDirectDrawSurface7);
1807     IDirectDrawSurface7_AddRef(*RenderTarget);
1808
1809     return D3D_OK;
1810 }
1811
1812 static HRESULT WINAPI
1813 Thunk_IDirect3DDeviceImpl_3_GetRenderTarget(IDirect3DDevice3 *iface,
1814                                             IDirectDrawSurface4 **RenderTarget)
1815 {
1816     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
1817     HRESULT hr;
1818     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice7 interface.\n", This, RenderTarget);
1819     hr = IDirect3DDevice7_GetRenderTarget(ICOM_INTERFACE(This, IDirect3DDevice7),
1820                                           (IDirectDrawSurface7 **) RenderTarget);
1821     if(hr != D3D_OK) return hr;
1822     *RenderTarget = (IDirectDrawSurface4 *) COM_INTERFACE_CAST(IDirectDrawSurfaceImpl, IDirectDrawSurface7, IDirectDrawSurface7, *RenderTarget);
1823     return D3D_OK;
1824 }
1825
1826 static HRESULT WINAPI
1827 Thunk_IDirect3DDeviceImpl_2_GetRenderTarget(IDirect3DDevice2 *iface,
1828                                             IDirectDrawSurface **RenderTarget)
1829 {
1830     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
1831     HRESULT hr;
1832     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice7 interface.\n", This, RenderTarget);
1833     hr = IDirect3DDevice7_GetRenderTarget(ICOM_INTERFACE(This, IDirect3DDevice7),
1834                                           (IDirectDrawSurface7 **) RenderTarget);
1835     if(hr != D3D_OK) return hr;
1836     *RenderTarget = (IDirectDrawSurface *) COM_INTERFACE_CAST(IDirectDrawSurfaceImpl, IDirectDrawSurface7, IDirectDrawSurface3, *RenderTarget);
1837     return D3D_OK;
1838 }
1839
1840 /*****************************************************************************
1841  * IDirect3DDevice3::Begin
1842  *
1843  * Begins a description block of vertices. This is similar to glBegin()
1844  * and glEnd(). After a call to IDirect3DDevice3::End, the vertices
1845  * described with IDirect3DDevice::Vertex are drawn.
1846  *
1847  * Version 2 and 3
1848  *
1849  * Params:
1850  *  PrimitiveType: The type of primitives to draw
1851  *  VertexTypeDesc: A flexible vertex format description of the vertices
1852  *  Flags: Some flags..
1853  *
1854  * Returns:
1855  *  D3D_OK on success
1856  *
1857  *****************************************************************************/
1858 static HRESULT WINAPI
1859 IDirect3DDeviceImpl_3_Begin(IDirect3DDevice3 *iface,
1860                             D3DPRIMITIVETYPE PrimitiveType,
1861                             DWORD VertexTypeDesc,
1862                             DWORD Flags)
1863 {
1864     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
1865     TRACE("(%p)->(%d,%d,%08x)\n", This, PrimitiveType, VertexTypeDesc, Flags);
1866
1867     This->primitive_type = PrimitiveType;
1868     This->vertex_type = VertexTypeDesc;
1869     This->render_flags = Flags;
1870     This->vertex_size = get_flexible_vertex_size(This->vertex_type);
1871     This->nb_vertices = 0;
1872
1873     return D3D_OK;
1874 }
1875
1876 static HRESULT WINAPI
1877 Thunk_IDirect3DDeviceImpl_2_Begin(IDirect3DDevice2 *iface,
1878                                   D3DPRIMITIVETYPE d3dpt,
1879                                   D3DVERTEXTYPE dwVertexTypeDesc,
1880                                   DWORD dwFlags)
1881 {
1882     DWORD FVF;
1883     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
1884     TRACE_(ddraw_thunk)("(%p/%p)->(%08x,%08x,%08x): Thunking to IDirect3DDevice3\n", This, iface, d3dpt, dwVertexTypeDesc, dwFlags);
1885
1886     switch(dwVertexTypeDesc)
1887     {
1888         case D3DVT_VERTEX: FVF = D3DFVF_VERTEX; break;
1889         case D3DVT_LVERTEX: FVF = D3DFVF_LVERTEX; break;
1890         case D3DVT_TLVERTEX: FVF = D3DFVF_TLVERTEX; break;
1891         default:
1892             ERR("Unexpected vertex type %d\n", dwVertexTypeDesc);
1893             return DDERR_INVALIDPARAMS;  /* Should never happen */
1894     };
1895
1896     return IDirect3DDevice3_Begin(ICOM_INTERFACE(This, IDirect3DDevice3),
1897                                   d3dpt,
1898                                   FVF,
1899                                   dwFlags);
1900 }
1901
1902 /*****************************************************************************
1903  * IDirect3DDevice3::BeginIndexed
1904  *
1905  * Draws primitives based on vertices in a vertex array which are specified
1906  * by indices.
1907  *
1908  * Version 2 and 3
1909  *
1910  * Params:
1911  *  PrimitiveType: Primitive type to draw
1912  *  VertexType: A FVF description of the vertex format
1913  *  Vertices: pointer to an array containing the vertices
1914  *  NumVertices: The number of vertices in the vertex array
1915  *  Flags: Some flags ...
1916  *
1917  * Returns:
1918  *  D3D_OK, because it's a stub
1919  *
1920  *****************************************************************************/
1921 static HRESULT WINAPI
1922 IDirect3DDeviceImpl_3_BeginIndexed(IDirect3DDevice3 *iface,
1923                                    D3DPRIMITIVETYPE PrimitiveType,
1924                                    DWORD VertexType,
1925                                    void *Vertices,
1926                                    DWORD NumVertices,
1927                                    DWORD Flags)
1928 {
1929     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
1930     FIXME("(%p)->(%08x,%08x,%p,%08x,%08x): stub!\n", This, PrimitiveType, VertexType, Vertices, NumVertices, Flags);
1931     return D3D_OK;
1932 }
1933
1934
1935 static HRESULT WINAPI
1936 Thunk_IDirect3DDeviceImpl_2_BeginIndexed(IDirect3DDevice2 *iface,
1937                                          D3DPRIMITIVETYPE d3dptPrimitiveType,
1938                                          D3DVERTEXTYPE d3dvtVertexType,
1939                                          void *lpvVertices,
1940                                          DWORD dwNumVertices,
1941                                          DWORD dwFlags)
1942 {
1943     DWORD FVF;
1944     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
1945     TRACE_(ddraw_thunk)("(%p/%p)->(%08x,%08x,%p,%08x,%08x): Thunking to IDirect3DDevice3\n", This, iface, d3dptPrimitiveType, d3dvtVertexType, lpvVertices, dwNumVertices, dwFlags);
1946
1947     switch(d3dvtVertexType)
1948     {
1949         case D3DVT_VERTEX: FVF = D3DFVF_VERTEX; break;
1950         case D3DVT_LVERTEX: FVF = D3DFVF_LVERTEX; break;
1951         case D3DVT_TLVERTEX: FVF = D3DFVF_TLVERTEX; break;
1952         default:
1953             ERR("Unexpected vertex type %d\n", d3dvtVertexType);
1954             return DDERR_INVALIDPARAMS;  /* Should never happen */
1955     };
1956
1957     return IDirect3DDevice3_BeginIndexed(ICOM_INTERFACE(This,IDirect3DDevice3),
1958                                          d3dptPrimitiveType,
1959                                          FVF,
1960                                          lpvVertices,
1961                                          dwNumVertices,
1962                                          dwFlags);
1963 }
1964
1965 /*****************************************************************************
1966  * IDirect3DDevice3::Vertex
1967  *
1968  * Draws a vertex as described by IDirect3DDevice3::Begin. It places all
1969  * drawn vertices in a vertex buffer. If the buffer is too small, its
1970  * size is increased.
1971  *
1972  * Version 2 and 3
1973  *
1974  * Params:
1975  *  Vertex: Pointer to the vertex
1976  *
1977  * Returns:
1978  *  D3D_OK, on success
1979  *  DDERR_INVALIDPARAMS if Vertex is NULL
1980  *
1981  *****************************************************************************/
1982 static HRESULT WINAPI
1983 IDirect3DDeviceImpl_3_Vertex(IDirect3DDevice3 *iface,
1984                              void *Vertex)
1985 {
1986     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
1987     TRACE("(%p)->(%p)\n", This, Vertex);
1988
1989     if(!Vertex)
1990         return DDERR_INVALIDPARAMS;
1991
1992     if ((This->nb_vertices+1)*This->vertex_size > This->buffer_size)
1993     {
1994         BYTE *old_buffer;
1995         This->buffer_size = This->buffer_size ? This->buffer_size * 2 : This->vertex_size * 3;
1996         old_buffer = This->vertex_buffer;
1997         This->vertex_buffer = HeapAlloc(GetProcessHeap(), 0, This->buffer_size);
1998         if (old_buffer)
1999         {
2000             CopyMemory(This->vertex_buffer, old_buffer, This->nb_vertices * This->vertex_size);
2001             HeapFree(GetProcessHeap(), 0, old_buffer);
2002         }
2003     }
2004
2005     CopyMemory(This->vertex_buffer + This->nb_vertices++ * This->vertex_size, Vertex, This->vertex_size);
2006
2007     return D3D_OK;
2008 }
2009
2010 static HRESULT WINAPI
2011 Thunk_IDirect3DDeviceImpl_2_Vertex(IDirect3DDevice2 *iface,
2012                                    void *lpVertexType)
2013 {
2014     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
2015     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice3 interface.\n", This, lpVertexType);
2016     return IDirect3DDevice3_Vertex(ICOM_INTERFACE(This, IDirect3DDevice3),
2017                                                   lpVertexType);
2018 }
2019
2020 /*****************************************************************************
2021  * IDirect3DDevice3::Index
2022  *
2023  * Specifies an index to a vertex to be drawn. The vertex array has to
2024  * be specified with BeginIndexed first.
2025  *
2026  * Parameters:
2027  *  VertexIndex: The index of the vertex to draw
2028  *
2029  * Returns:
2030  *  D3D_OK because it's a stub
2031  *
2032  *****************************************************************************/
2033 static HRESULT WINAPI
2034 IDirect3DDeviceImpl_3_Index(IDirect3DDevice3 *iface,
2035                             WORD VertexIndex)
2036 {
2037     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
2038     FIXME("(%p)->(%04x): stub!\n", This, VertexIndex);
2039     return D3D_OK;
2040 }
2041
2042 static HRESULT WINAPI
2043 Thunk_IDirect3DDeviceImpl_2_Index(IDirect3DDevice2 *iface,
2044                                   WORD wVertexIndex)
2045 {
2046     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
2047     TRACE_(ddraw_thunk)("(%p)->(%04x) thunking to IDirect3DDevice3 interface.\n", This, wVertexIndex);
2048     return IDirect3DDevice3_Index(ICOM_INTERFACE(This, IDirect3DDevice3),
2049                                   wVertexIndex);
2050 }
2051
2052 /*****************************************************************************
2053  * IDirect3DDevice3::End
2054  *
2055  * Ends a draw begun with IDirect3DDevice3::Begin or
2056  * IDirect3DDevice::BeginIndexed. The vertices specified with
2057  * IDirect3DDevice::Vertex or IDirect3DDevice::Index are drawn using
2058  * the IDirect3DDevice7::DrawPrimitive method. So far only
2059  * non-indexed mode is supported
2060  *
2061  * Version 2 and 3
2062  *
2063  * Params:
2064  *  Flags: Some flags, as usual. Don't know which are defined
2065  *
2066  * Returns:
2067  *  The return value of IDirect3DDevice7::DrawPrimitive
2068  *
2069  *****************************************************************************/
2070 static HRESULT WINAPI
2071 IDirect3DDeviceImpl_3_End(IDirect3DDevice3 *iface,
2072                           DWORD Flags)
2073 {
2074     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
2075     TRACE("(%p)->(%08x)\n", This, Flags);
2076
2077     return IDirect3DDevice7_DrawPrimitive(ICOM_INTERFACE(This, IDirect3DDevice7),
2078                                           This->primitive_type, This->vertex_type,
2079                                           This->vertex_buffer, This->nb_vertices,
2080                                           This->render_flags);
2081 }
2082
2083 static HRESULT WINAPI
2084 Thunk_IDirect3DDeviceImpl_2_End(IDirect3DDevice2 *iface,
2085                                 DWORD dwFlags)
2086 {
2087     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
2088     TRACE_(ddraw_thunk)("(%p)->(%08x) thunking to IDirect3DDevice3 interface.\n", This, dwFlags);
2089     return IDirect3DDevice3_End(ICOM_INTERFACE(This, IDirect3DDevice3),
2090                                 dwFlags);
2091 }
2092
2093 /*****************************************************************************
2094  * IDirect3DDevice7::GetRenderState
2095  *
2096  * Returns the value of a render state. The possible render states are
2097  * defined in include/d3dtypes.h
2098  *
2099  * Version 2, 3 and 7
2100  *
2101  * Params:
2102  *  RenderStateType: Render state to return the current setting of
2103  *  Value: Address to store the value at
2104  *
2105  * Returns:
2106  *  D3D_OK on success, for details see IWineD3DDevice::GetRenderState
2107  *  DDERR_INVALIDPARAMS if Value == NULL
2108  *
2109  *****************************************************************************/
2110 static HRESULT WINAPI
2111 IDirect3DDeviceImpl_7_GetRenderState(IDirect3DDevice7 *iface,
2112                                      D3DRENDERSTATETYPE RenderStateType,
2113                                      DWORD *Value)
2114 {
2115     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
2116     HRESULT hr;
2117     TRACE("(%p)->(%08x,%p): Relay\n", This, RenderStateType, Value);
2118
2119     if(!Value)
2120         return DDERR_INVALIDPARAMS;
2121
2122     switch(RenderStateType)
2123     {
2124         case D3DRENDERSTATE_TEXTUREHANDLE:
2125         {
2126             /* This state is wrapped to SetTexture in SetRenderState, so
2127              * it has to be wrapped to GetTexture here
2128              */
2129             IWineD3DBaseTexture *tex = NULL;
2130             *Value = 0;
2131
2132             hr = IWineD3DDevice_GetTexture(This->wineD3DDevice,
2133                                            0,
2134                                            &tex);
2135
2136             if(hr == WINED3D_OK && tex)
2137             {
2138                 IDirectDrawSurface7 *parent = NULL;
2139                 hr = IWineD3DBaseTexture_GetParent(tex,
2140                                                    (IUnknown **) &parent);
2141                 if(parent)
2142                 {
2143                     /* The parent of the texture is the IDirectDrawSurface7 interface
2144                      * of the ddraw surface
2145                      */
2146                     IDirectDrawSurfaceImpl *texImpl = ICOM_OBJECT(IDirectDrawSurfaceImpl,
2147                                                                   IDirectDrawSurface7,
2148                                                                   parent);
2149                     *Value = texImpl->Handle;
2150                     IDirectDrawSurface7_Release(parent);
2151                 }
2152                 IWineD3DBaseTexture_Release(tex);
2153             }
2154             return hr;
2155         }
2156
2157         case D3DRENDERSTATE_TEXTUREMAG:
2158         {
2159             WINED3DTEXTUREFILTERTYPE tex_mag;
2160
2161             hr = IWineD3DDevice_GetSamplerState(This->wineD3DDevice,
2162                                                 0, WINED3DSAMP_MAGFILTER,
2163                                                 &tex_mag);
2164
2165             switch (tex_mag)
2166             {
2167                 case WINED3DTEXF_POINT:
2168                     *Value = D3DFILTER_NEAREST;
2169                     break;
2170                 case WINED3DTEXF_LINEAR:
2171                     *Value = D3DFILTER_LINEAR;
2172                     break;
2173                 default:
2174                     ERR("Unhandled texture mag %d !\n",tex_mag);
2175                     *Value = 0;
2176             }
2177             return hr;
2178         }
2179
2180         case D3DRENDERSTATE_TEXTUREMIN:
2181         {
2182             WINED3DTEXTUREFILTERTYPE tex_min;
2183
2184             hr = IWineD3DDevice_GetSamplerState(This->wineD3DDevice,
2185                                                 0, WINED3DSAMP_MINFILTER,
2186                                                 &tex_min);
2187
2188             switch (tex_min)
2189             {
2190                 case WINED3DTEXF_POINT:
2191                     *Value = D3DFILTER_NEAREST;
2192                     break;
2193                 case WINED3DTEXF_LINEAR:
2194                     *Value = D3DFILTER_LINEAR;
2195                     break;
2196                 default:
2197                     ERR("Unhandled texture mag %d !\n",tex_min);
2198                     *Value = 0;
2199             }
2200             return hr;
2201         }
2202
2203         case D3DRENDERSTATE_TEXTUREADDRESS:
2204         case D3DRENDERSTATE_TEXTUREADDRESSU:
2205             return IWineD3DDevice_GetSamplerState(This->wineD3DDevice,
2206                                                   0, WINED3DSAMP_ADDRESSU,
2207                                                   Value);
2208         case D3DRENDERSTATE_TEXTUREADDRESSV:
2209             return IWineD3DDevice_GetSamplerState(This->wineD3DDevice,
2210                                                   0, WINED3DSAMP_ADDRESSV,
2211                                                   Value);
2212
2213         default:
2214             /* FIXME: Unhandled: D3DRENDERSTATE_STIPPLEPATTERN00 - 31 */
2215             return IWineD3DDevice_GetRenderState(This->wineD3DDevice,
2216                                                  RenderStateType,
2217                                                  Value);
2218     }
2219 }
2220
2221 static HRESULT WINAPI
2222 Thunk_IDirect3DDeviceImpl_3_GetRenderState(IDirect3DDevice3 *iface,
2223                                            D3DRENDERSTATETYPE dwRenderStateType,
2224                                            DWORD *lpdwRenderState)
2225 {
2226     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
2227     TRACE_(ddraw_thunk)("(%p)->(%08x,%p) thunking to IDirect3DDevice7 interface.\n", This, dwRenderStateType, lpdwRenderState);
2228     return IDirect3DDevice7_GetRenderState(ICOM_INTERFACE(This, IDirect3DDevice7),
2229                                            dwRenderStateType,
2230                                            lpdwRenderState);
2231 }
2232
2233 static HRESULT WINAPI
2234 Thunk_IDirect3DDeviceImpl_2_GetRenderState(IDirect3DDevice2 *iface,
2235                                            D3DRENDERSTATETYPE dwRenderStateType,
2236                                            DWORD *lpdwRenderState)
2237 {
2238     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
2239     TRACE_(ddraw_thunk)("(%p)->(%08x,%p) thunking to IDirect3DDevice7 interface.\n", This, dwRenderStateType, lpdwRenderState);
2240     return IDirect3DDevice7_GetRenderState(ICOM_INTERFACE(This, IDirect3DDevice7),
2241                                            dwRenderStateType,
2242                                            lpdwRenderState);
2243 }
2244
2245 /*****************************************************************************
2246  * IDirect3DDevice7::SetRenderState
2247  *
2248  * Sets a render state. The possible render states are defined in
2249  * include/d3dtypes.h
2250  *
2251  * Version 2, 3 and 7
2252  *
2253  * Params:
2254  *  RenderStateType: State to set
2255  *  Value: Value to assign to that state
2256  *
2257  * Returns:
2258  *  D3D_OK on success,
2259  *  for details see IWineD3DDevice::SetRenderState
2260  *
2261  *****************************************************************************/
2262 static HRESULT WINAPI
2263 IDirect3DDeviceImpl_7_SetRenderState(IDirect3DDevice7 *iface,
2264                                      D3DRENDERSTATETYPE RenderStateType,
2265                                      DWORD Value)
2266 {
2267     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
2268     TRACE("(%p)->(%08x,%d): Relay\n", This, RenderStateType, Value);
2269
2270     /* Some render states need special care */
2271     switch(RenderStateType)
2272     {
2273         case D3DRENDERSTATE_TEXTUREHANDLE:
2274         {
2275             if(Value == 0)
2276             {
2277                     return IWineD3DDevice_SetTexture(This->wineD3DDevice,
2278                                                      0,
2279                                                      NULL);
2280             }
2281
2282             if(Value > This->numHandles)
2283             {
2284                 FIXME("Specified handle %d out of range\n", Value);
2285                 return DDERR_INVALIDPARAMS;
2286             }
2287             if(This->Handles[Value - 1].type != DDrawHandle_Texture)
2288             {
2289                 FIXME("Handle %d isn't a texture handle\n", Value);
2290                 return DDERR_INVALIDPARAMS;
2291             }
2292             else
2293             {
2294                 IDirectDrawSurfaceImpl *surf = (IDirectDrawSurfaceImpl *) This->Handles[Value - 1].ptr;
2295                 return IWineD3DDevice_SetTexture(This->wineD3DDevice,
2296                                                  0,
2297                                                  (IWineD3DBaseTexture *) surf->wineD3DTexture);
2298             }
2299         }
2300
2301         case D3DRENDERSTATE_TEXTUREMAG:
2302         {
2303             WINED3DTEXTUREFILTERTYPE tex_mag = WINED3DTEXF_NONE;
2304
2305             switch ((D3DTEXTUREFILTER) Value)
2306             {
2307                 case D3DFILTER_NEAREST:
2308                 case D3DFILTER_LINEARMIPNEAREST:
2309                     tex_mag = WINED3DTEXF_POINT;
2310                     break;
2311                 case D3DFILTER_LINEAR:
2312                 case D3DFILTER_LINEARMIPLINEAR:
2313                     tex_mag = WINED3DTEXF_LINEAR;
2314                     break;
2315                 default:
2316                     ERR("Unhandled texture mag %d !\n",Value);
2317             }
2318
2319             return IWineD3DDevice_SetSamplerState(This->wineD3DDevice,
2320                                                   0, WINED3DSAMP_MAGFILTER,
2321                                                   tex_mag);
2322         }
2323
2324         case D3DRENDERSTATE_TEXTUREMIN:
2325         {
2326             WINED3DTEXTUREFILTERTYPE tex_min = WINED3DTEXF_NONE;
2327             WINED3DTEXTUREFILTERTYPE tex_mip = WINED3DTEXF_NONE;
2328
2329             switch ((D3DTEXTUREFILTER) Value)
2330             {
2331                 case D3DFILTER_NEAREST:
2332                     tex_min = WINED3DTEXF_POINT;
2333                     break;
2334                 case D3DFILTER_LINEAR:
2335                     tex_min = WINED3DTEXF_LINEAR;
2336                     break;
2337                 case D3DFILTER_MIPNEAREST:
2338                     tex_min = WINED3DTEXF_NONE;
2339                     tex_mip = WINED3DTEXF_POINT;
2340                     break;
2341                 case D3DFILTER_MIPLINEAR:
2342                     tex_min = WINED3DTEXF_NONE;
2343                     tex_mip = WINED3DTEXF_LINEAR;
2344                     break;
2345                 case D3DFILTER_LINEARMIPNEAREST:
2346                     tex_min = WINED3DTEXF_POINT;
2347                     tex_mip = WINED3DTEXF_LINEAR;
2348                     break;
2349                 case D3DFILTER_LINEARMIPLINEAR:
2350                     tex_min = WINED3DTEXF_LINEAR;
2351                     tex_mip = WINED3DTEXF_LINEAR;
2352                     break;
2353
2354                 default:
2355                     ERR("Unhandled texture min %d !\n",Value);
2356             }
2357
2358                    IWineD3DDevice_SetSamplerState(This->wineD3DDevice,
2359                                                   0, WINED3DSAMP_MIPFILTER,
2360                                                   tex_mip);
2361             return IWineD3DDevice_SetSamplerState(This->wineD3DDevice,
2362                                                   0, WINED3DSAMP_MINFILTER,
2363                                                   tex_min);
2364         }
2365
2366         case D3DRENDERSTATE_TEXTUREADDRESS:
2367                    IWineD3DDevice_SetSamplerState(This->wineD3DDevice,
2368                                                   0, WINED3DSAMP_ADDRESSV,
2369                                                   Value);
2370             /* Drop through */
2371         case D3DRENDERSTATE_TEXTUREADDRESSU:
2372             return IWineD3DDevice_SetSamplerState(This->wineD3DDevice,
2373                                                   0, WINED3DSAMP_ADDRESSU,
2374                                                   Value);
2375         case D3DRENDERSTATE_TEXTUREADDRESSV:
2376             return IWineD3DDevice_SetSamplerState(This->wineD3DDevice,
2377                                                   0, WINED3DSAMP_ADDRESSV,
2378                                                   Value);
2379
2380         case D3DRENDERSTATE_TEXTUREMAPBLEND:
2381         {
2382             /* Old texture combine setup style, superseded by texture stage states
2383              * in D3D7. It is safe for us to wrap it to texture stage states.
2384              */
2385             switch ( (D3DTEXTUREBLEND) Value)
2386             {
2387                 case D3DTBLEND_MODULATE:
2388                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_COLORARG1, WINED3DTA_TEXTURE);
2389                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_ALPHAARG1, WINED3DTA_TEXTURE);
2390                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_COLORARG2, WINED3DTA_CURRENT);
2391                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_COLOROP, WINED3DTOP_MODULATE);
2392                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_ALPHAOP, WINED3DTOP_SELECTARG1);
2393                     break;
2394
2395                 case D3DTBLEND_MODULATEALPHA:
2396                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_COLORARG1, WINED3DTA_TEXTURE);
2397                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_ALPHAARG1, WINED3DTA_TEXTURE);
2398                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_COLORARG2, WINED3DTA_CURRENT);
2399                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_ALPHAARG2, WINED3DTA_CURRENT);
2400                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_COLOROP, WINED3DTOP_MODULATE);
2401                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_ALPHAOP, WINED3DTOP_MODULATE);
2402                     break;
2403
2404                 case D3DTBLEND_DECAL:
2405                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_COLORARG1, WINED3DTA_TEXTURE);
2406                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_ALPHAARG1, WINED3DTA_TEXTURE);
2407                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_COLOROP, WINED3DTOP_SELECTARG1);
2408                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_ALPHAOP, WINED3DTOP_SELECTARG1);
2409                     break;
2410
2411                 case D3DTBLEND_DECALALPHA:
2412                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_COLORARG1, WINED3DTA_TEXTURE);
2413                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_ALPHAARG1, WINED3DTA_TEXTURE);
2414                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_ALPHAARG2, WINED3DTA_CURRENT);
2415                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_COLOROP, WINED3DTOP_SELECTARG1);
2416                     IWineD3DDevice_SetTextureStageState(This->wineD3DDevice, 0, WINED3DTSS_ALPHAOP, WINED3DTOP_MODULATE);
2417                     break;
2418
2419                 default:
2420                     ERR("Unhandled texture environment %d !\n",Value);
2421                 }
2422                 return D3D_OK;
2423             break;
2424         }
2425
2426         default:
2427
2428             /* FIXME: Unhandled: D3DRENDERSTATE_STIPPLEPATTERN00 - 31 */
2429
2430             return IWineD3DDevice_SetRenderState(This->wineD3DDevice,
2431                                                  RenderStateType,
2432                                                  Value);
2433     }
2434 }
2435
2436 static HRESULT WINAPI
2437 Thunk_IDirect3DDeviceImpl_3_SetRenderState(IDirect3DDevice3 *iface,
2438                                            D3DRENDERSTATETYPE RenderStateType,
2439                                            DWORD Value)
2440 {
2441     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
2442     TRACE_(ddraw_thunk)("(%p)->(%08x,%08x) thunking to IDirect3DDevice7 interface.\n", This, RenderStateType, Value);
2443     return IDirect3DDevice7_SetRenderState(ICOM_INTERFACE(This, IDirect3DDevice7),
2444                                            RenderStateType,
2445                                            Value);
2446 }
2447
2448 static HRESULT WINAPI
2449 Thunk_IDirect3DDeviceImpl_2_SetRenderState(IDirect3DDevice2 *iface,
2450                                            D3DRENDERSTATETYPE RenderStateType,
2451                                            DWORD Value)
2452 {
2453     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
2454     TRACE_(ddraw_thunk)("(%p)->(%08x,%08x) thunking to IDirect3DDevice7 interface.\n", This, RenderStateType, Value);
2455     return IDirect3DDevice7_SetRenderState(ICOM_INTERFACE(This, IDirect3DDevice7),
2456                                            RenderStateType,
2457                                            Value);
2458 }
2459
2460 /*****************************************************************************
2461  * Direct3DDevice3::SetLightState
2462  *
2463  * Sets a light state for Direct3DDevice3 and Direct3DDevice2. The
2464  * light states are forwarded to Direct3DDevice7 render states
2465  *
2466  * Version 2 and 3
2467  *
2468  * Params:
2469  *  LightStateType: The light state to change
2470  *  Value: The value to assign to that light state
2471  *
2472  * Returns:
2473  *  D3D_OK on success
2474  *  DDERR_INVALIDPARAMS if the parameters were incorrect
2475  *  Also check IDirect3DDevice7::SetRenderState
2476  *
2477  *****************************************************************************/
2478 static HRESULT WINAPI
2479 IDirect3DDeviceImpl_3_SetLightState(IDirect3DDevice3 *iface,
2480                                     D3DLIGHTSTATETYPE LightStateType,
2481                                     DWORD Value)
2482 {
2483     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
2484
2485     TRACE("(%p)->(%08x,%08x)\n", This, LightStateType, Value);
2486
2487     if (!LightStateType && (LightStateType > D3DLIGHTSTATE_COLORVERTEX))
2488     {
2489         TRACE("Unexpected Light State Type\n");
2490         return DDERR_INVALIDPARAMS;
2491     }
2492
2493     if (LightStateType == D3DLIGHTSTATE_MATERIAL /* 1 */)
2494     {
2495         IDirect3DMaterialImpl *mat;
2496
2497         if(Value == 0) mat = NULL;
2498         else if(Value > This->numHandles)
2499         {
2500             ERR("Material handle out of range(%d)\n", Value);
2501             return DDERR_INVALIDPARAMS;
2502         }
2503         else if(This->Handles[Value - 1].type != DDrawHandle_Material)
2504         {
2505             ERR("Invalid handle %d\n", Value);
2506             return DDERR_INVALIDPARAMS;
2507         }
2508         else
2509         {
2510             mat = (IDirect3DMaterialImpl *) This->Handles[Value - 1].ptr;
2511         }
2512
2513         if (mat != NULL)
2514         {
2515             TRACE(" activating material %p.\n", mat);
2516             mat->activate(mat);
2517         }
2518         else
2519         {
2520             FIXME(" D3DLIGHTSTATE_MATERIAL called with NULL material !!!\n");
2521         }
2522         This->material = Value;
2523     }
2524     else if (LightStateType == D3DLIGHTSTATE_COLORMODEL /* 3 */)
2525     {
2526         switch (Value)
2527         {
2528             case D3DCOLOR_MONO:
2529                 ERR("DDCOLOR_MONO should not happen!\n");
2530                 break;
2531             case D3DCOLOR_RGB:
2532                 /* We are already in this mode */
2533                 TRACE("Setting color model to RGB (no-op).\n");
2534                 break;
2535             default:
2536                 ERR("Unknown color model!\n");
2537                 return DDERR_INVALIDPARAMS;
2538         }
2539     }
2540     else
2541     {
2542         D3DRENDERSTATETYPE rs;
2543         switch (LightStateType)
2544         {
2545             case D3DLIGHTSTATE_AMBIENT:       /* 2 */
2546                 rs = D3DRENDERSTATE_AMBIENT;
2547                 break;
2548             case D3DLIGHTSTATE_FOGMODE:       /* 4 */
2549                 rs = D3DRENDERSTATE_FOGVERTEXMODE;
2550                 break;
2551             case D3DLIGHTSTATE_FOGSTART:      /* 5 */
2552                 rs = D3DRENDERSTATE_FOGSTART;
2553                 break;
2554             case D3DLIGHTSTATE_FOGEND:        /* 6 */
2555                 rs = D3DRENDERSTATE_FOGEND;
2556                 break;
2557             case D3DLIGHTSTATE_FOGDENSITY:    /* 7 */
2558                 rs = D3DRENDERSTATE_FOGDENSITY;
2559                 break;
2560             case D3DLIGHTSTATE_COLORVERTEX:   /* 8 */
2561                 rs = D3DRENDERSTATE_COLORVERTEX;
2562                 break;
2563             default:
2564                 ERR("Unknown D3DLIGHTSTATETYPE %d.\n", LightStateType);
2565                 return DDERR_INVALIDPARAMS;
2566         }
2567
2568         return IDirect3DDevice7_SetRenderState(ICOM_INTERFACE(This, IDirect3DDevice7),
2569                                                rs,
2570                                                Value);
2571     }
2572
2573     return D3D_OK;
2574 }
2575
2576 static HRESULT WINAPI
2577 Thunk_IDirect3DDeviceImpl_2_SetLightState(IDirect3DDevice2 *iface,
2578                                           D3DLIGHTSTATETYPE LightStateType,
2579                                           DWORD Value)
2580 {
2581     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
2582     TRACE_(ddraw_thunk)("(%p)->(%08x,%08x) thunking to IDirect3DDevice3 interface.\n", This, LightStateType, Value);
2583     return IDirect3DDevice3_SetLightState(ICOM_INTERFACE(This, IDirect3DDevice3),
2584                                           LightStateType,
2585                                           Value);
2586 }
2587
2588 /*****************************************************************************
2589  * IDirect3DDevice3::GetLightState
2590  *
2591  * Returns the current setting of a light state. The state is read from
2592  * the Direct3DDevice7 render state.
2593  *
2594  * Version 2 and 3
2595  *
2596  * Params:
2597  *  LightStateType: The light state to return
2598  *  Value: The address to store the light state setting at
2599  *
2600  * Returns:
2601  *  D3D_OK on success
2602  *  DDDERR_INVALIDPARAMS if the parameters were incorrect
2603  *  Also see IDirect3DDevice7::GetRenderState
2604  *
2605  *****************************************************************************/
2606 static HRESULT WINAPI
2607 IDirect3DDeviceImpl_3_GetLightState(IDirect3DDevice3 *iface,
2608                                     D3DLIGHTSTATETYPE LightStateType,
2609                                     DWORD *Value)
2610 {
2611     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
2612
2613     TRACE("(%p)->(%08x,%p)\n", This, LightStateType, Value);
2614
2615     if (!LightStateType && (LightStateType > D3DLIGHTSTATE_COLORVERTEX))
2616     {
2617         TRACE("Unexpected Light State Type\n");
2618         return DDERR_INVALIDPARAMS;
2619     }
2620
2621     if(!Value)
2622         return DDERR_INVALIDPARAMS;
2623
2624     if (LightStateType == D3DLIGHTSTATE_MATERIAL /* 1 */)
2625     {
2626         *Value = This->material;
2627     }
2628     else if (LightStateType == D3DLIGHTSTATE_COLORMODEL /* 3 */)
2629     {
2630         *Value = D3DCOLOR_RGB;
2631     }
2632     else
2633     {
2634         D3DRENDERSTATETYPE rs;
2635         switch (LightStateType)
2636         {
2637             case D3DLIGHTSTATE_AMBIENT:       /* 2 */
2638                 rs = D3DRENDERSTATE_AMBIENT;
2639                 break;
2640             case D3DLIGHTSTATE_FOGMODE:       /* 4 */
2641                 rs = D3DRENDERSTATE_FOGVERTEXMODE;
2642                 break;
2643             case D3DLIGHTSTATE_FOGSTART:      /* 5 */
2644                 rs = D3DRENDERSTATE_FOGSTART;
2645                 break;
2646             case D3DLIGHTSTATE_FOGEND:        /* 6 */
2647                 rs = D3DRENDERSTATE_FOGEND;
2648                 break;
2649             case D3DLIGHTSTATE_FOGDENSITY:    /* 7 */
2650                 rs = D3DRENDERSTATE_FOGDENSITY;
2651                 break;
2652             case D3DLIGHTSTATE_COLORVERTEX:   /* 8 */
2653                 rs = D3DRENDERSTATE_COLORVERTEX;
2654                 break;
2655             default:
2656                 ERR("Unknown D3DLIGHTSTATETYPE %d.\n", LightStateType);
2657                 return DDERR_INVALIDPARAMS;
2658         }
2659
2660         return IDirect3DDevice7_GetRenderState(ICOM_INTERFACE(This, IDirect3DDevice7),
2661                                                rs,
2662                                                Value);
2663     }
2664
2665     return D3D_OK;
2666 }
2667
2668 static HRESULT WINAPI
2669 Thunk_IDirect3DDeviceImpl_2_GetLightState(IDirect3DDevice2 *iface,
2670                                           D3DLIGHTSTATETYPE LightStateType,
2671                                           DWORD *Value)
2672 {
2673     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
2674     TRACE_(ddraw_thunk)("(%p)->(%08x,%p) thunking to IDirect3DDevice3 interface.\n", This, LightStateType, Value);
2675     return IDirect3DDevice3_GetLightState(ICOM_INTERFACE(This, IDirect3DDevice3),
2676                                           LightStateType,
2677                                           Value);
2678 }
2679
2680 /*****************************************************************************
2681  * IDirect3DDevice7::SetTransform
2682  *
2683  * Assigns a D3DMATRIX to a transform type. The transform types are defined
2684  * in include/d3dtypes.h.
2685  * The D3DTRANSFORMSTATE_WORLD (=1) is translated to D3DTS_WORLDMATRIX(0)
2686  * (=255) for wined3d, because the 1 transform state was removed in d3d8
2687  * and WineD3D already understands the replacement D3DTS_WORLDMATRIX(0)
2688  *
2689  * Version 2, 3 and 7
2690  *
2691  * Params:
2692  *  TransformStateType: transform state to set
2693  *  Matrix: Matrix to assign to the state
2694  *
2695  * Returns:
2696  *  D3D_OK on success
2697  *  DDERR_INVALIDPARAMS if Matrix == NULL
2698  *  For details see IWineD3DDevice::SetTransform
2699  *
2700  *****************************************************************************/
2701 static HRESULT WINAPI
2702 IDirect3DDeviceImpl_7_SetTransform(IDirect3DDevice7 *iface,
2703                                    D3DTRANSFORMSTATETYPE TransformStateType,
2704                                    D3DMATRIX *Matrix)
2705 {
2706     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
2707     D3DTRANSFORMSTATETYPE type = TransformStateType;
2708     TRACE("(%p)->(%08x,%p): Relay\n", This, TransformStateType, Matrix);
2709
2710     if(!Matrix)
2711         return DDERR_INVALIDPARAMS;
2712
2713     /* D3DTRANSFORMSTATE_WORLD doesn't exist in WineD3D,
2714      * use D3DTS_WORLDMATRIX(0) instead
2715      * D3DTS_WORLDMATRIX(index) is (D3DTRANSFORMSTATETYPE)(index + 256)
2716      */
2717     if(TransformStateType == D3DTRANSFORMSTATE_WORLD)
2718         type = (D3DTRANSFORMSTATETYPE)(0 + 256);
2719
2720     /* FIXME:
2721        Unhandled: D3DTRANSFORMSTATE_WORLD1
2722        Unhandled: D3DTRANSFORMSTATE_WORLD2
2723        Unhandled: D3DTRANSFORMSTATE_WORLD3
2724      */
2725
2726     /* Note: D3DMATRIX is compatible with WINED3DMATRIX */
2727     return IWineD3DDevice_SetTransform(This->wineD3DDevice,
2728                                        type,
2729                                        (WINED3DMATRIX*) Matrix);
2730 }
2731
2732 static HRESULT WINAPI
2733 Thunk_IDirect3DDeviceImpl_3_SetTransform(IDirect3DDevice3 *iface,
2734                                          D3DTRANSFORMSTATETYPE TransformStateType,
2735                                          D3DMATRIX *D3DMatrix)
2736 {
2737     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
2738     TRACE_(ddraw_thunk)("(%p)->(%08x,%p) thunking to IDirect3DDevice7 interface.\n", This, TransformStateType, D3DMatrix);
2739     return IDirect3DDevice7_SetTransform(ICOM_INTERFACE(This, IDirect3DDevice7),
2740                                          TransformStateType,
2741                                          D3DMatrix);
2742 }
2743
2744 static HRESULT WINAPI
2745 Thunk_IDirect3DDeviceImpl_2_SetTransform(IDirect3DDevice2 *iface,
2746                                          D3DTRANSFORMSTATETYPE TransformStateType,
2747                                          D3DMATRIX *D3DMatrix)
2748 {
2749     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
2750     TRACE_(ddraw_thunk)("(%p)->(%08x,%p) thunking to IDirect3DDevice7 interface.\n", This, TransformStateType, D3DMatrix);
2751     return IDirect3DDevice7_SetTransform(ICOM_INTERFACE(This, IDirect3DDevice7),
2752                                          TransformStateType,
2753                                          D3DMatrix);
2754 }
2755
2756 /*****************************************************************************
2757  * IDirect3DDevice7::GetTransform
2758  *
2759  * Returns the matrix assigned to a transform state
2760  * D3DTRANSFORMSTATE_WORLD is translated to D3DTS_WORLDMATRIX(0), see
2761  * SetTransform
2762  *
2763  * Params:
2764  *  TransformStateType: State to read the matrix from
2765  *  Matrix: Address to store the matrix at
2766  *
2767  * Returns:
2768  *  D3D_OK on success
2769  *  DDERR_INVALIDPARAMS if Matrix == NULL
2770  *  For details, see IWineD3DDevice::GetTransform
2771  *
2772  *****************************************************************************/
2773 static HRESULT WINAPI
2774 IDirect3DDeviceImpl_7_GetTransform(IDirect3DDevice7 *iface,
2775                                    D3DTRANSFORMSTATETYPE TransformStateType,
2776                                    D3DMATRIX *Matrix)
2777 {
2778     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
2779     D3DTRANSFORMSTATETYPE type = TransformStateType;
2780     TRACE("(%p)->(%08x,%p): Relay\n", This, TransformStateType, Matrix);
2781
2782     if(!Matrix)
2783         return DDERR_INVALIDPARAMS;
2784
2785     /* D3DTRANSFORMSTATE_WORLD doesn't exist in WineD3D,
2786      * use D3DTS_WORLDMATRIX(0) instead
2787      * D3DTS_WORLDMATRIX(index) is (D3DTRANSFORMSTATETYPE)(index + 256)
2788      */
2789     if(TransformStateType == D3DTRANSFORMSTATE_WORLD)
2790         type = (D3DTRANSFORMSTATETYPE)(0 + 256);
2791
2792     /* FIXME:
2793        Unhandled: D3DTRANSFORMSTATE_WORLD1
2794        Unhandled: D3DTRANSFORMSTATE_WORLD2
2795        Unhandled: D3DTRANSFORMSTATE_WORLD3
2796      */
2797
2798     /* Note: D3DMATRIX is compatible with WINED3DMATRIX */
2799     return IWineD3DDevice_GetTransform(This->wineD3DDevice, type, (WINED3DMATRIX*) Matrix);
2800 }
2801
2802 static HRESULT WINAPI
2803 Thunk_IDirect3DDeviceImpl_3_GetTransform(IDirect3DDevice3 *iface,
2804                                          D3DTRANSFORMSTATETYPE TransformStateType,
2805                                          D3DMATRIX *D3DMatrix)
2806 {
2807     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
2808     TRACE_(ddraw_thunk)("(%p)->(%08x,%p) thunking to IDirect3DDevice7 interface.\n", This, TransformStateType, D3DMatrix);
2809     return IDirect3DDevice7_GetTransform(ICOM_INTERFACE(This, IDirect3DDevice7),
2810                                          TransformStateType,
2811                                          D3DMatrix);
2812 }
2813
2814 static HRESULT WINAPI
2815 Thunk_IDirect3DDeviceImpl_2_GetTransform(IDirect3DDevice2 *iface,
2816                                          D3DTRANSFORMSTATETYPE TransformStateType,
2817                                          D3DMATRIX *D3DMatrix)
2818 {
2819     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
2820     TRACE_(ddraw_thunk)("(%p)->(%08x,%p) thunking to IDirect3DDevice7 interface.\n", This, TransformStateType, D3DMatrix);
2821     return IDirect3DDevice7_GetTransform(ICOM_INTERFACE(This, IDirect3DDevice7),
2822                                          TransformStateType,
2823                                          D3DMatrix);
2824 }
2825
2826 /*****************************************************************************
2827  * IDirect3DDevice7::MultiplyTransform
2828  *
2829  * Multiplies the already-set transform matrix of a transform state
2830  * with another matrix. For the world matrix, see SetTransform
2831  *
2832  * Version 2, 3 and 7
2833  *
2834  * Params:
2835  *  TransformStateType: Transform state to multiply
2836  *  D3DMatrix Matrix to multiply with.
2837  *
2838  * Returns
2839  *  D3D_OK on success
2840  *  DDERR_INVALIDPARAMS if D3DMatrix is NULL
2841  *  For details, see IWineD3DDevice::MultiplyTransform
2842  *
2843  *****************************************************************************/
2844 static HRESULT WINAPI
2845 IDirect3DDeviceImpl_7_MultiplyTransform(IDirect3DDevice7 *iface,
2846                                         D3DTRANSFORMSTATETYPE TransformStateType,
2847                                         D3DMATRIX *D3DMatrix)
2848 {
2849     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
2850     TRACE("(%p)->(%08x,%p): Relay\n", This, TransformStateType, D3DMatrix);
2851
2852     /* D3DTRANSFORMSTATE_WORLD doesn't exist in WineD3D,
2853      * use D3DTS_WORLDMATRIX(0) instead
2854      * D3DTS_WORLDMATRIX(index) is (D3DTRANSFORMSTATETYPE)(index + 256)
2855      */
2856     if(TransformStateType == D3DTRANSFORMSTATE_WORLD)
2857         TransformStateType = (D3DTRANSFORMSTATETYPE)(0 + 256);
2858
2859     /* FIXME:
2860        Unhandled: D3DTRANSFORMSTATE_WORLD1
2861        Unhandled: D3DTRANSFORMSTATE_WORLD2
2862        Unhandled: D3DTRANSFORMSTATE_WORLD3
2863      */
2864
2865     /* Note: D3DMATRIX is compatible with WINED3DMATRIX */
2866     return IWineD3DDevice_MultiplyTransform(This->wineD3DDevice,
2867                                             TransformStateType,
2868                                             (WINED3DMATRIX*) D3DMatrix);
2869 }
2870
2871 static HRESULT WINAPI
2872 Thunk_IDirect3DDeviceImpl_3_MultiplyTransform(IDirect3DDevice3 *iface,
2873                                               D3DTRANSFORMSTATETYPE TransformStateType,
2874                                               D3DMATRIX *D3DMatrix)
2875 {
2876     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
2877     TRACE_(ddraw_thunk)("(%p)->(%08x,%p) thunking to IDirect3DDevice7 interface.\n", This, TransformStateType, D3DMatrix);
2878     return IDirect3DDevice7_MultiplyTransform(ICOM_INTERFACE(This, IDirect3DDevice7),
2879                                               TransformStateType,
2880                                               D3DMatrix);
2881 }
2882
2883 static HRESULT WINAPI
2884 Thunk_IDirect3DDeviceImpl_2_MultiplyTransform(IDirect3DDevice2 *iface,
2885                                               D3DTRANSFORMSTATETYPE TransformStateType,
2886                                               D3DMATRIX *D3DMatrix)
2887 {
2888     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
2889     TRACE_(ddraw_thunk)("(%p)->(%08x,%p) thunking to IDirect3DDevice7 interface.\n", This, TransformStateType, D3DMatrix);
2890     return IDirect3DDevice7_MultiplyTransform(ICOM_INTERFACE(This, IDirect3DDevice7),
2891                                               TransformStateType,
2892                                               D3DMatrix);
2893 }
2894
2895 /*****************************************************************************
2896  * IDirect3DDevice7::DrawPrimitive
2897  *
2898  * Draws primitives based on vertices in an application-provided pointer
2899  *
2900  * Version 2, 3 and 7. The IDirect3DDevice2 thunk converts the fixed vertex type into
2901  * an FVF format for D3D7
2902  *
2903  * Params:
2904  *  PrimitiveType: The type of the primitives to draw
2905  *  Vertex type: Flexible vertex format vertex description
2906  *  Vertices: Pointer to the vertex array
2907  *  VertexCount: The number of vertices to draw
2908  *  Flags: As usual a few flags
2909  *
2910  * Returns:
2911  *  D3D_OK on success
2912  *  DDERR_INVALIDPARAMS if Vertices is NULL
2913  *  For details, see IWineD3DDevice::DrawPrimitiveUP
2914  *
2915  *****************************************************************************/
2916 static HRESULT WINAPI
2917 IDirect3DDeviceImpl_7_DrawPrimitive(IDirect3DDevice7 *iface,
2918                                     D3DPRIMITIVETYPE PrimitiveType,
2919                                     DWORD VertexType,
2920                                     void *Vertices,
2921                                     DWORD VertexCount,
2922                                     DWORD Flags)
2923 {
2924     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
2925     UINT PrimitiveCount, stride;
2926     HRESULT hr;
2927     TRACE("(%p)->(%08x,%08x,%p,%08x,%08x): Relay!\n", This, PrimitiveType, VertexType, Vertices, VertexCount, Flags);
2928
2929     if(!Vertices)
2930         return DDERR_INVALIDPARAMS;
2931
2932     /* Get the vertex count */
2933     switch(PrimitiveType)
2934     {
2935       case D3DPT_POINTLIST:
2936         PrimitiveCount = VertexCount;
2937         break;
2938
2939       case D3DPT_LINELIST:
2940         PrimitiveCount = VertexCount / 2;
2941         break;
2942
2943       case D3DPT_LINESTRIP:
2944         PrimitiveCount = VertexCount - 1;
2945         break;
2946
2947       case D3DPT_TRIANGLELIST:
2948         PrimitiveCount = VertexCount / 3;
2949         break;
2950
2951       case D3DPT_TRIANGLESTRIP:
2952         PrimitiveCount = VertexCount - 2;
2953         break;
2954
2955       case D3DPT_TRIANGLEFAN:
2956         PrimitiveCount = VertexCount - 2;
2957         break;
2958
2959       default: return DDERR_INVALIDPARAMS;
2960     }
2961
2962     /* Get the stride */
2963     stride = get_flexible_vertex_size(VertexType);
2964
2965     /* Set the FVF */
2966     hr = IWineD3DDevice_SetVertexDeclaration(This->wineD3DDevice,
2967                                              IDirectDrawImpl_FindDecl(This->ddraw, VertexType));
2968     if(hr != D3D_OK) return hr;
2969
2970     /* This method translates to the user pointer draw of WineD3D */
2971     return IWineD3DDevice_DrawPrimitiveUP(This->wineD3DDevice,
2972                                           PrimitiveType,
2973                                           PrimitiveCount,
2974                                           Vertices,
2975                                           stride);
2976 }
2977
2978 static HRESULT WINAPI
2979 Thunk_IDirect3DDeviceImpl_3_DrawPrimitive(IDirect3DDevice3 *iface,
2980                                           D3DPRIMITIVETYPE PrimitiveType,
2981                                           DWORD VertexType,
2982                                           void *Vertices,
2983                                           DWORD VertexCount,
2984                                           DWORD Flags)
2985 {
2986     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
2987     TRACE_(ddraw_thunk)("(%p)->(%08x,%08x,%p,%08x,%08x) thunking to IDirect3DDevice7 interface.\n", This, PrimitiveType, VertexType, Vertices, VertexCount, Flags);
2988     return IDirect3DDevice7_DrawPrimitive(ICOM_INTERFACE(This, IDirect3DDevice7),
2989                                           PrimitiveType,
2990                                           VertexType,
2991                                           Vertices,
2992                                           VertexCount,
2993                                           Flags);
2994 }
2995
2996 static HRESULT WINAPI
2997 Thunk_IDirect3DDeviceImpl_2_DrawPrimitive(IDirect3DDevice2 *iface,
2998                                           D3DPRIMITIVETYPE PrimitiveType,
2999                                           D3DVERTEXTYPE VertexType,
3000                                           void *Vertices,
3001                                           DWORD VertexCount,
3002                                           DWORD Flags)
3003 {
3004     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
3005     DWORD FVF;
3006     TRACE_(ddraw_thunk)("(%p)->(%08x,%08x,%p,%08x,%08x) thunking to IDirect3DDevice7 interface.\n", This, PrimitiveType, VertexType, Vertices, VertexCount, Flags);
3007
3008     switch(VertexType)
3009     {
3010         case D3DVT_VERTEX: FVF = D3DFVF_VERTEX; break;
3011         case D3DVT_LVERTEX: FVF = D3DFVF_LVERTEX; break;
3012         case D3DVT_TLVERTEX: FVF = D3DFVF_TLVERTEX; break;
3013         default:
3014             ERR("Unexpected vertex type %d\n", VertexType);
3015             return DDERR_INVALIDPARAMS;  /* Should never happen */
3016     }
3017
3018     return IDirect3DDevice7_DrawPrimitive(ICOM_INTERFACE(This, IDirect3DDevice7),
3019                                           PrimitiveType,
3020                                           FVF,
3021                                           Vertices,
3022                                           VertexCount,
3023                                           Flags);
3024 }
3025
3026 /*****************************************************************************
3027  * IDirect3DDevice7::DrawIndexedPrimitive
3028  *
3029  * Draws vertices from an application-provided pointer, based on the index
3030  * numbers in a WORD array.
3031  *
3032  * Version 2, 3 and 7. The version 7 thunk translates the vertex type into
3033  * an FVF format for D3D7
3034  *
3035  * Params:
3036  *  PrimitiveType: The primitive type to draw
3037  *  VertexType: The FVF vertex description
3038  *  Vertices: Pointer to the vertex array
3039  *  VertexCount: ?
3040  *  Indices: Pointer to the index array
3041  *  IndexCount: Number of indices = Number of vertices to draw
3042  *  Flags: As usual, some flags
3043  *
3044  * Returns:
3045  *  D3D_OK on success
3046  *  DDERR_INVALIDPARAMS if Vertices or Indices is NULL
3047  *  For details, see IWineD3DDevice::DrawIndexedPrimitiveUP
3048  *
3049  *****************************************************************************/
3050 static HRESULT WINAPI
3051 IDirect3DDeviceImpl_7_DrawIndexedPrimitive(IDirect3DDevice7 *iface,
3052                                            D3DPRIMITIVETYPE PrimitiveType,
3053                                            DWORD VertexType,
3054                                            void *Vertices,
3055                                            DWORD VertexCount,
3056                                            WORD *Indices,
3057                                            DWORD IndexCount,
3058                                            DWORD Flags)
3059 {
3060     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
3061     UINT PrimitiveCount = 0;
3062     HRESULT hr;
3063     TRACE("(%p)->(%08x,%08x,%p,%08x,%p,%08x,%08x): Relay!\n", This, PrimitiveType, VertexType, Vertices, VertexCount, Indices, IndexCount, Flags);
3064     /* Get the primitive number */
3065     switch(PrimitiveType)
3066     {
3067       case D3DPT_POINTLIST:
3068         PrimitiveCount = IndexCount;
3069         break;
3070
3071       case D3DPT_LINELIST:
3072         PrimitiveCount = IndexCount / 2;
3073         break;
3074
3075       case D3DPT_LINESTRIP:
3076         PrimitiveCount = IndexCount - 1;
3077         break;
3078
3079       case D3DPT_TRIANGLELIST:
3080         PrimitiveCount = IndexCount / 3;
3081         break;
3082
3083       case D3DPT_TRIANGLESTRIP:
3084         PrimitiveCount = IndexCount - 2;
3085         break;
3086
3087       case D3DPT_TRIANGLEFAN:
3088         PrimitiveCount = IndexCount - 2;
3089         break;
3090
3091       default: return DDERR_INVALIDPARAMS;
3092     }
3093
3094     /* Set the D3DDevice's FVF */
3095     hr = IWineD3DDevice_SetVertexDeclaration(This->wineD3DDevice,
3096                                              IDirectDrawImpl_FindDecl(This->ddraw, VertexType));
3097     if(FAILED(hr))
3098     {
3099         ERR(" (%p) Setting the FVF failed, hr = %x!\n", This, hr);
3100         return hr;
3101     }
3102
3103     return IWineD3DDevice_DrawIndexedPrimitiveUP(This->wineD3DDevice,
3104                                                  PrimitiveType,
3105                                                  0 /* MinVertexIndex */,
3106                                                  VertexCount /* UINT NumVertexIndex */,
3107                                                  PrimitiveCount,
3108                                                  Indices,
3109                                                  WINED3DFMT_INDEX16,
3110                                                  Vertices,
3111                                                  get_flexible_vertex_size(VertexType));
3112 }
3113
3114 static HRESULT WINAPI
3115 Thunk_IDirect3DDeviceImpl_3_DrawIndexedPrimitive(IDirect3DDevice3 *iface,
3116                                                  D3DPRIMITIVETYPE PrimitiveType,
3117                                                  DWORD VertexType,
3118                                                  void *Vertices,
3119                                                  DWORD VertexCount,
3120                                                  WORD *Indices,
3121                                                  DWORD IndexCount,
3122                                                  DWORD Flags)
3123 {
3124     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
3125     TRACE_(ddraw_thunk)("(%p)->(%08x,%08x,%p,%08x,%p,%08x,%08x) thunking to IDirect3DDevice7 interface.\n", This, PrimitiveType, VertexType, Vertices, VertexCount, Indices, IndexCount, Flags);
3126     return IDirect3DDevice7_DrawIndexedPrimitive(ICOM_INTERFACE(This, IDirect3DDevice7),
3127                                                  PrimitiveType,
3128                                                  VertexType,
3129                                                  Vertices,
3130                                                  VertexCount,
3131                                                  Indices,
3132                                                  IndexCount,
3133                                                  Flags);
3134 }
3135
3136 static HRESULT WINAPI
3137 Thunk_IDirect3DDeviceImpl_2_DrawIndexedPrimitive(IDirect3DDevice2 *iface,
3138                                                  D3DPRIMITIVETYPE PrimitiveType,
3139                                                  D3DVERTEXTYPE VertexType,
3140                                                  void *Vertices,
3141                                                  DWORD VertexCount,
3142                                                  WORD *Indices,
3143                                                  DWORD IndexCount,
3144                                                  DWORD Flags)
3145 {
3146     DWORD FVF;
3147     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
3148     TRACE_(ddraw_thunk)("(%p)->(%08x,%08x,%p,%08x,%p,%08x,%08x) thunking to IDirect3DDevice7 interface.\n", This, PrimitiveType, VertexType, Vertices, VertexCount, Indices, IndexCount, Flags);
3149
3150     switch(VertexType)
3151     {
3152         case D3DVT_VERTEX: FVF = D3DFVF_VERTEX; break;
3153         case D3DVT_LVERTEX: FVF = D3DFVF_LVERTEX; break;
3154         case D3DVT_TLVERTEX: FVF = D3DFVF_TLVERTEX; break;
3155         default:
3156             ERR("Unexpected vertex type %d\n", VertexType);
3157             return DDERR_INVALIDPARAMS;  /* Should never happen */
3158     }
3159
3160     return IDirect3DDevice7_DrawIndexedPrimitive(ICOM_INTERFACE(This, IDirect3DDevice7),
3161                                                  PrimitiveType,
3162                                                  FVF,
3163                                                  Vertices,
3164                                                  VertexCount,
3165                                                  Indices,
3166                                                  IndexCount,
3167                                                  Flags);
3168 }
3169
3170 /*****************************************************************************
3171  * IDirect3DDevice7::SetClipStatus
3172  *
3173  * Sets the clip status. This defines things as clipping conditions and
3174  * the extents of the clipping region.
3175  *
3176  * Version 2, 3 and 7
3177  *
3178  * Params:
3179  *  ClipStatus:
3180  *
3181  * Returns:
3182  *  D3D_OK because it's a stub
3183  *  (DDERR_INVALIDPARAMS if ClipStatus == NULL)
3184  *
3185  *****************************************************************************/
3186 static HRESULT WINAPI
3187 IDirect3DDeviceImpl_7_SetClipStatus(IDirect3DDevice7 *iface,
3188                                     D3DCLIPSTATUS *ClipStatus)
3189 {
3190     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
3191     FIXME("(%p)->(%p): Stub!\n", This, ClipStatus);
3192
3193     /* D3DCLIPSTATUS and WINED3DCLIPSTATUS are different. I don't know how to convert them
3194      * Perhaps this needs a new data type and an additional IWineD3DDevice method
3195      */
3196     /* return IWineD3DDevice_SetClipStatus(This->wineD3DDevice, ClipStatus);*/
3197     return D3D_OK;
3198 }
3199
3200 static HRESULT WINAPI
3201 Thunk_IDirect3DDeviceImpl_3_SetClipStatus(IDirect3DDevice3 *iface,
3202                                           D3DCLIPSTATUS *ClipStatus)
3203 {
3204     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
3205     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice7 interface.\n", This, ClipStatus);
3206     return IDirect3DDevice7_SetClipStatus(ICOM_INTERFACE(This, IDirect3DDevice7),
3207                                           ClipStatus);
3208 }
3209
3210 static HRESULT WINAPI
3211 Thunk_IDirect3DDeviceImpl_2_SetClipStatus(IDirect3DDevice2 *iface,
3212                                           D3DCLIPSTATUS *ClipStatus)
3213 {
3214     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
3215     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice7 interface.\n", This, ClipStatus);
3216     return IDirect3DDevice7_SetClipStatus(ICOM_INTERFACE(This, IDirect3DDevice7),
3217                                           ClipStatus);
3218 }
3219
3220 /*****************************************************************************
3221  * IDirect3DDevice7::GetClipStatus
3222  *
3223  * Returns the clip status
3224  *
3225  * Params:
3226  *  ClipStatus: Address to write the clip status to
3227  *
3228  * Returns:
3229  *  D3D_OK because it's a stub
3230  *
3231  *****************************************************************************/
3232 static HRESULT WINAPI
3233 IDirect3DDeviceImpl_7_GetClipStatus(IDirect3DDevice7 *iface,
3234                                     D3DCLIPSTATUS *ClipStatus)
3235 {
3236     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
3237     FIXME("(%p)->(%p): Stub!\n", This, ClipStatus);
3238
3239     /* D3DCLIPSTATUS and WINED3DCLIPSTATUS are different. I don't know how to convert them */
3240     /* return IWineD3DDevice_GetClipStatus(This->wineD3DDevice, ClipStatus);*/
3241     return D3D_OK;
3242 }
3243
3244 static HRESULT WINAPI
3245 Thunk_IDirect3DDeviceImpl_3_GetClipStatus(IDirect3DDevice3 *iface,
3246                                           D3DCLIPSTATUS *ClipStatus)
3247 {
3248     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
3249     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice7 interface.\n", This, ClipStatus);
3250     return IDirect3DDevice7_GetClipStatus(ICOM_INTERFACE(This, IDirect3DDevice7),
3251                                           ClipStatus);
3252 }
3253
3254 static HRESULT WINAPI
3255 Thunk_IDirect3DDeviceImpl_2_GetClipStatus(IDirect3DDevice2 *iface,
3256                                           D3DCLIPSTATUS *ClipStatus)
3257 {
3258     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice2, iface);
3259     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice7 interface.\n", This, ClipStatus);
3260     return IDirect3DDevice7_GetClipStatus(ICOM_INTERFACE(This, IDirect3DDevice7),
3261                                           ClipStatus);
3262 }
3263
3264 /*****************************************************************************
3265  * IDirect3DDevice::DrawPrimitiveStrided
3266  *
3267  * Draws vertices described by a D3DDRAWPRIMITIVESTRIDEDDATA structure.
3268  *
3269  * Version 3 and 7
3270  *
3271  * Params:
3272  *  PrimitiveType: The primitive type to draw
3273  *  VertexType: The FVF description of the vertices to draw (for the stride??)
3274  *  D3DDrawPrimStrideData: A D3DDRAWPRIMITIVESTRIDEDDATA structure describing
3275  *                         the vertex data locations
3276  *  VertexCount: The number of vertices to draw
3277  *  Flags: Some flags
3278  *
3279  * Returns:
3280  *  D3D_OK, because it's a stub
3281  *  (DDERR_INVALIDPARAMS if D3DDrawPrimStrideData is NULL)
3282  *  (For details, see IWineD3DDevice::DrawPrimitiveStrided)
3283  *
3284  *****************************************************************************/
3285 static HRESULT WINAPI
3286 IDirect3DDeviceImpl_7_DrawPrimitiveStrided(IDirect3DDevice7 *iface,
3287                                            D3DPRIMITIVETYPE PrimitiveType,
3288                                            DWORD VertexType,
3289                                            D3DDRAWPRIMITIVESTRIDEDDATA *D3DDrawPrimStrideData,
3290                                            DWORD VertexCount,
3291                                            DWORD Flags)
3292 {
3293     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
3294     WineDirect3DVertexStridedData WineD3DStrided;
3295     int i;
3296     UINT PrimitiveCount;
3297
3298     TRACE("(%p)->(%08x,%08x,%p,%08x,%08x): stub!\n", This, PrimitiveType, VertexType, D3DDrawPrimStrideData, VertexCount, Flags);
3299
3300     memset(&WineD3DStrided, 0, sizeof(WineD3DStrided));
3301     /* Get the strided data right. the wined3d structure is a bit bigger
3302      * Watch out: The contents of the strided data are determined by the fvf,
3303      * not by the members set in D3DDrawPrimStrideData. So it's valid
3304      * to have diffuse.lpvData set to 0xdeadbeef if the diffuse flag is
3305      * not set in the fvf.
3306      */
3307     if(VertexType & D3DFVF_POSITION_MASK)
3308     {
3309         WineD3DStrided.u.s.position.lpData = D3DDrawPrimStrideData->position.lpvData;
3310         WineD3DStrided.u.s.position.dwStride = D3DDrawPrimStrideData->position.dwStride;
3311         WineD3DStrided.u.s.position.dwType = WINED3DDECLTYPE_FLOAT3;
3312         if (VertexType & D3DFVF_XYZRHW)
3313         {
3314             WineD3DStrided.u.s.position.dwType = WINED3DDECLTYPE_FLOAT4;
3315             WineD3DStrided.u.s.position_transformed = TRUE;
3316         } else
3317             WineD3DStrided.u.s.position_transformed = FALSE;
3318     }
3319
3320     if(VertexType & D3DFVF_NORMAL)
3321     {
3322         WineD3DStrided.u.s.normal.lpData = D3DDrawPrimStrideData->normal.lpvData;
3323         WineD3DStrided.u.s.normal.dwStride = D3DDrawPrimStrideData->normal.dwStride;
3324         WineD3DStrided.u.s.normal.dwType = WINED3DDECLTYPE_FLOAT3;
3325     }
3326
3327     if(VertexType & D3DFVF_DIFFUSE)
3328     {
3329         WineD3DStrided.u.s.diffuse.lpData = D3DDrawPrimStrideData->diffuse.lpvData;
3330         WineD3DStrided.u.s.diffuse.dwStride = D3DDrawPrimStrideData->diffuse.dwStride;
3331         WineD3DStrided.u.s.diffuse.dwType = WINED3DDECLTYPE_SHORT4;
3332     }
3333
3334     if(VertexType & D3DFVF_SPECULAR)
3335     {
3336         WineD3DStrided.u.s.specular.lpData = D3DDrawPrimStrideData->specular.lpvData;
3337         WineD3DStrided.u.s.specular.dwStride = D3DDrawPrimStrideData->specular.dwStride;
3338         WineD3DStrided.u.s.specular.dwType = WINED3DDECLTYPE_SHORT4;
3339     }
3340
3341     for( i = 0; i < GET_TEXCOUNT_FROM_FVF(VertexType); i++)
3342     {
3343         WineD3DStrided.u.s.texCoords[i].lpData = D3DDrawPrimStrideData->textureCoords[i].lpvData;
3344         WineD3DStrided.u.s.texCoords[i].dwStride = D3DDrawPrimStrideData->textureCoords[i].dwStride;
3345         switch(GET_TEXCOORD_SIZE_FROM_FVF(VertexType, i))
3346         {
3347             case 1: WineD3DStrided.u.s.texCoords[i].dwType = WINED3DDECLTYPE_FLOAT1; break;
3348             case 2: WineD3DStrided.u.s.texCoords[i].dwType = WINED3DDECLTYPE_FLOAT2; break;
3349             case 3: WineD3DStrided.u.s.texCoords[i].dwType = WINED3DDECLTYPE_FLOAT3; break;
3350             case 4: WineD3DStrided.u.s.texCoords[i].dwType = WINED3DDECLTYPE_FLOAT4; break;
3351             default: ERR("Unexpected texture coordinate size %d\n",
3352                          GET_TEXCOORD_SIZE_FROM_FVF(VertexType, i));
3353         }
3354     }
3355
3356     /* Get the primitive count */
3357     switch(PrimitiveType)
3358     {
3359         case D3DPT_POINTLIST:
3360           PrimitiveCount = VertexCount;
3361           break;
3362
3363         case D3DPT_LINELIST:
3364           PrimitiveCount = VertexCount / 2;
3365           break;
3366
3367         case D3DPT_LINESTRIP:
3368           PrimitiveCount = VertexCount - 1;
3369           break;
3370
3371         case D3DPT_TRIANGLELIST:
3372           PrimitiveCount = VertexCount / 3;
3373           break;
3374
3375         case D3DPT_TRIANGLESTRIP:
3376           PrimitiveCount = VertexCount - 2;
3377           break;
3378
3379         case D3DPT_TRIANGLEFAN:
3380           PrimitiveCount = VertexCount - 2;
3381           break;
3382
3383         default: return DDERR_INVALIDPARAMS;
3384     }
3385
3386     /* WineD3D doesn't need the FVF here */
3387     return IWineD3DDevice_DrawPrimitiveStrided(This->wineD3DDevice,
3388                                                PrimitiveType,
3389                                                PrimitiveCount,
3390                                                &WineD3DStrided);
3391 }
3392
3393 static HRESULT WINAPI
3394 Thunk_IDirect3DDeviceImpl_3_DrawPrimitiveStrided(IDirect3DDevice3 *iface,
3395                                                  D3DPRIMITIVETYPE PrimitiveType,
3396                                                  DWORD VertexType,
3397                                                  D3DDRAWPRIMITIVESTRIDEDDATA *D3DDrawPrimStrideData,
3398                                                  DWORD VertexCount,
3399                                                  DWORD Flags)
3400 {
3401     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
3402     TRACE_(ddraw_thunk)("(%p)->(%08x,%08x,%p,%08x,%08x) thunking to IDirect3DDevice7 interface.\n", This, PrimitiveType, VertexType, D3DDrawPrimStrideData, VertexCount, Flags);
3403     return IDirect3DDevice7_DrawPrimitiveStrided(ICOM_INTERFACE(This, IDirect3DDevice7),
3404                                                  PrimitiveType,
3405                                                  VertexType,
3406                                                  D3DDrawPrimStrideData,
3407                                                  VertexCount,
3408                                                  Flags);
3409 }
3410
3411 /*****************************************************************************
3412  * IDirect3DDevice7::DrawIndexedPrimitiveStrided
3413  *
3414  * Draws primitives specified by strided data locations based on indices
3415  *
3416  * Version 3 and 7
3417  *
3418  * Params:
3419  *  PrimitiveType:
3420  *
3421  * Returns:
3422  *  D3D_OK, because it's a stub
3423  *  (DDERR_INVALIDPARAMS if D3DDrawPrimStrideData is NULL)
3424  *  (DDERR_INVALIDPARAMS if Indices is NULL)
3425  *  (For more details, see IWineD3DDevice::DrawIndexedPrimitiveStrided)
3426  *
3427  *****************************************************************************/
3428 static HRESULT WINAPI
3429 IDirect3DDeviceImpl_7_DrawIndexedPrimitiveStrided(IDirect3DDevice7 *iface,
3430                                                   D3DPRIMITIVETYPE PrimitiveType,
3431                                                   DWORD VertexType,
3432                                                   D3DDRAWPRIMITIVESTRIDEDDATA *D3DDrawPrimStrideData,
3433                                                   DWORD VertexCount,
3434                                                   WORD *Indices,
3435                                                   DWORD IndexCount,
3436                                                   DWORD Flags)
3437 {
3438     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
3439     FIXME("(%p)->(%08x,%08x,%p,%08x,%p,%08x,%08x): stub!\n", This, PrimitiveType, VertexType, D3DDrawPrimStrideData, VertexCount, Indices, IndexCount, Flags);
3440
3441     /* I'll implement it as soon as I find a app to test it.
3442      * This needs an additional method in IWineD3DDevice.
3443      */
3444     return D3D_OK;
3445 }
3446
3447 static HRESULT WINAPI
3448 Thunk_IDirect3DDeviceImpl_3_DrawIndexedPrimitiveStrided(IDirect3DDevice3 *iface,
3449                                                         D3DPRIMITIVETYPE PrimitiveType,
3450                                                         DWORD VertexType,
3451                                                         D3DDRAWPRIMITIVESTRIDEDDATA *D3DDrawPrimStrideData,
3452                                                         DWORD VertexCount,
3453                                                         WORD *Indices,
3454                                                         DWORD IndexCount,
3455                                                         DWORD Flags)
3456 {
3457     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
3458     TRACE_(ddraw_thunk)("(%p)->(%08x,%08x,%p,%08x,%p,%08x,%08x) thunking to IDirect3DDevice7 interface.\n", iface, PrimitiveType, VertexType, D3DDrawPrimStrideData, VertexCount, Indices, IndexCount, Flags);
3459     return IDirect3DDevice7_DrawIndexedPrimitiveStrided(ICOM_INTERFACE(This, IDirect3DDevice7),
3460                                                         PrimitiveType,
3461                                                         VertexType,
3462                                                         D3DDrawPrimStrideData,
3463                                                         VertexCount,
3464                                                         Indices,
3465                                                         IndexCount,
3466                                                         Flags);
3467 }
3468
3469 /*****************************************************************************
3470  * IDirect3DDevice7::DrawPrimitiveVB
3471  *
3472  * Draws primitives from a vertex buffer to the screen.
3473  *
3474  * Version 3 and 7
3475  *
3476  * Params:
3477  *  PrimitiveType: Type of primitive to be rendered.
3478  *  D3DVertexBuf: Source Vertex Buffer
3479  *  StartVertex: Index of the first vertex from the buffer to be rendered
3480  *  NumVertices: Number of vertices to be rendered
3481  *  Flags: Can be D3DDP_WAIT to wait until rendering has finished
3482  *
3483  * Return values
3484  *  D3D_OK on success
3485  *  DDERR_INVALIDPARAMS if D3DVertexBuf is NULL
3486  *
3487  *****************************************************************************/
3488 static HRESULT WINAPI
3489 IDirect3DDeviceImpl_7_DrawPrimitiveVB(IDirect3DDevice7 *iface,
3490                                       D3DPRIMITIVETYPE PrimitiveType,
3491                                       IDirect3DVertexBuffer7 *D3DVertexBuf,
3492                                       DWORD StartVertex,
3493                                       DWORD NumVertices,
3494                                       DWORD Flags)
3495 {
3496     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
3497     IDirect3DVertexBufferImpl *vb = ICOM_OBJECT(IDirect3DVertexBufferImpl, IDirect3DVertexBuffer7, D3DVertexBuf);
3498     UINT PrimitiveCount;
3499     HRESULT hr;
3500     DWORD stride;
3501     WINED3DVERTEXBUFFER_DESC Desc;
3502
3503     TRACE("(%p)->(%08x,%p,%08x,%08x,%08x)\n", This, PrimitiveType, D3DVertexBuf, StartVertex, NumVertices, Flags);
3504
3505     /* Sanity checks */
3506     if(!vb)
3507     {
3508         ERR("(%p) No Vertex buffer specified\n", This);
3509         return DDERR_INVALIDPARAMS;
3510     }
3511
3512     /* Get the primitive count */
3513     switch(PrimitiveType)
3514     {
3515         case D3DPT_POINTLIST:
3516           PrimitiveCount = NumVertices;
3517           break;
3518
3519         case D3DPT_LINELIST:
3520           PrimitiveCount = NumVertices / 2;
3521           break;
3522
3523         case D3DPT_LINESTRIP:
3524           PrimitiveCount = NumVertices - 1;
3525           break;
3526
3527         case D3DPT_TRIANGLELIST:
3528           PrimitiveCount = NumVertices / 3;
3529           break;
3530
3531         case D3DPT_TRIANGLESTRIP:
3532           PrimitiveCount = NumVertices - 2;
3533           break;
3534
3535         case D3DPT_TRIANGLEFAN:
3536           PrimitiveCount = NumVertices - 2;
3537           break;
3538
3539         default: return DDERR_INVALIDPARAMS;
3540     }
3541
3542     /* Get the FVF of the vertex buffer, and its stride */
3543     hr = IWineD3DVertexBuffer_GetDesc(vb->wineD3DVertexBuffer,
3544                                       &Desc);
3545     if(hr != D3D_OK)
3546     {
3547         ERR("(%p) IWineD3DVertexBuffer::GetDesc failed with hr = %08x\n", This, hr);
3548         return hr;
3549     }
3550     stride = get_flexible_vertex_size(Desc.FVF);
3551
3552     hr = IWineD3DDevice_SetVertexDeclaration(This->wineD3DDevice,
3553                                              vb->wineD3DVertexDeclaration);
3554     if(FAILED(hr))
3555     {
3556         ERR(" (%p) Setting the FVF failed, hr = %x!\n", This, hr);
3557         return hr;
3558     }
3559
3560     /* Set the vertex stream source */
3561     hr = IWineD3DDevice_SetStreamSource(This->wineD3DDevice,
3562                                         0 /* StreamNumber */,
3563                                         vb->wineD3DVertexBuffer,
3564                                         0 /* StartVertex - we pass this to DrawPrimitive */,
3565                                         stride);
3566     if(hr != D3D_OK)
3567     {
3568         ERR("(%p) IDirect3DDevice::SetStreamSource failed with hr = %08x\n", This, hr);
3569         return hr;
3570     }
3571
3572     /* Now draw the primitives */
3573     return IWineD3DDevice_DrawPrimitive(This->wineD3DDevice,
3574                                         PrimitiveType,
3575                                         StartVertex,
3576                                         PrimitiveCount);
3577 }
3578
3579 static HRESULT WINAPI
3580 Thunk_IDirect3DDeviceImpl_3_DrawPrimitiveVB(IDirect3DDevice3 *iface,
3581                                             D3DPRIMITIVETYPE PrimitiveType,
3582                                             IDirect3DVertexBuffer *D3DVertexBuf,
3583                                             DWORD StartVertex,
3584                                             DWORD NumVertices,
3585                                             DWORD Flags)
3586 {
3587     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
3588     IDirect3DVertexBufferImpl *vb = ICOM_OBJECT(IDirect3DVertexBufferImpl, IDirect3DVertexBuffer, D3DVertexBuf);
3589     TRACE_(ddraw_thunk)("(%p)->(%08x,%p,%08x,%08x,%08x) thunking to IDirect3DDevice7 interface.\n", This,  PrimitiveType, vb, StartVertex, NumVertices, Flags);
3590     return IDirect3DDevice7_DrawPrimitiveVB(ICOM_INTERFACE(This, IDirect3DDevice7),
3591                                             PrimitiveType,
3592                                             ICOM_INTERFACE(vb, IDirect3DVertexBuffer7),
3593                                             StartVertex,
3594                                             NumVertices,
3595                                             Flags);
3596 }
3597
3598
3599 /*****************************************************************************
3600  * IDirect3DDevice7::DrawIndexedPrimitiveVB
3601  *
3602  * Draws primitives from a vertex buffer to the screen
3603  *
3604  * Params:
3605  *  PrimitiveType: Type of primitive to be rendered.
3606  *  D3DVertexBuf: Source Vertex Buffer
3607  *  StartVertex: Index of the first vertex from the buffer to be rendered
3608  *  NumVertices: Number of vertices to be rendered
3609  *  Indices: Array of DWORDs used to index into the Vertices
3610  *  IndexCount: Number of indices in Indices
3611  *  Flags: Can be D3DDP_WAIT to wait until rendering has finished
3612  *
3613  * Return values
3614  *
3615  *****************************************************************************/
3616 static HRESULT WINAPI
3617 IDirect3DDeviceImpl_7_DrawIndexedPrimitiveVB(IDirect3DDevice7 *iface,
3618                                              D3DPRIMITIVETYPE PrimitiveType,
3619                                              IDirect3DVertexBuffer7 *D3DVertexBuf,
3620                                              DWORD StartVertex,
3621                                              DWORD NumVertices,
3622                                              WORD *Indices,
3623                                              DWORD IndexCount,
3624                                              DWORD Flags)
3625 {
3626     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
3627     IDirect3DVertexBufferImpl *vb = ICOM_OBJECT(IDirect3DVertexBufferImpl, IDirect3DVertexBuffer7, D3DVertexBuf);
3628     DWORD stride;
3629     UINT PrimitiveCount;
3630     WORD *LockedIndices;
3631     HRESULT hr;
3632     WINED3DVERTEXBUFFER_DESC Desc;
3633
3634     TRACE("(%p)->(%08x,%p,%d,%d,%p,%d,%08x)\n", This, PrimitiveType, vb, StartVertex, NumVertices, Indices, IndexCount, Flags);
3635
3636     /* Steps:
3637      * 1) Calculate some things: Vertex count -> Primitive count, stride, ...
3638      * 2) Upload the Indices to the index buffer
3639      * 3) Set the index source
3640      * 4) Set the Vertex Buffer as the Stream source
3641      * 5) Call IWineD3DDevice::DrawIndexedPrimitive
3642      */
3643
3644     /* Get the primitive count */
3645     switch(PrimitiveType)
3646     {
3647         case D3DPT_POINTLIST:
3648           PrimitiveCount = IndexCount;
3649           break;
3650
3651         case D3DPT_LINELIST:
3652           PrimitiveCount = IndexCount / 2;
3653           break;
3654
3655         case D3DPT_LINESTRIP:
3656           PrimitiveCount = IndexCount - 1;
3657           break;
3658
3659         case D3DPT_TRIANGLELIST:
3660           PrimitiveCount = IndexCount / 3;
3661           break;
3662
3663         case D3DPT_TRIANGLESTRIP:
3664           PrimitiveCount = IndexCount - 2;
3665           break;
3666
3667         case D3DPT_TRIANGLEFAN:
3668           PrimitiveCount = IndexCount - 2;
3669           break;
3670
3671         default: return DDERR_INVALIDPARAMS;
3672     }
3673
3674     /* Get the FVF of the vertex buffer, and its stride */
3675     hr = IWineD3DVertexBuffer_GetDesc(vb->wineD3DVertexBuffer,
3676                                       &Desc);
3677     if(hr != D3D_OK)
3678     {
3679         ERR("(%p) IWineD3DVertexBuffer::GetDesc failed with hr = %08x\n", This, hr);
3680         return hr;
3681     }
3682     stride = get_flexible_vertex_size(Desc.FVF);
3683     TRACE("Vertex buffer FVF = %08x, stride=%d\n", Desc.FVF, stride);
3684
3685     hr = IWineD3DDevice_SetVertexDeclaration(This->wineD3DDevice,
3686                                              vb->wineD3DVertexDeclaration);
3687     if(FAILED(hr))
3688     {
3689         ERR(" (%p) Setting the FVF failed, hr = %x!\n", This, hr);
3690         return hr;
3691     }
3692
3693     /* copy the index stream into the index buffer.
3694      * A new IWineD3DDevice method could be created
3695      * which takes an user pointer containing the indices
3696      * or a SetData-Method for the index buffer, which
3697      * overrides the index buffer data with our pointer.
3698      */
3699     hr = IWineD3DIndexBuffer_Lock(This->indexbuffer,
3700                                   0 /* OffSetToLock */,
3701                                   IndexCount * sizeof(WORD),
3702                                   (BYTE **) &LockedIndices,
3703                                   0 /* Flags */);
3704     assert(IndexCount < 0x100000);
3705     if(hr != D3D_OK)
3706     {
3707         ERR("(%p) IWineD3DIndexBuffer::Lock failed with hr = %08x\n", This, hr);
3708         return hr;
3709     }
3710     memcpy(LockedIndices, Indices, IndexCount * sizeof(WORD));
3711     hr = IWineD3DIndexBuffer_Unlock(This->indexbuffer);
3712     if(hr != D3D_OK)
3713     {
3714         ERR("(%p) IWineD3DIndexBuffer::Unlock failed with hr = %08x\n", This, hr);
3715         return hr;
3716     }
3717
3718     /* Set the index stream */
3719     hr = IWineD3DDevice_SetIndices(This->wineD3DDevice,
3720                                    This->indexbuffer,
3721                                    StartVertex);
3722
3723     /* Set the vertex stream source */
3724     hr = IWineD3DDevice_SetStreamSource(This->wineD3DDevice,
3725                                         0 /* StreamNumber */,
3726                                         vb->wineD3DVertexBuffer,
3727                                         0 /* offset, we pass this to DrawIndexedPrimitive */,
3728                                         stride);
3729     if(hr != D3D_OK)
3730     {
3731         ERR("(%p) IDirect3DDevice::SetStreamSource failed with hr = %08x\n", This, hr);
3732         return hr;
3733     }
3734
3735
3736     hr = IWineD3DDevice_DrawIndexedPrimitive(This->wineD3DDevice,
3737                                              PrimitiveType,
3738                                              0 /* minIndex */,
3739                                              NumVertices,
3740                                              0 /* StartIndex */,
3741                                              PrimitiveCount);
3742
3743     return D3D_OK;
3744 }
3745
3746 static HRESULT WINAPI
3747 Thunk_IDirect3DDeviceImpl_3_DrawIndexedPrimitiveVB(IDirect3DDevice3 *iface,
3748                                                    D3DPRIMITIVETYPE PrimitiveType,
3749                                                    IDirect3DVertexBuffer *D3DVertexBuf,
3750                                                    WORD *Indices,
3751                                                    DWORD IndexCount,
3752                                                    DWORD Flags)
3753 {
3754     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
3755     IDirect3DVertexBufferImpl *VB = ICOM_OBJECT(IDirect3DVertexBufferImpl, IDirect3DVertexBuffer, D3DVertexBuf);
3756     TRACE_(ddraw_thunk)("(%p)->(%08x,%p,%p,%08x,%08x) thunking to IDirect3DDevice7 interface.\n", This, PrimitiveType, VB, Indices, IndexCount, Flags);
3757
3758     return IDirect3DDevice7_DrawIndexedPrimitiveVB(ICOM_INTERFACE(This, IDirect3DDevice7),
3759                                                    PrimitiveType,
3760                                                    ICOM_INTERFACE(VB, IDirect3DVertexBuffer7),
3761                                                    0,
3762                                                    IndexCount,
3763                                                    Indices,
3764                                                    IndexCount,
3765                                                    Flags);
3766 }
3767
3768 /*****************************************************************************
3769  * IDirect3DDevice7::ComputeSphereVisibility
3770  *
3771  * Calculates the visibility of spheres in the current viewport. The spheres
3772  * are passed in the Centers and Radii arrays, the results are passed back
3773  * in the ReturnValues array. Return values are either completely visible,
3774  * partially visible or completely invisible.
3775  * The return value consist of a combination of D3DCLIP_* flags, or it's
3776  * 0 if the sphere is completely visible(according to the SDK, not checked)
3777  *
3778  * Sounds like an overdose of math ;)
3779  *
3780  * Version 3 and 7
3781  *
3782  * Params:
3783  *  Centers: Array containing the sphere centers
3784  *  Radii: Array containing the sphere radii
3785  *  NumSpheres: The number of centers and radii in the arrays
3786  *  Flags: Some flags
3787  *  ReturnValues: Array to write the results to
3788  *
3789  * Returns:
3790  *  D3D_OK because it's a stub
3791  *  (DDERR_INVALIDPARAMS if Centers, Radii or ReturnValues are NULL)
3792  *  (D3DERR_INVALIDMATRIX if the combined world, view and proj matrix
3793  *  is singular)
3794  *
3795  *****************************************************************************/
3796 static HRESULT WINAPI
3797 IDirect3DDeviceImpl_7_ComputeSphereVisibility(IDirect3DDevice7 *iface,
3798                                               D3DVECTOR *Centers,
3799                                               D3DVALUE *Radii,
3800                                               DWORD NumSpheres,
3801                                               DWORD Flags,
3802                                               DWORD *ReturnValues)
3803 {
3804     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
3805     FIXME("(%p)->(%p,%p,%08x,%08x,%p): stub!\n", This, Centers, Radii, NumSpheres, Flags, ReturnValues);
3806
3807     /* the DirectX 7 sdk says that the visibility is computed by
3808      * back-transforming the viewing frustum to model space
3809      * using the inverse of the combined world, view and projection
3810      * matrix. If the matrix can't be reversed, D3DERR_INVALIDMATRIX
3811      * is returned.
3812      *
3813      * Basic implementation idea:
3814      * 1) Check if the center is in the viewing frustum
3815      * 2) Cut the sphere with the planes of the viewing
3816      *    frustum
3817      *
3818      * ->Center inside the frustum, no intersections:
3819      *    Fully visible
3820      * ->Center outside the frustum, no intersections:
3821      *    Not visible
3822      * ->Some intersections: Partially visible
3823      *
3824      * Implement this call in WineD3D. Either implement the
3825      * matrix and vector stuff in WineD3D, or use some external
3826      * math library.
3827      */
3828
3829     return D3D_OK;
3830 }
3831
3832 static HRESULT WINAPI
3833 Thunk_IDirect3DDeviceImpl_3_ComputeSphereVisibility(IDirect3DDevice3 *iface,
3834                                                     D3DVECTOR *Centers,
3835                                                     D3DVALUE *Radii,
3836                                                     DWORD NumSpheres,
3837                                                     DWORD Flags,
3838                                                     DWORD *ReturnValues)
3839 {
3840     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
3841     TRACE_(ddraw_thunk)("(%p)->(%p,%p,%08x,%08x,%p) thunking to IDirect3DDevice7 interface.\n", This, Centers, Radii, NumSpheres, Flags, ReturnValues);
3842     return IDirect3DDevice7_ComputeSphereVisibility(ICOM_INTERFACE(This, IDirect3DDevice7),
3843                                                     Centers,
3844                                                     Radii,
3845                                                     NumSpheres,
3846                                                     Flags,
3847                                                     ReturnValues);
3848 }
3849
3850 /*****************************************************************************
3851  * IDirect3DDevice7::GetTexture
3852  *
3853  * Returns the texture interface handle assigned to a texture stage.
3854  * The returned texture is AddRefed. This is taken from old ddraw,
3855  * not checked in Windows.
3856  *
3857  * Version 3 and 7
3858  *
3859  * Params:
3860  *  Stage: Texture stage to read the texture from
3861  *  Texture: Address to store the interface pointer at
3862  *
3863  * Returns:
3864  *  D3D_OK on success
3865  *  DDERR_INVALIDPARAMS if Texture is NULL
3866  *  For details, see IWineD3DDevice::GetTexture
3867  *
3868  *****************************************************************************/
3869 static HRESULT WINAPI
3870 IDirect3DDeviceImpl_7_GetTexture(IDirect3DDevice7 *iface,
3871                                  DWORD Stage,
3872                                  IDirectDrawSurface7 **Texture)
3873 {
3874     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
3875     IWineD3DBaseTexture *Surf;
3876     HRESULT hr;
3877     TRACE("(%p)->(%d,%p): Relay\n", This, Stage, Texture);
3878
3879     if(!Texture)
3880     {
3881         TRACE("Texture == NULL, failing with DDERR_INVALIDPARAMS\n");
3882         return DDERR_INVALIDPARAMS;
3883     }
3884
3885     hr = IWineD3DDevice_GetTexture(This->wineD3DDevice, Stage, (IWineD3DBaseTexture **) &Surf);
3886     if( (hr != D3D_OK) || (!Surf) )
3887     {
3888         *Texture = NULL;
3889         return hr;
3890     }
3891
3892     /* GetParent AddRef()s, which is perfectly OK.
3893      * We have passed the IDirectDrawSurface7 interface to WineD3D, so that's OK too.
3894      */
3895     return IWineD3DBaseTexture_GetParent(Surf,
3896                                          (IUnknown **) Texture);
3897 }
3898
3899 static HRESULT WINAPI
3900 Thunk_IDirect3DDeviceImpl_3_GetTexture(IDirect3DDevice3 *iface,
3901                                        DWORD Stage,
3902                                        IDirect3DTexture2 **Texture2)
3903 {
3904     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
3905     HRESULT ret;
3906     IDirectDrawSurface7 *ret_val;
3907
3908     TRACE_(ddraw_thunk)("(%p)->(%d,%p) thunking to IDirect3DDevice7 interface.\n", This, Stage, Texture2);
3909     ret = IDirect3DDevice7_GetTexture(ICOM_INTERFACE(This, IDirect3DDevice7),
3910                                       Stage,
3911                                       &ret_val);
3912
3913     *Texture2 = COM_INTERFACE_CAST(IDirectDrawSurfaceImpl, IDirectDrawSurface7, IDirect3DTexture2, ret_val);
3914
3915     TRACE_(ddraw_thunk)(" returning interface %p.\n", *Texture2);
3916
3917     return ret;
3918 }
3919
3920 /*****************************************************************************
3921  * IDirect3DDevice7::SetTexture
3922  *
3923  * Assigns a texture to a texture stage. Is the texture AddRef-ed?
3924  *
3925  * Version 3 and 7
3926  *
3927  * Params:
3928  *  Stage: The stage to assign the texture to
3929  *  Texture: Interface pointer to the texture surface
3930  *
3931  * Returns
3932  * D3D_OK on success
3933  * For details, see IWineD3DDevice::SetTexture
3934  *
3935  *****************************************************************************/
3936 static HRESULT WINAPI
3937 IDirect3DDeviceImpl_7_SetTexture(IDirect3DDevice7 *iface,
3938                                  DWORD Stage,
3939                                  IDirectDrawSurface7 *Texture)
3940 {
3941     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
3942     IDirectDrawSurfaceImpl *surf = ICOM_OBJECT(IDirectDrawSurfaceImpl, IDirectDrawSurface7, Texture);
3943     TRACE("(%p)->(%08x,%p): Relay!\n", This, Stage, surf);
3944
3945     /* Texture may be NULL here */
3946     return IWineD3DDevice_SetTexture(This->wineD3DDevice,
3947                                      Stage,
3948                                      surf ? (IWineD3DBaseTexture * ) surf->wineD3DTexture : NULL);
3949 }
3950
3951 static HRESULT WINAPI
3952 Thunk_IDirect3DDeviceImpl_3_SetTexture(IDirect3DDevice3 *iface,
3953                                        DWORD Stage,
3954                                        IDirect3DTexture2 *Texture2)
3955 {
3956     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
3957     IDirectDrawSurfaceImpl *tex = ICOM_OBJECT(IDirectDrawSurfaceImpl, IDirect3DTexture2, Texture2);
3958     TRACE_(ddraw_thunk)("(%p)->(%d,%p) thunking to IDirect3DDevice7 interface.\n", This, Stage, tex);
3959     return IDirect3DDevice7_SetTexture(ICOM_INTERFACE(This, IDirect3DDevice7),
3960                                        Stage,
3961                                        ICOM_INTERFACE(tex, IDirectDrawSurface7));
3962 }
3963
3964 /*****************************************************************************
3965  * IDirect3DDevice7::GetTextureStageState
3966  *
3967  * Retrieves a state from a texture stage.
3968  *
3969  * Version 3 and 7
3970  *
3971  * Params:
3972  *  Stage: The stage to retrieve the state from
3973  *  TexStageStateType: The state type to retrieve
3974  *  State: Address to store the state's value at
3975  *
3976  * Returns:
3977  *  D3D_OK on success
3978  *  DDERR_INVALIDPARAMS if State is NULL
3979  *  For details, see IWineD3DDevice::GetTextureStageState
3980  *
3981  *****************************************************************************/
3982 static HRESULT WINAPI
3983 IDirect3DDeviceImpl_7_GetTextureStageState(IDirect3DDevice7 *iface,
3984                                            DWORD Stage,
3985                                            D3DTEXTURESTAGESTATETYPE TexStageStateType,
3986                                            DWORD *State)
3987 {
3988     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
3989     TRACE("(%p)->(%08x,%08x,%p): Relay!\n", This, Stage, TexStageStateType, State);
3990
3991     if(!State)
3992         return DDERR_INVALIDPARAMS;
3993
3994     switch(TexStageStateType)
3995     {
3996         /* Mipfilter is a sampler state with different values */
3997         case D3DTSS_MIPFILTER:
3998         {
3999             HRESULT hr;
4000             WINED3DTEXTUREFILTERTYPE value;
4001
4002             hr = IWineD3DDevice_GetSamplerState(This->wineD3DDevice,
4003                                                 Stage,
4004                                                 WINED3DSAMP_MIPFILTER,
4005                                                 &value);
4006             switch(value)
4007             {
4008                 case WINED3DTEXF_NONE: *State = D3DTFP_NONE; break;
4009                 case WINED3DTEXF_POINT: *State = D3DTFP_POINT; break;
4010                 case WINED3DTEXF_LINEAR: *State = D3DTFP_LINEAR; break;
4011                 default:
4012                     ERR("Unexpected mipfilter value %d\n", value);
4013                     *State = D3DTFP_NONE;
4014             }
4015             return hr;
4016         }
4017
4018         /* Minfilter is a sampler state too, equal values */
4019         case D3DTSS_MINFILTER:
4020             return IWineD3DDevice_GetSamplerState(This->wineD3DDevice,
4021                                                   Stage,
4022                                                   WINED3DSAMP_MINFILTER,
4023                                                   State);
4024         /* Same for MAGFILTER */
4025         case D3DTSS_MAGFILTER:
4026             return IWineD3DDevice_GetSamplerState(This->wineD3DDevice,
4027                                                   Stage,
4028                                                   WINED3DSAMP_MAGFILTER,
4029                                                   State);
4030
4031         case D3DTSS_ADDRESS:
4032         case D3DTSS_ADDRESSU:
4033             return IWineD3DDevice_GetSamplerState(This->wineD3DDevice,
4034                                                   Stage,
4035                                                   WINED3DSAMP_ADDRESSU,
4036                                                   State);
4037         case D3DTSS_ADDRESSV:
4038             return IWineD3DDevice_GetSamplerState(This->wineD3DDevice,
4039                                                   Stage,
4040                                                   WINED3DSAMP_ADDRESSV,
4041                                                   State);
4042         default:
4043             return IWineD3DDevice_GetTextureStageState(This->wineD3DDevice,
4044                                                        Stage,
4045                                                        TexStageStateType,
4046                                                        State);
4047     }
4048 }
4049
4050 static HRESULT WINAPI
4051 Thunk_IDirect3DDeviceImpl_3_GetTextureStageState(IDirect3DDevice3 *iface,
4052                                                  DWORD Stage,
4053                                                  D3DTEXTURESTAGESTATETYPE TexStageStateType,
4054                                                  DWORD *State)
4055 {
4056     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
4057     TRACE_(ddraw_thunk)("(%p)->(%08x,%08x,%p) thunking to IDirect3DDevice7 interface.\n", This, Stage, TexStageStateType, State);
4058     return IDirect3DDevice7_GetTextureStageState(ICOM_INTERFACE(This, IDirect3DDevice7),
4059                                                  Stage,
4060                                                  TexStageStateType,
4061                                                  State);
4062 }
4063
4064 /*****************************************************************************
4065  * IDirect3DDevice7::SetTextureStageState
4066  *
4067  * Sets a texture stage state. Some stage types need to be handled specially,
4068  * because they do not exist in WineD3D and were moved to another place
4069  *
4070  * Version 3 and 7
4071  *
4072  * Params:
4073  *  Stage: The stage to modify
4074  *  TexStageStateType: The state to change
4075  *  State: The new value for the state
4076  *
4077  * Returns:
4078  *  D3D_OK on success
4079  *  For details, see IWineD3DDevice::SetTextureStageState
4080  *
4081  *****************************************************************************/
4082 static HRESULT WINAPI
4083 IDirect3DDeviceImpl_7_SetTextureStageState(IDirect3DDevice7 *iface,
4084                                            DWORD Stage,
4085                                            D3DTEXTURESTAGESTATETYPE TexStageStateType,
4086                                            DWORD State)
4087 {
4088     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4089     TRACE("(%p)->(%08x,%08x,%08x): Relay!\n", This, Stage, TexStageStateType, State);
4090     switch(TexStageStateType)
4091     {
4092         /* Mipfilter is a sampler state with different values */
4093         case D3DTSS_MIPFILTER:
4094         {
4095             WINED3DTEXTUREFILTERTYPE value;
4096             switch(State)
4097             {
4098                 case D3DTFP_NONE: value = WINED3DTEXF_NONE; break;
4099                 case D3DTFP_POINT: value = WINED3DTEXF_POINT; break;
4100                 case 0: /* Unchecked */
4101                 case D3DTFP_LINEAR: value = WINED3DTEXF_LINEAR; break;
4102                 default:
4103                     ERR("Unexpected mipfilter value %d\n", State);
4104                     value = WINED3DTEXF_NONE;
4105             }
4106             return IWineD3DDevice_SetSamplerState(This->wineD3DDevice,
4107                                                   Stage,
4108                                                   WINED3DSAMP_MIPFILTER,
4109                                                   value);
4110         }
4111
4112         /* Minfilter is a sampler state too, equal values */
4113         case D3DTSS_MINFILTER:
4114             return IWineD3DDevice_SetSamplerState(This->wineD3DDevice,
4115                                                   Stage,
4116                                                   WINED3DSAMP_MINFILTER,
4117                                                   State);
4118         /* Same for MAGFILTER */
4119         case D3DTSS_MAGFILTER:
4120             return IWineD3DDevice_SetSamplerState(This->wineD3DDevice,
4121                                                   Stage,
4122                                                   WINED3DSAMP_MAGFILTER,
4123                                                   State);
4124
4125         case D3DTSS_ADDRESS:
4126                    IWineD3DDevice_SetSamplerState(This->wineD3DDevice,
4127                                                   Stage,
4128                                                   WINED3DSAMP_ADDRESSV,
4129                                                   State);
4130             /* Drop through */
4131         case D3DTSS_ADDRESSU:
4132             return IWineD3DDevice_SetSamplerState(This->wineD3DDevice,
4133                                                   Stage,
4134                                                   WINED3DSAMP_ADDRESSU,
4135                                                   State);
4136         case D3DTSS_ADDRESSV:
4137             return IWineD3DDevice_SetSamplerState(This->wineD3DDevice,
4138                                                   Stage,
4139                                                   WINED3DSAMP_ADDRESSV,
4140                                                   State);
4141         default:
4142
4143             return IWineD3DDevice_SetTextureStageState(This->wineD3DDevice,
4144                                                        Stage,
4145                                                        TexStageStateType,
4146                                                        State);
4147     }
4148 }
4149
4150 static HRESULT WINAPI
4151 Thunk_IDirect3DDeviceImpl_3_SetTextureStageState(IDirect3DDevice3 *iface,
4152                                                  DWORD Stage,
4153                                                  D3DTEXTURESTAGESTATETYPE TexStageStateType,
4154                                                  DWORD State)
4155 {
4156     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
4157     TRACE_(ddraw_thunk)("(%p)->(%08x,%08x,%08x) thunking to IDirect3DDevice7 interface.\n", This, Stage, TexStageStateType, State);
4158     return IDirect3DDevice7_SetTextureStageState(ICOM_INTERFACE(This, IDirect3DDevice7),
4159                                                  Stage,
4160                                                  TexStageStateType,
4161                                                  State);
4162 }
4163
4164 /*****************************************************************************
4165  * IDirect3DDevice7::ValidateDevice
4166  *
4167  * SDK: "Reports the device's ability to render the currently set
4168  * texture-blending operations in a single pass". Whatever that means
4169  * exactly...
4170  *
4171  * Version 3 and 7
4172  *
4173  * Params:
4174  *  NumPasses: Address to write the number of necessary passes for the
4175  *             desired effect to.
4176  *
4177  * Returns:
4178  *  D3D_OK on success
4179  *  See IWineD3DDevice::ValidateDevice for more details
4180  *
4181  *****************************************************************************/
4182 static HRESULT WINAPI
4183 IDirect3DDeviceImpl_7_ValidateDevice(IDirect3DDevice7 *iface,
4184                                      DWORD *NumPasses)
4185 {
4186     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4187     TRACE("(%p)->(%p): Relay\n", This, NumPasses);
4188
4189     return IWineD3DDevice_ValidateDevice(This->wineD3DDevice, NumPasses);
4190 }
4191
4192 static HRESULT WINAPI
4193 Thunk_IDirect3DDeviceImpl_3_ValidateDevice(IDirect3DDevice3 *iface,
4194                                            DWORD *Passes)
4195 {
4196     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice3, iface);
4197     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DDevice7 interface.\n", This, Passes);
4198     return IDirect3DDevice7_ValidateDevice(ICOM_INTERFACE(This, IDirect3DDevice7),
4199                                            Passes);
4200 }
4201
4202 /*****************************************************************************
4203  * IDirect3DDevice7::Clear
4204  *
4205  * Fills the render target, the z buffer and the stencil buffer with a
4206  * clear color / value
4207  *
4208  * Version 7 only
4209  *
4210  * Params:
4211  *  Count: Number of rectangles in Rects must be 0 if Rects is NULL
4212  *  Rects: Rectangles to clear. If NULL, the whole surface is cleared
4213  *  Flags: Some flags, as usual
4214  *  Color: Clear color for the render target
4215  *  Z: Clear value for the Z buffer
4216  *  Stencil: Clear value to store in each stencil buffer entry
4217  *
4218  * Returns:
4219  *  D3D_OK on success
4220  *  For details, see IWineD3DDevice::Clear
4221  *
4222  *****************************************************************************/
4223 static HRESULT WINAPI
4224 IDirect3DDeviceImpl_7_Clear(IDirect3DDevice7 *iface,
4225                             DWORD Count,
4226                             D3DRECT *Rects,
4227                             DWORD Flags,
4228                             D3DCOLOR Color,
4229                             D3DVALUE Z,
4230                             DWORD Stencil)
4231 {
4232     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4233     TRACE("(%p)->(%08x,%p,%08x,%08x,%f,%08x): Relay\n", This, Count, Rects, Flags, (DWORD) Color, Z, Stencil);
4234
4235     /* Note; D3DRECT is compatible with WINED3DRECT */
4236     return IWineD3DDevice_Clear(This->wineD3DDevice, Count, (WINED3DRECT*) Rects, Flags, Color, Z, Stencil);
4237 }
4238
4239 /*****************************************************************************
4240  * IDirect3DDevice7::SetViewport
4241  *
4242  * Sets the current viewport.
4243  *
4244  * Version 7 only, but IDirect3DViewport uses this call for older
4245  * versions
4246  *
4247  * Params:
4248  *  Data: The new viewport to set
4249  *
4250  * Returns:
4251  *  D3D_OK on success
4252  *  DDERR_INVALIDPARAMS if Data is NULL
4253  *  For more details, see IWineDDDevice::SetViewport
4254  *
4255  *****************************************************************************/
4256 static HRESULT WINAPI
4257 IDirect3DDeviceImpl_7_SetViewport(IDirect3DDevice7 *iface,
4258                                   D3DVIEWPORT7 *Data)
4259 {
4260     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4261     TRACE("(%p)->(%p) Relay!\n", This, Data);
4262
4263     if(!Data)
4264         return DDERR_INVALIDPARAMS;
4265
4266     /* Note: D3DVIEWPORT7 is compatible with WINED3DVIEWPORT */
4267     return IWineD3DDevice_SetViewport(This->wineD3DDevice,
4268                                       (WINED3DVIEWPORT*) Data);
4269 }
4270
4271 /*****************************************************************************
4272  * IDirect3DDevice::GetViewport
4273  *
4274  * Returns the current viewport
4275  *
4276  * Version 7
4277  *
4278  * Params:
4279  *  Data: D3D7Viewport structure to write the viewport information to
4280  *
4281  * Returns:
4282  *  D3D_OK on success
4283  *  DDERR_INVALIDPARAMS if Data is NULL
4284  *  For more details, see IWineD3DDevice::GetViewport
4285  *
4286  *****************************************************************************/
4287 static HRESULT WINAPI
4288 IDirect3DDeviceImpl_7_GetViewport(IDirect3DDevice7 *iface,
4289                                   D3DVIEWPORT7 *Data)
4290 {
4291     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4292     HRESULT hr;
4293     TRACE("(%p)->(%p) Relay!\n", This, Data);
4294
4295     if(!Data)
4296         return DDERR_INVALIDPARAMS;
4297
4298     /* Note: D3DVIEWPORT7 is compatible with WINED3DVIEWPORT */
4299     hr = IWineD3DDevice_GetViewport(This->wineD3DDevice,
4300                                     (WINED3DVIEWPORT*) Data);
4301
4302     return hr_ddraw_from_wined3d(hr);
4303 }
4304
4305 /*****************************************************************************
4306  * IDirect3DDevice7::SetMaterial
4307  *
4308  * Sets the Material
4309  *
4310  * Version 7
4311  *
4312  * Params:
4313  *  Mat: The material to set
4314  *
4315  * Returns:
4316  *  D3D_OK on success
4317  *  DDERR_INVALIDPARAMS if Mat is NULL.
4318  *  For more details, see IWineD3DDevice::SetMaterial
4319  *
4320  *****************************************************************************/
4321 static HRESULT WINAPI
4322 IDirect3DDeviceImpl_7_SetMaterial(IDirect3DDevice7 *iface,
4323                                   D3DMATERIAL7 *Mat)
4324 {
4325     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4326     HRESULT hr;
4327     TRACE("(%p)->(%p): Relay!\n", This, Mat);
4328
4329     /* Note: D3DMATERIAL7 is compatible with WINED3DMATERIAL */
4330     hr = IWineD3DDevice_SetMaterial(This->wineD3DDevice,
4331                                     (WINED3DMATERIAL*) Mat);
4332
4333     return hr_ddraw_from_wined3d(hr);
4334 }
4335
4336 /*****************************************************************************
4337  * IDirect3DDevice7::GetMaterial
4338  *
4339  * Returns the current material
4340  *
4341  * Version 7
4342  *
4343  * Params:
4344  *  Mat: D3DMATERIAL7 structure to write the material parameters to
4345  *
4346  * Returns:
4347  *  D3D_OK on success
4348  *  DDERR_INVALIDPARAMS if Mat is NULL
4349  *  For more details, see IWineD3DDevice::GetMaterial
4350  *
4351  *****************************************************************************/
4352 static HRESULT WINAPI
4353 IDirect3DDeviceImpl_7_GetMaterial(IDirect3DDevice7 *iface,
4354                                   D3DMATERIAL7 *Mat)
4355 {
4356     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4357     HRESULT hr;
4358     TRACE("(%p)->(%p): Relay!\n", This, Mat);
4359
4360     /* Note: D3DMATERIAL7 is compatible with WINED3DMATERIAL */
4361     hr = IWineD3DDevice_GetMaterial(This->wineD3DDevice,
4362                                     (WINED3DMATERIAL*) Mat);
4363
4364     return hr_ddraw_from_wined3d(hr);
4365 }
4366
4367 /*****************************************************************************
4368  * IDirect3DDevice7::SetLight
4369  *
4370  * Assigns a light to a light index, but doesn't activate it yet.
4371  *
4372  * Version 7, IDirect3DLight uses this method for older versions
4373  *
4374  * Params:
4375  *  LightIndex: The index of the new light
4376  *  Light: A D3DLIGHT7 structure describing the light
4377  *
4378  * Returns:
4379  *  D3D_OK on success
4380  *  For more details, see IWineD3DDevice::SetLight
4381  *
4382  *****************************************************************************/
4383 static HRESULT WINAPI
4384 IDirect3DDeviceImpl_7_SetLight(IDirect3DDevice7 *iface,
4385                                DWORD LightIndex,
4386                                D3DLIGHT7 *Light)
4387 {
4388     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4389     HRESULT hr;
4390     TRACE("(%p)->(%08x,%p): Relay!\n", This, LightIndex, Light);
4391
4392     /* Note: D3DLIGHT7 is compatible with WINED3DLIGHT */
4393     hr = IWineD3DDevice_SetLight(This->wineD3DDevice,
4394                                  LightIndex,
4395                                  (WINED3DLIGHT*) Light);
4396
4397     return hr_ddraw_from_wined3d(hr);
4398 }
4399
4400 /*****************************************************************************
4401  * IDirect3DDevice7::GetLight
4402  *
4403  * Returns the light assigned to a light index
4404  *
4405  * Params:
4406  *  Light: Structure to write the light information to
4407  *
4408  * Returns:
4409  *  D3D_OK on success
4410  *  DDERR_INVALIDPARAMS if Light is NULL
4411  *  For details, see IWineD3DDevice::GetLight
4412  *
4413  *****************************************************************************/
4414 static HRESULT WINAPI
4415 IDirect3DDeviceImpl_7_GetLight(IDirect3DDevice7 *iface,
4416                                DWORD LightIndex,
4417                                D3DLIGHT7 *Light)
4418 {
4419     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4420     HRESULT rc;
4421     TRACE("(%p)->(%08x,%p): Relay!\n", This, LightIndex, Light);
4422
4423     /* Note: D3DLIGHT7 is compatible with WINED3DLIGHT */
4424     rc =  IWineD3DDevice_GetLight(This->wineD3DDevice,
4425                                   LightIndex,
4426                                   (WINED3DLIGHT*) Light);
4427
4428     /* Translate the result. WineD3D returns other values than D3D7 */
4429     return hr_ddraw_from_wined3d(rc);
4430 }
4431
4432 /*****************************************************************************
4433  * IDirect3DDevice7::BeginStateBlock
4434  *
4435  * Begins recording to a stateblock
4436  *
4437  * Version 7
4438  *
4439  * Returns:
4440  *  D3D_OK on success
4441  *  For details see IWineD3DDevice::BeginStateBlock
4442  *
4443  *****************************************************************************/
4444 static HRESULT WINAPI
4445 IDirect3DDeviceImpl_7_BeginStateBlock(IDirect3DDevice7 *iface)
4446 {
4447     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4448     HRESULT hr;
4449     TRACE("(%p)->(): Relay!\n", This);
4450
4451     hr = IWineD3DDevice_BeginStateBlock(This->wineD3DDevice);
4452     return hr_ddraw_from_wined3d(hr);
4453 }
4454
4455 /*****************************************************************************
4456  * IDirect3DDevice7::EndStateBlock
4457  *
4458  * Stops recording to a state block and returns the created stateblock
4459  * handle.
4460  *
4461  * Version 7
4462  *
4463  * Params:
4464  *  BlockHandle: Address to store the stateblock's handle to
4465  *
4466  * Returns:
4467  *  D3D_OK on success
4468  *  DDERR_INVALIDPARAMS if BlockHandle is NULL
4469  *  See IWineD3DDevice::EndStateBlock for more details
4470  *
4471  *****************************************************************************/
4472 static HRESULT WINAPI
4473 IDirect3DDeviceImpl_7_EndStateBlock(IDirect3DDevice7 *iface,
4474                                     DWORD *BlockHandle)
4475 {
4476     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4477     HRESULT hr;
4478     TRACE("(%p)->(%p): Relay!\n", This, BlockHandle);
4479
4480     if(!BlockHandle)
4481     {
4482         WARN("BlockHandle == NULL, returning DDERR_INVALIDPARAMS\n");
4483         return DDERR_INVALIDPARAMS;
4484     }
4485
4486     *BlockHandle = IDirect3DDeviceImpl_CreateHandle(This);
4487     if(!*BlockHandle)
4488     {
4489         ERR("Cannot get a handle number for the stateblock\n");
4490         return DDERR_OUTOFMEMORY;
4491     }
4492     This->Handles[*BlockHandle - 1].type = DDrawHandle_StateBlock;
4493     hr = IWineD3DDevice_EndStateBlock(This->wineD3DDevice,
4494                                       (IWineD3DStateBlock **) &This->Handles[*BlockHandle - 1].ptr);
4495     return hr_ddraw_from_wined3d(hr);
4496 }
4497
4498 /*****************************************************************************
4499  * IDirect3DDevice7::PreLoad
4500  *
4501  * Allows the app to signal that a texture will be used soon, to allow
4502  * the Direct3DDevice to load it to the video card in the meantime.
4503  *
4504  * Version 7
4505  *
4506  * Params:
4507  *  Texture: The texture to preload
4508  *
4509  * Returns:
4510  *  D3D_OK on success
4511  *  DDERR_INVALIDPARAMS if Texture is NULL
4512  *  See IWineD3DSurface::PreLoad for details
4513  *
4514  *****************************************************************************/
4515 static HRESULT WINAPI
4516 IDirect3DDeviceImpl_7_PreLoad(IDirect3DDevice7 *iface,
4517                               IDirectDrawSurface7 *Texture)
4518 {
4519     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4520     IDirectDrawSurfaceImpl *surf = ICOM_OBJECT(IDirectDrawSurfaceImpl, IDirectDrawSurface7, Texture);
4521
4522     TRACE("(%p)->(%p): Relay!\n", This, surf);
4523
4524     if(!Texture)
4525         return DDERR_INVALIDPARAMS;
4526
4527     IWineD3DSurface_PreLoad(surf->WineD3DSurface);
4528     return D3D_OK;
4529 }
4530
4531 /*****************************************************************************
4532  * IDirect3DDevice7::ApplyStateBlock
4533  *
4534  * Activates the state stored in a state block handle.
4535  *
4536  * Params:
4537  *  BlockHandle: The stateblock handle to activate
4538  *
4539  * Returns:
4540  *  D3D_OK on success
4541  *  D3DERR_INVALIDSTATEBLOCK if BlockHandle is NULL
4542  *
4543  *****************************************************************************/
4544 static HRESULT WINAPI
4545 IDirect3DDeviceImpl_7_ApplyStateBlock(IDirect3DDevice7 *iface,
4546                                       DWORD BlockHandle)
4547 {
4548     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4549     HRESULT hr;
4550     TRACE("(%p)->(%08x): Relay!\n", This, BlockHandle);
4551
4552     if(!BlockHandle || BlockHandle > This->numHandles)
4553     {
4554         WARN("Out of range handle %d, returning D3DERR_INVALIDSTATEBLOCK\n", BlockHandle);
4555         return D3DERR_INVALIDSTATEBLOCK;
4556     }
4557     if(This->Handles[BlockHandle - 1].type != DDrawHandle_StateBlock)
4558     {
4559         WARN("Handle %d is not a stateblock, returning D3DERR_INVALIDSTATEBLOCK\n", BlockHandle);
4560         return D3DERR_INVALIDSTATEBLOCK;
4561     }
4562
4563     hr = IWineD3DStateBlock_Apply((IWineD3DStateBlock *) This->Handles[BlockHandle - 1].ptr);
4564     return hr_ddraw_from_wined3d(hr);
4565 }
4566
4567 /*****************************************************************************
4568  * IDirect3DDevice7::CaptureStateBlock
4569  *
4570  * Updates a stateblock's values to the values currently set for the device
4571  *
4572  * Version 7
4573  *
4574  * Params:
4575  *  BlockHandle: Stateblock to update
4576  *
4577  * Returns:
4578  *  D3D_OK on success
4579  *  D3DERR_INVALIDSTATEBLOCK if BlockHandle is NULL
4580  *  See IWineD3DDevice::CaptureStateBlock for more details
4581  *
4582  *****************************************************************************/
4583 static HRESULT WINAPI
4584 IDirect3DDeviceImpl_7_CaptureStateBlock(IDirect3DDevice7 *iface,
4585                                         DWORD BlockHandle)
4586 {
4587     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4588     HRESULT hr;
4589     TRACE("(%p)->(%08x): Relay!\n", This, BlockHandle);
4590
4591     if(BlockHandle == 0 || BlockHandle > This->numHandles)
4592     {
4593         WARN("Out of range handle %d, returning D3DERR_INVALIDSTATEBLOCK\n", BlockHandle);
4594         return D3DERR_INVALIDSTATEBLOCK;
4595     }
4596     if(This->Handles[BlockHandle - 1].type != DDrawHandle_StateBlock)
4597     {
4598         WARN("Handle %d is not a stateblock, returning D3DERR_INVALIDSTATEBLOCK\n", BlockHandle);
4599         return D3DERR_INVALIDSTATEBLOCK;
4600     }
4601
4602     hr = IWineD3DStateBlock_Capture((IWineD3DStateBlock *) This->Handles[BlockHandle - 1].ptr);
4603     return hr_ddraw_from_wined3d(hr);
4604 }
4605
4606 /*****************************************************************************
4607  * IDirect3DDevice7::DeleteStateBlock
4608  *
4609  * Deletes a stateblock handle. This means releasing the WineD3DStateBlock
4610  *
4611  * Version 7
4612  *
4613  * Params:
4614  *  BlockHandle: Stateblock handle to delete
4615  *
4616  * Returns:
4617  *  D3D_OK on success
4618  *  D3DERR_INVALIDSTATEBLOCK if BlockHandle is 0
4619  *
4620  *****************************************************************************/
4621 static HRESULT WINAPI
4622 IDirect3DDeviceImpl_7_DeleteStateBlock(IDirect3DDevice7 *iface,
4623                                        DWORD BlockHandle)
4624 {
4625     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4626     ULONG ref;
4627     TRACE("(%p)->(%08x): Relay!\n", This, BlockHandle);
4628
4629     if(BlockHandle == 0 || BlockHandle > This->numHandles)
4630     {
4631         WARN("Out of range handle %d, returning D3DERR_INVALIDSTATEBLOCK\n", BlockHandle);
4632         return D3DERR_INVALIDSTATEBLOCK;
4633     }
4634     if(This->Handles[BlockHandle - 1].type != DDrawHandle_StateBlock)
4635     {
4636         WARN("Handle %d is not a stateblock, returning D3DERR_INVALIDSTATEBLOCK\n", BlockHandle);
4637         return D3DERR_INVALIDSTATEBLOCK;
4638     }
4639
4640     ref = IWineD3DStateBlock_Release((IWineD3DStateBlock *) This->Handles[BlockHandle - 1].ptr);
4641     if(ref)
4642     {
4643         ERR("Something is still holding the stateblock %p(Handle %d). Ref = %d\n", This->Handles[BlockHandle - 1].ptr, BlockHandle, ref);
4644     }
4645     This->Handles[BlockHandle - 1].ptr = NULL;
4646     This->Handles[BlockHandle - 1].type = DDrawHandle_Unknown;
4647
4648     return D3D_OK;
4649 }
4650
4651 /*****************************************************************************
4652  * IDirect3DDevice7::CreateStateBlock
4653  *
4654  * Creates a new state block handle.
4655  *
4656  * Version 7
4657  *
4658  * Params:
4659  *  Type: The state block type
4660  *  BlockHandle: Address to write the created handle to
4661  *
4662  * Returns:
4663  *   D3D_OK on success
4664  *   DDERR_INVALIDPARAMS if BlockHandle is NULL
4665  *
4666  *****************************************************************************/
4667 static HRESULT WINAPI
4668 IDirect3DDeviceImpl_7_CreateStateBlock(IDirect3DDevice7 *iface,
4669                                        D3DSTATEBLOCKTYPE Type,
4670                                        DWORD *BlockHandle)
4671 {
4672     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4673     HRESULT hr;
4674     TRACE("(%p)->(%08x,%p)!\n", This, Type, BlockHandle);
4675
4676     if(!BlockHandle)
4677     {
4678         WARN("BlockHandle == NULL, returning DDERR_INVALIDPARAMS\n");
4679         return DDERR_INVALIDPARAMS;
4680     }
4681
4682     *BlockHandle = IDirect3DDeviceImpl_CreateHandle(This);
4683     if(!*BlockHandle)
4684     {
4685         ERR("Cannot get a handle number for the stateblock\n");
4686         return DDERR_OUTOFMEMORY;
4687     }
4688     This->Handles[*BlockHandle - 1].type = DDrawHandle_StateBlock;
4689
4690     /* The D3DSTATEBLOCKTYPE enum is fine here */
4691     hr = IWineD3DDevice_CreateStateBlock(This->wineD3DDevice,
4692                                          Type,
4693                                          (IWineD3DStateBlock **) &This->Handles[*BlockHandle - 1].ptr,
4694                                          NULL /* Parent, hope that works */);
4695     return hr_ddraw_from_wined3d(hr);
4696 }
4697
4698 /*****************************************************************************
4699  * IDirect3DDevice7::Load
4700  *
4701  * Loads a rectangular area from the source into the destination texture.
4702  * It can also copy the source to the faces of a cubic environment map
4703  *
4704  * Version 7
4705  *
4706  * Params:
4707  *  DestTex: Destination texture
4708  *  DestPoint: Point in the destination where the source image should be
4709  *             written to
4710  *  SrcTex: Source texture
4711  *  SrcRect: Source rectangle
4712  *  Flags: Some flags
4713  *
4714  * Returns:
4715  *  D3D_OK on success
4716  *  DDERR_INVALIDPARAMS if DestTex or SrcTex are NULL
4717  *  See IDirect3DTexture2::Load for details
4718  *
4719  *****************************************************************************/
4720 static HRESULT WINAPI
4721 IDirect3DDeviceImpl_7_Load(IDirect3DDevice7 *iface,
4722                            IDirectDrawSurface7 *DestTex,
4723                            POINT *DestPoint,
4724                            IDirectDrawSurface7 *SrcTex,
4725                            RECT *SrcRect,
4726                            DWORD Flags)
4727 {
4728     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4729     IDirectDrawSurfaceImpl *dest = ICOM_OBJECT(IDirectDrawSurfaceImpl, IDirectDrawSurface7, DestTex);
4730     IDirectDrawSurfaceImpl *src = ICOM_OBJECT(IDirectDrawSurfaceImpl, IDirectDrawSurface7, SrcTex);
4731     FIXME("(%p)->(%p,%p,%p,%p,%08x): Partially Implemented!\n", This, dest, DestPoint, src, SrcRect, Flags);
4732
4733     if( (!src) || (!dest) )
4734         return DDERR_INVALIDPARAMS;
4735
4736     IDirect3DTexture2_Load(ICOM_INTERFACE(dest, IDirect3DTexture2),
4737                            ICOM_INTERFACE(src, IDirect3DTexture2));
4738     return D3D_OK;
4739 }
4740
4741 /*****************************************************************************
4742  * IDirect3DDevice7::LightEnable
4743  *
4744  * Enables or disables a light
4745  *
4746  * Version 7, IDirect3DLight uses this method too.
4747  *
4748  * Params:
4749  *  LightIndex: The index of the light to enable / disable
4750  *  Enable: Enable or disable the light
4751  *
4752  * Returns:
4753  *  D3D_OK on success
4754  *  For more details, see IWineD3DDevice::SetLightEnable
4755  *
4756  *****************************************************************************/
4757 static HRESULT WINAPI
4758 IDirect3DDeviceImpl_7_LightEnable(IDirect3DDevice7 *iface,
4759                                   DWORD LightIndex,
4760                                   BOOL Enable)
4761 {
4762     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4763     HRESULT hr;
4764     TRACE("(%p)->(%08x,%d): Relay!\n", This, LightIndex, Enable);
4765
4766     hr = IWineD3DDevice_SetLightEnable(This->wineD3DDevice, LightIndex, Enable);
4767     return hr_ddraw_from_wined3d(hr);
4768 }
4769
4770 /*****************************************************************************
4771  * IDirect3DDevice7::GetLightEnable
4772  *
4773  * Retrieves if the light with the given index is enabled or not
4774  *
4775  * Version 7
4776  *
4777  * Params:
4778  *  LightIndex: Index of desired light
4779  *  Enable: Pointer to a BOOL which contains the result
4780  *
4781  * Returns:
4782  *  D3D_OK on success
4783  *  DDERR_INVALIDPARAMS if Enable is NULL
4784  *  See IWineD3DDevice::GetLightEnable for more details
4785  *
4786  *****************************************************************************/
4787 static HRESULT WINAPI
4788 IDirect3DDeviceImpl_7_GetLightEnable(IDirect3DDevice7 *iface,
4789                                      DWORD LightIndex,
4790                                      BOOL* Enable)
4791 {
4792     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4793     HRESULT hr;
4794     TRACE("(%p)->(%08x,%p): Relay\n", This, LightIndex, Enable);
4795
4796     if(!Enable)
4797         return DDERR_INVALIDPARAMS;
4798
4799     hr = IWineD3DDevice_GetLightEnable(This->wineD3DDevice, LightIndex, Enable);
4800     return hr_ddraw_from_wined3d(hr);
4801 }
4802
4803 /*****************************************************************************
4804  * IDirect3DDevice7::SetClipPlane
4805  *
4806  * Sets custom clipping plane
4807  *
4808  * Version 7
4809  *
4810  * Params:
4811  *  Index: The index of the clipping plane
4812  *  PlaneEquation: An equation defining the clipping plane
4813  *
4814  * Returns:
4815  *  D3D_OK on success
4816  *  DDERR_INVALIDPARAMS if PlaneEquation is NULL
4817  *  See IWineD3DDevice::SetClipPlane for more details
4818  *
4819  *****************************************************************************/
4820 static HRESULT WINAPI
4821 IDirect3DDeviceImpl_7_SetClipPlane(IDirect3DDevice7 *iface,
4822                                    DWORD Index,
4823                                    D3DVALUE* PlaneEquation)
4824 {
4825     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4826     TRACE("(%p)->(%08x,%p): Relay!\n", This, Index, PlaneEquation);
4827
4828     if(!PlaneEquation)
4829         return DDERR_INVALIDPARAMS;
4830
4831     return IWineD3DDevice_SetClipPlane(This->wineD3DDevice, Index, PlaneEquation);
4832 }
4833
4834 /*****************************************************************************
4835  * IDirect3DDevice7::GetClipPlane
4836  *
4837  * Returns the clipping plane with a specific index
4838  *
4839  * Params:
4840  *  Index: The index of the desired plane
4841  *  PlaneEquation: Address to store the plane equation to
4842  *
4843  * Returns:
4844  *  D3D_OK on success
4845  *  DDERR_INVALIDPARAMS if PlaneEquation is NULL
4846  *  See IWineD3DDevice::GetClipPlane for more details
4847  *
4848  *****************************************************************************/
4849 static HRESULT WINAPI
4850 IDirect3DDeviceImpl_7_GetClipPlane(IDirect3DDevice7 *iface,
4851                                    DWORD Index,
4852                                    D3DVALUE* PlaneEquation)
4853 {
4854     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4855     TRACE("(%p)->(%d,%p): Relay!\n", This, Index, PlaneEquation);
4856
4857     if(!PlaneEquation)
4858         return DDERR_INVALIDPARAMS;
4859
4860     return IWineD3DDevice_GetClipPlane(This->wineD3DDevice, Index, PlaneEquation);
4861 }
4862
4863 /*****************************************************************************
4864  * IDirect3DDevice7::GetInfo
4865  *
4866  * Retrieves some information about the device. The DirectX sdk says that
4867  * this version returns S_FALSE for all retail builds of DirectX, that's what
4868  * this implementation does.
4869  *
4870  * Params:
4871  *  DevInfoID: Information type requested
4872  *  DevInfoStruct: Pointer to a structure to store the info to
4873  *  Size: Size of the structure
4874  *
4875  * Returns:
4876  *  S_FALSE, because it's a non-debug driver
4877  *
4878  *****************************************************************************/
4879 static HRESULT WINAPI
4880 IDirect3DDeviceImpl_7_GetInfo(IDirect3DDevice7 *iface,
4881                               DWORD DevInfoID,
4882                               void *DevInfoStruct,
4883                               DWORD Size)
4884 {
4885     ICOM_THIS_FROM(IDirect3DDeviceImpl, IDirect3DDevice7, iface);
4886     TRACE("(%p)->(%08x,%p,%08x)\n", This, DevInfoID, DevInfoStruct, Size);
4887
4888     if (TRACE_ON(d3d7))
4889     {
4890         TRACE(" info requested : ");
4891         switch (DevInfoID)
4892         {
4893             case D3DDEVINFOID_TEXTUREMANAGER: TRACE("D3DDEVINFOID_TEXTUREMANAGER\n"); break;
4894             case D3DDEVINFOID_D3DTEXTUREMANAGER: TRACE("D3DDEVINFOID_D3DTEXTUREMANAGER\n"); break;
4895             case D3DDEVINFOID_TEXTURING: TRACE("D3DDEVINFOID_TEXTURING\n"); break;
4896             default: ERR(" invalid flag !!!\n"); return DDERR_INVALIDPARAMS;
4897         }
4898     }
4899
4900     return S_FALSE; /* According to MSDN, this is valid for a non-debug driver */
4901 }
4902
4903 const IDirect3DDevice7Vtbl IDirect3DDevice7_Vtbl =
4904 {
4905     /*** IUnknown Methods ***/
4906     IDirect3DDeviceImpl_7_QueryInterface,
4907     IDirect3DDeviceImpl_7_AddRef,
4908     IDirect3DDeviceImpl_7_Release,
4909     /*** IDirect3DDevice7 ***/
4910     IDirect3DDeviceImpl_7_GetCaps,
4911     IDirect3DDeviceImpl_7_EnumTextureFormats,
4912     IDirect3DDeviceImpl_7_BeginScene,
4913     IDirect3DDeviceImpl_7_EndScene,
4914     IDirect3DDeviceImpl_7_GetDirect3D,
4915     IDirect3DDeviceImpl_7_SetRenderTarget,
4916     IDirect3DDeviceImpl_7_GetRenderTarget,
4917     IDirect3DDeviceImpl_7_Clear,
4918     IDirect3DDeviceImpl_7_SetTransform,
4919     IDirect3DDeviceImpl_7_GetTransform,
4920     IDirect3DDeviceImpl_7_SetViewport,
4921     IDirect3DDeviceImpl_7_MultiplyTransform,
4922     IDirect3DDeviceImpl_7_GetViewport,
4923     IDirect3DDeviceImpl_7_SetMaterial,
4924     IDirect3DDeviceImpl_7_GetMaterial,
4925     IDirect3DDeviceImpl_7_SetLight,
4926     IDirect3DDeviceImpl_7_GetLight,
4927     IDirect3DDeviceImpl_7_SetRenderState,
4928     IDirect3DDeviceImpl_7_GetRenderState,
4929     IDirect3DDeviceImpl_7_BeginStateBlock,
4930     IDirect3DDeviceImpl_7_EndStateBlock,
4931     IDirect3DDeviceImpl_7_PreLoad,
4932     IDirect3DDeviceImpl_7_DrawPrimitive,
4933     IDirect3DDeviceImpl_7_DrawIndexedPrimitive,
4934     IDirect3DDeviceImpl_7_SetClipStatus,
4935     IDirect3DDeviceImpl_7_GetClipStatus,
4936     IDirect3DDeviceImpl_7_DrawPrimitiveStrided,
4937     IDirect3DDeviceImpl_7_DrawIndexedPrimitiveStrided,
4938     IDirect3DDeviceImpl_7_DrawPrimitiveVB,
4939     IDirect3DDeviceImpl_7_DrawIndexedPrimitiveVB,
4940     IDirect3DDeviceImpl_7_ComputeSphereVisibility,
4941     IDirect3DDeviceImpl_7_GetTexture,
4942     IDirect3DDeviceImpl_7_SetTexture,
4943     IDirect3DDeviceImpl_7_GetTextureStageState,
4944     IDirect3DDeviceImpl_7_SetTextureStageState,
4945     IDirect3DDeviceImpl_7_ValidateDevice,
4946     IDirect3DDeviceImpl_7_ApplyStateBlock,
4947     IDirect3DDeviceImpl_7_CaptureStateBlock,
4948     IDirect3DDeviceImpl_7_DeleteStateBlock,
4949     IDirect3DDeviceImpl_7_CreateStateBlock,
4950     IDirect3DDeviceImpl_7_Load,
4951     IDirect3DDeviceImpl_7_LightEnable,
4952     IDirect3DDeviceImpl_7_GetLightEnable,
4953     IDirect3DDeviceImpl_7_SetClipPlane,
4954     IDirect3DDeviceImpl_7_GetClipPlane,
4955     IDirect3DDeviceImpl_7_GetInfo
4956 };
4957
4958 const IDirect3DDevice3Vtbl IDirect3DDevice3_Vtbl =
4959 {
4960     /*** IUnknown Methods ***/
4961     Thunk_IDirect3DDeviceImpl_3_QueryInterface,
4962     Thunk_IDirect3DDeviceImpl_3_AddRef,
4963     Thunk_IDirect3DDeviceImpl_3_Release,
4964     /*** IDirect3DDevice3 ***/
4965     IDirect3DDeviceImpl_3_GetCaps,
4966     IDirect3DDeviceImpl_3_GetStats,
4967     IDirect3DDeviceImpl_3_AddViewport,
4968     IDirect3DDeviceImpl_3_DeleteViewport,
4969     IDirect3DDeviceImpl_3_NextViewport,
4970     Thunk_IDirect3DDeviceImpl_3_EnumTextureFormats,
4971     Thunk_IDirect3DDeviceImpl_3_BeginScene,
4972     Thunk_IDirect3DDeviceImpl_3_EndScene,
4973     Thunk_IDirect3DDeviceImpl_3_GetDirect3D,
4974     IDirect3DDeviceImpl_3_SetCurrentViewport,
4975     IDirect3DDeviceImpl_3_GetCurrentViewport,
4976     Thunk_IDirect3DDeviceImpl_3_SetRenderTarget,
4977     Thunk_IDirect3DDeviceImpl_3_GetRenderTarget,
4978     IDirect3DDeviceImpl_3_Begin,
4979     IDirect3DDeviceImpl_3_BeginIndexed,
4980     IDirect3DDeviceImpl_3_Vertex,
4981     IDirect3DDeviceImpl_3_Index,
4982     IDirect3DDeviceImpl_3_End,
4983     Thunk_IDirect3DDeviceImpl_3_GetRenderState,
4984     Thunk_IDirect3DDeviceImpl_3_SetRenderState,
4985     IDirect3DDeviceImpl_3_GetLightState,
4986     IDirect3DDeviceImpl_3_SetLightState,
4987     Thunk_IDirect3DDeviceImpl_3_SetTransform,
4988     Thunk_IDirect3DDeviceImpl_3_GetTransform,
4989     Thunk_IDirect3DDeviceImpl_3_MultiplyTransform,
4990     Thunk_IDirect3DDeviceImpl_3_DrawPrimitive,
4991     Thunk_IDirect3DDeviceImpl_3_DrawIndexedPrimitive,
4992     Thunk_IDirect3DDeviceImpl_3_SetClipStatus,
4993     Thunk_IDirect3DDeviceImpl_3_GetClipStatus,
4994     Thunk_IDirect3DDeviceImpl_3_DrawPrimitiveStrided,
4995     Thunk_IDirect3DDeviceImpl_3_DrawIndexedPrimitiveStrided,
4996     Thunk_IDirect3DDeviceImpl_3_DrawPrimitiveVB,
4997     Thunk_IDirect3DDeviceImpl_3_DrawIndexedPrimitiveVB,
4998     Thunk_IDirect3DDeviceImpl_3_ComputeSphereVisibility,
4999     Thunk_IDirect3DDeviceImpl_3_GetTexture,
5000     Thunk_IDirect3DDeviceImpl_3_SetTexture,
5001     Thunk_IDirect3DDeviceImpl_3_GetTextureStageState,
5002     Thunk_IDirect3DDeviceImpl_3_SetTextureStageState,
5003     Thunk_IDirect3DDeviceImpl_3_ValidateDevice
5004 };
5005
5006 const IDirect3DDevice2Vtbl IDirect3DDevice2_Vtbl =
5007 {
5008     /*** IUnknown Methods ***/
5009     Thunk_IDirect3DDeviceImpl_2_QueryInterface,
5010     Thunk_IDirect3DDeviceImpl_2_AddRef,
5011     Thunk_IDirect3DDeviceImpl_2_Release,
5012     /*** IDirect3DDevice2 ***/
5013     Thunk_IDirect3DDeviceImpl_2_GetCaps,
5014     IDirect3DDeviceImpl_2_SwapTextureHandles,
5015     Thunk_IDirect3DDeviceImpl_2_GetStats,
5016     Thunk_IDirect3DDeviceImpl_2_AddViewport,
5017     Thunk_IDirect3DDeviceImpl_2_DeleteViewport,
5018     Thunk_IDirect3DDeviceImpl_2_NextViewport,
5019     IDirect3DDeviceImpl_2_EnumTextureFormats,
5020     Thunk_IDirect3DDeviceImpl_2_BeginScene,
5021     Thunk_IDirect3DDeviceImpl_2_EndScene,
5022     Thunk_IDirect3DDeviceImpl_2_GetDirect3D,
5023     Thunk_IDirect3DDeviceImpl_2_SetCurrentViewport,
5024     Thunk_IDirect3DDeviceImpl_2_GetCurrentViewport,
5025     Thunk_IDirect3DDeviceImpl_2_SetRenderTarget,
5026     Thunk_IDirect3DDeviceImpl_2_GetRenderTarget,
5027     Thunk_IDirect3DDeviceImpl_2_Begin,
5028     Thunk_IDirect3DDeviceImpl_2_BeginIndexed,
5029     Thunk_IDirect3DDeviceImpl_2_Vertex,
5030     Thunk_IDirect3DDeviceImpl_2_Index,
5031     Thunk_IDirect3DDeviceImpl_2_End,
5032     Thunk_IDirect3DDeviceImpl_2_GetRenderState,
5033     Thunk_IDirect3DDeviceImpl_2_SetRenderState,
5034     Thunk_IDirect3DDeviceImpl_2_GetLightState,
5035     Thunk_IDirect3DDeviceImpl_2_SetLightState,
5036     Thunk_IDirect3DDeviceImpl_2_SetTransform,
5037     Thunk_IDirect3DDeviceImpl_2_GetTransform,
5038     Thunk_IDirect3DDeviceImpl_2_MultiplyTransform,
5039     Thunk_IDirect3DDeviceImpl_2_DrawPrimitive,
5040     Thunk_IDirect3DDeviceImpl_2_DrawIndexedPrimitive,
5041     Thunk_IDirect3DDeviceImpl_2_SetClipStatus,
5042     Thunk_IDirect3DDeviceImpl_2_GetClipStatus
5043 };
5044
5045 const IDirect3DDeviceVtbl IDirect3DDevice1_Vtbl =
5046 {
5047     /*** IUnknown Methods ***/
5048     Thunk_IDirect3DDeviceImpl_1_QueryInterface,
5049     Thunk_IDirect3DDeviceImpl_1_AddRef,
5050     Thunk_IDirect3DDeviceImpl_1_Release,
5051     /*** IDirect3DDevice1 ***/
5052     IDirect3DDeviceImpl_1_Initialize,
5053     Thunk_IDirect3DDeviceImpl_1_GetCaps,
5054     Thunk_IDirect3DDeviceImpl_1_SwapTextureHandles,
5055     IDirect3DDeviceImpl_1_CreateExecuteBuffer,
5056     Thunk_IDirect3DDeviceImpl_1_GetStats,
5057     IDirect3DDeviceImpl_1_Execute,
5058     Thunk_IDirect3DDeviceImpl_1_AddViewport,
5059     Thunk_IDirect3DDeviceImpl_1_DeleteViewport,
5060     Thunk_IDirect3DDeviceImpl_1_NextViewport,
5061     IDirect3DDeviceImpl_1_Pick,
5062     IDirect3DDeviceImpl_1_GetPickRecords,
5063     Thunk_IDirect3DDeviceImpl_1_EnumTextureFormats,
5064     IDirect3DDeviceImpl_1_CreateMatrix,
5065     IDirect3DDeviceImpl_1_SetMatrix,
5066     IDirect3DDeviceImpl_1_GetMatrix,
5067     IDirect3DDeviceImpl_1_DeleteMatrix,
5068     Thunk_IDirect3DDeviceImpl_1_EndScene,
5069     Thunk_IDirect3DDeviceImpl_1_BeginScene,
5070     Thunk_IDirect3DDeviceImpl_1_GetDirect3D
5071 };
5072
5073 /*****************************************************************************
5074  * IDirect3DDeviceImpl_CreateHandle
5075  *
5076  * Not called from the VTable
5077  *
5078  * Some older interface versions operate with handles, which are basically
5079  * DWORDs which identify an interface, for example
5080  * IDirect3DDevice::SetRenderState with DIRECT3DRENDERSTATE_TEXTUREHANDLE
5081  *
5082  * Those handle could be just casts to the interface pointers or vice versa,
5083  * but that is not 64 bit safe and would mean blindly derefering a DWORD
5084  * passed by the app. Instead there is a dynamic array in the device which
5085  * keeps a DWORD to pointer information and a type for the handle.
5086  *
5087  * Basically this array only grows, when a handle is freed its pointer is
5088  * just set to NULL. There will be much more reads from the array than
5089  * insertion operations, so a dynamic array is fine.
5090  *
5091  * Params:
5092  *  This: D3DDevice implementation for which this handle should be created
5093  *
5094  * Returns:
5095  *  A free handle on success
5096  *  0 on failure
5097  *
5098  *****************************************************************************/
5099 DWORD
5100 IDirect3DDeviceImpl_CreateHandle(IDirect3DDeviceImpl *This)
5101 {
5102     DWORD i;
5103     struct HandleEntry *oldHandles = This->Handles;
5104
5105     TRACE("(%p)\n", This);
5106
5107     for(i = 0; i < This->numHandles; i++)
5108     {
5109         if(This->Handles[i].ptr == NULL &&
5110            This->Handles[i].type == DDrawHandle_Unknown)
5111         {
5112             TRACE("Reusing freed handle %d\n", i + 1);
5113             return i + 1;
5114         }
5115     }
5116
5117     TRACE("Growing the handle array\n");
5118
5119     This->numHandles++;
5120     This->Handles = HeapAlloc(GetProcessHeap(), 0, sizeof(struct HandleEntry) * This->numHandles);
5121     if(!This->Handles)
5122     {
5123         ERR("Out of memory\n");
5124         This->Handles = oldHandles;
5125         This->numHandles--;
5126         return 0;
5127     }
5128     if(oldHandles)
5129     {
5130         memcpy(This->Handles, oldHandles, (This->numHandles - 1) * sizeof(struct HandleEntry));
5131         HeapFree(GetProcessHeap(), 0, oldHandles);
5132     }
5133
5134     TRACE("Returning %d\n", This->numHandles);
5135     return This->numHandles;
5136 }