d3d10core: COM cleanup for the ID3D10PixelShader iface.
[wine] / dlls / d3d10core / shader.c
1 /*
2  * Copyright 2009 Henri Verbeet for CodeWeavers
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2.1 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17  *
18  */
19
20 #include "config.h"
21 #include "wine/port.h"
22 #include <assert.h>
23
24 #include "d3d10core_private.h"
25
26 WINE_DEFAULT_DEBUG_CHANNEL(d3d10core);
27
28 static HRESULT shdr_handler(const char *data, DWORD data_size, DWORD tag, void *ctx)
29 {
30     struct d3d10_shader_info *shader_info = ctx;
31     HRESULT hr;
32
33     switch(tag)
34     {
35         case TAG_OSGN:
36             hr = shader_parse_signature(data, data_size, shader_info->output_signature);
37             if (FAILED(hr)) return hr;
38             break;
39
40         case TAG_SHDR:
41             shader_info->shader_code = (const DWORD *)data;
42             break;
43
44         default:
45             FIXME("Unhandled chunk %s\n", debugstr_an((const char *)&tag, 4));
46             break;
47     }
48
49     return S_OK;
50 }
51
52 static HRESULT shader_extract_from_dxbc(const void *dxbc, SIZE_T dxbc_length, struct d3d10_shader_info *shader_info)
53 {
54     HRESULT hr;
55
56     shader_info->shader_code = NULL;
57     memset(shader_info->output_signature, 0, sizeof(*shader_info->output_signature));
58
59     hr = parse_dxbc(dxbc, dxbc_length, shdr_handler, shader_info);
60     if (!shader_info->shader_code) hr = E_FAIL;
61
62     if (FAILED(hr))
63     {
64         ERR("Failed to parse shader, hr %#x\n", hr);
65         shader_free_signature(shader_info->output_signature);
66     }
67
68     return hr;
69 }
70
71 HRESULT shader_parse_signature(const char *data, DWORD data_size, struct wined3d_shader_signature *s)
72 {
73     struct wined3d_shader_signature_element *e;
74     unsigned int string_data_offset;
75     unsigned int string_data_size;
76     const char *ptr = data;
77     char *string_data;
78     unsigned int i;
79     DWORD count;
80
81     read_dword(&ptr, &count);
82     TRACE("%u elements\n", count);
83
84     skip_dword_unknown(&ptr, 1);
85
86     e = HeapAlloc(GetProcessHeap(), 0, count * sizeof(*e));
87     if (!e)
88     {
89         ERR("Failed to allocate input signature memory.\n");
90         return E_OUTOFMEMORY;
91     }
92
93     /* 2 DWORDs for the header, 6 for each element. */
94     string_data_offset = 2 * sizeof(DWORD) + count * 6 * sizeof(DWORD);
95     string_data_size = data_size - string_data_offset;
96     string_data = HeapAlloc(GetProcessHeap(), 0, string_data_size);
97     if (!string_data)
98     {
99         ERR("Failed to allocate string data memory.\n");
100         HeapFree(GetProcessHeap(), 0, e);
101         return E_OUTOFMEMORY;
102     }
103     memcpy(string_data, data + string_data_offset, string_data_size);
104
105     for (i = 0; i < count; ++i)
106     {
107         UINT name_offset;
108
109         read_dword(&ptr, &name_offset);
110         e[i].semantic_name = string_data + (name_offset - string_data_offset);
111         read_dword(&ptr, &e[i].semantic_idx);
112         read_dword(&ptr, &e[i].sysval_semantic);
113         read_dword(&ptr, &e[i].component_type);
114         read_dword(&ptr, &e[i].register_idx);
115         read_dword(&ptr, &e[i].mask);
116
117         TRACE("semantic: %s, semantic idx: %u, sysval_semantic %#x, "
118                 "type %u, register idx: %u, use_mask %#x, input_mask %#x\n",
119                 debugstr_a(e[i].semantic_name), e[i].semantic_idx, e[i].sysval_semantic,
120                 e[i].component_type, e[i].register_idx, (e[i].mask >> 8) & 0xff, e[i].mask & 0xff);
121     }
122
123     s->elements = e;
124     s->element_count = count;
125     s->string_data = string_data;
126
127     return S_OK;
128 }
129
130 void shader_free_signature(struct wined3d_shader_signature *s)
131 {
132     HeapFree(GetProcessHeap(), 0, s->string_data);
133     HeapFree(GetProcessHeap(), 0, s->elements);
134 }
135
136 static inline struct d3d10_vertex_shader *impl_from_ID3D10VertexShader(ID3D10VertexShader *iface)
137 {
138     return CONTAINING_RECORD(iface, struct d3d10_vertex_shader, ID3D10VertexShader_iface);
139 }
140
141 /* IUnknown methods */
142
143 static HRESULT STDMETHODCALLTYPE d3d10_vertex_shader_QueryInterface(ID3D10VertexShader *iface,
144         REFIID riid, void **object)
145 {
146     TRACE("iface %p, riid %s, object %p\n", iface, debugstr_guid(riid), object);
147
148     if (IsEqualGUID(riid, &IID_ID3D10VertexShader)
149             || IsEqualGUID(riid, &IID_ID3D10DeviceChild)
150             || IsEqualGUID(riid, &IID_IUnknown))
151     {
152         IUnknown_AddRef(iface);
153         *object = iface;
154         return S_OK;
155     }
156
157     WARN("%s not implemented, returning E_NOINTERFACE\n", debugstr_guid(riid));
158
159     *object = NULL;
160     return E_NOINTERFACE;
161 }
162
163 static ULONG STDMETHODCALLTYPE d3d10_vertex_shader_AddRef(ID3D10VertexShader *iface)
164 {
165     struct d3d10_vertex_shader *This = impl_from_ID3D10VertexShader(iface);
166     ULONG refcount = InterlockedIncrement(&This->refcount);
167
168     TRACE("%p increasing refcount to %u\n", This, refcount);
169
170     if (refcount == 1)
171         wined3d_shader_incref(This->wined3d_shader);
172
173     return refcount;
174 }
175
176 static ULONG STDMETHODCALLTYPE d3d10_vertex_shader_Release(ID3D10VertexShader *iface)
177 {
178     struct d3d10_vertex_shader *This = impl_from_ID3D10VertexShader(iface);
179     ULONG refcount = InterlockedDecrement(&This->refcount);
180
181     TRACE("%p decreasing refcount to %u\n", This, refcount);
182
183     if (!refcount)
184         wined3d_shader_decref(This->wined3d_shader);
185
186     return refcount;
187 }
188
189 /* ID3D10DeviceChild methods */
190
191 static void STDMETHODCALLTYPE d3d10_vertex_shader_GetDevice(ID3D10VertexShader *iface, ID3D10Device **device)
192 {
193     FIXME("iface %p, device %p stub!\n", iface, device);
194 }
195
196 static HRESULT STDMETHODCALLTYPE d3d10_vertex_shader_GetPrivateData(ID3D10VertexShader *iface,
197         REFGUID guid, UINT *data_size, void *data)
198 {
199     FIXME("iface %p, guid %s, data_size %p, data %p stub!\n",
200             iface, debugstr_guid(guid), data_size, data);
201
202     return E_NOTIMPL;
203 }
204
205 static HRESULT STDMETHODCALLTYPE d3d10_vertex_shader_SetPrivateData(ID3D10VertexShader *iface,
206         REFGUID guid, UINT data_size, const void *data)
207 {
208     FIXME("iface %p, guid %s, data_size %u, data %p stub!\n",
209             iface, debugstr_guid(guid), data_size, data);
210
211     return E_NOTIMPL;
212 }
213
214 static HRESULT STDMETHODCALLTYPE d3d10_vertex_shader_SetPrivateDataInterface(ID3D10VertexShader *iface,
215         REFGUID guid, const IUnknown *data)
216 {
217     FIXME("iface %p, guid %s, data %p stub!\n", iface, debugstr_guid(guid), data);
218
219     return E_NOTIMPL;
220 }
221
222 static const struct ID3D10VertexShaderVtbl d3d10_vertex_shader_vtbl =
223 {
224     /* IUnknown methods */
225     d3d10_vertex_shader_QueryInterface,
226     d3d10_vertex_shader_AddRef,
227     d3d10_vertex_shader_Release,
228     /* ID3D10DeviceChild methods */
229     d3d10_vertex_shader_GetDevice,
230     d3d10_vertex_shader_GetPrivateData,
231     d3d10_vertex_shader_SetPrivateData,
232     d3d10_vertex_shader_SetPrivateDataInterface,
233 };
234
235 static void STDMETHODCALLTYPE d3d10_vertex_shader_wined3d_object_destroyed(void *parent)
236 {
237     struct d3d10_vertex_shader *shader = parent;
238     shader_free_signature(&shader->output_signature);
239     HeapFree(GetProcessHeap(), 0, shader);
240 }
241
242 static const struct wined3d_parent_ops d3d10_vertex_shader_wined3d_parent_ops =
243 {
244     d3d10_vertex_shader_wined3d_object_destroyed,
245 };
246
247 HRESULT d3d10_vertex_shader_init(struct d3d10_vertex_shader *shader, struct d3d10_device *device,
248         const void *byte_code, SIZE_T byte_code_length)
249 {
250     struct d3d10_shader_info shader_info;
251     HRESULT hr;
252
253     shader->ID3D10VertexShader_iface.lpVtbl = &d3d10_vertex_shader_vtbl;
254     shader->refcount = 1;
255
256     shader_info.output_signature = &shader->output_signature;
257     hr = shader_extract_from_dxbc(byte_code, byte_code_length, &shader_info);
258     if (FAILED(hr))
259     {
260         ERR("Failed to extract shader, hr %#x.\n", hr);
261         return hr;
262     }
263
264     hr = wined3d_shader_create_vs(device->wined3d_device, shader_info.shader_code,
265             &shader->output_signature, shader, &d3d10_vertex_shader_wined3d_parent_ops, &shader->wined3d_shader);
266     if (FAILED(hr))
267     {
268         WARN("Failed to create wined3d vertex shader, hr %#x.\n", hr);
269         shader_free_signature(&shader->output_signature);
270         return hr;
271     }
272
273     return S_OK;
274 }
275
276 struct d3d10_vertex_shader *unsafe_impl_from_ID3D10VertexShader(ID3D10VertexShader *iface)
277 {
278     if (!iface)
279         return NULL;
280     assert(iface->lpVtbl == &d3d10_vertex_shader_vtbl);
281
282     return impl_from_ID3D10VertexShader(iface);
283 }
284
285 static inline struct d3d10_geometry_shader *impl_from_ID3D10GeometryShader(ID3D10GeometryShader *iface)
286 {
287     return CONTAINING_RECORD(iface, struct d3d10_geometry_shader, ID3D10GeometryShader_iface);
288 }
289
290 /* IUnknown methods */
291
292 static HRESULT STDMETHODCALLTYPE d3d10_geometry_shader_QueryInterface(ID3D10GeometryShader *iface,
293         REFIID riid, void **object)
294 {
295     TRACE("iface %p, riid %s, object %p\n", iface, debugstr_guid(riid), object);
296
297     if (IsEqualGUID(riid, &IID_ID3D10GeometryShader)
298             || IsEqualGUID(riid, &IID_ID3D10DeviceChild)
299             || IsEqualGUID(riid, &IID_IUnknown))
300     {
301         IUnknown_AddRef(iface);
302         *object = iface;
303         return S_OK;
304     }
305
306     WARN("%s not implemented, returning E_NOINTERFACE\n", debugstr_guid(riid));
307
308     *object = NULL;
309     return E_NOINTERFACE;
310 }
311
312 static ULONG STDMETHODCALLTYPE d3d10_geometry_shader_AddRef(ID3D10GeometryShader *iface)
313 {
314     struct d3d10_geometry_shader *This = impl_from_ID3D10GeometryShader(iface);
315     ULONG refcount = InterlockedIncrement(&This->refcount);
316
317     TRACE("%p increasing refcount to %u\n", This, refcount);
318
319     return refcount;
320 }
321
322 static ULONG STDMETHODCALLTYPE d3d10_geometry_shader_Release(ID3D10GeometryShader *iface)
323 {
324     struct d3d10_geometry_shader *This = impl_from_ID3D10GeometryShader(iface);
325     ULONG refcount = InterlockedDecrement(&This->refcount);
326
327     TRACE("%p decreasing refcount to %u\n", This, refcount);
328
329     if (!refcount)
330         wined3d_shader_decref(This->wined3d_shader);
331
332     return refcount;
333 }
334
335 /* ID3D10DeviceChild methods */
336
337 static void STDMETHODCALLTYPE d3d10_geometry_shader_GetDevice(ID3D10GeometryShader *iface, ID3D10Device **device)
338 {
339     FIXME("iface %p, device %p stub!\n", iface, device);
340 }
341
342 static HRESULT STDMETHODCALLTYPE d3d10_geometry_shader_GetPrivateData(ID3D10GeometryShader *iface,
343         REFGUID guid, UINT *data_size, void *data)
344 {
345     FIXME("iface %p, guid %s, data_size %p, data %p stub!\n",
346             iface, debugstr_guid(guid), data_size, data);
347
348     return E_NOTIMPL;
349 }
350
351 static HRESULT STDMETHODCALLTYPE d3d10_geometry_shader_SetPrivateData(ID3D10GeometryShader *iface,
352         REFGUID guid, UINT data_size, const void *data)
353 {
354     FIXME("iface %p, guid %s, data_size %u, data %p stub!\n",
355             iface, debugstr_guid(guid), data_size, data);
356
357     return E_NOTIMPL;
358 }
359
360 static HRESULT STDMETHODCALLTYPE d3d10_geometry_shader_SetPrivateDataInterface(ID3D10GeometryShader *iface,
361         REFGUID guid, const IUnknown *data)
362 {
363     FIXME("iface %p, guid %s, data %p stub!\n", iface, debugstr_guid(guid), data);
364
365     return E_NOTIMPL;
366 }
367
368 static const struct ID3D10GeometryShaderVtbl d3d10_geometry_shader_vtbl =
369 {
370     /* IUnknown methods */
371     d3d10_geometry_shader_QueryInterface,
372     d3d10_geometry_shader_AddRef,
373     d3d10_geometry_shader_Release,
374     /* ID3D10DeviceChild methods */
375     d3d10_geometry_shader_GetDevice,
376     d3d10_geometry_shader_GetPrivateData,
377     d3d10_geometry_shader_SetPrivateData,
378     d3d10_geometry_shader_SetPrivateDataInterface,
379 };
380
381 static void STDMETHODCALLTYPE d3d10_geometry_shader_wined3d_object_destroyed(void *parent)
382 {
383     struct d3d10_geometry_shader *shader = parent;
384     shader_free_signature(&shader->output_signature);
385     HeapFree(GetProcessHeap(), 0, shader);
386 }
387
388 static const struct wined3d_parent_ops d3d10_geometry_shader_wined3d_parent_ops =
389 {
390     d3d10_geometry_shader_wined3d_object_destroyed,
391 };
392
393 HRESULT d3d10_geometry_shader_init(struct d3d10_geometry_shader *shader, struct d3d10_device *device,
394         const void *byte_code, SIZE_T byte_code_length)
395 {
396     struct d3d10_shader_info shader_info;
397     HRESULT hr;
398
399     shader->ID3D10GeometryShader_iface.lpVtbl = &d3d10_geometry_shader_vtbl;
400     shader->refcount = 1;
401
402     shader_info.output_signature = &shader->output_signature;
403     hr = shader_extract_from_dxbc(byte_code, byte_code_length, &shader_info);
404     if (FAILED(hr))
405     {
406         ERR("Failed to extract shader, hr %#x.\n", hr);
407         return hr;
408     }
409
410     hr = wined3d_shader_create_gs(device->wined3d_device, shader_info.shader_code,
411             &shader->output_signature, shader, &d3d10_geometry_shader_wined3d_parent_ops, &shader->wined3d_shader);
412     if (FAILED(hr))
413     {
414         WARN("Failed to create wined3d vertex shader, hr %#x.\n", hr);
415         shader_free_signature(&shader->output_signature);
416         return hr;
417     }
418
419     return S_OK;
420 }
421
422 static inline struct d3d10_pixel_shader *impl_from_ID3D10PixelShader(ID3D10PixelShader *iface)
423 {
424     return CONTAINING_RECORD(iface, struct d3d10_pixel_shader, ID3D10PixelShader_iface);
425 }
426
427 /* IUnknown methods */
428
429 static HRESULT STDMETHODCALLTYPE d3d10_pixel_shader_QueryInterface(ID3D10PixelShader *iface,
430         REFIID riid, void **object)
431 {
432     TRACE("iface %p, riid %s, object %p\n", iface, debugstr_guid(riid), object);
433
434     if (IsEqualGUID(riid, &IID_ID3D10PixelShader)
435             || IsEqualGUID(riid, &IID_ID3D10DeviceChild)
436             || IsEqualGUID(riid, &IID_IUnknown))
437     {
438         IUnknown_AddRef(iface);
439         *object = iface;
440         return S_OK;
441     }
442
443     WARN("%s not implemented, returning E_NOINTERFACE\n", debugstr_guid(riid));
444
445     *object = NULL;
446     return E_NOINTERFACE;
447 }
448
449 static ULONG STDMETHODCALLTYPE d3d10_pixel_shader_AddRef(ID3D10PixelShader *iface)
450 {
451     struct d3d10_pixel_shader *This = impl_from_ID3D10PixelShader(iface);
452     ULONG refcount = InterlockedIncrement(&This->refcount);
453
454     TRACE("%p increasing refcount to %u\n", This, refcount);
455
456     if (refcount == 1)
457         wined3d_shader_incref(This->wined3d_shader);
458
459     return refcount;
460 }
461
462 static ULONG STDMETHODCALLTYPE d3d10_pixel_shader_Release(ID3D10PixelShader *iface)
463 {
464     struct d3d10_pixel_shader *This = impl_from_ID3D10PixelShader(iface);
465     ULONG refcount = InterlockedDecrement(&This->refcount);
466
467     TRACE("%p decreasing refcount to %u\n", This, refcount);
468
469     if (!refcount)
470         wined3d_shader_decref(This->wined3d_shader);
471
472     return refcount;
473 }
474
475 /* ID3D10DeviceChild methods */
476
477 static void STDMETHODCALLTYPE d3d10_pixel_shader_GetDevice(ID3D10PixelShader *iface, ID3D10Device **device)
478 {
479     FIXME("iface %p, device %p stub!\n", iface, device);
480 }
481
482 static HRESULT STDMETHODCALLTYPE d3d10_pixel_shader_GetPrivateData(ID3D10PixelShader *iface,
483         REFGUID guid, UINT *data_size, void *data)
484 {
485     FIXME("iface %p, guid %s, data_size %p, data %p stub!\n",
486             iface, debugstr_guid(guid), data_size, data);
487
488     return E_NOTIMPL;
489 }
490
491 static HRESULT STDMETHODCALLTYPE d3d10_pixel_shader_SetPrivateData(ID3D10PixelShader *iface,
492         REFGUID guid, UINT data_size, const void *data)
493 {
494     FIXME("iface %p, guid %s, data_size %u, data %p stub!\n",
495             iface, debugstr_guid(guid), data_size, data);
496
497     return E_NOTIMPL;
498 }
499
500 static HRESULT STDMETHODCALLTYPE d3d10_pixel_shader_SetPrivateDataInterface(ID3D10PixelShader *iface,
501         REFGUID guid, const IUnknown *data)
502 {
503     FIXME("iface %p, guid %s, data %p stub!\n", iface, debugstr_guid(guid), data);
504
505     return E_NOTIMPL;
506 }
507
508 static const struct ID3D10PixelShaderVtbl d3d10_pixel_shader_vtbl =
509 {
510     /* IUnknown methods */
511     d3d10_pixel_shader_QueryInterface,
512     d3d10_pixel_shader_AddRef,
513     d3d10_pixel_shader_Release,
514     /* ID3D10DeviceChild methods */
515     d3d10_pixel_shader_GetDevice,
516     d3d10_pixel_shader_GetPrivateData,
517     d3d10_pixel_shader_SetPrivateData,
518     d3d10_pixel_shader_SetPrivateDataInterface,
519 };
520
521 static void STDMETHODCALLTYPE d3d10_pixel_shader_wined3d_object_destroyed(void *parent)
522 {
523     struct d3d10_pixel_shader *shader = parent;
524     shader_free_signature(&shader->output_signature);
525     HeapFree(GetProcessHeap(), 0, shader);
526 }
527
528 static const struct wined3d_parent_ops d3d10_pixel_shader_wined3d_parent_ops =
529 {
530     d3d10_pixel_shader_wined3d_object_destroyed,
531 };
532
533 HRESULT d3d10_pixel_shader_init(struct d3d10_pixel_shader *shader, struct d3d10_device *device,
534         const void *byte_code, SIZE_T byte_code_length)
535 {
536     struct d3d10_shader_info shader_info;
537     HRESULT hr;
538
539     shader->ID3D10PixelShader_iface.lpVtbl = &d3d10_pixel_shader_vtbl;
540     shader->refcount = 1;
541
542     shader_info.output_signature = &shader->output_signature;
543     hr = shader_extract_from_dxbc(byte_code, byte_code_length, &shader_info);
544     if (FAILED(hr))
545     {
546         ERR("Failed to extract shader, hr %#x.\n", hr);
547         return hr;
548     }
549
550     hr = wined3d_shader_create_ps(device->wined3d_device, shader_info.shader_code,
551             &shader->output_signature, shader, &d3d10_pixel_shader_wined3d_parent_ops, &shader->wined3d_shader);
552     if (FAILED(hr))
553     {
554         WARN("Failed to create wined3d pixel shader, hr %#x.\n", hr);
555         shader_free_signature(&shader->output_signature);
556         return hr;
557     }
558
559     return S_OK;
560 }
561
562 struct d3d10_pixel_shader *unsafe_impl_from_ID3D10PixelShader(ID3D10PixelShader *iface)
563 {
564     if (!iface)
565         return NULL;
566     assert(iface->lpVtbl == &d3d10_pixel_shader_vtbl);
567
568     return impl_from_ID3D10PixelShader(iface);
569 }