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/context.h"
30 #include "main/imports.h"
31 #include "main/state.h"
32 #include "main/mtypes.h"
33 #include "main/macros.h"
34 #include "main/enums.h"
36 #include "t_context.h"
37 #include "t_pipeline.h"
38 #include "t_vp_build.h"
44 static GLubyte
*get_space(GLcontext
*ctx
, GLuint bytes
)
46 TNLcontext
*tnl
= TNL_CONTEXT(ctx
);
47 GLubyte
*space
= _mesa_malloc(bytes
);
49 tnl
->block
[tnl
->nr_blocks
++] = space
;
54 static void free_space(GLcontext
*ctx
)
56 TNLcontext
*tnl
= TNL_CONTEXT(ctx
);
58 for (i
= 0; i
< tnl
->nr_blocks
; i
++)
59 _mesa_free(tnl
->block
[i
]);
64 /* Convert the incoming array to GLfloats. Understands the
65 * array->Normalized flag and selects the correct conversion method.
67 #define CONVERT( TYPE, MACRO ) do { \
69 if (input->Normalized) { \
70 for (i = 0; i < count; i++) { \
71 const TYPE *in = (TYPE *)ptr; \
72 for (j = 0; j < sz; j++) { \
73 *fptr++ = MACRO(*in); \
76 ptr += input->StrideB; \
79 for (i = 0; i < count; i++) { \
80 const TYPE *in = (TYPE *)ptr; \
81 for (j = 0; j < sz; j++) { \
82 *fptr++ = (GLfloat)(*in); \
85 ptr += input->StrideB; \
92 * Convert array of BGRA/GLubyte[4] values to RGBA/float[4]
93 * \param ptr input/ubyte array
94 * \param fptr output/float array
97 convert_bgra_to_float(const struct gl_client_array
*input
,
98 const GLubyte
*ptr
, GLfloat
*fptr
,
102 assert(input
->Normalized
);
103 assert(input
->Size
== 4);
104 for (i
= 0; i
< count
; i
++) {
105 const GLubyte
*in
= (GLubyte
*) ptr
; /* in is in BGRA order */
106 *fptr
++ = UBYTE_TO_FLOAT(in
[2]); /* red */
107 *fptr
++ = UBYTE_TO_FLOAT(in
[1]); /* green */
108 *fptr
++ = UBYTE_TO_FLOAT(in
[0]); /* blue */
109 *fptr
++ = UBYTE_TO_FLOAT(in
[3]); /* alpha */
110 ptr
+= input
->StrideB
;
115 /* Adjust pointer to point at first requested element, convert to
116 * floating point, populate VB->AttribPtr[].
118 static void _tnl_import_array( GLcontext
*ctx
,
121 const struct gl_client_array
*input
,
124 TNLcontext
*tnl
= TNL_CONTEXT(ctx
);
125 struct vertex_buffer
*VB
= &tnl
->vb
;
126 GLuint stride
= input
->StrideB
;
128 if (input
->Type
!= GL_FLOAT
) {
129 const GLuint sz
= input
->Size
;
130 GLubyte
*buf
= get_space(ctx
, count
* sz
* sizeof(GLfloat
));
131 GLfloat
*fptr
= (GLfloat
*)buf
;
133 switch (input
->Type
) {
135 CONVERT(GLbyte
, BYTE_TO_FLOAT
);
137 case GL_UNSIGNED_BYTE
:
138 if (input
->Format
== GL_BGRA
) {
139 /* See GL_EXT_vertex_array_bgra */
140 convert_bgra_to_float(input
, ptr
, fptr
, count
);
143 CONVERT(GLubyte
, UBYTE_TO_FLOAT
);
147 CONVERT(GLshort
, SHORT_TO_FLOAT
);
149 case GL_UNSIGNED_SHORT
:
150 CONVERT(GLushort
, USHORT_TO_FLOAT
);
153 CONVERT(GLint
, INT_TO_FLOAT
);
155 case GL_UNSIGNED_INT
:
156 CONVERT(GLuint
, UINT_TO_FLOAT
);
159 CONVERT(GLdouble
, (GLfloat
));
167 stride
= sz
* sizeof(GLfloat
);
170 VB
->AttribPtr
[attrib
] = &tnl
->tmp_inputs
[attrib
];
171 VB
->AttribPtr
[attrib
]->data
= (GLfloat (*)[4])ptr
;
172 VB
->AttribPtr
[attrib
]->start
= (GLfloat
*)ptr
;
173 VB
->AttribPtr
[attrib
]->count
= count
;
174 VB
->AttribPtr
[attrib
]->stride
= stride
;
175 VB
->AttribPtr
[attrib
]->size
= input
->Size
;
177 /* This should die, but so should the whole GLvector4f concept:
179 VB
->AttribPtr
[attrib
]->flags
= (((1<<input
->Size
)-1) |
181 (stride
== 4*sizeof(GLfloat
) ? 0 : VEC_BAD_STRIDE
));
183 VB
->AttribPtr
[attrib
]->storage
= NULL
;
186 #define CLIPVERTS ((6 + MAX_CLIP_PLANES) * 2)
189 static GLboolean
*_tnl_import_edgeflag( GLcontext
*ctx
,
190 const GLvector4f
*input
,
193 const GLubyte
*ptr
= (const GLubyte
*)input
->data
;
194 const GLuint stride
= input
->stride
;
195 GLboolean
*space
= (GLboolean
*)get_space(ctx
, count
+ CLIPVERTS
);
196 GLboolean
*bptr
= space
;
199 for (i
= 0; i
< count
; i
++) {
200 *bptr
++ = ((GLfloat
*)ptr
)[0] == 1.0;
208 static void bind_inputs( GLcontext
*ctx
,
209 const struct gl_client_array
*inputs
[],
211 struct gl_buffer_object
**bo
,
214 TNLcontext
*tnl
= TNL_CONTEXT(ctx
);
215 struct vertex_buffer
*VB
= &tnl
->vb
;
220 for (i
= 0; i
< VERT_ATTRIB_MAX
; i
++) {
223 if (inputs
[i
]->BufferObj
->Name
) {
224 if (!inputs
[i
]->BufferObj
->Pointer
) {
225 bo
[*nr_bo
] = inputs
[i
]->BufferObj
;
227 ctx
->Driver
.MapBuffer(ctx
,
230 inputs
[i
]->BufferObj
);
232 assert(inputs
[i
]->BufferObj
->Pointer
);
235 ptr
= ADD_POINTERS(inputs
[i
]->BufferObj
->Pointer
,
239 ptr
= inputs
[i
]->Ptr
;
241 /* Just make sure the array is floating point, otherwise convert to
244 * XXX: remove the GLvector4f type at some stage and just use
247 _tnl_import_array(ctx
, i
, count
, inputs
[i
], ptr
);
250 /* We process only the vertices between min & max index:
255 /* Legacy pointers -- remove one day.
257 VB
->ObjPtr
= VB
->AttribPtr
[_TNL_ATTRIB_POS
];
258 VB
->NormalPtr
= VB
->AttribPtr
[_TNL_ATTRIB_NORMAL
];
259 VB
->ColorPtr
[0] = VB
->AttribPtr
[_TNL_ATTRIB_COLOR0
];
260 VB
->ColorPtr
[1] = NULL
;
261 VB
->IndexPtr
[0] = VB
->AttribPtr
[_TNL_ATTRIB_COLOR_INDEX
];
262 VB
->IndexPtr
[1] = NULL
;
263 VB
->SecondaryColorPtr
[0] = VB
->AttribPtr
[_TNL_ATTRIB_COLOR1
];
264 VB
->SecondaryColorPtr
[1] = NULL
;
265 VB
->FogCoordPtr
= VB
->AttribPtr
[_TNL_ATTRIB_FOG
];
267 for (i
= 0; i
< ctx
->Const
.MaxTextureCoordUnits
; i
++) {
268 VB
->TexCoordPtr
[i
] = VB
->AttribPtr
[_TNL_ATTRIB_TEX0
+ i
];
271 /* Clipping and drawing code still requires this to be a packed
272 * array of ubytes which can be written into. TODO: Fix and
275 if (ctx
->Polygon
.FrontMode
!= GL_FILL
||
276 ctx
->Polygon
.BackMode
!= GL_FILL
)
278 VB
->EdgeFlag
= _tnl_import_edgeflag( ctx
,
279 VB
->AttribPtr
[_TNL_ATTRIB_EDGEFLAG
],
283 /* the data previously pointed to by EdgeFlag may have been freed */
289 /* Translate indices to GLuints and store in VB->Elts.
291 static void bind_indices( GLcontext
*ctx
,
292 const struct _mesa_index_buffer
*ib
,
293 struct gl_buffer_object
**bo
,
296 TNLcontext
*tnl
= TNL_CONTEXT(ctx
);
297 struct vertex_buffer
*VB
= &tnl
->vb
;
306 if (ib
->obj
->Name
&& !ib
->obj
->Pointer
) {
307 bo
[*nr_bo
] = ib
->obj
;
309 ctx
->Driver
.MapBuffer(ctx
,
310 GL_ELEMENT_ARRAY_BUFFER
,
314 assert(ib
->obj
->Pointer
);
317 ptr
= ADD_POINTERS(ib
->obj
->Pointer
, ib
->ptr
);
319 if (ib
->type
== GL_UNSIGNED_INT
&& VB
->Primitive
[0].basevertex
== 0) {
320 VB
->Elts
= (GLuint
*) ptr
;
323 GLuint
*elts
= (GLuint
*)get_space(ctx
, ib
->count
* sizeof(GLuint
));
326 if (ib
->type
== GL_UNSIGNED_INT
) {
327 const GLuint
*in
= (GLuint
*)ptr
;
328 for (i
= 0; i
< ib
->count
; i
++)
329 *elts
++ = (GLuint
)(*in
++) + VB
->Primitive
[0].basevertex
;
331 else if (ib
->type
== GL_UNSIGNED_SHORT
) {
332 const GLushort
*in
= (GLushort
*)ptr
;
333 for (i
= 0; i
< ib
->count
; i
++)
334 *elts
++ = (GLuint
)(*in
++) + VB
->Primitive
[0].basevertex
;
337 const GLubyte
*in
= (GLubyte
*)ptr
;
338 for (i
= 0; i
< ib
->count
; i
++)
339 *elts
++ = (GLuint
)(*in
++) + VB
->Primitive
[0].basevertex
;
344 static void bind_prims( GLcontext
*ctx
,
345 const struct _mesa_prim
*prim
,
348 TNLcontext
*tnl
= TNL_CONTEXT(ctx
);
349 struct vertex_buffer
*VB
= &tnl
->vb
;
351 VB
->Primitive
= prim
;
352 VB
->PrimitiveCount
= nr_prims
;
355 static void unmap_vbos( GLcontext
*ctx
,
356 struct gl_buffer_object
**bo
,
360 for (i
= 0; i
< nr_bo
; i
++) {
361 ctx
->Driver
.UnmapBuffer(ctx
,
362 0, /* target -- I don't see why this would be needed */
368 void _tnl_vbo_draw_prims(GLcontext
*ctx
,
369 const struct gl_client_array
*arrays
[],
370 const struct _mesa_prim
*prim
,
372 const struct _mesa_index_buffer
*ib
,
373 GLboolean index_bounds_valid
,
377 if (!index_bounds_valid
)
378 vbo_get_minmax_index(ctx
, prim
, ib
, &min_index
, &max_index
);
380 _tnl_draw_prims(ctx
, arrays
, prim
, nr_prims
, ib
, min_index
, max_index
);
383 /* This is the main entrypoint into the slimmed-down software tnl
384 * module. In a regular swtnl driver, this can be plugged straight
385 * into the vbo->Driver.DrawPrims() callback.
387 void _tnl_draw_prims( GLcontext
*ctx
,
388 const struct gl_client_array
*arrays
[],
389 const struct _mesa_prim
*prim
,
391 const struct _mesa_index_buffer
*ib
,
395 TNLcontext
*tnl
= TNL_CONTEXT(ctx
);
396 const GLuint TEST_SPLIT
= 0;
397 const GLint max
= TEST_SPLIT
? 8 : tnl
->vb
.Size
- MAX_CLIPPED_VERTICES
;
398 GLuint max_basevertex
= prim
->basevertex
;
401 for (i
= 1; i
< nr_prims
; i
++)
402 max_basevertex
= MAX2(max_basevertex
, prim
[i
].basevertex
);
406 _mesa_printf("%s %d..%d\n", __FUNCTION__
, min_index
, max_index
);
407 for (i
= 0; i
< nr_prims
; i
++)
408 _mesa_printf("prim %d: %s start %d count %d\n", i
,
409 _mesa_lookup_enum_by_nr(prim
[i
].mode
),
415 /* We always translate away calls with min_index != 0.
417 vbo_rebase_prims( ctx
, arrays
, prim
, nr_prims
, ib
,
418 min_index
, max_index
,
419 _tnl_vbo_draw_prims
);
422 else if (max_index
+ max_basevertex
> max
) {
423 /* The software TNL pipeline has a fixed amount of storage for
424 * vertices and it is necessary to split incoming drawing commands
425 * if they exceed that limit.
427 struct split_limits limits
;
428 limits
.max_verts
= max
;
429 limits
.max_vb_size
= ~0;
430 limits
.max_indices
= ~0;
432 /* This will split the buffers one way or another and
433 * recursively call back into this function.
435 vbo_split_prims( ctx
, arrays
, prim
, nr_prims
, ib
,
436 0, max_index
+ prim
->basevertex
,
441 /* May need to map a vertex buffer object for every attribute plus
442 * one for the index buffer.
444 struct gl_buffer_object
*bo
[VERT_ATTRIB_MAX
+ 1];
447 for (i
= 0; i
< nr_prims
;) {
448 GLuint this_nr_prims
;
450 /* Our SW TNL pipeline doesn't handle basevertex yet, so bind_indices
451 * will rebase the elements to the basevertex, and we'll only
452 * emit strings of prims with the same basevertex in one draw call.
454 for (this_nr_prims
= 1; i
+ this_nr_prims
< nr_prims
;
456 if (prim
[i
].basevertex
!= prim
[i
+ this_nr_prims
].basevertex
)
460 /* Binding inputs may imply mapping some vertex buffer objects.
461 * They will need to be unmapped below.
463 bind_prims(ctx
, &prim
[i
], this_nr_prims
);
464 bind_inputs(ctx
, arrays
, max_index
+ prim
[i
].basevertex
+ 1,
466 bind_indices(ctx
, ib
, bo
, &nr_bo
);
468 TNL_CONTEXT(ctx
)->Driver
.RunPipeline(ctx
);
470 unmap_vbos(ctx
, bo
, nr_bo
);