comctl32/listview: Add a TRACE(..) to LISTVIEW_CreateHeader.
[wine] / dlls / d3d9 / vertexdeclaration.c
1 /*
2  * IDirect3DVertexDeclaration9 implementation
3  *
4  * Copyright 2002-2003 Raphael Junqueira
5  *                     Jason Edmeades
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 "d3d9_private.h"
24
25 WINE_DEFAULT_DEBUG_CHANNEL(d3d9);
26
27 typedef struct _D3DDECLTYPE_INFO {
28     D3DDECLTYPE d3dType;
29     WINED3DFORMAT format;
30     int         size;
31     int         typesize;
32 } D3DDECLTYPE_INFO;
33
34 static D3DDECLTYPE_INFO const d3d_dtype_lookup[D3DDECLTYPE_UNUSED] = {
35    {D3DDECLTYPE_FLOAT1,    WINED3DFMT_R32_FLOAT,          1, sizeof(float)},
36    {D3DDECLTYPE_FLOAT2,    WINED3DFMT_R32G32_FLOAT,       2, sizeof(float)},
37    {D3DDECLTYPE_FLOAT3,    WINED3DFMT_R32G32B32_FLOAT,    3, sizeof(float)},
38    {D3DDECLTYPE_FLOAT4,    WINED3DFMT_R32G32B32A32_FLOAT, 4, sizeof(float)},
39    {D3DDECLTYPE_D3DCOLOR,  WINED3DFMT_A8R8G8B8,           4, sizeof(BYTE)},
40    {D3DDECLTYPE_UBYTE4,    WINED3DFMT_R8G8B8A8_UINT,      4, sizeof(BYTE)},
41    {D3DDECLTYPE_SHORT2,    WINED3DFMT_R16G16_SINT,        2, sizeof(short int)},
42    {D3DDECLTYPE_SHORT4,    WINED3DFMT_R16G16B16A16_SINT,  4, sizeof(short int)},
43    {D3DDECLTYPE_UBYTE4N,   WINED3DFMT_R8G8B8A8_UNORM,     4, sizeof(BYTE)},
44    {D3DDECLTYPE_SHORT2N,   WINED3DFMT_R16G16_SNORM,       2, sizeof(short int)},
45    {D3DDECLTYPE_SHORT4N,   WINED3DFMT_R16G16B16A16_SNORM, 4, sizeof(short int)},
46    {D3DDECLTYPE_USHORT2N,  WINED3DFMT_R16G16_UNORM,       2, sizeof(short int)},
47    {D3DDECLTYPE_USHORT4N,  WINED3DFMT_R16G16B16A16_UNORM, 4, sizeof(short int)},
48    {D3DDECLTYPE_UDEC3,     WINED3DFMT_R10G10B10A2_UINT,   3, sizeof(short int)},
49    {D3DDECLTYPE_DEC3N,     WINED3DFMT_R10G10B10A2_SNORM,  3, sizeof(short int)},
50    {D3DDECLTYPE_FLOAT16_2, WINED3DFMT_R16G16_FLOAT,       2, sizeof(short int)},
51    {D3DDECLTYPE_FLOAT16_4, WINED3DFMT_R16G16B16A16_FLOAT, 4, sizeof(short int)}};
52
53 #define D3D_DECL_SIZE(type)          d3d_dtype_lookup[type].size
54 #define D3D_DECL_TYPESIZE(type)      d3d_dtype_lookup[type].typesize
55
56 HRESULT vdecl_convert_fvf(
57     DWORD fvf,
58     D3DVERTEXELEMENT9** ppVertexElements) {
59
60     unsigned int idx, idx2;
61     unsigned int offset;
62     BOOL has_pos = (fvf & D3DFVF_POSITION_MASK) != 0;
63     BOOL has_blend = (fvf & D3DFVF_XYZB5) > D3DFVF_XYZRHW;
64     BOOL has_blend_idx = has_blend &&
65        (((fvf & D3DFVF_XYZB5) == D3DFVF_XYZB5) ||
66         (fvf & D3DFVF_LASTBETA_D3DCOLOR) ||
67         (fvf & D3DFVF_LASTBETA_UBYTE4));
68     BOOL has_normal = (fvf & D3DFVF_NORMAL) != 0;
69     BOOL has_psize = (fvf & D3DFVF_PSIZE) != 0;
70
71     BOOL has_diffuse = (fvf & D3DFVF_DIFFUSE) != 0;
72     BOOL has_specular = (fvf & D3DFVF_SPECULAR) !=0;
73
74     DWORD num_textures = (fvf & D3DFVF_TEXCOUNT_MASK) >> D3DFVF_TEXCOUNT_SHIFT;
75     DWORD texcoords = (fvf & 0xFFFF0000) >> 16;
76
77     D3DVERTEXELEMENT9 end_element = D3DDECL_END();
78     D3DVERTEXELEMENT9 *elements = NULL;
79
80     unsigned int size;
81     DWORD num_blends = 1 + (((fvf & D3DFVF_XYZB5) - D3DFVF_XYZB1) >> 1);
82     if (has_blend_idx) num_blends--;
83
84     /* Compute declaration size */
85     size = has_pos + (has_blend && num_blends > 0) + has_blend_idx + has_normal +
86            has_psize + has_diffuse + has_specular + num_textures + 1;
87
88     /* convert the declaration */
89     elements = HeapAlloc(GetProcessHeap(), 0, size * sizeof(D3DVERTEXELEMENT9));
90     if (!elements) 
91         return D3DERR_OUTOFVIDEOMEMORY;
92
93     elements[size-1] = end_element;
94     idx = 0;
95     if (has_pos) {
96         if (!has_blend && (fvf & D3DFVF_XYZRHW)) {
97             elements[idx].Type = D3DDECLTYPE_FLOAT4;
98             elements[idx].Usage = D3DDECLUSAGE_POSITIONT;
99         }
100         else if (!has_blend && (fvf & D3DFVF_XYZW) == D3DFVF_XYZW) {
101             elements[idx].Type = D3DDECLTYPE_FLOAT4;
102             elements[idx].Usage = D3DDECLUSAGE_POSITION;
103         }
104         else {
105             elements[idx].Type = D3DDECLTYPE_FLOAT3;
106             elements[idx].Usage = D3DDECLUSAGE_POSITION;
107         }
108         elements[idx].UsageIndex = 0;
109         idx++;
110     }
111     if (has_blend && (num_blends > 0)) {
112         if (((fvf & D3DFVF_XYZB5) == D3DFVF_XYZB2) && (fvf & D3DFVF_LASTBETA_D3DCOLOR))
113             elements[idx].Type = D3DDECLTYPE_D3DCOLOR;
114         else {
115             switch(num_blends) {
116                 case 1: elements[idx].Type = D3DDECLTYPE_FLOAT1; break;
117                 case 2: elements[idx].Type = D3DDECLTYPE_FLOAT2; break;
118                 case 3: elements[idx].Type = D3DDECLTYPE_FLOAT3; break;
119                 case 4: elements[idx].Type = D3DDECLTYPE_FLOAT4; break;
120                 default:
121                     ERR("Unexpected amount of blend values: %u\n", num_blends);
122             }
123         }
124         elements[idx].Usage = D3DDECLUSAGE_BLENDWEIGHT;
125         elements[idx].UsageIndex = 0;
126         idx++;
127     }
128     if (has_blend_idx) {
129         if (fvf & D3DFVF_LASTBETA_UBYTE4 ||
130             (((fvf & D3DFVF_XYZB5) == D3DFVF_XYZB2) && (fvf & D3DFVF_LASTBETA_D3DCOLOR)))
131             elements[idx].Type = D3DDECLTYPE_UBYTE4;
132         else if (fvf & D3DFVF_LASTBETA_D3DCOLOR)
133             elements[idx].Type = D3DDECLTYPE_D3DCOLOR;
134         else
135             elements[idx].Type = D3DDECLTYPE_FLOAT1;
136         elements[idx].Usage = D3DDECLUSAGE_BLENDINDICES;
137         elements[idx].UsageIndex = 0;
138         idx++;
139     }
140     if (has_normal) {
141         elements[idx].Type = D3DDECLTYPE_FLOAT3;
142         elements[idx].Usage = D3DDECLUSAGE_NORMAL;
143         elements[idx].UsageIndex = 0;
144         idx++;
145     }
146     if (has_psize) {
147         elements[idx].Type = D3DDECLTYPE_FLOAT1;
148         elements[idx].Usage = D3DDECLUSAGE_PSIZE;
149         elements[idx].UsageIndex = 0;
150         idx++;
151     }
152     if (has_diffuse) {
153         elements[idx].Type = D3DDECLTYPE_D3DCOLOR;
154         elements[idx].Usage = D3DDECLUSAGE_COLOR;
155         elements[idx].UsageIndex = 0;
156         idx++;
157     }
158     if (has_specular) {
159         elements[idx].Type = D3DDECLTYPE_D3DCOLOR;
160         elements[idx].Usage = D3DDECLUSAGE_COLOR;
161         elements[idx].UsageIndex = 1;
162         idx++;
163     }
164     for (idx2 = 0; idx2 < num_textures; idx2++) {
165         unsigned int numcoords = (texcoords >> (idx2*2)) & 0x03;
166         switch (numcoords) {
167             case D3DFVF_TEXTUREFORMAT1:
168                 elements[idx].Type = D3DDECLTYPE_FLOAT1;
169                 break;
170             case D3DFVF_TEXTUREFORMAT2:
171                 elements[idx].Type = D3DDECLTYPE_FLOAT2;
172                 break;
173             case D3DFVF_TEXTUREFORMAT3:
174                 elements[idx].Type = D3DDECLTYPE_FLOAT3;
175                 break;
176             case D3DFVF_TEXTUREFORMAT4:
177                 elements[idx].Type = D3DDECLTYPE_FLOAT4;
178                 break;
179         }
180         elements[idx].Usage = D3DDECLUSAGE_TEXCOORD;
181         elements[idx].UsageIndex = idx2;
182         idx++;
183     }
184
185     /* Now compute offsets, and initialize the rest of the fields */
186     for (idx = 0, offset = 0; idx < size-1; idx++) {
187         elements[idx].Stream = 0;
188         elements[idx].Method = D3DDECLMETHOD_DEFAULT;
189         elements[idx].Offset = offset;
190         offset += D3D_DECL_SIZE(elements[idx].Type) * D3D_DECL_TYPESIZE(elements[idx].Type);
191     }
192
193     *ppVertexElements = elements;
194     return D3D_OK;
195 }
196
197 /* IDirect3DVertexDeclaration9 IUnknown parts follow: */
198 static HRESULT WINAPI IDirect3DVertexDeclaration9Impl_QueryInterface(LPDIRECT3DVERTEXDECLARATION9 iface, REFIID riid, LPVOID* ppobj) {
199     IDirect3DVertexDeclaration9Impl *This = (IDirect3DVertexDeclaration9Impl *)iface;
200
201     if (IsEqualGUID(riid, &IID_IUnknown)
202         || IsEqualGUID(riid, &IID_IDirect3DVertexDeclaration9)) {
203         IDirect3DVertexDeclaration9_AddRef(iface);
204         *ppobj = This;
205         return S_OK;
206     }
207
208     WARN("(%p)->(%s,%p),not found\n", This, debugstr_guid(riid), ppobj);
209     *ppobj = NULL;
210     return E_NOINTERFACE;
211 }
212
213 static ULONG WINAPI IDirect3DVertexDeclaration9Impl_AddRef(LPDIRECT3DVERTEXDECLARATION9 iface) {
214     IDirect3DVertexDeclaration9Impl *This = (IDirect3DVertexDeclaration9Impl *)iface;
215     ULONG ref = InterlockedIncrement(&This->ref);
216
217     TRACE("(%p) : AddRef from %d\n", This, ref - 1);
218
219     if(ref == 1) {
220         IDirect3DDevice9Ex_AddRef(This->parentDevice);
221     }
222
223     return ref;
224 }
225
226 void IDirect3DVertexDeclaration9Impl_Destroy(LPDIRECT3DVERTEXDECLARATION9 iface) {
227     IDirect3DVertexDeclaration9Impl *This = (IDirect3DVertexDeclaration9Impl *)iface;
228
229     if(This->ref != 0) {
230         /* Should not happen unless wine has a bug or the application releases references it does not own */
231         ERR("Destroying vdecl with ref != 0\n");
232     }
233     EnterCriticalSection(&d3d9_cs);
234     IWineD3DVertexDeclaration_Release(This->wineD3DVertexDeclaration);
235     LeaveCriticalSection(&d3d9_cs);
236     HeapFree(GetProcessHeap(), 0, This->elements);
237     HeapFree(GetProcessHeap(), 0, This);
238 }
239
240 static ULONG WINAPI IDirect3DVertexDeclaration9Impl_Release(LPDIRECT3DVERTEXDECLARATION9 iface) {
241     IDirect3DVertexDeclaration9Impl *This = (IDirect3DVertexDeclaration9Impl *)iface;
242     ULONG ref = InterlockedDecrement(&This->ref);
243
244     TRACE("(%p) : ReleaseRef to %d\n", This, ref);
245
246     if (ref == 0) {
247         IDirect3DDevice9Ex *parentDevice = This->parentDevice;
248
249         if(!This->convFVF) {
250             IDirect3DVertexDeclaration9Impl_Release(iface);
251         }
252         IDirect3DDevice9Ex_Release(parentDevice);
253     }
254     return ref;
255 }
256
257 /* IDirect3DVertexDeclaration9 Interface follow: */
258 static HRESULT WINAPI IDirect3DVertexDeclaration9Impl_GetDevice(LPDIRECT3DVERTEXDECLARATION9 iface, IDirect3DDevice9** ppDevice) {
259     IDirect3DVertexDeclaration9Impl *This = (IDirect3DVertexDeclaration9Impl *)iface;
260     IWineD3DDevice *myDevice = NULL;
261     HRESULT hr = D3D_OK;
262
263     TRACE("(%p) : Relay\n", iface);
264
265     EnterCriticalSection(&d3d9_cs);
266     hr = IWineD3DVertexDeclaration_GetDevice(This->wineD3DVertexDeclaration, &myDevice);
267     if (hr == D3D_OK && myDevice != NULL) {
268         hr = IWineD3DDevice_GetParent(myDevice, (IUnknown **)ppDevice);
269         IWineD3DDevice_Release(myDevice);
270     }
271     LeaveCriticalSection(&d3d9_cs);
272     return hr;
273 }
274
275 static HRESULT WINAPI IDirect3DVertexDeclaration9Impl_GetDeclaration(LPDIRECT3DVERTEXDECLARATION9 iface, D3DVERTEXELEMENT9* pDecl, UINT* pNumElements) {
276     IDirect3DVertexDeclaration9Impl *This = (IDirect3DVertexDeclaration9Impl *)iface;
277
278     TRACE("(%p) : pDecl %p, pNumElements %p)\n", This, pDecl, pNumElements);
279
280     *pNumElements = This->element_count;
281
282     /* Passing a NULL pDecl is used to just retrieve the number of elements */
283     if (!pDecl) {
284         TRACE("NULL pDecl passed. Returning D3D_OK.\n");
285         return D3D_OK;
286     }
287
288     TRACE("Copying %p to %p\n", This->elements, pDecl);
289     CopyMemory(pDecl, This->elements, This->element_count * sizeof(D3DVERTEXELEMENT9));
290
291     return D3D_OK;
292 }
293
294 static const IDirect3DVertexDeclaration9Vtbl Direct3DVertexDeclaration9_Vtbl =
295 {
296     /* IUnknown */
297     IDirect3DVertexDeclaration9Impl_QueryInterface,
298     IDirect3DVertexDeclaration9Impl_AddRef,
299     IDirect3DVertexDeclaration9Impl_Release,
300     /* IDirect3DVertexDeclaration9 */
301     IDirect3DVertexDeclaration9Impl_GetDevice,
302     IDirect3DVertexDeclaration9Impl_GetDeclaration
303 };
304
305 static HRESULT convert_to_wined3d_declaration(const D3DVERTEXELEMENT9* d3d9_elements,
306         WINED3DVERTEXELEMENT **wined3d_elements, UINT *element_count)
307 {
308     const D3DVERTEXELEMENT9* element;
309     UINT count = 1;
310     UINT i;
311
312     TRACE("d3d9_elements %p, wined3d_elements %p\n", d3d9_elements, wined3d_elements);
313
314     element = d3d9_elements;
315     while (element++->Stream != 0xff && count++ < 128);
316
317     if (count == 128) return E_FAIL;
318
319     /* Skip the END element */
320     --count;
321
322     *wined3d_elements = HeapAlloc(GetProcessHeap(), 0, count * sizeof(WINED3DVERTEXELEMENT));
323     if (!*wined3d_elements) {
324         FIXME("Memory allocation failed\n");
325         return D3DERR_OUTOFVIDEOMEMORY;
326     }
327
328     for (i = 0; i < count; ++i)
329     {
330         if (d3d9_elements[i].Type >= (sizeof(d3d_dtype_lookup) / sizeof(*d3d_dtype_lookup)))
331         {
332             WARN("Invalid element type %#x.\n", d3d9_elements[i].Type);
333             HeapFree(GetProcessHeap(), 0, *wined3d_elements);
334             return E_FAIL;
335         }
336         (*wined3d_elements)[i].format = d3d_dtype_lookup[d3d9_elements[i].Type].format;
337         (*wined3d_elements)[i].input_slot = d3d9_elements[i].Stream;
338         (*wined3d_elements)[i].offset = d3d9_elements[i].Offset;
339         (*wined3d_elements)[i].output_slot = ~0U;
340         (*wined3d_elements)[i].method = d3d9_elements[i].Method;
341         (*wined3d_elements)[i].usage = d3d9_elements[i].Usage;
342         (*wined3d_elements)[i].usage_idx = d3d9_elements[i].UsageIndex;
343     }
344
345     *element_count = count;
346
347     return D3D_OK;
348 }
349
350 /* IDirect3DDevice9 IDirect3DVertexDeclaration9 Methods follow: */
351 HRESULT  WINAPI  IDirect3DDevice9Impl_CreateVertexDeclaration(LPDIRECT3DDEVICE9EX iface, CONST D3DVERTEXELEMENT9* pVertexElements, IDirect3DVertexDeclaration9** ppDecl) {
352     
353     IDirect3DDevice9Impl *This = (IDirect3DDevice9Impl *)iface;
354     IDirect3DVertexDeclaration9Impl *object = NULL;
355     WINED3DVERTEXELEMENT* wined3d_elements;
356     UINT wined3d_element_count;
357     UINT element_count;
358     HRESULT hr;
359
360     TRACE("(%p) : Relay\n", iface);
361     if (NULL == ppDecl) {
362         WARN("(%p) : Caller passed NULL As ppDecl, returning D3DERR_INVALIDCALL\n",This);
363         return D3DERR_INVALIDCALL;
364     }
365
366     hr = convert_to_wined3d_declaration(pVertexElements, &wined3d_elements, &wined3d_element_count);
367     if (FAILED(hr))
368     {
369         WARN("(%p) : Error parsing vertex declaration\n", This);
370         return hr;
371     }
372
373     /* Allocate the storage for the device */
374     object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirect3DVertexDeclaration9Impl));
375     if (NULL == object) {
376         HeapFree(GetProcessHeap(), 0, wined3d_elements);
377         FIXME("Allocation of memory failed, returning D3DERR_OUTOFVIDEOMEMORY\n");
378         return D3DERR_OUTOFVIDEOMEMORY;
379     }
380
381     object->lpVtbl = &Direct3DVertexDeclaration9_Vtbl;
382     object->ref = 0;
383
384     element_count = wined3d_element_count + 1;
385     object->elements = HeapAlloc(GetProcessHeap(), 0, element_count * sizeof(D3DVERTEXELEMENT9));
386     if (!object->elements) {
387         HeapFree(GetProcessHeap(), 0, wined3d_elements);
388         HeapFree(GetProcessHeap(), 0, object);
389         ERR("Memory allocation failed\n");
390         return D3DERR_OUTOFVIDEOMEMORY;
391     }
392     CopyMemory(object->elements, pVertexElements, element_count * sizeof(D3DVERTEXELEMENT9));
393     object->element_count = element_count;
394
395     EnterCriticalSection(&d3d9_cs);
396     hr = IWineD3DDevice_CreateVertexDeclaration(This->WineD3DDevice, &object->wineD3DVertexDeclaration,
397             (IUnknown *)object, wined3d_elements, wined3d_element_count);
398     LeaveCriticalSection(&d3d9_cs);
399
400     HeapFree(GetProcessHeap(), 0, wined3d_elements);
401
402     if (FAILED(hr)) {
403
404         /* free up object */
405         WARN("(%p) call to IWineD3DDevice_CreateVertexDeclaration failed\n", This);
406         HeapFree(GetProcessHeap(), 0, object->elements);
407         HeapFree(GetProcessHeap(), 0, object);
408     } else {
409         object->parentDevice = iface;
410         *ppDecl = (LPDIRECT3DVERTEXDECLARATION9) object;
411         IDirect3DVertexDeclaration9_AddRef(*ppDecl);
412          TRACE("(%p) : Created vertex declaration %p\n", This, object);
413     }
414     return hr;
415 }
416
417 HRESULT  WINAPI  IDirect3DDevice9Impl_SetVertexDeclaration(LPDIRECT3DDEVICE9EX iface, IDirect3DVertexDeclaration9* pDecl) {
418     IDirect3DDevice9Impl *This = (IDirect3DDevice9Impl *)iface;
419     IDirect3DVertexDeclaration9Impl *pDeclImpl = (IDirect3DVertexDeclaration9Impl *)pDecl;
420     HRESULT hr = D3D_OK;
421
422     TRACE("(%p) : Relay\n", iface);
423
424     EnterCriticalSection(&d3d9_cs);
425     hr = IWineD3DDevice_SetVertexDeclaration(This->WineD3DDevice, pDeclImpl == NULL ? NULL : pDeclImpl->wineD3DVertexDeclaration);
426     LeaveCriticalSection(&d3d9_cs);
427     return hr;
428 }
429
430 HRESULT  WINAPI  IDirect3DDevice9Impl_GetVertexDeclaration(LPDIRECT3DDEVICE9EX iface, IDirect3DVertexDeclaration9** ppDecl) {
431     IDirect3DDevice9Impl* This = (IDirect3DDevice9Impl*) iface;
432     IWineD3DVertexDeclaration* pTest = NULL;
433     HRESULT hr = D3D_OK;
434
435     TRACE("(%p) : Relay+\n", iface);
436
437     if (NULL == ppDecl) {
438       return D3DERR_INVALIDCALL;
439     }
440
441     *ppDecl = NULL;
442     EnterCriticalSection(&d3d9_cs);
443     hr = IWineD3DDevice_GetVertexDeclaration(This->WineD3DDevice, &pTest);
444     if (hr == D3D_OK && NULL != pTest) {
445         IWineD3DVertexDeclaration_GetParent(pTest, (IUnknown **)ppDecl);
446         IWineD3DVertexDeclaration_Release(pTest);
447     } else {
448         *ppDecl = NULL;
449     }
450     LeaveCriticalSection(&d3d9_cs);
451     TRACE("(%p) : returning %p\n", This, *ppDecl);
452     return hr;
453 }