avifil32: Romanian translation.
[wine] / dlls / wined3d / buffer.c
1 /*
2  * Copyright 2002-2005 Jason Edmeades
3  * Copyright 2002-2005 Raphael Junqueira
4  * Copyright 2004 Christian Costa
5  * Copyright 2005 Oliver Stieber
6  * Copyright 2007 Stefan Dösinger for CodeWeavers
7  * Copyright 2009 Henri Verbeet for CodeWeavers
8  *
9  * This library is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU Lesser General Public
11  * License as published by the Free Software Foundation; either
12  * version 2.1 of the License, or (at your option) any later version.
13  *
14  * This library is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  * Lesser General Public License for more details.
18  *
19  * You should have received a copy of the GNU Lesser General Public
20  * License along with this library; if not, write to the Free Software
21  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
22  *
23  */
24
25 #include "config.h"
26 #include "wine/port.h"
27
28 #include "wined3d_private.h"
29
30 WINE_DEFAULT_DEBUG_CHANNEL(d3d);
31
32 #define GLINFO_LOCATION This->resource.wineD3DDevice->adapter->gl_info
33
34 #define VB_MAXDECLCHANGES     100     /* After that number we stop converting */
35 #define VB_RESETDECLCHANGE    1000    /* Reset the changecount after that number of draws */
36
37 static void buffer_create_buffer_object(struct wined3d_buffer *This)
38 {
39     GLenum error, gl_usage;
40     IWineD3DDeviceImpl *device = This->resource.wineD3DDevice;
41
42     TRACE("Creating an OpenGL vertex buffer object for IWineD3DVertexBuffer %p Usage(%s)\n",
43             This, debug_d3dusage(This->resource.usage));
44
45     /* Make sure that a context is there. Needed in a multithreaded environment. Otherwise this call is a nop */
46     ActivateContext(device, device->lastActiveRenderTarget, CTXUSAGE_RESOURCELOAD);
47     ENTER_GL();
48
49     /* Make sure that the gl error is cleared. Do not use checkGLcall
50     * here because checkGLcall just prints a fixme and continues. However,
51     * if an error during VBO creation occurs we can fall back to non-vbo operation
52     * with full functionality(but performance loss)
53     */
54     while (glGetError() != GL_NO_ERROR);
55
56     /* Basically the FVF parameter passed to CreateVertexBuffer is no good
57      * It is the FVF set with IWineD3DDevice::SetFVF or the Vertex Declaration set with
58      * IWineD3DDevice::SetVertexDeclaration that decides how the vertices in the buffer
59      * look like. This means that on each DrawPrimitive call the vertex buffer has to be verified
60      * to check if the rhw and color values are in the correct format.
61      */
62
63     GL_EXTCALL(glGenBuffersARB(1, &This->buffer_object));
64     error = glGetError();
65     if (!This->buffer_object || error != GL_NO_ERROR)
66     {
67         ERR("Failed to create a VBO with error %s (%#x)\n", debug_glerror(error), error);
68         goto fail;
69     }
70
71     if(This->buffer_type_hint == GL_ELEMENT_ARRAY_BUFFER_ARB)
72     {
73         IWineD3DDeviceImpl_MarkStateDirty(This->resource.wineD3DDevice, STATE_INDEXBUFFER);
74     }
75     GL_EXTCALL(glBindBufferARB(This->buffer_type_hint, This->buffer_object));
76     error = glGetError();
77     if (error != GL_NO_ERROR)
78     {
79         ERR("Failed to bind the VBO with error %s (%#x)\n", debug_glerror(error), error);
80         goto fail;
81     }
82
83     /* Don't use static, because dx apps tend to update the buffer
84     * quite often even if they specify 0 usage. Because we always keep the local copy
85     * we never read from the vbo and can create a write only opengl buffer.
86     */
87     switch(This->resource.usage & (WINED3DUSAGE_WRITEONLY | WINED3DUSAGE_DYNAMIC))
88     {
89         case WINED3DUSAGE_WRITEONLY | WINED3DUSAGE_DYNAMIC:
90         case WINED3DUSAGE_DYNAMIC:
91             TRACE("Gl usage = GL_STREAM_DRAW\n");
92             gl_usage = GL_STREAM_DRAW_ARB;
93             break;
94
95         case WINED3DUSAGE_WRITEONLY:
96         default:
97             TRACE("Gl usage = GL_DYNAMIC_DRAW\n");
98             gl_usage = GL_DYNAMIC_DRAW_ARB;
99             break;
100     }
101
102     /* Reserve memory for the buffer. The amount of data won't change
103      * so we are safe with calling glBufferData once and
104      * calling glBufferSubData on updates. Upload the actual data in case
105      * we're not double buffering, so we can release the heap mem afterwards
106      */
107     GL_EXTCALL(glBufferDataARB(This->buffer_type_hint, This->resource.size, This->resource.allocatedMemory, gl_usage));
108     error = glGetError();
109     if (error != GL_NO_ERROR)
110     {
111         ERR("glBufferDataARB failed with error %s (%#x)\n", debug_glerror(error), error);
112         goto fail;
113     }
114
115     LEAVE_GL();
116
117     This->buffer_object_size = This->resource.size;
118     This->buffer_object_usage = gl_usage;
119     This->dirty_start = 0;
120     This->dirty_end = This->resource.size;
121
122     if(This->flags & WINED3D_BUFFER_DOUBLEBUFFER)
123     {
124         This->flags |= WINED3D_BUFFER_DIRTY;
125     }
126     else
127     {
128         HeapFree(GetProcessHeap(), 0, This->resource.heapMemory);
129         This->resource.allocatedMemory = NULL;
130         This->resource.heapMemory = NULL;
131         This->flags &= ~WINED3D_BUFFER_DIRTY;
132     }
133
134     return;
135
136 fail:
137     /* Clean up all vbo init, but continue because we can work without a vbo :-) */
138     ERR("Failed to create a vertex buffer object. Continuing, but performance issues may occur\n");
139     if (This->buffer_object) GL_EXTCALL(glDeleteBuffersARB(1, &This->buffer_object));
140     This->buffer_object = 0;
141     LEAVE_GL();
142
143     return;
144 }
145
146 static BOOL buffer_process_converted_attribute(struct wined3d_buffer *This,
147         const enum wined3d_buffer_conversion_type conversion_type,
148         const struct wined3d_stream_info_element *attrib, DWORD *stride_this_run)
149 {
150     DWORD attrib_size;
151     BOOL ret = FALSE;
152     unsigned int i;
153     DWORD offset = This->resource.wineD3DDevice->stateBlock->streamOffset[attrib->stream_idx];
154     DWORD_PTR data;
155
156     /* Check for some valid situations which cause us pain. One is if the buffer is used for
157      * constant attributes(stride = 0), the other one is if the buffer is used on two streams
158      * with different strides. In the 2nd case we might have to drop conversion entirely,
159      * it is possible that the same bytes are once read as FLOAT2 and once as UBYTE4N.
160      */
161     if (!attrib->stride)
162     {
163         FIXME("%s used with stride 0, let's hope we get the vertex stride from somewhere else\n",
164                 debug_d3dformat(attrib->format_desc->format));
165     }
166     else if(attrib->stride != *stride_this_run && *stride_this_run)
167     {
168         FIXME("Got two concurrent strides, %d and %d\n", attrib->stride, *stride_this_run);
169     }
170     else
171     {
172         *stride_this_run = attrib->stride;
173         if (This->stride != *stride_this_run)
174         {
175             /* We rely that this happens only on the first converted attribute that is found,
176              * if at all. See above check
177              */
178             TRACE("Reconverting because converted attributes occur, and the stride changed\n");
179             This->stride = *stride_this_run;
180             HeapFree(GetProcessHeap(), HEAP_ZERO_MEMORY, This->conversion_map);
181             This->conversion_map = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
182                     sizeof(*This->conversion_map) * This->stride);
183             ret = TRUE;
184         }
185     }
186
187     data = (((DWORD_PTR)attrib->data) + offset) % This->stride;
188     attrib_size = attrib->format_desc->component_count * attrib->format_desc->component_size;
189     for (i = 0; i < attrib_size; ++i)
190     {
191         if (This->conversion_map[data + i] != conversion_type)
192         {
193             TRACE("Byte %ld in vertex changed\n", i + data);
194             TRACE("It was type %d, is %d now\n", This->conversion_map[data + i], conversion_type);
195             ret = TRUE;
196             This->conversion_map[data + i] = conversion_type;
197         }
198     }
199
200     return ret;
201 }
202
203 static BOOL buffer_check_attribute(struct wined3d_buffer *This,
204         const struct wined3d_stream_info_element *attrib, const BOOL check_d3dcolor, const BOOL is_ffp_position,
205         const BOOL is_ffp_color, DWORD *stride_this_run, BOOL *float16_used)
206 {
207     BOOL ret = FALSE;
208     WINED3DFORMAT format;
209
210     /* Ignore attributes that do not have our vbo. After that check we can be sure that the attribute is
211      * there, on nonexistent attribs the vbo is 0.
212      */
213     if (attrib->buffer_object != This->buffer_object) return FALSE;
214
215     format = attrib->format_desc->format;
216     /* Look for newly appeared conversion */
217     if (!GL_SUPPORT(ARB_HALF_FLOAT_VERTEX) && (format == WINED3DFMT_R16G16_FLOAT || format == WINED3DFMT_R16G16B16A16_FLOAT))
218     {
219         ret = buffer_process_converted_attribute(This, CONV_FLOAT16_2, attrib, stride_this_run);
220
221         if (is_ffp_position) FIXME("Test FLOAT16 fixed function processing positions\n");
222         else if (is_ffp_color) FIXME("test FLOAT16 fixed function processing colors\n");
223         *float16_used = TRUE;
224     }
225     else if (check_d3dcolor && format == WINED3DFMT_A8R8G8B8)
226     {
227         ret = buffer_process_converted_attribute(This, CONV_D3DCOLOR, attrib, stride_this_run);
228
229         if (!is_ffp_color) FIXME("Test for non-color fixed function WINED3DFMT_A8R8G8B8 format\n");
230     }
231     else if (is_ffp_position && format == WINED3DFMT_R32G32B32A32_FLOAT)
232     {
233         ret = buffer_process_converted_attribute(This, CONV_POSITIONT, attrib, stride_this_run);
234     }
235     else if (This->conversion_map)
236     {
237         ret = buffer_process_converted_attribute(This, CONV_NONE, attrib, stride_this_run);
238     }
239
240     return ret;
241 }
242
243 static UINT *find_conversion_shift(struct wined3d_buffer *This,
244         const struct wined3d_stream_info *strided, UINT stride)
245 {
246     UINT *ret, i, j, shift, orig_type_size;
247
248     if (!stride)
249     {
250         TRACE("No shift\n");
251         return NULL;
252     }
253
254     This->conversion_stride = stride;
255     ret = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(DWORD) * stride);
256     for (i = 0; i < MAX_ATTRIBS; ++i)
257     {
258         WINED3DFORMAT format;
259
260         if (strided->elements[i].buffer_object != This->buffer_object) continue;
261
262         format = strided->elements[i].format_desc->format;
263         if (format == WINED3DFMT_R16G16_FLOAT)
264         {
265             shift = 4;
266         }
267         else if (format == WINED3DFMT_R16G16B16A16_FLOAT)
268         {
269             shift = 8;
270             /* Pre-shift the last 4 bytes in the FLOAT16_4 by 4 bytes - this makes FLOAT16_2 and FLOAT16_4 conversions
271              * compatible
272              */
273             for (j = 4; j < 8; ++j)
274             {
275                 ret[(DWORD_PTR)strided->elements[i].data + j] += 4;
276             }
277         }
278         else
279         {
280             shift = 0;
281         }
282         This->conversion_stride += shift;
283
284         if (shift)
285         {
286             orig_type_size = strided->elements[i].format_desc->component_count
287                     * strided->elements[i].format_desc->component_size;
288             for (j = (DWORD_PTR)strided->elements[i].data + orig_type_size; j < stride; ++j)
289             {
290                 ret[j] += shift;
291             }
292         }
293     }
294
295     if (TRACE_ON(d3d))
296     {
297         TRACE("Dumping conversion shift:\n");
298         for (i = 0; i < stride; ++i)
299         {
300             TRACE("[%d]", ret[i]);
301         }
302         TRACE("\n");
303     }
304
305     return ret;
306 }
307
308 static BOOL buffer_find_decl(struct wined3d_buffer *This)
309 {
310     IWineD3DDeviceImpl *device = This->resource.wineD3DDevice;
311     UINT stride_this_run = 0;
312     BOOL float16_used = FALSE;
313     BOOL ret = FALSE;
314     unsigned int i;
315
316     /* In d3d7 the vertex buffer declaration NEVER changes because it is stored in the d3d7 vertex buffer.
317      * Once we have our declaration there is no need to look it up again. Index buffers also never need
318      * conversion, so once the (empty) conversion structure is created don't bother checking again
319      */
320     if (This->flags & WINED3D_BUFFER_HASDESC)
321     {
322         if(((IWineD3DImpl *)device->wineD3D)->dxVersion == 7 ||
323              This->resource.format_desc->format != WINED3DFMT_VERTEXDATA) return FALSE;
324     }
325
326     TRACE("Finding vertex buffer conversion information\n");
327     /* Certain declaration types need some fixups before we can pass them to
328      * opengl. This means D3DCOLOR attributes with fixed function vertex
329      * processing, FLOAT4 POSITIONT with fixed function, and FLOAT16 if
330      * GL_ARB_half_float_vertex is not supported.
331      *
332      * Note for d3d8 and d3d9:
333      * The vertex buffer FVF doesn't help with finding them, we have to use
334      * the decoded vertex declaration and pick the things that concern the
335      * current buffer. A problem with this is that this can change between
336      * draws, so we have to validate the information and reprocess the buffer
337      * if it changes, and avoid false positives for performance reasons.
338      * WineD3D doesn't even know the vertex buffer any more, it is managed
339      * by the client libraries and passed to SetStreamSource and ProcessVertices
340      * as needed.
341      *
342      * We have to distinguish between vertex shaders and fixed function to
343      * pick the way we access the strided vertex information.
344      *
345      * This code sets up a per-byte array with the size of the detected
346      * stride of the arrays in the buffer. For each byte we have a field
347      * that marks the conversion needed on this byte. For example, the
348      * following declaration with fixed function vertex processing:
349      *
350      *      POSITIONT, FLOAT4
351      *      NORMAL, FLOAT3
352      *      DIFFUSE, FLOAT16_4
353      *      SPECULAR, D3DCOLOR
354      *
355      * Will result in
356      * {                 POSITIONT                    }{             NORMAL                }{    DIFFUSE          }{SPECULAR }
357      * [P][P][P][P][P][P][P][P][P][P][P][P][P][P][P][P][0][0][0][0][0][0][0][0][0][0][0][0][F][F][F][F][F][F][F][F][C][C][C][C]
358      *
359      * Where in this example map P means 4 component position conversion, 0
360      * means no conversion, F means FLOAT16_2 conversion and C means D3DCOLOR
361      * conversion (red / blue swizzle).
362      *
363      * If we're doing conversion and the stride changes we have to reconvert
364      * the whole buffer. Note that we do not mind if the semantic changes,
365      * we only care for the conversion type. So if the NORMAL is replaced
366      * with a TEXCOORD, nothing has to be done, or if the DIFFUSE is replaced
367      * with a D3DCOLOR BLENDWEIGHT we can happily dismiss the change. Some
368      * conversion types depend on the semantic as well, for example a FLOAT4
369      * texcoord needs no conversion while a FLOAT4 positiont needs one
370      */
371     if (use_vs(device->stateBlock))
372     {
373         TRACE("vshader\n");
374         /* If the current vertex declaration is marked for no half float conversion don't bother to
375          * analyse the strided streams in depth, just set them up for no conversion. Return decl changed
376          * if we used conversion before
377          */
378         if (!((IWineD3DVertexDeclarationImpl *) device->stateBlock->vertexDecl)->half_float_conv_needed)
379         {
380             if (This->conversion_map)
381             {
382                 TRACE("Now using shaders without conversion, but conversion used before\n");
383                 HeapFree(GetProcessHeap(), 0, This->conversion_map);
384                 HeapFree(GetProcessHeap(), 0, This->conversion_shift);
385                 This->conversion_map = NULL;
386                 This->stride = 0;
387                 This->conversion_shift = NULL;
388                 This->conversion_stride = 0;
389                 return TRUE;
390             }
391             else
392             {
393                 return FALSE;
394             }
395         }
396         for (i = 0; i < MAX_ATTRIBS; ++i)
397         {
398             ret = buffer_check_attribute(This, &device->strided_streams.elements[i],
399                     FALSE, FALSE, FALSE, &stride_this_run, &float16_used) || ret;
400         }
401
402         /* Recalculate the conversion shift map if the declaration has changed,
403          * and we're using float16 conversion or used it on the last run
404          */
405         if (ret && (float16_used || This->conversion_map))
406         {
407             HeapFree(GetProcessHeap(), 0, This->conversion_shift);
408             This->conversion_shift = find_conversion_shift(This, &device->strided_streams, This->stride);
409         }
410     }
411     else
412     {
413         /* Fixed function is a bit trickier. We have to take care for D3DCOLOR types, FLOAT4 positions and of course
414          * FLOAT16s if not supported. Also, we can't iterate over the array, so use macros to generate code for all
415          * the attributes that our current fixed function pipeline implementation cares for.
416          */
417         BOOL support_d3dcolor = GL_SUPPORT(EXT_VERTEX_ARRAY_BGRA);
418         ret = buffer_check_attribute(This, &device->strided_streams.elements[WINED3D_FFP_POSITION],
419                 TRUE, TRUE,  FALSE, &stride_this_run, &float16_used) || ret;
420         ret = buffer_check_attribute(This, &device->strided_streams.elements[WINED3D_FFP_NORMAL],
421                 TRUE, FALSE, FALSE, &stride_this_run, &float16_used) || ret;
422         ret = buffer_check_attribute(This, &device->strided_streams.elements[WINED3D_FFP_DIFFUSE],
423                 !support_d3dcolor, FALSE, TRUE,  &stride_this_run, &float16_used) || ret;
424         ret = buffer_check_attribute(This, &device->strided_streams.elements[WINED3D_FFP_SPECULAR],
425                 !support_d3dcolor, FALSE, TRUE,  &stride_this_run, &float16_used) || ret;
426         ret = buffer_check_attribute(This, &device->strided_streams.elements[WINED3D_FFP_TEXCOORD0],
427                 TRUE, FALSE, FALSE, &stride_this_run, &float16_used) || ret;
428         ret = buffer_check_attribute(This, &device->strided_streams.elements[WINED3D_FFP_TEXCOORD1],
429                 TRUE, FALSE, FALSE, &stride_this_run, &float16_used) || ret;
430         ret = buffer_check_attribute(This, &device->strided_streams.elements[WINED3D_FFP_TEXCOORD2],
431                 TRUE, FALSE, FALSE, &stride_this_run, &float16_used) || ret;
432         ret = buffer_check_attribute(This, &device->strided_streams.elements[WINED3D_FFP_TEXCOORD3],
433                 TRUE, FALSE, FALSE, &stride_this_run, &float16_used) || ret;
434         ret = buffer_check_attribute(This, &device->strided_streams.elements[WINED3D_FFP_TEXCOORD4],
435                 TRUE, FALSE, FALSE, &stride_this_run, &float16_used) || ret;
436         ret = buffer_check_attribute(This, &device->strided_streams.elements[WINED3D_FFP_TEXCOORD5],
437                 TRUE, FALSE, FALSE, &stride_this_run, &float16_used) || ret;
438         ret = buffer_check_attribute(This, &device->strided_streams.elements[WINED3D_FFP_TEXCOORD6],
439                 TRUE, FALSE, FALSE, &stride_this_run, &float16_used) || ret;
440         ret = buffer_check_attribute(This, &device->strided_streams.elements[WINED3D_FFP_TEXCOORD7],
441                 TRUE, FALSE, FALSE, &stride_this_run, &float16_used) || ret;
442
443         if (float16_used) FIXME("Float16 conversion used with fixed function vertex processing\n");
444     }
445
446     if (stride_this_run == 0 && This->conversion_map)
447     {
448         /* Sanity test */
449         if (!ret) ERR("no converted attributes found, old conversion map exists, and no declaration change?\n");
450         HeapFree(GetProcessHeap(), 0, This->conversion_map);
451         This->conversion_map = NULL;
452         This->stride = 0;
453     }
454
455     if (ret) TRACE("Conversion information changed\n");
456
457     return ret;
458 }
459
460 static void buffer_check_buffer_object_size(struct wined3d_buffer *This)
461 {
462     UINT size = This->conversion_stride ?
463             This->conversion_stride * (This->resource.size / This->stride) : This->resource.size;
464     if (This->buffer_object_size != size)
465     {
466         TRACE("Old size %u, creating new size %u\n", This->buffer_object_size, size);
467
468         if(This->buffer_type_hint == GL_ELEMENT_ARRAY_BUFFER_ARB)
469         {
470             IWineD3DDeviceImpl_MarkStateDirty(This->resource.wineD3DDevice, STATE_INDEXBUFFER);
471         }
472
473         /* Rescue the data before resizing the buffer object if we do not have our backup copy */
474         if(!(This->flags & WINED3D_BUFFER_DOUBLEBUFFER))
475         {
476             buffer_get_sysmem(This);
477         }
478
479         ENTER_GL();
480         GL_EXTCALL(glBindBufferARB(This->buffer_type_hint, This->buffer_object));
481         checkGLcall("glBindBufferARB");
482         GL_EXTCALL(glBufferDataARB(This->buffer_type_hint, size, NULL, This->buffer_object_usage));
483         This->buffer_object_size = size;
484         checkGLcall("glBufferDataARB");
485         LEAVE_GL();
486     }
487 }
488
489 static inline void fixup_d3dcolor(DWORD *dst_color)
490 {
491     DWORD src_color = *dst_color;
492
493     /* Color conversion like in drawStridedSlow. watch out for little endianity
494      * If we want that stuff to work on big endian machines too we have to consider more things
495      *
496      * 0xff000000: Alpha mask
497      * 0x00ff0000: Blue mask
498      * 0x0000ff00: Green mask
499      * 0x000000ff: Red mask
500      */
501     *dst_color = 0;
502     *dst_color |= (src_color & 0xff00ff00);         /* Alpha Green */
503     *dst_color |= (src_color & 0x00ff0000) >> 16;   /* Red */
504     *dst_color |= (src_color & 0x000000ff) << 16;   /* Blue */
505 }
506
507 static inline void fixup_transformed_pos(float *p)
508 {
509     /* rhw conversion like in position_float4(). */
510     if (p[3] != 1.0 && p[3] != 0.0)
511     {
512         float w = 1.0 / p[3];
513         p[0] *= w;
514         p[1] *= w;
515         p[2] *= w;
516         p[3] = w;
517     }
518 }
519
520 const BYTE *buffer_get_memory(IWineD3DBuffer *iface, UINT offset, GLuint *buffer_object)
521 {
522     struct wined3d_buffer *This = (struct wined3d_buffer *)iface;
523
524     *buffer_object = This->buffer_object;
525     if (!This->buffer_object)
526     {
527         if (This->flags & WINED3D_BUFFER_CREATEBO)
528         {
529             buffer_create_buffer_object(This);
530             This->flags &= ~WINED3D_BUFFER_CREATEBO;
531             if (This->buffer_object)
532             {
533                 *buffer_object = This->buffer_object;
534                 return (const BYTE *)offset;
535             }
536         }
537         return This->resource.allocatedMemory + offset;
538     }
539     else
540     {
541         return (const BYTE *)offset;
542     }
543 }
544
545 /* IUnknown methods */
546
547 static HRESULT STDMETHODCALLTYPE buffer_QueryInterface(IWineD3DBuffer *iface,
548         REFIID riid, void **object)
549 {
550     TRACE("iface %p, riid %s, object %p\n", iface, debugstr_guid(riid), object);
551
552     if (IsEqualGUID(riid, &IID_IWineD3DBuffer)
553             || IsEqualGUID(riid, &IID_IWineD3DResource)
554             || IsEqualGUID(riid, &IID_IWineD3DBase)
555             || IsEqualGUID(riid, &IID_IUnknown))
556     {
557         IUnknown_AddRef(iface);
558         *object = iface;
559         return S_OK;
560     }
561
562     WARN("%s not implemented, returning E_NOINTERFACE\n", debugstr_guid(riid));
563
564     *object = NULL;
565
566     return E_NOINTERFACE;
567 }
568
569 static ULONG STDMETHODCALLTYPE buffer_AddRef(IWineD3DBuffer *iface)
570 {
571     struct wined3d_buffer *This = (struct wined3d_buffer *)iface;
572     ULONG refcount = InterlockedIncrement(&This->resource.ref);
573
574     TRACE("%p increasing refcount to %u\n", This, refcount);
575
576     return refcount;
577 }
578
579 const BYTE *buffer_get_sysmem(struct wined3d_buffer *This)
580 {
581     /* AllocatedMemory exists if the buffer is double buffered or has no buffer object at all */
582     if(This->resource.allocatedMemory) return This->resource.allocatedMemory;
583
584     This->resource.heapMemory = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, This->resource.size + RESOURCE_ALIGNMENT);
585     This->resource.allocatedMemory = (BYTE *)(((ULONG_PTR)This->resource.heapMemory + (RESOURCE_ALIGNMENT - 1)) & ~(RESOURCE_ALIGNMENT - 1));
586     ENTER_GL();
587     GL_EXTCALL(glBindBufferARB(This->buffer_type_hint, This->buffer_object));
588     GL_EXTCALL(glGetBufferSubDataARB(This->buffer_type_hint, 0, This->resource.size, This->resource.allocatedMemory));
589     LEAVE_GL();
590     This->flags |= WINED3D_BUFFER_DOUBLEBUFFER;
591
592     return This->resource.allocatedMemory;
593 }
594
595 static void STDMETHODCALLTYPE buffer_UnLoad(IWineD3DBuffer *iface)
596 {
597     struct wined3d_buffer *This = (struct wined3d_buffer *)iface;
598
599     TRACE("iface %p\n", iface);
600
601     if (This->buffer_object)
602     {
603         IWineD3DDeviceImpl *device = This->resource.wineD3DDevice;
604
605         ActivateContext(device, device->lastActiveRenderTarget, CTXUSAGE_RESOURCELOAD);
606
607         /* Download the buffer, but don't permanently enable double buffering */
608         if(!(This->flags & WINED3D_BUFFER_DOUBLEBUFFER))
609         {
610             buffer_get_sysmem(This);
611             This->flags &= ~WINED3D_BUFFER_DOUBLEBUFFER;
612         }
613
614         ENTER_GL();
615         GL_EXTCALL(glDeleteBuffersARB(1, &This->buffer_object));
616         checkGLcall("glDeleteBuffersARB");
617         LEAVE_GL();
618         This->buffer_object = 0;
619         This->flags |= WINED3D_BUFFER_CREATEBO; /* Recreate the buffer object next load */
620     }
621 }
622
623 static ULONG STDMETHODCALLTYPE buffer_Release(IWineD3DBuffer *iface)
624 {
625     struct wined3d_buffer *This = (struct wined3d_buffer *)iface;
626     ULONG refcount = InterlockedDecrement(&This->resource.ref);
627
628     TRACE("%p decreasing refcount to %u\n", This, refcount);
629
630     if (!refcount)
631     {
632         buffer_UnLoad(iface);
633         resource_cleanup((IWineD3DResource *)iface);
634         HeapFree(GetProcessHeap(), 0, This);
635     }
636
637     return refcount;
638 }
639
640 /* IWineD3DBase methods */
641
642 static HRESULT STDMETHODCALLTYPE buffer_GetParent(IWineD3DBuffer *iface, IUnknown **parent)
643 {
644     return resource_get_parent((IWineD3DResource *)iface, parent);
645 }
646
647 /* IWineD3DResource methods */
648
649 static HRESULT STDMETHODCALLTYPE buffer_GetDevice(IWineD3DBuffer *iface, IWineD3DDevice **device)
650 {
651     return resource_get_device((IWineD3DResource *)iface, device);
652 }
653
654 static HRESULT STDMETHODCALLTYPE buffer_SetPrivateData(IWineD3DBuffer *iface,
655         REFGUID guid, const void *data, DWORD data_size, DWORD flags)
656 {
657     return resource_set_private_data((IWineD3DResource *)iface, guid, data, data_size, flags);
658 }
659
660 static HRESULT STDMETHODCALLTYPE buffer_GetPrivateData(IWineD3DBuffer *iface,
661         REFGUID guid, void *data, DWORD *data_size)
662 {
663     return resource_get_private_data((IWineD3DResource *)iface, guid, data, data_size);
664 }
665
666 static HRESULT STDMETHODCALLTYPE buffer_FreePrivateData(IWineD3DBuffer *iface, REFGUID guid)
667 {
668     return resource_free_private_data((IWineD3DResource *)iface, guid);
669 }
670
671 static DWORD STDMETHODCALLTYPE buffer_SetPriority(IWineD3DBuffer *iface, DWORD priority)
672 {
673     return resource_set_priority((IWineD3DResource *)iface, priority);
674 }
675
676 static DWORD STDMETHODCALLTYPE buffer_GetPriority(IWineD3DBuffer *iface)
677 {
678     return resource_get_priority((IWineD3DResource *)iface);
679 }
680
681 static void STDMETHODCALLTYPE buffer_PreLoad(IWineD3DBuffer *iface)
682 {
683     struct wined3d_buffer *This = (struct wined3d_buffer *)iface;
684     IWineD3DDeviceImpl *device = This->resource.wineD3DDevice;
685     UINT start = 0, end = 0, vertices;
686     BOOL decl_changed = FALSE;
687     unsigned int i, j;
688     BYTE *data;
689
690     TRACE("iface %p\n", iface);
691
692     if (!This->buffer_object)
693     {
694         /* TODO: Make converting independent from VBOs */
695         if (This->flags & WINED3D_BUFFER_CREATEBO)
696         {
697             buffer_create_buffer_object(This);
698             This->flags &= ~WINED3D_BUFFER_CREATEBO;
699         }
700         else
701         {
702             return; /* Not doing any conversion */
703         }
704     }
705
706     /* Reading the declaration makes only sense if the stateblock is finalized and the buffer bound to a stream */
707     if (device->isInDraw && This->bind_count > 0)
708     {
709         decl_changed = buffer_find_decl(This);
710         This->flags |= WINED3D_BUFFER_HASDESC;
711     }
712
713     if (!decl_changed && !(This->flags & WINED3D_BUFFER_HASDESC && This->flags & WINED3D_BUFFER_DIRTY)) return;
714
715     /* If applications change the declaration over and over, reconverting all the time is a huge
716      * performance hit. So count the declaration changes and release the VBO if there are too many
717      * of them (and thus stop converting)
718      */
719     if (decl_changed)
720     {
721         ++This->conversion_count;
722         This->draw_count = 0;
723
724         if (This->conversion_count > VB_MAXDECLCHANGES)
725         {
726             FIXME("Too many declaration changes, stopping converting\n");
727             ActivateContext(device, device->lastActiveRenderTarget, CTXUSAGE_RESOURCELOAD);
728             ENTER_GL();
729             GL_EXTCALL(glDeleteBuffersARB(1, &This->buffer_object));
730             checkGLcall("glDeleteBuffersARB");
731             LEAVE_GL();
732             This->buffer_object = 0;
733             HeapFree(GetProcessHeap(), 0, This->conversion_shift);
734
735             /* The stream source state handler might have read the memory of the vertex buffer already
736              * and got the memory in the vbo which is not valid any longer. Dirtify the stream source
737              * to force a reload. This happens only once per changed vertexbuffer and should occur rather
738              * rarely
739              */
740             IWineD3DDeviceImpl_MarkStateDirty(device, STATE_STREAMSRC);
741
742             return;
743         }
744         buffer_check_buffer_object_size(This);
745     }
746     else
747     {
748         /* However, it is perfectly fine to change the declaration every now and then. We don't want a game that
749          * changes it every minute drop the VBO after VB_MAX_DECL_CHANGES minutes. So count draws without
750          * decl changes and reset the decl change count after a specific number of them
751          */
752         ++This->draw_count;
753         if (This->draw_count > VB_RESETDECLCHANGE) This->conversion_count = 0;
754     }
755
756     if (decl_changed)
757     {
758         /* The declaration changed, reload the whole buffer */
759         WARN("Reloading buffer because of decl change\n");
760         start = 0;
761         end = This->resource.size;
762     }
763     else
764     {
765         /* No decl change, but dirty data, reload the changed stuff */
766         if (This->conversion_shift)
767         {
768             if (This->dirty_start != 0 || This->dirty_end != 0)
769             {
770                 FIXME("Implement partial buffer loading with shifted conversion\n");
771             }
772         }
773         start = This->dirty_start;
774         end = This->dirty_end;
775     }
776
777     /* Mark the buffer clean */
778     This->flags &= ~WINED3D_BUFFER_DIRTY;
779     This->dirty_start = 0;
780     This->dirty_end = 0;
781
782     if(This->buffer_type_hint == GL_ELEMENT_ARRAY_BUFFER_ARB)
783     {
784         IWineD3DDeviceImpl_MarkStateDirty(This->resource.wineD3DDevice, STATE_INDEXBUFFER);
785     }
786
787     if (!This->conversion_map)
788     {
789         /* That means that there is nothing to fixup. Just upload from This->resource.allocatedMemory
790          * directly into the vbo. Do not free the system memory copy because drawPrimitive may need it if
791          * the stride is 0, for instancing emulation, vertex blending emulation or shader emulation.
792          */
793         TRACE("No conversion needed\n");
794
795         /* Nothing to do because we locked directly into the vbo */
796         if(!(This->flags & WINED3D_BUFFER_DOUBLEBUFFER)) return;
797
798         if (!device->isInDraw)
799         {
800             ActivateContext(device, device->lastActiveRenderTarget, CTXUSAGE_RESOURCELOAD);
801         }
802         ENTER_GL();
803         GL_EXTCALL(glBindBufferARB(This->buffer_type_hint, This->buffer_object));
804         checkGLcall("glBindBufferARB");
805         GL_EXTCALL(glBufferSubDataARB(This->buffer_type_hint, start, end-start, This->resource.allocatedMemory + start));
806         checkGLcall("glBufferSubDataARB");
807         LEAVE_GL();
808         return;
809     }
810
811     if(!(This->flags & WINED3D_BUFFER_DOUBLEBUFFER))
812     {
813         buffer_get_sysmem(This);
814     }
815
816     /* Now for each vertex in the buffer that needs conversion */
817     vertices = This->resource.size / This->stride;
818
819     if (This->conversion_shift)
820     {
821         TRACE("Shifted conversion\n");
822         data = HeapAlloc(GetProcessHeap(), 0, vertices * This->conversion_stride);
823
824         for (i = start / This->stride; i < min((end / This->stride) + 1, vertices); ++i)
825         {
826             for (j = 0; j < This->stride; ++j)
827             {
828                 switch(This->conversion_map[j])
829                 {
830                     case CONV_NONE:
831                         data[This->conversion_stride * i + j + This->conversion_shift[j]]
832                                 = This->resource.allocatedMemory[This->stride * i + j];
833                         break;
834
835                     case CONV_FLOAT16_2:
836                     {
837                         float *out = (float *)(&data[This->conversion_stride * i + j + This->conversion_shift[j]]);
838                         const WORD *in = (WORD *)(&This->resource.allocatedMemory[i * This->stride + j]);
839
840                         out[1] = float_16_to_32(in + 1);
841                         out[0] = float_16_to_32(in + 0);
842                         j += 3;    /* Skip 3 additional bytes,as a FLOAT16_2 has 4 bytes */
843                         break;
844                     }
845
846                     default:
847                         FIXME("Unimplemented conversion %d in shifted conversion\n", This->conversion_map[j]);
848                         break;
849                 }
850             }
851         }
852
853         ENTER_GL();
854         GL_EXTCALL(glBindBufferARB(This->buffer_type_hint, This->buffer_object));
855         checkGLcall("glBindBufferARB");
856         GL_EXTCALL(glBufferSubDataARB(This->buffer_type_hint, 0, vertices * This->conversion_stride, data));
857         checkGLcall("glBufferSubDataARB");
858         LEAVE_GL();
859     }
860     else
861     {
862         data = HeapAlloc(GetProcessHeap(), 0, This->resource.size);
863         memcpy(data + start, This->resource.allocatedMemory + start, end - start);
864         for (i = start / This->stride; i < min((end / This->stride) + 1, vertices); ++i)
865         {
866             for (j = 0; j < This->stride; ++j)
867             {
868                 switch(This->conversion_map[j])
869                 {
870                     case CONV_NONE:
871                         /* Done already */
872                         j += 3;
873                         break;
874                     case CONV_D3DCOLOR:
875                         fixup_d3dcolor((DWORD *) (data + i * This->stride + j));
876                         j += 3;
877                         break;
878
879                     case CONV_POSITIONT:
880                         fixup_transformed_pos((float *) (data + i * This->stride + j));
881                         j += 15;
882                         break;
883
884                     case CONV_FLOAT16_2:
885                         ERR("Did not expect FLOAT16 conversion in unshifted conversion\n");
886                     default:
887                         FIXME("Unimplemented conversion %d in shifted conversion\n", This->conversion_map[j]);
888                 }
889             }
890         }
891
892         ENTER_GL();
893         GL_EXTCALL(glBindBufferARB(This->buffer_type_hint, This->buffer_object));
894         checkGLcall("glBindBufferARB");
895         GL_EXTCALL(glBufferSubDataARB(This->buffer_type_hint, start, end - start, data + start));
896         checkGLcall("glBufferSubDataARB");
897         LEAVE_GL();
898     }
899
900     HeapFree(GetProcessHeap(), 0, data);
901 }
902
903 static WINED3DRESOURCETYPE STDMETHODCALLTYPE buffer_GetType(IWineD3DBuffer *iface)
904 {
905     return resource_get_type((IWineD3DResource *)iface);
906 }
907
908 /* IWineD3DBuffer methods */
909
910 static HRESULT STDMETHODCALLTYPE buffer_Map(IWineD3DBuffer *iface, UINT offset, UINT size, BYTE **data, DWORD flags)
911 {
912     struct wined3d_buffer *This = (struct wined3d_buffer *)iface;
913     LONG count;
914
915     TRACE("iface %p, offset %u, size %u, data %p, flags %#x\n", iface, offset, size, data, flags);
916
917     count = InterlockedIncrement(&This->lock_count);
918
919     if (This->flags & WINED3D_BUFFER_DIRTY)
920     {
921         if (This->dirty_start > offset) This->dirty_start = offset;
922
923         if (size)
924         {
925             if (This->dirty_end < offset + size) This->dirty_end = offset + size;
926         }
927         else
928         {
929             This->dirty_end = This->resource.size;
930         }
931     }
932     else
933     {
934         This->dirty_start = offset;
935         if (size) This->dirty_end = offset + size;
936         else This->dirty_end = This->resource.size;
937     }
938
939     if(!(This->flags & WINED3D_BUFFER_DOUBLEBUFFER) && This->buffer_object)
940     {
941         if(count == 1)
942         {
943             IWineD3DDeviceImpl *device = This->resource.wineD3DDevice;
944
945             if(This->buffer_type_hint == GL_ELEMENT_ARRAY_BUFFER_ARB)
946             {
947                 IWineD3DDeviceImpl_MarkStateDirty(This->resource.wineD3DDevice, STATE_INDEXBUFFER);
948             }
949
950             ActivateContext(device, device->lastActiveRenderTarget, CTXUSAGE_RESOURCELOAD);
951             ENTER_GL();
952             GL_EXTCALL(glBindBufferARB(This->buffer_type_hint, This->buffer_object));
953             This->resource.allocatedMemory = GL_EXTCALL(glMapBufferARB(This->buffer_type_hint, GL_READ_WRITE_ARB));
954             LEAVE_GL();
955         }
956     }
957     else
958     {
959         This->flags |= WINED3D_BUFFER_DIRTY;
960     }
961
962     *data = This->resource.allocatedMemory + offset;
963
964     TRACE("Returning memory at %p (base %p, offset %u)\n", *data, This->resource.allocatedMemory, offset);
965     /* TODO: check Flags compatibility with This->currentDesc.Usage (see MSDN) */
966
967     return WINED3D_OK;
968 }
969
970 static HRESULT STDMETHODCALLTYPE buffer_Unmap(IWineD3DBuffer *iface)
971 {
972     struct wined3d_buffer *This = (struct wined3d_buffer *)iface;
973
974     TRACE("(%p)\n", This);
975
976     /* In the case that the number of Unmap calls > the
977      * number of Map calls, d3d returns always D3D_OK.
978      * This is also needed to prevent Map from returning garbage on
979      * the next call (this will happen if the lock_count is < 0). */
980     if(This->lock_count == 0)
981     {
982         TRACE("Unmap called without a previous Map call!\n");
983         return WINED3D_OK;
984     }
985
986     if (InterlockedDecrement(&This->lock_count))
987     {
988         /* Delay loading the buffer until everything is unlocked */
989         TRACE("Ignoring unlock\n");
990         return WINED3D_OK;
991     }
992
993     if(!(This->flags & WINED3D_BUFFER_DOUBLEBUFFER) && This->buffer_object)
994     {
995         IWineD3DDeviceImpl *device = This->resource.wineD3DDevice;
996
997         if(This->buffer_type_hint == GL_ELEMENT_ARRAY_BUFFER_ARB)
998         {
999             IWineD3DDeviceImpl_MarkStateDirty(This->resource.wineD3DDevice, STATE_INDEXBUFFER);
1000         }
1001
1002         ActivateContext(device, device->lastActiveRenderTarget, CTXUSAGE_RESOURCELOAD);
1003         ENTER_GL();
1004         GL_EXTCALL(glBindBufferARB(This->buffer_type_hint, This->buffer_object));
1005         GL_EXTCALL(glUnmapBufferARB(This->buffer_type_hint));
1006         LEAVE_GL();
1007
1008         This->resource.allocatedMemory = NULL;
1009     }
1010     else if (This->flags & WINED3D_BUFFER_HASDESC)
1011     {
1012         buffer_PreLoad(iface);
1013     }
1014
1015     return WINED3D_OK;
1016 }
1017
1018 static HRESULT STDMETHODCALLTYPE buffer_GetDesc(IWineD3DBuffer *iface, WINED3DBUFFER_DESC *desc)
1019 {
1020     struct wined3d_buffer *This = (struct wined3d_buffer *)iface;
1021
1022     TRACE("(%p)\n", This);
1023
1024     desc->Type = This->resource.resourceType;
1025     desc->Usage = This->resource.usage;
1026     desc->Pool = This->resource.pool;
1027     desc->Size = This->resource.size;
1028
1029     return WINED3D_OK;
1030 }
1031
1032 const struct IWineD3DBufferVtbl wined3d_buffer_vtbl =
1033 {
1034     /* IUnknown methods */
1035     buffer_QueryInterface,
1036     buffer_AddRef,
1037     buffer_Release,
1038     /* IWineD3DBase methods */
1039     buffer_GetParent,
1040     /* IWineD3DResource methods */
1041     buffer_GetDevice,
1042     buffer_SetPrivateData,
1043     buffer_GetPrivateData,
1044     buffer_FreePrivateData,
1045     buffer_SetPriority,
1046     buffer_GetPriority,
1047     buffer_PreLoad,
1048     buffer_UnLoad,
1049     buffer_GetType,
1050     /* IWineD3DBuffer methods */
1051     buffer_Map,
1052     buffer_Unmap,
1053     buffer_GetDesc,
1054 };