dll/directx/wine/ddraw/light.c

   1 /* Direct3D Light
   2  * Copyright (c) 1998 / 2002 Lionel ULMER
   3  * Copyright (c) 2006        Stefan DÖSINGER
   4  *
   5  * This file contains the implementation of Direct3DLight.
   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(ddraw);
  28
  29 /*****************************************************************************
  30  * light_update
  31  *
  32  * Updates the Direct3DDevice7 lighting parameters
  33  *
  34  *****************************************************************************/
  35 static void light_update(IDirect3DLightImpl *light)
  36 {
  37     IDirect3DDeviceImpl *device;
  38
  39     TRACE("light %p.\n", light);
  40
  41     if (!light->active_viewport || !light->active_viewport->active_device) return;
  42     device = light->active_viewport->active_device;
  43
  44     IDirect3DDevice7_SetLight((IDirect3DDevice7 *)device, light->dwLightIndex, &light->light7);
  45 }
  46
  47 /*****************************************************************************
  48  * light_activate
  49  *
  50  * Uses the Direct3DDevice7::LightEnable method to active the light
  51  *
  52  *****************************************************************************/
  53 void light_activate(IDirect3DLightImpl *light)
  54 {
  55     IDirect3DDeviceImpl *device;
  56
  57     TRACE("light %p.\n", light);
  58
  59     if (!light->active_viewport || !light->active_viewport->active_device) return;
  60     device = light->active_viewport->active_device;
  61
  62     light_update(light);
  63     if (!(light->light.dwFlags & D3DLIGHT_ACTIVE))
  64     {
  65         IDirect3DDevice7_LightEnable((IDirect3DDevice7 *)device, light->dwLightIndex, TRUE);
  66         light->light.dwFlags |= D3DLIGHT_ACTIVE;
  67     }
  68 }
  69
  70 /*****************************************************************************
  71  *
  72  * light_deactivate
  73  *
  74  * Uses the Direct3DDevice7::LightEnable method to deactivate the light
  75  *
  76  *****************************************************************************/
  77 void light_deactivate(IDirect3DLightImpl *light)
  78 {
  79     IDirect3DDeviceImpl *device;
  80
  81     TRACE("light %p.\n", light);
  82
  83     if (!light->active_viewport || !light->active_viewport->active_device) return;
  84     device = light->active_viewport->active_device;
  85
  86     /* If was not active, activate it */
  87     if (light->light.dwFlags & D3DLIGHT_ACTIVE)
  88     {
  89         IDirect3DDevice7_LightEnable((IDirect3DDevice7 *)device, light->dwLightIndex, FALSE);
  90         light->light.dwFlags &= ~D3DLIGHT_ACTIVE;
  91     }
  92 }
  93
  94 /*****************************************************************************
  95  * IUnknown Methods.
  96  *****************************************************************************/
  97
  98 /*****************************************************************************
  99  * IDirect3DLight::QueryInterface
 100  *
 101  * Queries the object for different interfaces. Unimplemented for this
 102  * object at the moment
 103  *
 104  * Params:
 105  *  riid: Interface id asked for
 106  *  obj: Address to return the resulting pointer at.
 107  *
 108  * Returns:
 109  *  E_NOINTERFACE, because it's a stub
 110  *****************************************************************************/
 111 static HRESULT WINAPI IDirect3DLightImpl_QueryInterface(IDirect3DLight *iface, REFIID riid, void **object)
 112 {
 113     FIXME("iface %p, riid %s, object %p stub!\n", iface, debugstr_guid(riid), object);
 114
 115     *object = NULL;
 116     return E_NOINTERFACE;
 117 }
 118
 119 /*****************************************************************************
 120  * IDirect3DLight::AddRef
 121  *
 122  * Increases the refcount by 1
 123  *
 124  * Returns:
 125  *  The new refcount
 126  *
 127  *****************************************************************************/
 128 static ULONG WINAPI
 129 IDirect3DLightImpl_AddRef(IDirect3DLight *iface)
 130 {
 131     IDirect3DLightImpl *This = (IDirect3DLightImpl *)iface;
 132     ULONG ref = InterlockedIncrement(&This->ref);
 133
 134     TRACE("%p increasing refcount to %u.\n", This, ref);
 135
 136     return ref;
 137 }
 138
 139 /*****************************************************************************
 140  * IDirect3DLight::Release
 141  *
 142  * Reduces the refcount by one. If the refcount falls to 0, the object
 143  * is destroyed
 144  *
 145  * Returns:
 146  *  The new refcount
 147  *
 148  *****************************************************************************/
 149 static ULONG WINAPI
 150 IDirect3DLightImpl_Release(IDirect3DLight *iface)
 151 {
 152     IDirect3DLightImpl *This = (IDirect3DLightImpl *)iface;
 153     ULONG ref = InterlockedDecrement(&This->ref);
 154
 155     TRACE("%p decreasing refcount to %u.\n", This, ref);
 156
 157     if (!ref) {
 158         HeapFree(GetProcessHeap(), 0, This);
 159         return 0;
 160     }
 161     return ref;
 162 }
 163
 164 /*****************************************************************************
 165  * IDirect3DLight Methods.
 166  *****************************************************************************/
 167
 168 /*****************************************************************************
 169  * IDirect3DLight::Initialize
 170  *
 171  * Initializes the interface. This implementation is a no-op, because
 172  * initialization takes place at creation time
 173  *
 174  * Params:
 175  *  Direct3D: Pointer to an IDirect3D interface.
 176  *
 177  * Returns:
 178  *  D3D_OK
 179  *
 180  *****************************************************************************/
 181 static HRESULT WINAPI IDirect3DLightImpl_Initialize(IDirect3DLight *iface, IDirect3D *d3d)
 182 {
 183     TRACE("iface %p, d3d %p.\n", iface, d3d);
 184
 185     return D3D_OK;
 186 }
 187
 188 /*****************************************************************************
 189  * IDirect3DLight::SetLight
 190  *
 191  * Assigns a lighting value to this object
 192  *
 193  * Params:
 194  *  Light: Lighting parameter to set
 195  *
 196  * Returns:
 197  *  D3D_OK on success
 198  *  DDERR_INVALIDPARAMS if Light is NULL
 199  *
 200  *****************************************************************************/
 201 static void dump_light(const D3DLIGHT2 *light)
 202 {
 203     TRACE("    - dwSize : %d\n", light->dwSize);
 204 }
 205
 206 static const float zero_value[] = {
 207     0.0, 0.0, 0.0, 0.0
 208 };
 209
 210 static HRESULT WINAPI
 211 IDirect3DLightImpl_SetLight(IDirect3DLight *iface,
 212                             D3DLIGHT *lpLight)
 213 {
 214     IDirect3DLightImpl *This = (IDirect3DLightImpl *)iface;
 215     LPD3DLIGHT7 light7 = &(This->light7);
 216
 217     TRACE("iface %p, light %p.\n", iface, lpLight);
 218
 219     if (TRACE_ON(ddraw))
 220     {
 221         TRACE("  Light definition :\n");
 222         dump_light((LPD3DLIGHT2) lpLight);
 223     }
 224
 225     if ( (lpLight->dltType == 0) || (lpLight->dltType > D3DLIGHT_PARALLELPOINT) )
 226          return DDERR_INVALIDPARAMS;
 227
 228     if ( lpLight->dltType == D3DLIGHT_PARALLELPOINT )
 229         FIXME("D3DLIGHT_PARALLELPOINT no supported\n");
 230
 231     /* Translate D3DLIGH2 structure to D3DLIGHT7 */
 232     light7->dltType        = lpLight->dltType;
 233     light7->dcvDiffuse     = lpLight->dcvColor;
 234     if ((((LPD3DLIGHT2)lpLight)->dwFlags & D3DLIGHT_NO_SPECULAR) != 0)
 235       light7->dcvSpecular    = lpLight->dcvColor;
 236     else
 237       light7->dcvSpecular    = *(const D3DCOLORVALUE*)zero_value;
 238     light7->dcvAmbient     = lpLight->dcvColor;
 239     light7->dvPosition     = lpLight->dvPosition;
 240     light7->dvDirection    = lpLight->dvDirection;
 241     light7->dvRange        = lpLight->dvRange;
 242     light7->dvFalloff      = lpLight->dvFalloff;
 243     light7->dvAttenuation0 = lpLight->dvAttenuation0;
 244     light7->dvAttenuation1 = lpLight->dvAttenuation1;
 245     light7->dvAttenuation2 = lpLight->dvAttenuation2;
 246     light7->dvTheta        = lpLight->dvTheta;
 247     light7->dvPhi          = lpLight->dvPhi;
 248
 249     EnterCriticalSection(&ddraw_cs);
 250     memcpy(&This->light, lpLight, lpLight->dwSize);
 251     if (This->light.dwFlags & D3DLIGHT_ACTIVE)
 252         light_update(This);
 253     LeaveCriticalSection(&ddraw_cs);
 254     return D3D_OK;
 255 }
 256
 257 /*****************************************************************************
 258  * IDirect3DLight::GetLight
 259  *
 260  * Returns the parameters currently assigned to the IDirect3DLight object
 261  *
 262  * Params:
 263  *  Light: Pointer to an D3DLIGHT structure to store the parameters
 264  *
 265  * Returns:
 266  *  D3D_OK on success
 267  *  DDERR_INVALIDPARAMS if Light is NULL
 268  *****************************************************************************/
 269 static HRESULT WINAPI
 270 IDirect3DLightImpl_GetLight(IDirect3DLight *iface,
 271                             D3DLIGHT *lpLight)
 272 {
 273     IDirect3DLightImpl *This = (IDirect3DLightImpl *)iface;
 274
 275     TRACE("iface %p, light %p.\n", iface, lpLight);
 276
 277     if (TRACE_ON(ddraw))
 278     {
 279         TRACE("  Returning light definition :\n");
 280         dump_light(&This->light);
 281     }
 282
 283     EnterCriticalSection(&ddraw_cs);
 284     memcpy(lpLight, &This->light, lpLight->dwSize);
 285     LeaveCriticalSection(&ddraw_cs);
 286
 287     return DD_OK;
 288 }
 289
 290 static const struct IDirect3DLightVtbl d3d_light_vtbl =
 291 {
 292     /*** IUnknown Methods ***/
 293     IDirect3DLightImpl_QueryInterface,
 294     IDirect3DLightImpl_AddRef,
 295     IDirect3DLightImpl_Release,
 296     /*** IDirect3DLight Methods ***/
 297     IDirect3DLightImpl_Initialize,
 298     IDirect3DLightImpl_SetLight,
 299     IDirect3DLightImpl_GetLight
 300 };
 301
 302 void d3d_light_init(IDirect3DLightImpl *light, IDirectDrawImpl *ddraw)
 303 {
 304     light->lpVtbl = &d3d_light_vtbl;
 305     light->ref = 1;
 306     light->ddraw = ddraw;
 307 }