Added LGPL standard comment, and copyright notices where necessary.
[wine] / dlls / ddraw / d3dmaterial.c
1 /* Direct3D Material
2  * Copyright (c) 1998 Lionel ULMER
3  *
4  * This file contains the implementation of Direct3DMaterial2.
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 #include "windef.h"
23 #include "winerror.h"
24 #include "wine/obj_base.h"
25 #include "ddraw.h"
26 #include "d3d.h"
27 #include "wine/debug.h"
28
29 #include "mesa_private.h"
30
31 WINE_DEFAULT_DEBUG_CHANNEL(ddraw);
32
33 static ICOM_VTABLE(IDirect3DMaterial2) material2_vtable;
34 static ICOM_VTABLE(IDirect3DMaterial) material_vtable;
35
36 /*******************************************************************************
37  *                              Matrial2 static functions
38  */
39 static void activate(IDirect3DMaterial2Impl* This) {
40   TRACE("Activating material %p\n", This);
41   
42   ENTER_GL();
43   /* First, set the rendering context */
44   if (This->use_d3d2)
45     This->device.active_device2->set_context(This->device.active_device2);
46   else
47     This->device.active_device1->set_context(This->device.active_device1);
48
49   /* Set the current Material */
50   _dump_colorvalue("Diffuse", This->mat.u.diffuse);
51   glMaterialfv(GL_FRONT,
52                GL_DIFFUSE,
53                (float *) &(This->mat.u.diffuse));
54   _dump_colorvalue("Ambient", This->mat.u1.ambient);
55   glMaterialfv(GL_FRONT,
56                GL_AMBIENT,
57                (float *) &(This->mat.u1.ambient));
58   _dump_colorvalue("Specular", This->mat.u2.specular);
59   glMaterialfv(GL_FRONT,
60                GL_SPECULAR,
61                (float *) &(This->mat.u2.specular));
62   _dump_colorvalue("Emissive", This->mat.u3.emissive);
63   glMaterialfv(GL_FRONT,
64                GL_EMISSION,
65                (float *) &(This->mat.u3.emissive));
66   
67   TRACE("Size  : %ld\n", This->mat.dwSize);
68   TRACE("Power : %f\n", This->mat.u4.power);
69
70   TRACE("Texture handle : %08lx\n", (DWORD)This->mat.hTexture);
71   LEAVE_GL();
72   
73   return ;
74 }
75
76 /*******************************************************************************
77  *                              Matrial2 Creation functions
78  */
79 LPDIRECT3DMATERIAL2 d3dmaterial2_create(IDirect3D2Impl* d3d2)
80 {
81   IDirect3DMaterial2Impl* mat;
82   
83   mat = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirect3DMaterial2Impl));
84   mat->ref = 1;
85   ICOM_VTBL(mat) = &material2_vtable;
86
87   mat->use_d3d2 = 1;
88   mat->d3d.d3d2 = d3d2;
89
90   mat->activate = activate;
91   
92   return (LPDIRECT3DMATERIAL2)mat;
93 }
94
95 LPDIRECT3DMATERIAL d3dmaterial_create(IDirect3DImpl* d3d1)
96 {
97   IDirect3DMaterial2Impl* mat;
98   
99   mat = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirect3DMaterial2Impl));
100   mat->ref = 1;
101   ICOM_VTBL(mat) = (ICOM_VTABLE(IDirect3DMaterial2)*)&material_vtable;
102
103   mat->use_d3d2 = 0;
104   mat->d3d.d3d1 = d3d1;
105
106   mat->activate = activate;
107   
108   return (LPDIRECT3DMATERIAL) mat;
109 }
110
111 /*******************************************************************************
112  *                              IDirect3DMaterial2 methods
113  */
114
115 static HRESULT WINAPI IDirect3DMaterial2Impl_QueryInterface(LPDIRECT3DMATERIAL2 iface,
116                                                         REFIID riid,
117                                                         LPVOID* ppvObj)
118 {
119   ICOM_THIS(IDirect3DMaterial2Impl,iface);
120   
121   FIXME("(%p)->(%s,%p): stub\n", This, debugstr_guid(riid),ppvObj);
122   
123   return S_OK;
124 }
125
126
127
128 static ULONG WINAPI IDirect3DMaterial2Impl_AddRef(LPDIRECT3DMATERIAL2 iface)
129 {
130   ICOM_THIS(IDirect3DMaterial2Impl,iface);
131   TRACE("(%p)->()incrementing from %lu.\n", This, This->ref );
132   
133   return ++(This->ref);
134 }
135
136
137
138 static ULONG WINAPI IDirect3DMaterial2Impl_Release(LPDIRECT3DMATERIAL2 iface)
139 {
140   ICOM_THIS(IDirect3DMaterial2Impl,iface);
141   FIXME("(%p)->() decrementing from %lu.\n", This, This->ref );
142   
143   if (!--(This->ref)) {
144     HeapFree(GetProcessHeap(),0,This);
145     return 0;
146   }
147   
148   return This->ref;
149 }
150
151 /*** IDirect3DMaterial2 methods ***/
152 static void dump_material(LPD3DMATERIAL mat)
153 {
154   DPRINTF("  dwSize : %ld\n", mat->dwSize);
155 }
156
157 static HRESULT WINAPI IDirect3DMaterial2Impl_GetMaterial(LPDIRECT3DMATERIAL2 iface,
158                                                      LPD3DMATERIAL lpMat)
159 {
160   ICOM_THIS(IDirect3DMaterial2Impl,iface);
161   TRACE("(%p)->(%p)\n", This, lpMat);
162   if (TRACE_ON(ddraw))
163     dump_material(lpMat);
164   
165   /* Copies the material structure */
166   *lpMat = This->mat;
167   
168   return DD_OK;
169 }
170
171 static HRESULT WINAPI IDirect3DMaterial2Impl_SetMaterial(LPDIRECT3DMATERIAL2 iface,
172                                                      LPD3DMATERIAL lpMat)
173 {
174   ICOM_THIS(IDirect3DMaterial2Impl,iface);
175   TRACE("(%p)->(%p)\n", This, lpMat);
176   if (TRACE_ON(ddraw))
177     dump_material(lpMat);
178   
179   /* Stores the material */
180   This->mat = *lpMat;
181   
182   return DD_OK;
183 }
184
185 static HRESULT WINAPI IDirect3DMaterial2Impl_GetHandle(LPDIRECT3DMATERIAL2 iface,
186                                                    LPDIRECT3DDEVICE2 lpD3DDevice2,
187                                                    LPD3DMATERIALHANDLE lpMatHandle)
188
189 {
190   ICOM_THIS(IDirect3DMaterial2Impl,iface);
191   FIXME("(%p)->(%p,%p): stub\n", This, lpD3DDevice2, lpMatHandle);
192
193   if (This->use_d3d2)
194     This->device.active_device2 = (IDirect3DDevice2Impl*)lpD3DDevice2;
195   else
196     This->device.active_device1 = (IDirect3DDeviceImpl*)lpD3DDevice2;
197   
198   *lpMatHandle = (DWORD) This; /* lpD3DDevice2->store_material(This); */
199   
200   return DD_OK;
201 }
202
203 static HRESULT WINAPI IDirect3DMaterialImpl_Reserve(LPDIRECT3DMATERIAL iface)
204 {
205   ICOM_THIS(IDirect3DMaterial2Impl,iface);
206   FIXME("(%p)->(): stub\n", This);
207
208   return DDERR_INVALIDPARAMS;
209 }
210                                                   
211 static HRESULT WINAPI IDirect3DMaterialImpl_Unreserve(LPDIRECT3DMATERIAL iface)
212 {
213   ICOM_THIS(IDirect3DMaterial2Impl,iface);
214   FIXME("(%p)->(): stub\n", This);
215
216   return DDERR_INVALIDPARAMS;
217 }
218
219 static HRESULT WINAPI IDirect3DMaterialImpl_Initialize(LPDIRECT3DMATERIAL iface,
220                                                    LPDIRECT3D lpDirect3D)
221
222 {
223   ICOM_THIS(IDirect3DMaterial2Impl,iface);
224   TRACE("(%p)->(%p)\n", This, lpDirect3D);
225   
226   return DDERR_ALREADYINITIALIZED;
227 }
228
229
230 /*******************************************************************************
231  *                              IDirect3DMaterial VTable
232  */
233 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
234 # define XCAST(fun)     (typeof(material_vtable.fun))
235 #else
236 # define XCAST(fun)     (void*)
237 #endif
238
239 static ICOM_VTABLE(IDirect3DMaterial) material_vtable = 
240 {
241   ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
242   /*** IUnknown methods ***/
243   XCAST(QueryInterface)IDirect3DMaterial2Impl_QueryInterface,
244   XCAST(AddRef)IDirect3DMaterial2Impl_AddRef,
245   XCAST(Release)IDirect3DMaterial2Impl_Release,
246   /*** IDirect3DMaterial methods ***/
247   IDirect3DMaterialImpl_Initialize,
248   XCAST(SetMaterial)IDirect3DMaterial2Impl_SetMaterial,
249   XCAST(GetMaterial)IDirect3DMaterial2Impl_GetMaterial,
250   XCAST(GetHandle)IDirect3DMaterial2Impl_GetHandle,
251   IDirect3DMaterialImpl_Reserve,
252   IDirect3DMaterialImpl_Unreserve
253 };
254
255 #if !defined(__STRICT_ANSI__) && defined(__GNUC__)
256 #undef XCAST
257 #endif
258
259 /*******************************************************************************
260  *                              IDirect3DMaterial2 VTable
261  */
262 static ICOM_VTABLE(IDirect3DMaterial2) material2_vtable = 
263 {
264   ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
265   /*** IUnknown methods ***/
266   IDirect3DMaterial2Impl_QueryInterface,
267   IDirect3DMaterial2Impl_AddRef,
268   IDirect3DMaterial2Impl_Release,
269   /*** IDirect3DMaterial methods ***/
270   IDirect3DMaterial2Impl_SetMaterial,
271   IDirect3DMaterial2Impl_GetMaterial,
272   IDirect3DMaterial2Impl_GetHandle
273 };