2 * Mesa 3-D graphics library
5 * Copyright (C) 1999-2007 Brian Paul All Rights Reserved.
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:
14 * The above copyright notice and this permission notice shall be included
15 * in all copies or substantial portions of the Software.
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.
25 * Keith Whitwell <keith@tungstengraphics.com>
28 #include "main/glheader.h"
29 #include "main/condrender.h"
30 #include "main/context.h"
31 #include "main/imports.h"
32 #include "main/mtypes.h"
33 #include "main/macros.h"
34 #include "main/enums.h"
36 #include "t_context.h"
41 static GLubyte *get_space(struct gl_context *ctx, GLuint bytes)
43 TNLcontext *tnl = TNL_CONTEXT(ctx);
44 GLubyte *space = malloc(bytes);
46 tnl->block[tnl->nr_blocks++] = space;
51 static void free_space(struct gl_context *ctx)
53 TNLcontext *tnl = TNL_CONTEXT(ctx);
55 for (i = 0; i < tnl->nr_blocks; i++)
61 /* Convert the incoming array to GLfloats. Understands the
62 * array->Normalized flag and selects the correct conversion method.
64 #define CONVERT( TYPE, MACRO ) do { \
66 if (input->Normalized) { \
67 for (i = 0; i < count; i++) { \
68 const TYPE *in = (TYPE *)ptr; \
69 for (j = 0; j < sz; j++) { \
70 *fptr++ = MACRO(*in); \
73 ptr += input->StrideB; \
76 for (i = 0; i < count; i++) { \
77 const TYPE *in = (TYPE *)ptr; \
78 for (j = 0; j < sz; j++) { \
79 *fptr++ = (GLfloat)(*in); \
82 ptr += input->StrideB; \
89 * Convert array of BGRA/GLubyte[4] values to RGBA/float[4]
90 * \param ptr input/ubyte array
91 * \param fptr output/float array
94 convert_bgra_to_float(const struct gl_client_array *input,
95 const GLubyte *ptr, GLfloat *fptr,
99 assert(input->Normalized);
100 assert(input->Size == 4);
101 for (i = 0; i < count; i++) {
102 const GLubyte *in = (GLubyte *) ptr; /* in is in BGRA order */
103 *fptr++ = UBYTE_TO_FLOAT(in[2]); /* red */
104 *fptr++ = UBYTE_TO_FLOAT(in[1]); /* green */
105 *fptr++ = UBYTE_TO_FLOAT(in[0]); /* blue */
106 *fptr++ = UBYTE_TO_FLOAT(in[3]); /* alpha */
107 ptr += input->StrideB;
112 convert_half_to_float(const struct gl_client_array *input,
113 const GLubyte *ptr, GLfloat *fptr,
114 GLuint count, GLuint sz)
118 for (i = 0; i < count; i++) {
119 GLhalfARB *in = (GLhalfARB *)ptr;
121 for (j = 0; j < sz; j++) {
122 *fptr++ = _mesa_half_to_float(in[j]);
124 ptr += input->StrideB;
129 * \brief Convert fixed-point to floating-point.
131 * In OpenGL, a fixed-point number is a "signed 2's complement 16.16 scaled
132 * integer" (Table 2.2 of the OpenGL ES 2.0 spec).
134 * If the buffer has the \c normalized flag set, the formula
135 * \code normalize(x) := (2*x + 1) / (2^16 - 1) \endcode
136 * is used to map the fixed-point numbers into the range [-1, 1].
139 convert_fixed_to_float(const struct gl_client_array *input,
140 const GLubyte *ptr, GLfloat *fptr,
144 const GLint size = input->Size;
146 if (input->Normalized) {
147 for (i = 0; i < count; ++i) {
148 const GLfixed *in = (GLfixed *) ptr;
149 for (j = 0; j < size; ++j) {
150 *fptr++ = (GLfloat) (2 * in[j] + 1) / (GLfloat) ((1 << 16) - 1);
152 ptr += input->StrideB;
155 for (i = 0; i < count; ++i) {
156 const GLfixed *in = (GLfixed *) ptr;
157 for (j = 0; j < size; ++j) {
158 *fptr++ = in[j] / (GLfloat) (1 << 16);
160 ptr += input->StrideB;
165 /* Adjust pointer to point at first requested element, convert to
166 * floating point, populate VB->AttribPtr[].
168 static void _tnl_import_array( struct gl_context *ctx,
171 const struct gl_client_array *input,
174 TNLcontext *tnl = TNL_CONTEXT(ctx);
175 struct vertex_buffer *VB = &tnl->vb;
176 GLuint stride = input->StrideB;
178 if (input->Type != GL_FLOAT) {
179 const GLuint sz = input->Size;
180 GLubyte *buf = get_space(ctx, count * sz * sizeof(GLfloat));
181 GLfloat *fptr = (GLfloat *)buf;
183 switch (input->Type) {
185 CONVERT(GLbyte, BYTE_TO_FLOAT);
187 case GL_UNSIGNED_BYTE:
188 if (input->Format == GL_BGRA) {
189 /* See GL_EXT_vertex_array_bgra */
190 convert_bgra_to_float(input, ptr, fptr, count);
193 CONVERT(GLubyte, UBYTE_TO_FLOAT);
197 CONVERT(GLshort, SHORT_TO_FLOAT);
199 case GL_UNSIGNED_SHORT:
200 CONVERT(GLushort, USHORT_TO_FLOAT);
203 CONVERT(GLint, INT_TO_FLOAT);
205 case GL_UNSIGNED_INT:
206 CONVERT(GLuint, UINT_TO_FLOAT);
209 CONVERT(GLdouble, (GLfloat));
212 convert_half_to_float(input, ptr, fptr, count, sz);
215 convert_fixed_to_float(input, ptr, fptr, count);
223 stride = sz * sizeof(GLfloat);
226 VB->AttribPtr[attrib] = &tnl->tmp_inputs[attrib];
227 VB->AttribPtr[attrib]->data = (GLfloat (*)[4])ptr;
228 VB->AttribPtr[attrib]->start = (GLfloat *)ptr;
229 VB->AttribPtr[attrib]->count = count;
230 VB->AttribPtr[attrib]->stride = stride;
231 VB->AttribPtr[attrib]->size = input->Size;
233 /* This should die, but so should the whole GLvector4f concept:
235 VB->AttribPtr[attrib]->flags = (((1<<input->Size)-1) |
237 (stride == 4*sizeof(GLfloat) ? 0 : VEC_BAD_STRIDE));
239 VB->AttribPtr[attrib]->storage = NULL;
242 #define CLIPVERTS ((6 + MAX_CLIP_PLANES) * 2)
245 static GLboolean *_tnl_import_edgeflag( struct gl_context *ctx,
246 const GLvector4f *input,
249 const GLubyte *ptr = (const GLubyte *)input->data;
250 const GLuint stride = input->stride;
251 GLboolean *space = (GLboolean *)get_space(ctx, count + CLIPVERTS);
252 GLboolean *bptr = space;
255 for (i = 0; i < count; i++) {
256 *bptr++ = ((GLfloat *)ptr)[0] == 1.0;
264 static void bind_inputs( struct gl_context *ctx,
265 const struct gl_client_array *inputs[],
267 struct gl_buffer_object **bo,
270 TNLcontext *tnl = TNL_CONTEXT(ctx);
271 struct vertex_buffer *VB = &tnl->vb;
276 for (i = 0; i < VERT_ATTRIB_MAX; i++) {
279 if (inputs[i]->BufferObj->Name) {
280 if (!inputs[i]->BufferObj->Pointer) {
281 bo[*nr_bo] = inputs[i]->BufferObj;
283 ctx->Driver.MapBuffer(ctx,
286 inputs[i]->BufferObj);
288 assert(inputs[i]->BufferObj->Pointer);
291 ptr = ADD_POINTERS(inputs[i]->BufferObj->Pointer,
295 ptr = inputs[i]->Ptr;
297 /* Just make sure the array is floating point, otherwise convert to
300 * XXX: remove the GLvector4f type at some stage and just use
303 _tnl_import_array(ctx, i, count, inputs[i], ptr);
306 /* We process only the vertices between min & max index:
310 /* These should perhaps be part of _TNL_ATTRIB_* */
311 VB->BackfaceColorPtr = NULL;
312 VB->BackfaceIndexPtr = NULL;
313 VB->BackfaceSecondaryColorPtr = NULL;
315 /* Clipping and drawing code still requires this to be a packed
316 * array of ubytes which can be written into. TODO: Fix and
319 if (ctx->Polygon.FrontMode != GL_FILL ||
320 ctx->Polygon.BackMode != GL_FILL)
322 VB->EdgeFlag = _tnl_import_edgeflag( ctx,
323 VB->AttribPtr[_TNL_ATTRIB_EDGEFLAG],
327 /* the data previously pointed to by EdgeFlag may have been freed */
333 /* Translate indices to GLuints and store in VB->Elts.
335 static void bind_indices( struct gl_context *ctx,
336 const struct _mesa_index_buffer *ib,
337 struct gl_buffer_object **bo,
340 TNLcontext *tnl = TNL_CONTEXT(ctx);
341 struct vertex_buffer *VB = &tnl->vb;
350 if (ib->obj->Name && !ib->obj->Pointer) {
351 bo[*nr_bo] = ib->obj;
353 ctx->Driver.MapBuffer(ctx,
354 GL_ELEMENT_ARRAY_BUFFER,
358 assert(ib->obj->Pointer);
361 ptr = ADD_POINTERS(ib->obj->Pointer, ib->ptr);
363 if (ib->type == GL_UNSIGNED_INT && VB->Primitive[0].basevertex == 0) {
364 VB->Elts = (GLuint *) ptr;
367 GLuint *elts = (GLuint *)get_space(ctx, ib->count * sizeof(GLuint));
370 if (ib->type == GL_UNSIGNED_INT) {
371 const GLuint *in = (GLuint *)ptr;
372 for (i = 0; i < ib->count; i++)
373 *elts++ = (GLuint)(*in++) + VB->Primitive[0].basevertex;
375 else if (ib->type == GL_UNSIGNED_SHORT) {
376 const GLushort *in = (GLushort *)ptr;
377 for (i = 0; i < ib->count; i++)
378 *elts++ = (GLuint)(*in++) + VB->Primitive[0].basevertex;
381 const GLubyte *in = (GLubyte *)ptr;
382 for (i = 0; i < ib->count; i++)
383 *elts++ = (GLuint)(*in++) + VB->Primitive[0].basevertex;
388 static void bind_prims( struct gl_context *ctx,
389 const struct _mesa_prim *prim,
392 TNLcontext *tnl = TNL_CONTEXT(ctx);
393 struct vertex_buffer *VB = &tnl->vb;
395 VB->Primitive = prim;
396 VB->PrimitiveCount = nr_prims;
399 static void unmap_vbos( struct gl_context *ctx,
400 struct gl_buffer_object **bo,
404 for (i = 0; i < nr_bo; i++) {
405 ctx->Driver.UnmapBuffer(ctx,
406 0, /* target -- I don't see why this would be needed */
412 void _tnl_vbo_draw_prims(struct gl_context *ctx,
413 const struct gl_client_array *arrays[],
414 const struct _mesa_prim *prim,
416 const struct _mesa_index_buffer *ib,
417 GLboolean index_bounds_valid,
421 if (!index_bounds_valid)
422 vbo_get_minmax_index(ctx, prim, ib, &min_index, &max_index);
424 _tnl_draw_prims(ctx, arrays, prim, nr_prims, ib, min_index, max_index);
427 /* This is the main entrypoint into the slimmed-down software tnl
428 * module. In a regular swtnl driver, this can be plugged straight
429 * into the vbo->Driver.DrawPrims() callback.
431 void _tnl_draw_prims( struct gl_context *ctx,
432 const struct gl_client_array *arrays[],
433 const struct _mesa_prim *prim,
435 const struct _mesa_index_buffer *ib,
439 TNLcontext *tnl = TNL_CONTEXT(ctx);
440 const GLuint TEST_SPLIT = 0;
441 const GLint max = TEST_SPLIT ? 8 : tnl->vb.Size - MAX_CLIPPED_VERTICES;
442 GLint max_basevertex = prim->basevertex;
445 /* Mesa core state should have been validated already */
446 assert(ctx->NewState == 0x0);
448 if (!_mesa_check_conditional_render(ctx))
449 return; /* don't draw */
451 for (i = 1; i < nr_prims; i++)
452 max_basevertex = MAX2(max_basevertex, prim[i].basevertex);
456 printf("%s %d..%d\n", __FUNCTION__, min_index, max_index);
457 for (i = 0; i < nr_prims; i++)
458 printf("prim %d: %s start %d count %d\n", i,
459 _mesa_lookup_enum_by_nr(prim[i].mode),
465 /* We always translate away calls with min_index != 0.
467 vbo_rebase_prims( ctx, arrays, prim, nr_prims, ib,
468 min_index, max_index,
469 _tnl_vbo_draw_prims );
472 else if ((GLint)max_index + max_basevertex > max) {
473 /* The software TNL pipeline has a fixed amount of storage for
474 * vertices and it is necessary to split incoming drawing commands
475 * if they exceed that limit.
477 struct split_limits limits;
478 limits.max_verts = max;
479 limits.max_vb_size = ~0;
480 limits.max_indices = ~0;
482 /* This will split the buffers one way or another and
483 * recursively call back into this function.
485 vbo_split_prims( ctx, arrays, prim, nr_prims, ib,
486 0, max_index + prim->basevertex,
491 /* May need to map a vertex buffer object for every attribute plus
492 * one for the index buffer.
494 struct gl_buffer_object *bo[VERT_ATTRIB_MAX + 1];
498 for (i = 0; i < nr_prims;) {
499 GLuint this_nr_prims;
501 /* Our SW TNL pipeline doesn't handle basevertex yet, so bind_indices
502 * will rebase the elements to the basevertex, and we'll only
503 * emit strings of prims with the same basevertex in one draw call.
505 for (this_nr_prims = 1; i + this_nr_prims < nr_prims;
507 if (prim[i].basevertex != prim[i + this_nr_prims].basevertex)
511 assert(prim[i].num_instances > 0);
513 /* Binding inputs may imply mapping some vertex buffer objects.
514 * They will need to be unmapped below.
516 for (inst = 0; inst < prim[i].num_instances; inst++) {
518 bind_prims(ctx, &prim[i], this_nr_prims);
519 bind_inputs(ctx, arrays, max_index + prim[i].basevertex + 1,
521 bind_indices(ctx, ib, bo, &nr_bo);
523 tnl->CurInstance = inst;
524 TNL_CONTEXT(ctx)->Driver.RunPipeline(ctx);
526 unmap_vbos(ctx, bo, nr_bo);