dlls/ddraw/material.c

   1 /* Direct3D Material
   2  * Copyright (c) 2002 Lionel ULMER
   3  * Copyright (c) 2006 Stefan DÖSINGER
   4  *
   5  * This file contains the implementation of Direct3DMaterial.
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #include "config.h"
  23 #include "wine/port.h"
  24
  25 #include "ddraw_private.h"
  26
  27 WINE_DEFAULT_DEBUG_CHANNEL(d3d7);
  28 WINE_DECLARE_DEBUG_CHANNEL(ddraw_thunk);
  29
  30 static void dump_material(const D3DMATERIAL *mat)
  31 {
  32     TRACE("  dwSize : %d\n", mat->dwSize);
  33 }
  34
  35 static inline IDirect3DMaterialImpl *material_from_material1(IDirect3DMaterial *iface)
  36 {
  37     return (IDirect3DMaterialImpl *)((char*)iface - FIELD_OFFSET(IDirect3DMaterialImpl, IDirect3DMaterial_vtbl));
  38 }
  39
  40 static inline IDirect3DMaterialImpl *material_from_material2(IDirect3DMaterial2 *iface)
  41 {
  42     return (IDirect3DMaterialImpl *)((char*)iface - FIELD_OFFSET(IDirect3DMaterialImpl, IDirect3DMaterial2_vtbl));
  43 }
  44
  45 /*****************************************************************************
  46  * IUnknown Methods.
  47  *****************************************************************************/
  48
  49 /*****************************************************************************
  50  * IDirect3DMaterial3::QueryInterface
  51  *
  52  * QueryInterface for IDirect3DMaterial. Can query all IDirect3DMaterial
  53  * versions.
  54  *
  55  * Params:
  56  *  riid: Interface id queried for
  57  *  obj: Address to pass the interface pointer back
  58  *
  59  * Returns:
  60  *  S_OK on success
  61  *  E_NOINTERFACE if the requested interface wasn't found
  62  *
  63  *****************************************************************************/
  64 static HRESULT WINAPI
  65 IDirect3DMaterialImpl_QueryInterface(IDirect3DMaterial3 *iface,
  66                                      REFIID riid,
  67                                      LPVOID* obp)
  68 {
  69     IDirect3DMaterialImpl *This = (IDirect3DMaterialImpl *)iface;
  70     TRACE("(%p)->(%s,%p)\n", This, debugstr_guid(riid), obp);
  71
  72     *obp = NULL;
  73
  74     if ( IsEqualGUID( &IID_IUnknown,  riid ) ) {
  75         IUnknown_AddRef(iface);
  76         *obp = iface;
  77         TRACE("  Creating IUnknown interface at %p.\n", *obp);
  78         return S_OK;
  79     }
  80     if ( IsEqualGUID( &IID_IDirect3DMaterial, riid ) ) {
  81         IDirect3DMaterial_AddRef((IDirect3DMaterial *)&This->IDirect3DMaterial_vtbl);
  82         *obp = &This->IDirect3DMaterial_vtbl;
  83         TRACE("  Creating IDirect3DMaterial interface %p\n", *obp);
  84         return S_OK;
  85     }
  86     if ( IsEqualGUID( &IID_IDirect3DMaterial2, riid ) ) {
  87         IDirect3DMaterial_AddRef((IDirect3DMaterial2 *)&This->IDirect3DMaterial2_vtbl);
  88         *obp = &This->IDirect3DMaterial2_vtbl;
  89         TRACE("  Creating IDirect3DMaterial2 interface %p\n", *obp);
  90         return S_OK;
  91     }
  92     if ( IsEqualGUID( &IID_IDirect3DMaterial3, riid ) ) {
  93         IDirect3DMaterial3_AddRef((IDirect3DMaterial3 *)This);
  94         *obp = This;
  95         TRACE("  Creating IDirect3DMaterial3 interface %p\n", *obp);
  96         return S_OK;
  97     }
  98     FIXME("(%p): interface for IID %s NOT found!\n", This, debugstr_guid(riid));
  99     return E_NOINTERFACE;
 100 }
 101
 102 /*****************************************************************************
 103  * IDirect3DMaterial3::AddRef
 104  *
 105  * Increases the refcount.
 106  *
 107  * Returns:
 108  *  The new refcount
 109  *
 110  *****************************************************************************/
 111 static ULONG WINAPI
 112 IDirect3DMaterialImpl_AddRef(IDirect3DMaterial3 *iface)
 113 {
 114     IDirect3DMaterialImpl *This = (IDirect3DMaterialImpl *)iface;
 115     ULONG ref = InterlockedIncrement(&This->ref);
 116
 117     TRACE("(%p)->() incrementing from %u.\n", This, ref - 1);
 118
 119     return ref;
 120 }
 121
 122 /*****************************************************************************
 123  * IDirect3DMaterial3::Release
 124  *
 125  * Reduces the refcount by one. If the refcount falls to 0, the object
 126  * is destroyed
 127  *
 128  * Returns:
 129  *  The new refcount
 130  *
 131  *****************************************************************************/
 132 static ULONG WINAPI
 133 IDirect3DMaterialImpl_Release(IDirect3DMaterial3 *iface)
 134 {
 135     IDirect3DMaterialImpl *This = (IDirect3DMaterialImpl *)iface;
 136     ULONG ref = InterlockedDecrement(&This->ref);
 137
 138     TRACE("(%p)->() decrementing from %u.\n", This, ref + 1);
 139
 140     if (!ref)
 141     {
 142         if(This->Handle)
 143         {
 144             EnterCriticalSection(&ddraw_cs);
 145             ddraw_free_handle(&This->ddraw->d3ddevice->handle_table, This->Handle - 1, DDRAW_HANDLE_MATERIAL);
 146             LeaveCriticalSection(&ddraw_cs);
 147         }
 148
 149         HeapFree(GetProcessHeap(), 0, This);
 150         return 0;
 151     }
 152     return ref;
 153 }
 154
 155 /*****************************************************************************
 156  * IDirect3DMaterial Methods
 157  *****************************************************************************/
 158
 159 /*****************************************************************************
 160  * IDirect3DMaterial::Initialize
 161  *
 162  * A no-op initialization
 163  *
 164  * Params:
 165  *  Direct3D: Pointer to a Direct3D interface
 166  *
 167  * Returns:
 168  *  D3D_OK
 169  *
 170  *****************************************************************************/
 171 static HRESULT WINAPI
 172 IDirect3DMaterialImpl_Initialize(IDirect3DMaterial *iface,
 173                                   IDirect3D *Direct3D)
 174 {
 175     IDirect3DMaterialImpl *This = material_from_material1(iface);
 176
 177     TRACE("(%p)->(%p) no-op...!\n", This, Direct3D);
 178
 179     return D3D_OK;
 180 }
 181
 182 /*****************************************************************************
 183  * IDirect3DMaterial::Reserve
 184  *
 185  * DirectX 5 sdk: "The IDirect3DMaterial2::Reserve method is not implemented"
 186  * Odd. They seem to have mixed their interfaces.
 187  *
 188  * Returns:
 189  *  DDERR_UNSUPPORTED
 190  *
 191  *****************************************************************************/
 192 static HRESULT WINAPI
 193 IDirect3DMaterialImpl_Reserve(IDirect3DMaterial *iface)
 194 {
 195     IDirect3DMaterialImpl *This = material_from_material1(iface);
 196     TRACE("(%p)->() not implemented\n", This);
 197
 198     return DDERR_UNSUPPORTED;
 199 }
 200
 201 /*****************************************************************************
 202  * IDirect3DMaterial::Unreserve
 203  *
 204  * Not supported too
 205  *
 206  * Returns:
 207  *  DDERR_UNSUPPORTED
 208  *
 209  *****************************************************************************/
 210 static HRESULT WINAPI
 211 IDirect3DMaterialImpl_Unreserve(IDirect3DMaterial *iface)
 212 {
 213     IDirect3DMaterialImpl *This = material_from_material1(iface);
 214     TRACE("(%p)->() not implemented.\n", This);
 215
 216     return DDERR_UNSUPPORTED;
 217 }
 218
 219 /*****************************************************************************
 220  * IDirect3DMaterial3::SetMaterial
 221  *
 222  * Sets the material description
 223  *
 224  * Params:
 225  *  Mat: Material to set
 226  *
 227  * Returns:
 228  *  D3D_OK on success
 229  *  DDERR_INVALIDPARAMS if Mat is NULL
 230  *
 231  *****************************************************************************/
 232 static HRESULT WINAPI
 233 IDirect3DMaterialImpl_SetMaterial(IDirect3DMaterial3 *iface,
 234                                   D3DMATERIAL *lpMat)
 235 {
 236     IDirect3DMaterialImpl *This = (IDirect3DMaterialImpl *)iface;
 237     TRACE("(%p)->(%p)\n", This, lpMat);
 238     if (TRACE_ON(d3d7))
 239         dump_material(lpMat);
 240
 241     /* Stores the material */
 242     EnterCriticalSection(&ddraw_cs);
 243     memset(&This->mat, 0, sizeof(This->mat));
 244     memcpy(&This->mat, lpMat, lpMat->dwSize);
 245     LeaveCriticalSection(&ddraw_cs);
 246
 247     return DD_OK;
 248 }
 249
 250 /*****************************************************************************
 251  * IDirect3DMaterial3::GetMaterial
 252  *
 253  * Returns the material assigned to this interface
 254  *
 255  * Params:
 256  *  Mat: Pointer to a D3DMATERIAL structure to store the material description
 257  *
 258  * Returns:
 259  *  D3D_OK on success
 260  *  DDERR_INVALIDPARAMS if Mat is NULL
 261  *
 262  *****************************************************************************/
 263 static HRESULT WINAPI
 264 IDirect3DMaterialImpl_GetMaterial(IDirect3DMaterial3 *iface,
 265                                   D3DMATERIAL *lpMat)
 266 {
 267     IDirect3DMaterialImpl *This = (IDirect3DMaterialImpl *)iface;
 268     DWORD dwSize;
 269     TRACE("(%p)->(%p)\n", This, lpMat);
 270     if (TRACE_ON(d3d7)) {
 271         TRACE("  Returning material : ");
 272         dump_material(&This->mat);
 273     }
 274
 275     /* Copies the material structure */
 276     EnterCriticalSection(&ddraw_cs);
 277     dwSize = lpMat->dwSize;
 278     memcpy(lpMat, &This->mat, dwSize);
 279     LeaveCriticalSection(&ddraw_cs);
 280
 281     return DD_OK;
 282 }
 283
 284 /*****************************************************************************
 285  * IDirect3DMaterial3::GetHandle
 286  *
 287  * Returns a handle for the material interface. The handle is simply a
 288  * pointer to the material implementation
 289  *
 290  * Params:
 291  *  Direct3DDevice3: The device this handle is assigned to
 292  *  Handle: Address to write the handle to
 293  *
 294  * Returns:
 295  *  D3D_OK on success
 296  *  DDERR_INVALIDPARAMS if Handle is NULL
 297  *
 298  *****************************************************************************/
 299 static HRESULT WINAPI
 300 IDirect3DMaterialImpl_GetHandle(IDirect3DMaterial3 *iface,
 301                                 IDirect3DDevice3 *lpDirect3DDevice3,
 302                                 D3DMATERIALHANDLE *lpHandle)
 303 {
 304     IDirect3DMaterialImpl *This = (IDirect3DMaterialImpl *)iface;
 305     IDirect3DDeviceImpl *device = device_from_device3(lpDirect3DDevice3);
 306     TRACE("(%p/%p)->(%p,%p)\n", This, iface, device, lpHandle);
 307
 308     EnterCriticalSection(&ddraw_cs);
 309     This->active_device = device;
 310     if(!This->Handle)
 311     {
 312         DWORD h = ddraw_allocate_handle(&device->handle_table, This, DDRAW_HANDLE_MATERIAL);
 313         if (h == DDRAW_INVALID_HANDLE)
 314         {
 315             ERR("Failed to allocate a material handle.\n");
 316             LeaveCriticalSection(&ddraw_cs);
 317             return DDERR_INVALIDPARAMS;   /* Unchecked */
 318         }
 319
 320         This->Handle = h + 1;
 321     }
 322     *lpHandle = This->Handle;
 323     TRACE(" returning handle %08x.\n", *lpHandle);
 324     LeaveCriticalSection(&ddraw_cs);
 325
 326     return D3D_OK;
 327 }
 328
 329 static HRESULT WINAPI
 330 Thunk_IDirect3DMaterialImpl_2_GetHandle(LPDIRECT3DMATERIAL2 iface,
 331                                         LPDIRECT3DDEVICE2 lpDirect3DDevice2,
 332                                         LPD3DMATERIALHANDLE lpHandle)
 333 {
 334     TRACE_(ddraw_thunk)("(%p)->(%p,%p) thunking to IDirect3DMaterial3 interface.\n", iface, lpDirect3DDevice2, lpHandle);
 335     return IDirect3DMaterial3_GetHandle((IDirect3DMaterial3 *)material_from_material2(iface), lpDirect3DDevice2 ?
 336             (IDirect3DDevice3 *)&device_from_device2(lpDirect3DDevice2)->IDirect3DDevice3_vtbl : NULL, lpHandle);
 337 }
 338
 339 static HRESULT WINAPI
 340 Thunk_IDirect3DMaterialImpl_1_GetHandle(LPDIRECT3DMATERIAL iface,
 341                                         LPDIRECT3DDEVICE lpDirect3DDevice,
 342                                         LPD3DMATERIALHANDLE lpHandle)
 343 {
 344     TRACE_(ddraw_thunk)("(%p)->(%p,%p) thunking to IDirect3DMaterial3 interface.\n", iface, lpDirect3DDevice, lpHandle);
 345     return IDirect3DMaterial3_GetHandle((IDirect3DMaterial3 *)material_from_material1(iface), lpDirect3DDevice ?
 346             (IDirect3DDevice3 *)&device_from_device1(lpDirect3DDevice)->IDirect3DDevice3_vtbl : NULL, lpHandle);
 347 }
 348
 349 static HRESULT WINAPI
 350 Thunk_IDirect3DMaterialImpl_2_QueryInterface(LPDIRECT3DMATERIAL2 iface,
 351                                              REFIID riid,
 352                                              LPVOID* obp)
 353 {
 354     TRACE_(ddraw_thunk)("(%p)->(%s,%p) thunking to IDirect3DMaterial3 interface.\n", iface, debugstr_guid(riid), obp);
 355     return IDirect3DMaterial3_QueryInterface((IDirect3DMaterial3 *)material_from_material2(iface), riid, obp);
 356 }
 357
 358 static HRESULT WINAPI
 359 Thunk_IDirect3DMaterialImpl_1_QueryInterface(LPDIRECT3DMATERIAL iface,
 360                                              REFIID riid,
 361                                              LPVOID* obp)
 362 {
 363     TRACE_(ddraw_thunk)("(%p)->(%s,%p) thunking to IDirect3DMaterial3 interface.\n", iface, debugstr_guid(riid), obp);
 364     return IDirect3DMaterial3_QueryInterface((IDirect3DMaterial3 *)material_from_material1(iface), riid, obp);
 365 }
 366
 367 static ULONG WINAPI
 368 Thunk_IDirect3DMaterialImpl_2_AddRef(LPDIRECT3DMATERIAL2 iface)
 369 {
 370     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DMaterial3 interface.\n", iface);
 371     return IDirect3DMaterial3_AddRef((IDirect3DMaterial3 *)material_from_material2(iface));
 372 }
 373
 374 static ULONG WINAPI
 375 Thunk_IDirect3DMaterialImpl_1_AddRef(LPDIRECT3DMATERIAL iface)
 376 {
 377     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DMaterial3 interface.\n", iface);
 378     return IDirect3DMaterial3_AddRef((IDirect3DMaterial3 *)material_from_material1(iface));
 379 }
 380
 381 static ULONG WINAPI
 382 Thunk_IDirect3DMaterialImpl_2_Release(LPDIRECT3DMATERIAL2 iface)
 383 {
 384     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DMaterial3 interface.\n", iface);
 385     return IDirect3DMaterial3_Release((IDirect3DMaterial3 *)material_from_material2(iface));
 386 }
 387
 388 static ULONG WINAPI
 389 Thunk_IDirect3DMaterialImpl_1_Release(LPDIRECT3DMATERIAL iface)
 390 {
 391     TRACE_(ddraw_thunk)("(%p)->() thunking to IDirect3DMaterial3 interface.\n", iface);
 392     return IDirect3DMaterial3_Release((IDirect3DMaterial3 *)material_from_material1(iface));
 393 }
 394
 395 static HRESULT WINAPI
 396 Thunk_IDirect3DMaterialImpl_2_SetMaterial(LPDIRECT3DMATERIAL2 iface,
 397                                           LPD3DMATERIAL lpMat)
 398 {
 399     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DMaterial3 interface.\n", iface, lpMat);
 400     return IDirect3DMaterial3_SetMaterial((IDirect3DMaterial3 *)material_from_material2(iface), lpMat);
 401 }
 402
 403 static HRESULT WINAPI
 404 Thunk_IDirect3DMaterialImpl_1_SetMaterial(LPDIRECT3DMATERIAL iface,
 405                                           LPD3DMATERIAL lpMat)
 406 {
 407     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DMaterial3 interface.\n", iface, lpMat);
 408     return IDirect3DMaterial3_SetMaterial((IDirect3DMaterial3 *)material_from_material1(iface), lpMat);
 409 }
 410
 411 static HRESULT WINAPI
 412 Thunk_IDirect3DMaterialImpl_2_GetMaterial(LPDIRECT3DMATERIAL2 iface,
 413                                           LPD3DMATERIAL lpMat)
 414 {
 415     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DMaterial3 interface.\n", iface, lpMat);
 416     return IDirect3DMaterial3_GetMaterial((IDirect3DMaterial3 *)material_from_material2(iface), lpMat);
 417 }
 418
 419 static HRESULT WINAPI
 420 Thunk_IDirect3DMaterialImpl_1_GetMaterial(LPDIRECT3DMATERIAL iface,
 421                                           LPD3DMATERIAL lpMat)
 422 {
 423     TRACE_(ddraw_thunk)("(%p)->(%p) thunking to IDirect3DMaterial3 interface.\n", iface, lpMat);
 424     return IDirect3DMaterial3_GetMaterial((IDirect3DMaterial3 *)material_from_material1(iface), lpMat);
 425 }
 426
 427
 428 /*****************************************************************************
 429  * material_activate
 430  *
 431  * Uses IDirect3DDevice7::SetMaterial to activate the material
 432  *
 433  * Params:
 434  *  This: Pointer to the material implementation to activate
 435  *
 436  *****************************************************************************/
 437 void material_activate(IDirect3DMaterialImpl* This)
 438 {
 439     D3DMATERIAL7 d3d7mat;
 440
 441     TRACE("Activating material %p\n", This);
 442     d3d7mat.u.diffuse = This->mat.u.diffuse;
 443     d3d7mat.u1.ambient = This->mat.u1.ambient;
 444     d3d7mat.u2.specular = This->mat.u2.specular;
 445     d3d7mat.u3.emissive = This->mat.u3.emissive;
 446     d3d7mat.u4.power = This->mat.u4.power;
 447
 448     IDirect3DDevice7_SetMaterial((IDirect3DDevice7 *)This->active_device, &d3d7mat);
 449 }
 450
 451 const IDirect3DMaterial3Vtbl IDirect3DMaterial3_Vtbl =
 452 {
 453     /*** IUnknown Methods ***/
 454     IDirect3DMaterialImpl_QueryInterface,
 455     IDirect3DMaterialImpl_AddRef,
 456     IDirect3DMaterialImpl_Release,
 457     /*** IDirect3DMaterial3 Methods ***/
 458     IDirect3DMaterialImpl_SetMaterial,
 459     IDirect3DMaterialImpl_GetMaterial,
 460     IDirect3DMaterialImpl_GetHandle,
 461 };
 462
 463 const IDirect3DMaterial2Vtbl IDirect3DMaterial2_Vtbl =
 464 {
 465     /*** IUnknown Methods ***/
 466     Thunk_IDirect3DMaterialImpl_2_QueryInterface,
 467     Thunk_IDirect3DMaterialImpl_2_AddRef,
 468     Thunk_IDirect3DMaterialImpl_2_Release,
 469     /*** IDirect3DMaterial2 Methods ***/
 470     Thunk_IDirect3DMaterialImpl_2_SetMaterial,
 471     Thunk_IDirect3DMaterialImpl_2_GetMaterial,
 472     Thunk_IDirect3DMaterialImpl_2_GetHandle,
 473 };
 474
 475 const IDirect3DMaterialVtbl IDirect3DMaterial_Vtbl =
 476 {
 477     /*** IUnknown Methods ***/
 478     Thunk_IDirect3DMaterialImpl_1_QueryInterface,
 479     Thunk_IDirect3DMaterialImpl_1_AddRef,
 480     Thunk_IDirect3DMaterialImpl_1_Release,
 481     /*** IDirect3DMaterial1 Methods ***/
 482     IDirect3DMaterialImpl_Initialize,
 483     Thunk_IDirect3DMaterialImpl_1_SetMaterial,
 484     Thunk_IDirect3DMaterialImpl_1_GetMaterial,
 485     Thunk_IDirect3DMaterialImpl_1_GetHandle,
 486     IDirect3DMaterialImpl_Reserve,
 487     IDirect3DMaterialImpl_Unreserve
 488 };