dlls/ddraw/light.c

   1 /* Direct3D Light
   2  * Copyright (c) 1998 / 2002 Lionel ULMER
   3  *
   4  * This file contains the implementation of Direct3DLight.
   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
  21 #include "config.h"
  22
  23 #include <stdarg.h>
  24
  25 #define NONAMELESSUNION
  26 #define NONAMELESSSTRUCT
  27
  28 #include "windef.h"
  29 #include "winbase.h"
  30 #include "winerror.h"
  31 #include "objbase.h"
  32 #include "wingdi.h"
  33 #include "ddraw.h"
  34 #include "d3d.h"
  35 #include "wine/debug.h"
  36
  37 #include "d3d_private.h"
  38 #include "opengl_private.h"
  39
  40 WINE_DEFAULT_DEBUG_CHANNEL(ddraw);
  41
  42 /* First, the 'main' interface... */
  43 HRESULT WINAPI
  44 Main_IDirect3DLightImpl_1_QueryInterface(LPDIRECT3DLIGHT iface,
  45                                          REFIID riid,
  46                                          LPVOID* obp)
  47 {
  48     ICOM_THIS_FROM(IDirect3DLightImpl, IDirect3DLight, iface);
  49     FIXME("(%p/%p)->(%s,%p): stub!\n", This, iface, debugstr_guid(riid), obp);
  50     return DD_OK;
  51 }
  52
  53 ULONG WINAPI
  54 Main_IDirect3DLightImpl_1_AddRef(LPDIRECT3DLIGHT iface)
  55 {
  56     ICOM_THIS_FROM(IDirect3DLightImpl, IDirect3DLight, iface);
  57     ULONG ref = InterlockedIncrement(&This->ref);
  58
  59     TRACE("(%p/%p)->() incrementing from %lu.\n", This, iface, ref - 1);
  60
  61     return ref;
  62 }
  63
  64 ULONG WINAPI
  65 Main_IDirect3DLightImpl_1_Release(LPDIRECT3DLIGHT iface)
  66 {
  67     ICOM_THIS_FROM(IDirect3DLightImpl, IDirect3DLight, iface);
  68     ULONG ref = InterlockedDecrement(&This->ref);
  69
  70     TRACE("(%p/%p)->() decrementing from %lu.\n", This, iface, ref + 1);
  71
  72     if (!ref) {
  73         HeapFree(GetProcessHeap(), 0, This);
  74         return 0;
  75     }
  76     return ref;
  77 }
  78
  79 HRESULT WINAPI
  80 Main_IDirect3DLightImpl_1_Initialize(LPDIRECT3DLIGHT iface,
  81                                      LPDIRECT3D lpDirect3D)
  82 {
  83     ICOM_THIS_FROM(IDirect3DLightImpl, IDirect3DLight, iface);
  84     TRACE("(%p/%p)->(%p) no-op...\n", This, iface, lpDirect3D);
  85     return DD_OK;
  86 }
  87
  88 /*** IDirect3DLight methods ***/
  89 static void dump_light(LPD3DLIGHT2 light)
  90 {
  91     DPRINTF("    - dwSize : %ld\n", light->dwSize);
  92 }
  93
  94 static const float zero_value[] = {
  95     0.0, 0.0, 0.0, 0.0
  96 };
  97
  98 HRESULT WINAPI
  99 Main_IDirect3DLightImpl_1_SetLight(LPDIRECT3DLIGHT iface,
 100                                    LPD3DLIGHT lpLight)
 101 {
 102     ICOM_THIS_FROM(IDirect3DLightImpl, IDirect3DLight, iface);
 103     LPD3DLIGHT7 light7 = &(This->light7);
 104     TRACE("(%p/%p)->(%p)\n", This, iface, lpLight);
 105     if (TRACE_ON(ddraw)) {
 106         TRACE("  Light definition :\n");
 107         dump_light((LPD3DLIGHT2) lpLight);
 108     }
 109
 110     if ( (lpLight->dltType == 0) || (lpLight->dltType > D3DLIGHT_PARALLELPOINT) )
 111          return DDERR_INVALIDPARAMS;
 112
 113     if ( lpLight->dltType == D3DLIGHT_PARALLELPOINT )
 114          FIXME("D3DLIGHT_PARALLELPOINT no supported\n");
 115
 116     /* Translate D3DLIGH2 structure to D3DLIGHT7 */
 117     light7->dltType        = lpLight->dltType;
 118     light7->dcvDiffuse     = lpLight->dcvColor;
 119     if ((((LPD3DLIGHT2)lpLight)->dwFlags & D3DLIGHT_NO_SPECULAR) != 0)
 120       light7->dcvSpecular    = lpLight->dcvColor;
 121     else
 122       light7->dcvSpecular    = *(const D3DCOLORVALUE*)zero_value;
 123     light7->dcvAmbient     = lpLight->dcvColor;
 124     light7->dvPosition     = lpLight->dvPosition;
 125     light7->dvDirection    = lpLight->dvDirection;
 126     light7->dvRange        = lpLight->dvRange;
 127     light7->dvFalloff      = lpLight->dvFalloff;
 128     light7->dvAttenuation0 = lpLight->dvAttenuation0;
 129     light7->dvAttenuation1 = lpLight->dvAttenuation1;
 130     light7->dvAttenuation2 = lpLight->dvAttenuation2;
 131     light7->dvTheta        = lpLight->dvTheta;
 132     light7->dvPhi          = lpLight->dvPhi;
 133
 134     memcpy(&This->light, lpLight, lpLight->dwSize);
 135     if ((This->light.dwFlags & D3DLIGHT_ACTIVE) != 0) {
 136         This->update(This);
 137     }
 138     return DD_OK;
 139 }
 140
 141 HRESULT WINAPI
 142 Main_IDirect3DLightImpl_1_GetLight(LPDIRECT3DLIGHT iface,
 143                                    LPD3DLIGHT lpLight)
 144 {
 145     ICOM_THIS_FROM(IDirect3DLightImpl, IDirect3DLight, iface);
 146     TRACE("(%p/%p)->(%p)\n", This, iface, lpLight);
 147     if (TRACE_ON(ddraw)) {
 148         TRACE("  Returning light definition :\n");
 149         dump_light(&This->light);
 150     }
 151     memcpy(lpLight, &This->light, lpLight->dwSize);
 152     return DD_OK;
 153 }
 154
 155 /*******************************************************************************
 156  *                              Light static functions
 157  */
 158
 159 static void update(IDirect3DLightImpl* This)
 160 {
 161     IDirect3DDeviceImpl* device;
 162
 163     TRACE("(%p)\n", This);
 164
 165     if (!This->active_viewport || !This->active_viewport->active_device)
 166         return;
 167     device =  This->active_viewport->active_device;
 168
 169     IDirect3DDevice7_SetLight(ICOM_INTERFACE(device,IDirect3DDevice7), This->dwLightIndex, &(This->light7));
 170 }
 171
 172 static void activate(IDirect3DLightImpl* This)
 173 {
 174     IDirect3DDeviceImpl* device;
 175
 176     TRACE("(%p)\n", This);
 177
 178     if (!This->active_viewport || !This->active_viewport->active_device)
 179         return;
 180     device =  This->active_viewport->active_device;
 181
 182     update(This);
 183     /* If was not active, activate it */
 184     if ((This->light.dwFlags & D3DLIGHT_ACTIVE) == 0) {
 185         IDirect3DDevice7_LightEnable(ICOM_INTERFACE(device,IDirect3DDevice7), This->dwLightIndex, TRUE);
 186         This->light.dwFlags |= D3DLIGHT_ACTIVE;
 187     }
 188 }
 189
 190 static void desactivate(IDirect3DLightImpl* This)
 191 {
 192     IDirect3DDeviceImpl* device;
 193
 194     TRACE("(%p)\n", This);
 195
 196     if (!This->active_viewport || !This->active_viewport->active_device)
 197         return;
 198     device =  This->active_viewport->active_device;
 199
 200     /* If was not active, activate it */
 201     if ((This->light.dwFlags & D3DLIGHT_ACTIVE) != 0) {
 202         IDirect3DDevice7_LightEnable(ICOM_INTERFACE(device,IDirect3DDevice7), This->dwLightIndex, FALSE);
 203         This->light.dwFlags &= ~D3DLIGHT_ACTIVE;
 204     }
 205 }
 206
 207 ULONG WINAPI
 208 GL_IDirect3DLightImpl_1_Release(LPDIRECT3DLIGHT iface)
 209 {
 210     ICOM_THIS_FROM(IDirect3DLightImpl, IDirect3DLight, iface);
 211     ULONG ref = InterlockedDecrement(&This->ref);
 212
 213     TRACE("(%p/%p)->() decrementing from %lu.\n", This, iface, ref + 1);
 214
 215     if (!ref) {
 216         HeapFree(GetProcessHeap(), 0, This);
 217         return 0;
 218     }
 219     return ref;
 220 }
 221
 222 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
 223 # define XCAST(fun)     (typeof(VTABLE_IDirect3DLight.fun))
 224 #else
 225 # define XCAST(fun)     (void*)
 226 #endif
 227
 228 static const IDirect3DLightVtbl VTABLE_IDirect3DLight =
 229 {
 230     XCAST(QueryInterface) Main_IDirect3DLightImpl_1_QueryInterface,
 231     XCAST(AddRef) Main_IDirect3DLightImpl_1_AddRef,
 232     XCAST(Release) GL_IDirect3DLightImpl_1_Release,
 233     XCAST(Initialize) Main_IDirect3DLightImpl_1_Initialize,
 234     XCAST(SetLight) Main_IDirect3DLightImpl_1_SetLight,
 235     XCAST(GetLight) Main_IDirect3DLightImpl_1_GetLight,
 236 };
 237
 238 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
 239 #undef XCAST
 240 #endif
 241
 242
 243
 244
 245 HRESULT d3dlight_create(IDirect3DLightImpl **obj, IDirectDrawImpl *d3d)
 246 {
 247     IDirect3DLightImpl *object;
 248
 249     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirect3DLightImpl));
 250     if (object == NULL) return DDERR_OUTOFMEMORY;
 251
 252     object->ref = 1;
 253     object->d3d = d3d;
 254     object->next = NULL;
 255     object->activate = activate;
 256     object->desactivate = desactivate;
 257     object->update = update;
 258     object->active_viewport = NULL;
 259
 260     ICOM_INIT_INTERFACE(object, IDirect3DLight, VTABLE_IDirect3DLight);
 261
 262     *obj = object;
 263
 264     TRACE(" creating implementation at %p.\n", *obj);
 265
 266     return D3D_OK;
 267 }