s/Tungsten Graphics/VMware/
[mesa.git] / src / mesa / state_tracker / st_atom_array.c
1
2 /**************************************************************************
3 *
4 * Copyright 2007 VMware, Inc.
5 * Copyright 2012 Marek Olšák <maraeo@gmail.com>
6 * All Rights Reserved.
7 *
8 * Permission is hereby granted, free of charge, to any person obtaining a
9 * copy of this software and associated documentation files (the
10 * "Software"), to deal in the Software without restriction, including
11 * without limitation the rights to use, copy, modify, merge, publish,
12 * distribute, sub license, and/or sell copies of the Software, and to
13 * permit persons to whom the Software is furnished to do so, subject to
14 * the following conditions:
15 *
16 * The above copyright notice and this permission notice (including the
17 * next paragraph) shall be included in all copies or substantial portions
18 * of the Software.
19 *
20 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
21 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
22 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
23 * IN NO EVENT SHALL AUTHORS AND/OR ITS SUPPLIERS BE LIABLE FOR
24 * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
25 * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
26 * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
27 *
28 **************************************************************************/
29
30 /*
31 * This converts the VBO's vertex attribute/array information into
32 * Gallium vertex state and binds it.
33 *
34 * Authors:
35 * Keith Whitwell <keithw@vmware.com>
36 * Marek Olšák <maraeo@gmail.com>
37 */
38
39 #include "st_context.h"
40 #include "st_atom.h"
41 #include "st_cb_bufferobjects.h"
42 #include "st_draw.h"
43 #include "st_program.h"
44
45 #include "cso_cache/cso_context.h"
46 #include "util/u_math.h"
47
48 #include "main/bufferobj.h"
49 #include "main/glformats.h"
50
51
52 static GLuint double_types[4] = {
53 PIPE_FORMAT_R64_FLOAT,
54 PIPE_FORMAT_R64G64_FLOAT,
55 PIPE_FORMAT_R64G64B64_FLOAT,
56 PIPE_FORMAT_R64G64B64A64_FLOAT
57 };
58
59 static GLuint float_types[4] = {
60 PIPE_FORMAT_R32_FLOAT,
61 PIPE_FORMAT_R32G32_FLOAT,
62 PIPE_FORMAT_R32G32B32_FLOAT,
63 PIPE_FORMAT_R32G32B32A32_FLOAT
64 };
65
66 static GLuint half_float_types[4] = {
67 PIPE_FORMAT_R16_FLOAT,
68 PIPE_FORMAT_R16G16_FLOAT,
69 PIPE_FORMAT_R16G16B16_FLOAT,
70 PIPE_FORMAT_R16G16B16A16_FLOAT
71 };
72
73 static GLuint uint_types_norm[4] = {
74 PIPE_FORMAT_R32_UNORM,
75 PIPE_FORMAT_R32G32_UNORM,
76 PIPE_FORMAT_R32G32B32_UNORM,
77 PIPE_FORMAT_R32G32B32A32_UNORM
78 };
79
80 static GLuint uint_types_scale[4] = {
81 PIPE_FORMAT_R32_USCALED,
82 PIPE_FORMAT_R32G32_USCALED,
83 PIPE_FORMAT_R32G32B32_USCALED,
84 PIPE_FORMAT_R32G32B32A32_USCALED
85 };
86
87 static GLuint uint_types_int[4] = {
88 PIPE_FORMAT_R32_UINT,
89 PIPE_FORMAT_R32G32_UINT,
90 PIPE_FORMAT_R32G32B32_UINT,
91 PIPE_FORMAT_R32G32B32A32_UINT
92 };
93
94 static GLuint int_types_norm[4] = {
95 PIPE_FORMAT_R32_SNORM,
96 PIPE_FORMAT_R32G32_SNORM,
97 PIPE_FORMAT_R32G32B32_SNORM,
98 PIPE_FORMAT_R32G32B32A32_SNORM
99 };
100
101 static GLuint int_types_scale[4] = {
102 PIPE_FORMAT_R32_SSCALED,
103 PIPE_FORMAT_R32G32_SSCALED,
104 PIPE_FORMAT_R32G32B32_SSCALED,
105 PIPE_FORMAT_R32G32B32A32_SSCALED
106 };
107
108 static GLuint int_types_int[4] = {
109 PIPE_FORMAT_R32_SINT,
110 PIPE_FORMAT_R32G32_SINT,
111 PIPE_FORMAT_R32G32B32_SINT,
112 PIPE_FORMAT_R32G32B32A32_SINT
113 };
114
115 static GLuint ushort_types_norm[4] = {
116 PIPE_FORMAT_R16_UNORM,
117 PIPE_FORMAT_R16G16_UNORM,
118 PIPE_FORMAT_R16G16B16_UNORM,
119 PIPE_FORMAT_R16G16B16A16_UNORM
120 };
121
122 static GLuint ushort_types_scale[4] = {
123 PIPE_FORMAT_R16_USCALED,
124 PIPE_FORMAT_R16G16_USCALED,
125 PIPE_FORMAT_R16G16B16_USCALED,
126 PIPE_FORMAT_R16G16B16A16_USCALED
127 };
128
129 static GLuint ushort_types_int[4] = {
130 PIPE_FORMAT_R16_UINT,
131 PIPE_FORMAT_R16G16_UINT,
132 PIPE_FORMAT_R16G16B16_UINT,
133 PIPE_FORMAT_R16G16B16A16_UINT
134 };
135
136 static GLuint short_types_norm[4] = {
137 PIPE_FORMAT_R16_SNORM,
138 PIPE_FORMAT_R16G16_SNORM,
139 PIPE_FORMAT_R16G16B16_SNORM,
140 PIPE_FORMAT_R16G16B16A16_SNORM
141 };
142
143 static GLuint short_types_scale[4] = {
144 PIPE_FORMAT_R16_SSCALED,
145 PIPE_FORMAT_R16G16_SSCALED,
146 PIPE_FORMAT_R16G16B16_SSCALED,
147 PIPE_FORMAT_R16G16B16A16_SSCALED
148 };
149
150 static GLuint short_types_int[4] = {
151 PIPE_FORMAT_R16_SINT,
152 PIPE_FORMAT_R16G16_SINT,
153 PIPE_FORMAT_R16G16B16_SINT,
154 PIPE_FORMAT_R16G16B16A16_SINT
155 };
156
157 static GLuint ubyte_types_norm[4] = {
158 PIPE_FORMAT_R8_UNORM,
159 PIPE_FORMAT_R8G8_UNORM,
160 PIPE_FORMAT_R8G8B8_UNORM,
161 PIPE_FORMAT_R8G8B8A8_UNORM
162 };
163
164 static GLuint ubyte_types_scale[4] = {
165 PIPE_FORMAT_R8_USCALED,
166 PIPE_FORMAT_R8G8_USCALED,
167 PIPE_FORMAT_R8G8B8_USCALED,
168 PIPE_FORMAT_R8G8B8A8_USCALED
169 };
170
171 static GLuint ubyte_types_int[4] = {
172 PIPE_FORMAT_R8_UINT,
173 PIPE_FORMAT_R8G8_UINT,
174 PIPE_FORMAT_R8G8B8_UINT,
175 PIPE_FORMAT_R8G8B8A8_UINT
176 };
177
178 static GLuint byte_types_norm[4] = {
179 PIPE_FORMAT_R8_SNORM,
180 PIPE_FORMAT_R8G8_SNORM,
181 PIPE_FORMAT_R8G8B8_SNORM,
182 PIPE_FORMAT_R8G8B8A8_SNORM
183 };
184
185 static GLuint byte_types_scale[4] = {
186 PIPE_FORMAT_R8_SSCALED,
187 PIPE_FORMAT_R8G8_SSCALED,
188 PIPE_FORMAT_R8G8B8_SSCALED,
189 PIPE_FORMAT_R8G8B8A8_SSCALED
190 };
191
192 static GLuint byte_types_int[4] = {
193 PIPE_FORMAT_R8_SINT,
194 PIPE_FORMAT_R8G8_SINT,
195 PIPE_FORMAT_R8G8B8_SINT,
196 PIPE_FORMAT_R8G8B8A8_SINT
197 };
198
199 static GLuint fixed_types[4] = {
200 PIPE_FORMAT_R32_FIXED,
201 PIPE_FORMAT_R32G32_FIXED,
202 PIPE_FORMAT_R32G32B32_FIXED,
203 PIPE_FORMAT_R32G32B32A32_FIXED
204 };
205
206
207 /**
208 * Return a PIPE_FORMAT_x for the given GL datatype and size.
209 */
210 enum pipe_format
211 st_pipe_vertex_format(GLenum type, GLuint size, GLenum format,
212 GLboolean normalized, GLboolean integer)
213 {
214 assert((type >= GL_BYTE && type <= GL_DOUBLE) ||
215 type == GL_FIXED || type == GL_HALF_FLOAT ||
216 type == GL_INT_2_10_10_10_REV ||
217 type == GL_UNSIGNED_INT_2_10_10_10_REV ||
218 type == GL_UNSIGNED_INT_10F_11F_11F_REV);
219 assert(size >= 1);
220 assert(size <= 4);
221 assert(format == GL_RGBA || format == GL_BGRA);
222
223 if (type == GL_INT_2_10_10_10_REV ||
224 type == GL_UNSIGNED_INT_2_10_10_10_REV) {
225 assert(size == 4);
226 assert(!integer);
227
228 if (format == GL_BGRA) {
229 if (type == GL_INT_2_10_10_10_REV) {
230 if (normalized)
231 return PIPE_FORMAT_B10G10R10A2_SNORM;
232 else
233 return PIPE_FORMAT_B10G10R10A2_SSCALED;
234 } else {
235 if (normalized)
236 return PIPE_FORMAT_B10G10R10A2_UNORM;
237 else
238 return PIPE_FORMAT_B10G10R10A2_USCALED;
239 }
240 } else {
241 if (type == GL_INT_2_10_10_10_REV) {
242 if (normalized)
243 return PIPE_FORMAT_R10G10B10A2_SNORM;
244 else
245 return PIPE_FORMAT_R10G10B10A2_SSCALED;
246 } else {
247 if (normalized)
248 return PIPE_FORMAT_R10G10B10A2_UNORM;
249 else
250 return PIPE_FORMAT_R10G10B10A2_USCALED;
251 }
252 }
253 }
254
255 if (type == GL_UNSIGNED_INT_10F_11F_11F_REV) {
256 assert(size == 3);
257 assert(!integer);
258 assert(format == GL_RGBA);
259
260 return PIPE_FORMAT_R11G11B10_FLOAT;
261 }
262
263 if (format == GL_BGRA) {
264 /* this is an odd-ball case */
265 assert(type == GL_UNSIGNED_BYTE);
266 assert(normalized);
267 return PIPE_FORMAT_B8G8R8A8_UNORM;
268 }
269
270 if (integer) {
271 switch (type) {
272 case GL_INT: return int_types_int[size-1];
273 case GL_SHORT: return short_types_int[size-1];
274 case GL_BYTE: return byte_types_int[size-1];
275 case GL_UNSIGNED_INT: return uint_types_int[size-1];
276 case GL_UNSIGNED_SHORT: return ushort_types_int[size-1];
277 case GL_UNSIGNED_BYTE: return ubyte_types_int[size-1];
278 default: assert(0); return 0;
279 }
280 }
281 else if (normalized) {
282 switch (type) {
283 case GL_DOUBLE: return double_types[size-1];
284 case GL_FLOAT: return float_types[size-1];
285 case GL_HALF_FLOAT: return half_float_types[size-1];
286 case GL_INT: return int_types_norm[size-1];
287 case GL_SHORT: return short_types_norm[size-1];
288 case GL_BYTE: return byte_types_norm[size-1];
289 case GL_UNSIGNED_INT: return uint_types_norm[size-1];
290 case GL_UNSIGNED_SHORT: return ushort_types_norm[size-1];
291 case GL_UNSIGNED_BYTE: return ubyte_types_norm[size-1];
292 case GL_FIXED: return fixed_types[size-1];
293 default: assert(0); return 0;
294 }
295 }
296 else {
297 switch (type) {
298 case GL_DOUBLE: return double_types[size-1];
299 case GL_FLOAT: return float_types[size-1];
300 case GL_HALF_FLOAT: return half_float_types[size-1];
301 case GL_INT: return int_types_scale[size-1];
302 case GL_SHORT: return short_types_scale[size-1];
303 case GL_BYTE: return byte_types_scale[size-1];
304 case GL_UNSIGNED_INT: return uint_types_scale[size-1];
305 case GL_UNSIGNED_SHORT: return ushort_types_scale[size-1];
306 case GL_UNSIGNED_BYTE: return ubyte_types_scale[size-1];
307 case GL_FIXED: return fixed_types[size-1];
308 default: assert(0); return 0;
309 }
310 }
311 return PIPE_FORMAT_NONE; /* silence compiler warning */
312 }
313
314 /**
315 * Examine the active arrays to determine if we have interleaved
316 * vertex arrays all living in one VBO, or all living in user space.
317 */
318 static GLboolean
319 is_interleaved_arrays(const struct st_vertex_program *vp,
320 const struct st_vp_variant *vpv,
321 const struct gl_client_array **arrays)
322 {
323 GLuint attr;
324 const struct gl_buffer_object *firstBufObj = NULL;
325 GLint firstStride = -1;
326 const GLubyte *firstPtr = NULL;
327 GLboolean userSpaceBuffer = GL_FALSE;
328
329 for (attr = 0; attr < vpv->num_inputs; attr++) {
330 const GLuint mesaAttr = vp->index_to_input[attr];
331 const struct gl_client_array *array = arrays[mesaAttr];
332 const struct gl_buffer_object *bufObj = array->BufferObj;
333 const GLsizei stride = array->StrideB; /* in bytes */
334
335 if (attr == 0) {
336 /* save info about the first array */
337 firstStride = stride;
338 firstPtr = array->Ptr;
339 firstBufObj = bufObj;
340 userSpaceBuffer = !bufObj || !bufObj->Name;
341 }
342 else {
343 /* check if other arrays interleave with the first, in same buffer */
344 if (stride != firstStride)
345 return GL_FALSE; /* strides don't match */
346
347 if (bufObj != firstBufObj)
348 return GL_FALSE; /* arrays in different VBOs */
349
350 if (abs(array->Ptr - firstPtr) > firstStride)
351 return GL_FALSE; /* arrays start too far apart */
352
353 if ((!_mesa_is_bufferobj(bufObj)) != userSpaceBuffer)
354 return GL_FALSE; /* mix of VBO and user-space arrays */
355 }
356 }
357
358 return GL_TRUE;
359 }
360
361 /**
362 * Set up for drawing interleaved arrays that all live in one VBO
363 * or all live in user space.
364 * \param vbuffer returns vertex buffer info
365 * \param velements returns vertex element info
366 */
367 static boolean
368 setup_interleaved_attribs(const struct st_vertex_program *vp,
369 const struct st_vp_variant *vpv,
370 const struct gl_client_array **arrays,
371 struct pipe_vertex_buffer *vbuffer,
372 struct pipe_vertex_element velements[])
373 {
374 GLuint attr;
375 const GLubyte *low_addr = NULL;
376 GLboolean usingVBO; /* all arrays in a VBO? */
377 struct gl_buffer_object *bufobj;
378 GLsizei stride;
379
380 /* Find the lowest address of the arrays we're drawing,
381 * Init bufobj and stride.
382 */
383 if (vpv->num_inputs) {
384 const GLuint mesaAttr0 = vp->index_to_input[0];
385 const struct gl_client_array *array = arrays[mesaAttr0];
386
387 /* Since we're doing interleaved arrays, we know there'll be at most
388 * one buffer object and the stride will be the same for all arrays.
389 * Grab them now.
390 */
391 bufobj = array->BufferObj;
392 stride = array->StrideB;
393
394 low_addr = arrays[vp->index_to_input[0]]->Ptr;
395
396 for (attr = 1; attr < vpv->num_inputs; attr++) {
397 const GLubyte *start = arrays[vp->index_to_input[attr]]->Ptr;
398 low_addr = MIN2(low_addr, start);
399 }
400 }
401 else {
402 /* not sure we'll ever have zero inputs, but play it safe */
403 bufobj = NULL;
404 stride = 0;
405 low_addr = 0;
406 }
407
408 /* are the arrays in user space? */
409 usingVBO = _mesa_is_bufferobj(bufobj);
410
411 for (attr = 0; attr < vpv->num_inputs; attr++) {
412 const GLuint mesaAttr = vp->index_to_input[attr];
413 const struct gl_client_array *array = arrays[mesaAttr];
414 unsigned src_offset = (unsigned) (array->Ptr - low_addr);
415
416 assert(array->_ElementSize ==
417 _mesa_bytes_per_vertex_attrib(array->Size, array->Type));
418
419 velements[attr].src_offset = src_offset;
420 velements[attr].instance_divisor = array->InstanceDivisor;
421 velements[attr].vertex_buffer_index = 0;
422 velements[attr].src_format = st_pipe_vertex_format(array->Type,
423 array->Size,
424 array->Format,
425 array->Normalized,
426 array->Integer);
427 assert(velements[attr].src_format);
428 }
429
430 /*
431 * Return the vbuffer info and setup user-space attrib info, if needed.
432 */
433 if (vpv->num_inputs == 0) {
434 /* just defensive coding here */
435 vbuffer->buffer = NULL;
436 vbuffer->user_buffer = NULL;
437 vbuffer->buffer_offset = 0;
438 vbuffer->stride = 0;
439 }
440 else if (usingVBO) {
441 /* all interleaved arrays in a VBO */
442 struct st_buffer_object *stobj = st_buffer_object(bufobj);
443
444 if (!stobj || !stobj->buffer) {
445 return FALSE; /* out-of-memory error probably */
446 }
447
448 vbuffer->buffer = stobj->buffer;
449 vbuffer->user_buffer = NULL;
450 vbuffer->buffer_offset = pointer_to_offset(low_addr);
451 vbuffer->stride = stride;
452 }
453 else {
454 /* all interleaved arrays in user memory */
455 vbuffer->buffer = NULL;
456 vbuffer->user_buffer = low_addr;
457 vbuffer->buffer_offset = 0;
458 vbuffer->stride = stride;
459 }
460 return TRUE;
461 }
462
463 /**
464 * Set up a separate pipe_vertex_buffer and pipe_vertex_element for each
465 * vertex attribute.
466 * \param vbuffer returns vertex buffer info
467 * \param velements returns vertex element info
468 */
469 static boolean
470 setup_non_interleaved_attribs(struct st_context *st,
471 const struct st_vertex_program *vp,
472 const struct st_vp_variant *vpv,
473 const struct gl_client_array **arrays,
474 struct pipe_vertex_buffer vbuffer[],
475 struct pipe_vertex_element velements[])
476 {
477 struct gl_context *ctx = st->ctx;
478 GLuint attr;
479
480 for (attr = 0; attr < vpv->num_inputs; attr++) {
481 const GLuint mesaAttr = vp->index_to_input[attr];
482 const struct gl_client_array *array = arrays[mesaAttr];
483 struct gl_buffer_object *bufobj = array->BufferObj;
484 GLsizei stride = array->StrideB;
485
486 assert(array->_ElementSize ==
487 _mesa_bytes_per_vertex_attrib(array->Size, array->Type));
488
489 if (_mesa_is_bufferobj(bufobj)) {
490 /* Attribute data is in a VBO.
491 * Recall that for VBOs, the gl_client_array->Ptr field is
492 * really an offset from the start of the VBO, not a pointer.
493 */
494 struct st_buffer_object *stobj = st_buffer_object(bufobj);
495
496 if (!stobj || !stobj->buffer) {
497 return FALSE; /* out-of-memory error probably */
498 }
499
500 vbuffer[attr].buffer = stobj->buffer;
501 vbuffer[attr].user_buffer = NULL;
502 vbuffer[attr].buffer_offset = pointer_to_offset(array->Ptr);
503 }
504 else {
505 /* wrap user data */
506 void *ptr;
507
508 if (array->Ptr) {
509 ptr = (void *) array->Ptr;
510 }
511 else {
512 /* no array, use ctx->Current.Attrib[] value */
513 ptr = (void *) ctx->Current.Attrib[mesaAttr];
514 stride = 0;
515 }
516
517 assert(ptr);
518
519 vbuffer[attr].buffer = NULL;
520 vbuffer[attr].user_buffer = ptr;
521 vbuffer[attr].buffer_offset = 0;
522 }
523
524 /* common-case setup */
525 vbuffer[attr].stride = stride; /* in bytes */
526
527 velements[attr].src_offset = 0;
528 velements[attr].instance_divisor = array->InstanceDivisor;
529 velements[attr].vertex_buffer_index = attr;
530 velements[attr].src_format = st_pipe_vertex_format(array->Type,
531 array->Size,
532 array->Format,
533 array->Normalized,
534 array->Integer);
535 assert(velements[attr].src_format);
536 }
537 return TRUE;
538 }
539
540 static void update_array(struct st_context *st)
541 {
542 struct gl_context *ctx = st->ctx;
543 const struct gl_client_array **arrays = ctx->Array._DrawArrays;
544 const struct st_vertex_program *vp;
545 const struct st_vp_variant *vpv;
546 struct pipe_vertex_buffer vbuffer[PIPE_MAX_SHADER_INPUTS];
547 struct pipe_vertex_element velements[PIPE_MAX_ATTRIBS];
548 unsigned num_vbuffers, num_velements;
549
550 st->vertex_array_out_of_memory = FALSE;
551
552 /* No drawing has been done yet, so do nothing. */
553 if (!arrays)
554 return;
555
556 /* vertex program validation must be done before this */
557 vp = st->vp;
558 vpv = st->vp_variant;
559
560 memset(velements, 0, sizeof(struct pipe_vertex_element) * vpv->num_inputs);
561
562 /*
563 * Setup the vbuffer[] and velements[] arrays.
564 */
565 if (is_interleaved_arrays(vp, vpv, arrays)) {
566 if (!setup_interleaved_attribs(vp, vpv, arrays, vbuffer, velements)) {
567 st->vertex_array_out_of_memory = TRUE;
568 return;
569 }
570
571 num_vbuffers = 1;
572 num_velements = vpv->num_inputs;
573 if (num_velements == 0)
574 num_vbuffers = 0;
575 }
576 else {
577 if (!setup_non_interleaved_attribs(st, vp, vpv, arrays, vbuffer,
578 velements)) {
579 st->vertex_array_out_of_memory = TRUE;
580 return;
581 }
582
583 num_vbuffers = vpv->num_inputs;
584 num_velements = vpv->num_inputs;
585 }
586
587 cso_set_vertex_buffers(st->cso_context, 0, num_vbuffers, vbuffer);
588 if (st->last_num_vbuffers > num_vbuffers) {
589 /* Unbind remaining buffers, if any. */
590 cso_set_vertex_buffers(st->cso_context, num_vbuffers,
591 st->last_num_vbuffers - num_vbuffers, NULL);
592 }
593 st->last_num_vbuffers = num_vbuffers;
594 cso_set_vertex_elements(st->cso_context, num_velements, velements);
595 }
596
597
598 const struct st_tracked_state st_update_array = {
599 "st_update_array", /* name */
600 { /* dirty */
601 0, /* mesa */
602 ST_NEW_VERTEX_ARRAYS | ST_NEW_VERTEX_PROGRAM, /* st */
603 },
604 update_array /* update */
605 };