1 /**************************************************************************
3 * Copyright 2007 Tungsten Graphics, Inc., Cedar Park, Texas.
6 * Permission is hereby granted, free of charge, to any person obtaining a
7 * copy of this software and associated documentation files (the
8 * "Software"), to deal in the Software without restriction, including
9 * without limitation the rights to use, copy, modify, merge, publish,
10 * distribute, sub license, and/or sell copies of the Software, and to
11 * permit persons to whom the Software is furnished to do so, subject to
12 * the following conditions:
14 * The above copyright notice and this permission notice (including the
15 * next paragraph) shall be included in all copies or substantial portions
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
19 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
20 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
21 * IN NO EVENT SHALL TUNGSTEN GRAPHICS AND/OR ITS SUPPLIERS BE LIABLE FOR
22 * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
23 * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
24 * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
26 **************************************************************************/
30 * Keith Whitwell <keith@tungstengraphics.com>
33 #include "main/imports.h"
34 #include "main/image.h"
35 #include "main/macros.h"
36 #include "shader/prog_uniform.h"
40 #include "st_context.h"
42 #include "st_cb_bufferobjects.h"
44 #include "st_program.h"
46 #include "pipe/p_context.h"
47 #include "pipe/p_defines.h"
48 #include "pipe/p_inlines.h"
51 static GLuint double_types
[4] = {
52 PIPE_FORMAT_R64_FLOAT
,
53 PIPE_FORMAT_R64G64_FLOAT
,
54 PIPE_FORMAT_R64G64B64_FLOAT
,
55 PIPE_FORMAT_R64G64B64A64_FLOAT
58 static GLuint float_types
[4] = {
59 PIPE_FORMAT_R32_FLOAT
,
60 PIPE_FORMAT_R32G32_FLOAT
,
61 PIPE_FORMAT_R32G32B32_FLOAT
,
62 PIPE_FORMAT_R32G32B32A32_FLOAT
65 static GLuint uint_types_norm
[4] = {
66 PIPE_FORMAT_R32_UNORM
,
67 PIPE_FORMAT_R32G32_UNORM
,
68 PIPE_FORMAT_R32G32B32_UNORM
,
69 PIPE_FORMAT_R32G32B32A32_UNORM
72 static GLuint uint_types_scale
[4] = {
73 PIPE_FORMAT_R32_USCALED
,
74 PIPE_FORMAT_R32G32_USCALED
,
75 PIPE_FORMAT_R32G32B32_USCALED
,
76 PIPE_FORMAT_R32G32B32A32_USCALED
79 static GLuint int_types_norm
[4] = {
80 PIPE_FORMAT_R32_SNORM
,
81 PIPE_FORMAT_R32G32_SNORM
,
82 PIPE_FORMAT_R32G32B32_SNORM
,
83 PIPE_FORMAT_R32G32B32A32_SNORM
86 static GLuint int_types_scale
[4] = {
87 PIPE_FORMAT_R32_SSCALED
,
88 PIPE_FORMAT_R32G32_SSCALED
,
89 PIPE_FORMAT_R32G32B32_SSCALED
,
90 PIPE_FORMAT_R32G32B32A32_SSCALED
93 static GLuint ushort_types_norm
[4] = {
94 PIPE_FORMAT_R16_UNORM
,
95 PIPE_FORMAT_R16G16_UNORM
,
96 PIPE_FORMAT_R16G16B16_UNORM
,
97 PIPE_FORMAT_R16G16B16A16_UNORM
100 static GLuint ushort_types_scale
[4] = {
101 PIPE_FORMAT_R16_USCALED
,
102 PIPE_FORMAT_R16G16_USCALED
,
103 PIPE_FORMAT_R16G16B16_USCALED
,
104 PIPE_FORMAT_R16G16B16A16_USCALED
107 static GLuint short_types_norm
[4] = {
108 PIPE_FORMAT_R16_SNORM
,
109 PIPE_FORMAT_R16G16_SNORM
,
110 PIPE_FORMAT_R16G16B16_SNORM
,
111 PIPE_FORMAT_R16G16B16A16_SNORM
114 static GLuint short_types_scale
[4] = {
115 PIPE_FORMAT_R16_SSCALED
,
116 PIPE_FORMAT_R16G16_SSCALED
,
117 PIPE_FORMAT_R16G16B16_SSCALED
,
118 PIPE_FORMAT_R16G16B16A16_SSCALED
121 static GLuint ubyte_types_norm
[4] = {
122 PIPE_FORMAT_R8_UNORM
,
123 PIPE_FORMAT_R8G8_UNORM
,
124 PIPE_FORMAT_R8G8B8_UNORM
,
125 PIPE_FORMAT_R8G8B8A8_UNORM
128 static GLuint ubyte_types_scale
[4] = {
129 PIPE_FORMAT_R8_USCALED
,
130 PIPE_FORMAT_R8G8_USCALED
,
131 PIPE_FORMAT_R8G8B8_USCALED
,
132 PIPE_FORMAT_R8G8B8A8_USCALED
135 static GLuint byte_types_norm
[4] = {
136 PIPE_FORMAT_R8_SNORM
,
137 PIPE_FORMAT_R8G8_SNORM
,
138 PIPE_FORMAT_R8G8B8_SNORM
,
139 PIPE_FORMAT_R8G8B8A8_SNORM
142 static GLuint byte_types_scale
[4] = {
143 PIPE_FORMAT_R8_SSCALED
,
144 PIPE_FORMAT_R8G8_SSCALED
,
145 PIPE_FORMAT_R8G8B8_SSCALED
,
146 PIPE_FORMAT_R8G8B8A8_SSCALED
149 static GLuint fixed_types
[4] = {
150 PIPE_FORMAT_R32_FIXED
,
151 PIPE_FORMAT_R32G32_FIXED
,
152 PIPE_FORMAT_R32G32B32_FIXED
,
153 PIPE_FORMAT_R32G32B32A32_FIXED
159 * Return a PIPE_FORMAT_x for the given GL datatype and size.
162 st_pipe_vertex_format(GLenum type
, GLuint size
, GLenum format
,
163 GLboolean normalized
)
165 assert((type
>= GL_BYTE
&& type
<= GL_DOUBLE
) ||
169 assert(format
== GL_RGBA
|| format
== GL_BGRA
);
171 if (format
== GL_BGRA
) {
172 /* this is an odd-ball case */
173 assert(type
== GL_UNSIGNED_BYTE
);
175 return PIPE_FORMAT_B8G8R8A8_UNORM
;
180 case GL_DOUBLE
: return double_types
[size
-1];
181 case GL_FLOAT
: return float_types
[size
-1];
182 case GL_INT
: return int_types_norm
[size
-1];
183 case GL_SHORT
: return short_types_norm
[size
-1];
184 case GL_BYTE
: return byte_types_norm
[size
-1];
185 case GL_UNSIGNED_INT
: return uint_types_norm
[size
-1];
186 case GL_UNSIGNED_SHORT
: return ushort_types_norm
[size
-1];
187 case GL_UNSIGNED_BYTE
: return ubyte_types_norm
[size
-1];
188 case GL_FIXED
: return fixed_types
[size
-1];
189 default: assert(0); return 0;
194 case GL_DOUBLE
: return double_types
[size
-1];
195 case GL_FLOAT
: return float_types
[size
-1];
196 case GL_INT
: return int_types_scale
[size
-1];
197 case GL_SHORT
: return short_types_scale
[size
-1];
198 case GL_BYTE
: return byte_types_scale
[size
-1];
199 case GL_UNSIGNED_INT
: return uint_types_scale
[size
-1];
200 case GL_UNSIGNED_SHORT
: return ushort_types_scale
[size
-1];
201 case GL_UNSIGNED_BYTE
: return ubyte_types_scale
[size
-1];
202 case GL_FIXED
: return fixed_types
[size
-1];
203 default: assert(0); return 0;
206 return 0; /* silence compiler warning */
211 * If edge flags are needed, setup an bitvector of flags and call
212 * pipe->set_edgeflags().
213 * XXX memleak: need to free the returned pointer at some point
216 setup_edgeflags(GLcontext
*ctx
, GLenum primMode
, GLint start
, GLint count
,
217 const struct gl_client_array
*array
)
219 struct pipe_context
*pipe
= ctx
->st
->pipe
;
221 if ((primMode
== GL_TRIANGLES
||
222 primMode
== GL_QUADS
||
223 primMode
== GL_POLYGON
) &&
224 (ctx
->Polygon
.FrontMode
!= GL_FILL
||
225 ctx
->Polygon
.BackMode
!= GL_FILL
)) {
226 /* need edge flags */
229 struct st_buffer_object
*stobj
= st_buffer_object(array
->BufferObj
);
232 if (!stobj
|| stobj
->Base
.Name
== 0) {
233 /* edge flags are not in a VBO */
237 vec
= (unsigned *) _mesa_calloc(sizeof(unsigned) * ((count
+ 31) / 32));
241 map
= pipe_buffer_map(pipe
->screen
, stobj
->buffer
, PIPE_BUFFER_USAGE_CPU_READ
);
242 map
= ADD_POINTERS(map
, array
->Ptr
);
244 for (i
= 0; i
< count
; i
++) {
245 if (*((float *) map
))
246 vec
[i
/32] |= 1 << (i
% 32);
248 map
+= array
->StrideB
;
251 pipe_buffer_unmap(pipe
->screen
, stobj
->buffer
);
253 pipe
->set_edgeflags(pipe
, vec
);
258 /* edge flags not needed */
259 pipe
->set_edgeflags(pipe
, NULL
);
266 * Examine the active arrays to determine if we have interleaved
267 * vertex arrays all living in one VBO, or all living in user space.
268 * \param userSpace returns whether the arrays are in user space.
271 is_interleaved_arrays(const struct st_vertex_program
*vp
,
272 const struct gl_client_array
**arrays
,
273 GLboolean
*userSpace
)
276 const struct gl_buffer_object
*firstBufObj
= NULL
;
277 GLint firstStride
= -1;
278 GLuint num_client_arrays
= 0;
279 const GLubyte
*client_addr
= NULL
;
281 for (attr
= 0; attr
< vp
->num_inputs
; attr
++) {
282 const GLuint mesaAttr
= vp
->index_to_input
[attr
];
283 const struct gl_buffer_object
*bufObj
= arrays
[mesaAttr
]->BufferObj
;
284 const GLsizei stride
= arrays
[mesaAttr
]->StrideB
; /* in bytes */
286 if (firstStride
< 0) {
287 firstStride
= stride
;
289 else if (firstStride
!= stride
) {
293 if (!bufObj
|| !bufObj
->Name
) {
295 /* Try to detect if the client-space arrays are
296 * "close" to each other.
299 client_addr
= arrays
[mesaAttr
]->Ptr
;
301 else if (abs(arrays
[mesaAttr
]->Ptr
- client_addr
) > firstStride
) {
302 /* arrays start too far apart */
306 else if (!firstBufObj
) {
307 firstBufObj
= bufObj
;
309 else if (bufObj
!= firstBufObj
) {
314 *userSpace
= (num_client_arrays
== vp
->num_inputs
);
315 /* printf("user space: %d (%d %d)\n", (int) *userSpace,num_client_arrays,vp->num_inputs); */
322 * Compute the memory range occupied by the arrays.
325 get_arrays_bounds(const struct st_vertex_program
*vp
,
326 const struct gl_client_array
**arrays
,
328 const GLubyte
**low
, const GLubyte
**high
)
330 const GLubyte
*low_addr
= NULL
;
334 for (attr
= 0; attr
< vp
->num_inputs
; attr
++) {
335 const GLuint mesaAttr
= vp
->index_to_input
[attr
];
336 const GLubyte
*start
= arrays
[mesaAttr
]->Ptr
;
337 stride
= arrays
[mesaAttr
]->StrideB
;
342 low_addr
= MIN2(low_addr
, start
);
347 *high
= low_addr
+ (max_index
+ 1) * stride
;
352 * Set up for drawing interleaved arrays that all live in one VBO
353 * or all live in user space.
354 * \param vbuffer returns vertex buffer info
355 * \param velements returns vertex element info
358 setup_interleaved_attribs(GLcontext
*ctx
,
359 const struct st_vertex_program
*vp
,
360 const struct gl_client_array
**arrays
,
363 struct pipe_vertex_buffer
*vbuffer
,
364 struct pipe_vertex_element velements
[])
366 struct pipe_context
*pipe
= ctx
->st
->pipe
;
368 const GLubyte
*offset0
;
370 for (attr
= 0; attr
< vp
->num_inputs
; attr
++) {
371 const GLuint mesaAttr
= vp
->index_to_input
[attr
];
372 struct gl_buffer_object
*bufobj
= arrays
[mesaAttr
]->BufferObj
;
373 struct st_buffer_object
*stobj
= st_buffer_object(bufobj
);
374 GLsizei stride
= arrays
[mesaAttr
]->StrideB
;
376 /*printf("stobj %u = %p\n", attr, (void*)stobj);*/
379 const GLubyte
*low
, *high
;
381 get_arrays_bounds(vp
, arrays
, max_index
, &low
, &high
);
382 /*printf("buffer range: %p %p %d\n", low, high, high-low);*/
387 pipe_user_buffer_create(pipe
->screen
, (void *) low
, high
- low
);
388 vbuffer
->buffer_offset
= 0;
391 vbuffer
->buffer
= NULL
;
392 pipe_buffer_reference(&vbuffer
->buffer
, stobj
->buffer
);
393 vbuffer
->buffer_offset
= pointer_to_offset(low
);
395 vbuffer
->stride
= stride
; /* in bytes */
396 vbuffer
->max_index
= max_index
;
399 velements
[attr
].src_offset
=
400 (unsigned) (arrays
[mesaAttr
]->Ptr
- offset0
);
401 velements
[attr
].vertex_buffer_index
= 0;
402 velements
[attr
].nr_components
= arrays
[mesaAttr
]->Size
;
403 velements
[attr
].src_format
=
404 st_pipe_vertex_format(arrays
[mesaAttr
]->Type
,
405 arrays
[mesaAttr
]->Size
,
406 arrays
[mesaAttr
]->Format
,
407 arrays
[mesaAttr
]->Normalized
);
408 assert(velements
[attr
].src_format
);
414 * Set up a separate pipe_vertex_buffer and pipe_vertex_element for each
416 * \param vbuffer returns vertex buffer info
417 * \param velements returns vertex element info
420 setup_non_interleaved_attribs(GLcontext
*ctx
,
421 const struct st_vertex_program
*vp
,
422 const struct gl_client_array
**arrays
,
424 GLboolean
*userSpace
,
425 struct pipe_vertex_buffer vbuffer
[],
426 struct pipe_vertex_element velements
[])
428 struct pipe_context
*pipe
= ctx
->st
->pipe
;
431 for (attr
= 0; attr
< vp
->num_inputs
; attr
++) {
432 const GLuint mesaAttr
= vp
->index_to_input
[attr
];
433 struct gl_buffer_object
*bufobj
= arrays
[mesaAttr
]->BufferObj
;
434 GLsizei stride
= arrays
[mesaAttr
]->StrideB
;
436 *userSpace
= GL_FALSE
;
438 if (bufobj
&& bufobj
->Name
) {
439 /* Attribute data is in a VBO.
440 * Recall that for VBOs, the gl_client_array->Ptr field is
441 * really an offset from the start of the VBO, not a pointer.
443 struct st_buffer_object
*stobj
= st_buffer_object(bufobj
);
444 assert(stobj
->buffer
);
445 /*printf("stobj %u = %p\n", attr, (void*) stobj);*/
447 vbuffer
[attr
].buffer
= NULL
;
448 pipe_buffer_reference(&vbuffer
[attr
].buffer
, stobj
->buffer
);
449 vbuffer
[attr
].buffer_offset
= pointer_to_offset(arrays
[mesaAttr
]->Ptr
);
450 velements
[attr
].src_offset
= 0;
453 /* attribute data is in user-space memory, not a VBO */
455 /*printf("user-space array %d stride %d\n", attr, stride);*/
457 *userSpace
= GL_TRUE
;
460 if (arrays
[mesaAttr
]->Ptr
) {
461 /* user's vertex array */
462 if (arrays
[mesaAttr
]->StrideB
) {
463 bytes
= arrays
[mesaAttr
]->StrideB
* (max_index
+ 1);
466 bytes
= arrays
[mesaAttr
]->Size
467 * _mesa_sizeof_type(arrays
[mesaAttr
]->Type
);
469 vbuffer
[attr
].buffer
= pipe_user_buffer_create(pipe
->screen
,
470 (void *) arrays
[mesaAttr
]->Ptr
, bytes
);
473 /* no array, use ctx->Current.Attrib[] value */
474 bytes
= sizeof(ctx
->Current
.Attrib
[0]);
475 vbuffer
[attr
].buffer
= pipe_user_buffer_create(pipe
->screen
,
476 (void *) ctx
->Current
.Attrib
[mesaAttr
], bytes
);
480 vbuffer
[attr
].buffer_offset
= 0;
481 velements
[attr
].src_offset
= 0;
484 assert(velements
[attr
].src_offset
<= 2048); /* 11-bit field */
486 /* common-case setup */
487 vbuffer
[attr
].stride
= stride
; /* in bytes */
488 vbuffer
[attr
].max_index
= max_index
;
489 velements
[attr
].vertex_buffer_index
= attr
;
490 velements
[attr
].nr_components
= arrays
[mesaAttr
]->Size
;
491 velements
[attr
].src_format
492 = st_pipe_vertex_format(arrays
[mesaAttr
]->Type
,
493 arrays
[mesaAttr
]->Size
,
494 arrays
[mesaAttr
]->Format
,
495 arrays
[mesaAttr
]->Normalized
);
496 assert(velements
[attr
].src_format
);
503 * Prior to drawing, check that any uniforms referenced by the
504 * current shader have been set. If a uniform has not been set,
508 check_uniforms(GLcontext
*ctx
)
510 const struct gl_shader_program
*shProg
= ctx
->Shader
.CurrentProgram
;
511 if (shProg
&& shProg
->LinkStatus
) {
513 for (i
= 0; i
< shProg
->Uniforms
->NumUniforms
; i
++) {
514 const struct gl_uniform
*u
= &shProg
->Uniforms
->Uniforms
[i
];
515 if (!u
->Initialized
) {
517 "Using shader with uninitialized uniform: %s",
526 * This function gets plugged into the VBO module and is called when
527 * we have something to render.
528 * Basically, translate the information into the format expected by gallium.
531 st_draw_vbo(GLcontext
*ctx
,
532 const struct gl_client_array
**arrays
,
533 const struct _mesa_prim
*prims
,
535 const struct _mesa_index_buffer
*ib
,
539 struct pipe_context
*pipe
= ctx
->st
->pipe
;
540 const struct st_vertex_program
*vp
;
541 const struct pipe_shader_state
*vs
;
542 struct pipe_vertex_buffer vbuffer
[PIPE_MAX_SHADER_INPUTS
];
544 struct pipe_vertex_element velements
[PIPE_MAX_ATTRIBS
];
545 unsigned num_vbuffers
, num_velements
;
548 /* sanity check for pointer arithmetic below */
549 assert(sizeof(arrays
[0]->Ptr
[0]) == 1);
551 st_validate_state(ctx
->st
);
553 /* must get these after state validation! */
555 vs
= &ctx
->st
->vp
->state
;
558 if (MESA_VERBOSE
& VERBOSE_GLSL
) {
562 (void) check_uniforms
;
566 * Setup the vbuffer[] and velements[] arrays.
568 if (is_interleaved_arrays(vp
, arrays
, &userSpace
)) {
569 /*printf("Draw interleaved\n");*/
570 setup_interleaved_attribs(ctx
, vp
, arrays
, max_index
, userSpace
,
573 num_velements
= vp
->num_inputs
;
574 if (num_velements
== 0)
578 /*printf("Draw non-interleaved\n");*/
579 setup_non_interleaved_attribs(ctx
, vp
, arrays
, max_index
,
580 &userSpace
, vbuffer
, velements
);
581 num_vbuffers
= vp
->num_inputs
;
582 num_velements
= vp
->num_inputs
;
588 for (i
= 0; i
< num_vbuffers
; i
++) {
589 printf("buffers[%d].stride = %u\n", i
, vbuffer
[i
].stride
);
590 printf("buffers[%d].max_index = %u\n", i
, vbuffer
[i
].max_index
);
591 printf("buffers[%d].buffer_offset = %u\n", i
, vbuffer
[i
].buffer_offset
);
592 printf("buffers[%d].buffer = %p\n", i
, (void*) vbuffer
[i
].buffer
);
594 for (i
= 0; i
< num_velements
; i
++) {
595 printf("vlements[%d].vbuffer_index = %u\n", i
, velements
[i
].vertex_buffer_index
);
596 printf("vlements[%d].src_offset = %u\n", i
, velements
[i
].src_offset
);
597 printf("vlements[%d].nr_comps = %u\n", i
, velements
[i
].nr_components
);
598 printf("vlements[%d].format = %s\n", i
, pf_name(velements
[i
].src_format
));
603 pipe
->set_vertex_buffers(pipe
, num_vbuffers
, vbuffer
);
604 pipe
->set_vertex_elements(pipe
, num_velements
, velements
);
606 if (num_vbuffers
== 0 || num_velements
== 0)
609 /* do actual drawing */
611 /* indexed primitive */
612 struct gl_buffer_object
*bufobj
= ib
->obj
;
613 struct pipe_buffer
*indexBuf
= NULL
;
614 unsigned indexSize
, indexOffset
, i
;
617 case GL_UNSIGNED_INT
:
620 case GL_UNSIGNED_SHORT
:
623 case GL_UNSIGNED_BYTE
:
631 /* get/create the index buffer object */
632 if (bufobj
&& bufobj
->Name
) {
633 /* elements/indexes are in a real VBO */
634 struct st_buffer_object
*stobj
= st_buffer_object(bufobj
);
635 pipe_buffer_reference(&indexBuf
, stobj
->buffer
);
636 indexOffset
= pointer_to_offset(ib
->ptr
) / indexSize
;
639 /* element/indicies are in user space memory */
640 indexBuf
= pipe_user_buffer_create(pipe
->screen
, (void *) ib
->ptr
,
641 ib
->count
* indexSize
);
646 if (nr_prims
== 1 && pipe
->draw_range_elements
!= NULL
) {
649 /* XXX: exercise temporary path to pass min/max directly
650 * through to driver & draw module. These interfaces still
651 * need a bit of work...
653 setup_edgeflags(ctx
, prims
[i
].mode
,
654 prims
[i
].start
+ indexOffset
, prims
[i
].count
,
655 arrays
[VERT_ATTRIB_EDGEFLAG
]);
657 pipe
->draw_range_elements(pipe
, indexBuf
, indexSize
,
661 prims
[i
].start
+ indexOffset
, prims
[i
].count
);
664 for (i
= 0; i
< nr_prims
; i
++) {
665 setup_edgeflags(ctx
, prims
[i
].mode
,
666 prims
[i
].start
+ indexOffset
, prims
[i
].count
,
667 arrays
[VERT_ATTRIB_EDGEFLAG
]);
669 pipe
->draw_elements(pipe
, indexBuf
, indexSize
,
671 prims
[i
].start
+ indexOffset
, prims
[i
].count
);
675 pipe_buffer_reference(&indexBuf
, NULL
);
680 for (i
= 0; i
< nr_prims
; i
++) {
681 setup_edgeflags(ctx
, prims
[i
].mode
,
682 prims
[i
].start
, prims
[i
].count
,
683 arrays
[VERT_ATTRIB_EDGEFLAG
]);
685 pipe
->draw_arrays(pipe
, prims
[i
].mode
, prims
[i
].start
, prims
[i
].count
);
689 /* unreference buffers (frees wrapped user-space buffer objects) */
690 for (attr
= 0; attr
< num_vbuffers
; attr
++) {
691 pipe_buffer_reference(&vbuffer
[attr
].buffer
, NULL
);
692 assert(!vbuffer
[attr
].buffer
);
697 pipe
->set_vertex_buffers(pipe
, 0, NULL
);
702 void st_init_draw( struct st_context
*st
)
704 GLcontext
*ctx
= st
->ctx
;
706 vbo_set_draw_func(ctx
, st_draw_vbo
);
710 void st_destroy_draw( struct st_context
*st
)