[OPENGL]
[reactos.git] / reactos / dll / opengl / mesa / src / mesa / vbo / vbo_exec_draw.c
1 /*
2 * Mesa 3-D graphics library
3 * Version: 7.2
4 *
5 * Copyright (C) 1999-2008 Brian Paul All Rights Reserved.
6 *
7 * Permission is hereby granted, free of charge, to any person obtaining a
8 * copy of this software and associated documentation files (the "Software"),
9 * to deal in the Software without restriction, including without limitation
10 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
11 * and/or sell copies of the Software, and to permit persons to whom the
12 * Software is furnished to do so, subject to the following conditions:
13 *
14 * The above copyright notice and this permission notice shall be included
15 * in all copies or substantial portions of the Software.
16 *
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
18 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
20 * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
21 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
22 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
23 *
24 * Authors:
25 * Keith Whitwell <keith@tungstengraphics.com>
26 */
27
28 #include "main/glheader.h"
29 #include "main/bufferobj.h"
30 #include "main/compiler.h"
31 #include "main/context.h"
32 #include "main/enums.h"
33 #include "main/mfeatures.h"
34 #include "main/state.h"
35 #include "main/vtxfmt.h"
36
37 #include "vbo_context.h"
38 #include "vbo_noop.h"
39
40
41 #if FEATURE_beginend
42
43
44 static void
45 vbo_exec_debug_verts( struct vbo_exec_context *exec )
46 {
47 GLuint count = exec->vtx.vert_count;
48 GLuint i;
49
50 printf("%s: %u vertices %d primitives, %d vertsize\n",
51 __FUNCTION__,
52 count,
53 exec->vtx.prim_count,
54 exec->vtx.vertex_size);
55
56 for (i = 0 ; i < exec->vtx.prim_count ; i++) {
57 struct _mesa_prim *prim = &exec->vtx.prim[i];
58 printf(" prim %d: %s%s %d..%d %s %s\n",
59 i,
60 _mesa_lookup_prim_by_nr(prim->mode),
61 prim->weak ? " (weak)" : "",
62 prim->start,
63 prim->start + prim->count,
64 prim->begin ? "BEGIN" : "(wrap)",
65 prim->end ? "END" : "(wrap)");
66 }
67 }
68
69
70 /*
71 * NOTE: Need to have calculated primitives by this point -- do it on the fly.
72 * NOTE: Old 'parity' issue is gone.
73 */
74 static GLuint
75 vbo_copy_vertices( struct vbo_exec_context *exec )
76 {
77 GLuint nr = exec->vtx.prim[exec->vtx.prim_count-1].count;
78 GLuint ovf, i;
79 GLuint sz = exec->vtx.vertex_size;
80 GLfloat *dst = exec->vtx.copied.buffer;
81 const GLfloat *src = (exec->vtx.buffer_map +
82 exec->vtx.prim[exec->vtx.prim_count-1].start *
83 exec->vtx.vertex_size);
84
85
86 switch (exec->ctx->Driver.CurrentExecPrimitive) {
87 case GL_POINTS:
88 return 0;
89 case GL_LINES:
90 ovf = nr&1;
91 for (i = 0 ; i < ovf ; i++)
92 memcpy( dst+i*sz, src+(nr-ovf+i)*sz, sz * sizeof(GLfloat) );
93 return i;
94 case GL_TRIANGLES:
95 ovf = nr%3;
96 for (i = 0 ; i < ovf ; i++)
97 memcpy( dst+i*sz, src+(nr-ovf+i)*sz, sz * sizeof(GLfloat) );
98 return i;
99 case GL_QUADS:
100 ovf = nr&3;
101 for (i = 0 ; i < ovf ; i++)
102 memcpy( dst+i*sz, src+(nr-ovf+i)*sz, sz * sizeof(GLfloat) );
103 return i;
104 case GL_LINE_STRIP:
105 if (nr == 0) {
106 return 0;
107 }
108 else {
109 memcpy( dst, src+(nr-1)*sz, sz * sizeof(GLfloat) );
110 return 1;
111 }
112 case GL_LINE_LOOP:
113 case GL_TRIANGLE_FAN:
114 case GL_POLYGON:
115 if (nr == 0) {
116 return 0;
117 }
118 else if (nr == 1) {
119 memcpy( dst, src+0, sz * sizeof(GLfloat) );
120 return 1;
121 }
122 else {
123 memcpy( dst, src+0, sz * sizeof(GLfloat) );
124 memcpy( dst+sz, src+(nr-1)*sz, sz * sizeof(GLfloat) );
125 return 2;
126 }
127 case GL_TRIANGLE_STRIP:
128 /* no parity issue, but need to make sure the tri is not drawn twice */
129 if (nr & 1) {
130 exec->vtx.prim[exec->vtx.prim_count-1].count--;
131 }
132 /* fallthrough */
133 case GL_QUAD_STRIP:
134 switch (nr) {
135 case 0:
136 ovf = 0;
137 break;
138 case 1:
139 ovf = 1;
140 break;
141 default:
142 ovf = 2 + (nr & 1);
143 break;
144 }
145 for (i = 0 ; i < ovf ; i++)
146 memcpy( dst+i*sz, src+(nr-ovf+i)*sz, sz * sizeof(GLfloat) );
147 return i;
148 case PRIM_OUTSIDE_BEGIN_END:
149 return 0;
150 default:
151 assert(0);
152 return 0;
153 }
154 }
155
156
157
158 /* TODO: populate these as the vertex is defined:
159 */
160 static void
161 vbo_exec_bind_arrays( struct gl_context *ctx )
162 {
163 struct vbo_context *vbo = vbo_context(ctx);
164 struct vbo_exec_context *exec = &vbo->exec;
165 struct gl_client_array *arrays = exec->vtx.arrays;
166 const GLuint count = exec->vtx.vert_count;
167 const GLuint *map;
168 GLuint attr;
169 GLbitfield64 varying_inputs = 0x0;
170
171 /* Install the default (ie Current) attributes first, then overlay
172 * all active ones.
173 */
174 switch (get_program_mode(exec->ctx)) {
175 case VP_NONE:
176 for (attr = 0; attr < VERT_ATTRIB_FF_MAX; attr++) {
177 exec->vtx.inputs[attr] = &vbo->legacy_currval[attr];
178 }
179 for (attr = 0; attr < MAT_ATTRIB_MAX; attr++) {
180 ASSERT(VERT_ATTRIB_GENERIC(attr) < Elements(exec->vtx.inputs));
181 exec->vtx.inputs[VERT_ATTRIB_GENERIC(attr)] = &vbo->mat_currval[attr];
182 }
183 map = vbo->map_vp_none;
184 break;
185 case VP_NV:
186 case VP_ARB:
187 /* The aliasing of attributes for NV vertex programs has already
188 * occurred. NV vertex programs cannot access material values,
189 * nor attributes greater than VERT_ATTRIB_TEX7.
190 */
191 for (attr = 0; attr < VERT_ATTRIB_FF_MAX; attr++) {
192 exec->vtx.inputs[attr] = &vbo->legacy_currval[attr];
193 }
194 for (attr = 0; attr < VERT_ATTRIB_GENERIC_MAX; attr++) {
195 ASSERT(VERT_ATTRIB_GENERIC(attr) < Elements(exec->vtx.inputs));
196 exec->vtx.inputs[VERT_ATTRIB_GENERIC(attr)] = &vbo->generic_currval[attr];
197 }
198 map = vbo->map_vp_arb;
199
200 /* check if VERT_ATTRIB_POS is not read but VERT_BIT_GENERIC0 is read.
201 * In that case we effectively need to route the data from
202 * glVertexAttrib(0, val) calls to feed into the GENERIC0 input.
203 */
204 if ((ctx->VertexProgram._Current->Base.InputsRead & VERT_BIT_POS) == 0 &&
205 (ctx->VertexProgram._Current->Base.InputsRead & VERT_BIT_GENERIC0)) {
206 exec->vtx.inputs[VERT_ATTRIB_GENERIC0] = exec->vtx.inputs[0];
207 exec->vtx.attrsz[VERT_ATTRIB_GENERIC0] = exec->vtx.attrsz[0];
208 exec->vtx.attrptr[VERT_ATTRIB_GENERIC0] = exec->vtx.attrptr[0];
209 exec->vtx.attrsz[0] = 0;
210 }
211 break;
212 default:
213 assert(0);
214 }
215
216 /* Make all active attributes (including edgeflag) available as
217 * arrays of floats.
218 */
219 for (attr = 0; attr < VERT_ATTRIB_MAX ; attr++) {
220 const GLuint src = map[attr];
221
222 if (exec->vtx.attrsz[src]) {
223 GLsizeiptr offset = (GLbyte *)exec->vtx.attrptr[src] -
224 (GLbyte *)exec->vtx.vertex;
225
226 /* override the default array set above */
227 ASSERT(attr < Elements(exec->vtx.inputs));
228 ASSERT(attr < Elements(exec->vtx.arrays)); /* arrays[] */
229 exec->vtx.inputs[attr] = &arrays[attr];
230
231 if (_mesa_is_bufferobj(exec->vtx.bufferobj)) {
232 /* a real buffer obj: Ptr is an offset, not a pointer*/
233 assert(exec->vtx.bufferobj->Pointer); /* buf should be mapped */
234 assert(offset >= 0);
235 arrays[attr].Ptr = (GLubyte *)exec->vtx.bufferobj->Offset + offset;
236 }
237 else {
238 /* Ptr into ordinary app memory */
239 arrays[attr].Ptr = (GLubyte *)exec->vtx.buffer_map + offset;
240 }
241 arrays[attr].Size = exec->vtx.attrsz[src];
242 arrays[attr].StrideB = exec->vtx.vertex_size * sizeof(GLfloat);
243 arrays[attr].Stride = exec->vtx.vertex_size * sizeof(GLfloat);
244 arrays[attr].Type = GL_FLOAT;
245 arrays[attr].Format = GL_RGBA;
246 arrays[attr].Enabled = 1;
247 arrays[attr]._ElementSize = arrays[attr].Size * sizeof(GLfloat);
248 _mesa_reference_buffer_object(ctx,
249 &arrays[attr].BufferObj,
250 exec->vtx.bufferobj);
251 arrays[attr]._MaxElement = count; /* ??? */
252
253 varying_inputs |= VERT_BIT(attr);
254 ctx->NewState |= _NEW_ARRAY;
255 }
256 }
257
258 _mesa_set_varying_vp_inputs( ctx, varying_inputs );
259 }
260
261
262 /**
263 * Unmap the VBO. This is called before drawing.
264 */
265 static void
266 vbo_exec_vtx_unmap( struct vbo_exec_context *exec )
267 {
268 if (_mesa_is_bufferobj(exec->vtx.bufferobj)) {
269 struct gl_context *ctx = exec->ctx;
270
271 if (ctx->Driver.FlushMappedBufferRange) {
272 GLintptr offset = exec->vtx.buffer_used - exec->vtx.bufferobj->Offset;
273 GLsizeiptr length = (exec->vtx.buffer_ptr - exec->vtx.buffer_map) * sizeof(float);
274
275 if (length)
276 ctx->Driver.FlushMappedBufferRange(ctx, offset, length,
277 exec->vtx.bufferobj);
278 }
279
280 exec->vtx.buffer_used += (exec->vtx.buffer_ptr -
281 exec->vtx.buffer_map) * sizeof(float);
282
283 assert(exec->vtx.buffer_used <= VBO_VERT_BUFFER_SIZE);
284 assert(exec->vtx.buffer_ptr != NULL);
285
286 ctx->Driver.UnmapBuffer(ctx, exec->vtx.bufferobj);
287 exec->vtx.buffer_map = NULL;
288 exec->vtx.buffer_ptr = NULL;
289 exec->vtx.max_vert = 0;
290 }
291 }
292
293
294 /**
295 * Map the vertex buffer to begin storing glVertex, glColor, etc data.
296 */
297 void
298 vbo_exec_vtx_map( struct vbo_exec_context *exec )
299 {
300 struct gl_context *ctx = exec->ctx;
301 const GLenum accessRange = GL_MAP_WRITE_BIT | /* for MapBufferRange */
302 GL_MAP_INVALIDATE_RANGE_BIT |
303 GL_MAP_UNSYNCHRONIZED_BIT |
304 GL_MAP_FLUSH_EXPLICIT_BIT |
305 MESA_MAP_NOWAIT_BIT;
306 const GLenum usage = GL_STREAM_DRAW_ARB;
307
308 if (!_mesa_is_bufferobj(exec->vtx.bufferobj))
309 return;
310
311 assert(!exec->vtx.buffer_map);
312 assert(!exec->vtx.buffer_ptr);
313
314 if (VBO_VERT_BUFFER_SIZE > exec->vtx.buffer_used + 1024) {
315 /* The VBO exists and there's room for more */
316 if (exec->vtx.bufferobj->Size > 0) {
317 exec->vtx.buffer_map =
318 (GLfloat *)ctx->Driver.MapBufferRange(ctx,
319 exec->vtx.buffer_used,
320 (VBO_VERT_BUFFER_SIZE -
321 exec->vtx.buffer_used),
322 accessRange,
323 exec->vtx.bufferobj);
324 exec->vtx.buffer_ptr = exec->vtx.buffer_map;
325 }
326 else {
327 exec->vtx.buffer_ptr = exec->vtx.buffer_map = NULL;
328 }
329 }
330
331 if (!exec->vtx.buffer_map) {
332 /* Need to allocate a new VBO */
333 exec->vtx.buffer_used = 0;
334
335 if (ctx->Driver.BufferData(ctx, GL_ARRAY_BUFFER_ARB,
336 VBO_VERT_BUFFER_SIZE,
337 NULL, usage, exec->vtx.bufferobj)) {
338 /* buffer allocation worked, now map the buffer */
339 exec->vtx.buffer_map =
340 (GLfloat *)ctx->Driver.MapBufferRange(ctx,
341 0, VBO_VERT_BUFFER_SIZE,
342 accessRange,
343 exec->vtx.bufferobj);
344 }
345 else {
346 _mesa_error(ctx, GL_OUT_OF_MEMORY, "VBO allocation");
347 exec->vtx.buffer_map = NULL;
348 }
349 }
350
351 exec->vtx.buffer_ptr = exec->vtx.buffer_map;
352
353 if (!exec->vtx.buffer_map) {
354 /* out of memory */
355 _mesa_install_exec_vtxfmt( ctx, &exec->vtxfmt_noop );
356 }
357 else {
358 if (_mesa_using_noop_vtxfmt(ctx->Exec)) {
359 /* The no-op functions are installed so switch back to regular
360 * functions. We do this test just to avoid frequent and needless
361 * calls to _mesa_install_exec_vtxfmt().
362 */
363 _mesa_install_exec_vtxfmt(ctx, &exec->vtxfmt);
364 }
365 }
366
367 if (0)
368 printf("map %d..\n", exec->vtx.buffer_used);
369 }
370
371
372
373 /**
374 * Execute the buffer and save copied verts.
375 * \param keep_unmapped if true, leave the VBO unmapped when we're done.
376 */
377 void
378 vbo_exec_vtx_flush(struct vbo_exec_context *exec, GLboolean keepUnmapped)
379 {
380 if (0)
381 vbo_exec_debug_verts( exec );
382
383 if (exec->vtx.prim_count &&
384 exec->vtx.vert_count) {
385
386 exec->vtx.copied.nr = vbo_copy_vertices( exec );
387
388 if (exec->vtx.copied.nr != exec->vtx.vert_count) {
389 struct gl_context *ctx = exec->ctx;
390
391 /* Before the update_state() as this may raise _NEW_ARRAY
392 * from _mesa_set_varying_vp_inputs().
393 */
394 vbo_exec_bind_arrays( ctx );
395
396 if (ctx->NewState)
397 _mesa_update_state( ctx );
398
399 if (_mesa_is_bufferobj(exec->vtx.bufferobj)) {
400 vbo_exec_vtx_unmap( exec );
401 }
402
403 if (0)
404 printf("%s %d %d\n", __FUNCTION__, exec->vtx.prim_count,
405 exec->vtx.vert_count);
406
407 vbo_context(ctx)->draw_prims( ctx,
408 exec->vtx.inputs,
409 exec->vtx.prim,
410 exec->vtx.prim_count,
411 NULL,
412 GL_TRUE,
413 0,
414 exec->vtx.vert_count - 1,
415 NULL);
416
417 /* If using a real VBO, get new storage -- unless asked not to.
418 */
419 if (_mesa_is_bufferobj(exec->vtx.bufferobj) && !keepUnmapped) {
420 vbo_exec_vtx_map( exec );
421 }
422 }
423 }
424
425 /* May have to unmap explicitly if we didn't draw:
426 */
427 if (keepUnmapped &&
428 _mesa_is_bufferobj(exec->vtx.bufferobj) &&
429 exec->vtx.buffer_map) {
430 vbo_exec_vtx_unmap( exec );
431 }
432
433 if (keepUnmapped || exec->vtx.vertex_size == 0)
434 exec->vtx.max_vert = 0;
435 else
436 exec->vtx.max_vert = ((VBO_VERT_BUFFER_SIZE - exec->vtx.buffer_used) /
437 (exec->vtx.vertex_size * sizeof(GLfloat)));
438
439 exec->vtx.buffer_ptr = exec->vtx.buffer_map;
440 exec->vtx.prim_count = 0;
441 exec->vtx.vert_count = 0;
442 }
443
444
445 #endif /* FEATURE_beginend */