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