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