mesa: add parameter buffer, used for ARB_indirect_parameters
[mesa.git] / src / mesa / main / get.c
1 /*
2 * Copyright (C) 2010 Brian Paul All Rights Reserved.
3 * Copyright (C) 2010 Intel Corporation
4 *
5 * Permission is hereby granted, free of charge, to any person obtaining a
6 * copy of this software and associated documentation files (the "Software"),
7 * to deal in the Software without restriction, including without limitation
8 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
9 * and/or sell copies of the Software, and to permit persons to whom the
10 * Software is furnished to do so, subject to the following conditions:
11 *
12 * The above copyright notice and this permission notice shall be included
13 * in all copies or substantial portions of the Software.
14 *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
16 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
18 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
19 * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
20 * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
21 * OTHER DEALINGS IN THE SOFTWARE.
22 *
23 * Author: Kristian Høgsberg <krh@bitplanet.net>
24 */
25
26 #include "glheader.h"
27 #include "context.h"
28 #include "blend.h"
29 #include "enable.h"
30 #include "enums.h"
31 #include "errors.h"
32 #include "extensions.h"
33 #include "get.h"
34 #include "macros.h"
35 #include "mtypes.h"
36 #include "state.h"
37 #include "texcompress.h"
38 #include "texstate.h"
39 #include "framebuffer.h"
40 #include "samplerobj.h"
41 #include "stencil.h"
42
43 /* This is a table driven implemetation of the glGet*v() functions.
44 * The basic idea is that most getters just look up an int somewhere
45 * in struct gl_context and then convert it to a bool or float according to
46 * which of glGetIntegerv() glGetBooleanv() etc is being called.
47 * Instead of generating code to do this, we can just record the enum
48 * value and the offset into struct gl_context in an array of structs. Then
49 * in glGet*(), we lookup the struct for the enum in question, and use
50 * the offset to get the int we need.
51 *
52 * Sometimes we need to look up a float, a boolean, a bit in a
53 * bitfield, a matrix or other types instead, so we need to track the
54 * type of the value in struct gl_context. And sometimes the value isn't in
55 * struct gl_context but in the drawbuffer, the array object, current texture
56 * unit, or maybe it's a computed value. So we need to also track
57 * where or how to find the value. Finally, we sometimes need to
58 * check that one of a number of extensions are enabled, the GL
59 * version or flush or call _mesa_update_state(). This is done by
60 * attaching optional extra information to the value description
61 * struct, it's sort of like an array of opcodes that describe extra
62 * checks or actions.
63 *
64 * Putting all this together we end up with struct value_desc below,
65 * and with a couple of macros to help, the table of struct value_desc
66 * is about as concise as the specification in the old python script.
67 */
68
69 #define FLOAT_TO_BOOLEAN(X) ( (X) ? GL_TRUE : GL_FALSE )
70 #define FLOAT_TO_FIXED(F) ( ((F) * 65536.0f > INT_MAX) ? INT_MAX : \
71 ((F) * 65536.0f < INT_MIN) ? INT_MIN : \
72 (GLint) ((F) * 65536.0f) )
73
74 #define INT_TO_BOOLEAN(I) ( (I) ? GL_TRUE : GL_FALSE )
75 #define INT_TO_FIXED(I) ( ((I) > SHRT_MAX) ? INT_MAX : \
76 ((I) < SHRT_MIN) ? INT_MIN : \
77 (GLint) ((I) * 65536) )
78
79 #define INT64_TO_BOOLEAN(I) ( (I) ? GL_TRUE : GL_FALSE )
80 #define INT64_TO_INT(I) ( (GLint)((I > INT_MAX) ? INT_MAX : ((I < INT_MIN) ? INT_MIN : (I))) )
81
82 #define BOOLEAN_TO_INT(B) ( (GLint) (B) )
83 #define BOOLEAN_TO_INT64(B) ( (GLint64) (B) )
84 #define BOOLEAN_TO_FLOAT(B) ( (B) ? 1.0F : 0.0F )
85 #define BOOLEAN_TO_FIXED(B) ( (GLint) ((B) ? 1 : 0) << 16 )
86
87 #define ENUM_TO_INT64(E) ( (GLint64) (E) )
88 #define ENUM_TO_FIXED(E) (E)
89
90 enum value_type {
91 TYPE_INVALID,
92 TYPE_INT,
93 TYPE_INT_2,
94 TYPE_INT_3,
95 TYPE_INT_4,
96 TYPE_INT_N,
97 TYPE_INT64,
98 TYPE_ENUM,
99 TYPE_ENUM_2,
100 TYPE_BOOLEAN,
101 TYPE_BIT_0,
102 TYPE_BIT_1,
103 TYPE_BIT_2,
104 TYPE_BIT_3,
105 TYPE_BIT_4,
106 TYPE_BIT_5,
107 TYPE_BIT_6,
108 TYPE_BIT_7,
109 TYPE_FLOAT,
110 TYPE_FLOAT_2,
111 TYPE_FLOAT_3,
112 TYPE_FLOAT_4,
113 TYPE_FLOATN,
114 TYPE_FLOATN_2,
115 TYPE_FLOATN_3,
116 TYPE_FLOATN_4,
117 TYPE_DOUBLEN,
118 TYPE_DOUBLEN_2,
119 TYPE_MATRIX,
120 TYPE_MATRIX_T,
121 TYPE_CONST
122 };
123
124 enum value_location {
125 LOC_BUFFER,
126 LOC_CONTEXT,
127 LOC_ARRAY,
128 LOC_TEXUNIT,
129 LOC_CUSTOM
130 };
131
132 enum value_extra {
133 EXTRA_END = 0x8000,
134 EXTRA_VERSION_30,
135 EXTRA_VERSION_31,
136 EXTRA_VERSION_32,
137 EXTRA_VERSION_40,
138 EXTRA_API_GL,
139 EXTRA_API_GL_CORE,
140 EXTRA_API_ES2,
141 EXTRA_API_ES3,
142 EXTRA_API_ES31,
143 EXTRA_NEW_BUFFERS,
144 EXTRA_NEW_FRAG_CLAMP,
145 EXTRA_VALID_DRAW_BUFFER,
146 EXTRA_VALID_TEXTURE_UNIT,
147 EXTRA_VALID_CLIP_DISTANCE,
148 EXTRA_FLUSH_CURRENT,
149 EXTRA_GLSL_130,
150 EXTRA_EXT_UBO_GS4,
151 EXTRA_EXT_ATOMICS_GS4,
152 EXTRA_EXT_SHADER_IMAGE_GS4,
153 EXTRA_EXT_ATOMICS_TESS,
154 EXTRA_EXT_SHADER_IMAGE_TESS,
155 };
156
157 #define NO_EXTRA NULL
158 #define NO_OFFSET 0
159
160 struct value_desc {
161 GLenum pname;
162 GLubyte location; /**< enum value_location */
163 GLubyte type; /**< enum value_type */
164 int offset;
165 const int *extra;
166 };
167
168 union value {
169 GLfloat value_float;
170 GLfloat value_float_4[4];
171 GLdouble value_double_2[2];
172 GLmatrix *value_matrix;
173 GLint value_int;
174 GLint value_int_4[4];
175 GLint64 value_int64;
176 GLenum value_enum;
177
178 /* Sigh, see GL_COMPRESSED_TEXTURE_FORMATS_ARB handling */
179 struct {
180 GLint n, ints[100];
181 } value_int_n;
182 GLboolean value_bool;
183 };
184
185 #define BUFFER_FIELD(field, type) \
186 LOC_BUFFER, type, offsetof(struct gl_framebuffer, field)
187 #define CONTEXT_FIELD(field, type) \
188 LOC_CONTEXT, type, offsetof(struct gl_context, field)
189 #define ARRAY_FIELD(field, type) \
190 LOC_ARRAY, type, offsetof(struct gl_vertex_array_object, field)
191 #undef CONST /* already defined through windows.h */
192 #define CONST(value) \
193 LOC_CONTEXT, TYPE_CONST, value
194
195 #define BUFFER_INT(field) BUFFER_FIELD(field, TYPE_INT)
196 #define BUFFER_ENUM(field) BUFFER_FIELD(field, TYPE_ENUM)
197 #define BUFFER_BOOL(field) BUFFER_FIELD(field, TYPE_BOOLEAN)
198
199 #define CONTEXT_INT(field) CONTEXT_FIELD(field, TYPE_INT)
200 #define CONTEXT_INT2(field) CONTEXT_FIELD(field, TYPE_INT_2)
201 #define CONTEXT_INT64(field) CONTEXT_FIELD(field, TYPE_INT64)
202 #define CONTEXT_ENUM(field) CONTEXT_FIELD(field, TYPE_ENUM)
203 #define CONTEXT_ENUM2(field) CONTEXT_FIELD(field, TYPE_ENUM_2)
204 #define CONTEXT_BOOL(field) CONTEXT_FIELD(field, TYPE_BOOLEAN)
205 #define CONTEXT_BIT0(field) CONTEXT_FIELD(field, TYPE_BIT_0)
206 #define CONTEXT_BIT1(field) CONTEXT_FIELD(field, TYPE_BIT_1)
207 #define CONTEXT_BIT2(field) CONTEXT_FIELD(field, TYPE_BIT_2)
208 #define CONTEXT_BIT3(field) CONTEXT_FIELD(field, TYPE_BIT_3)
209 #define CONTEXT_BIT4(field) CONTEXT_FIELD(field, TYPE_BIT_4)
210 #define CONTEXT_BIT5(field) CONTEXT_FIELD(field, TYPE_BIT_5)
211 #define CONTEXT_BIT6(field) CONTEXT_FIELD(field, TYPE_BIT_6)
212 #define CONTEXT_BIT7(field) CONTEXT_FIELD(field, TYPE_BIT_7)
213 #define CONTEXT_FLOAT(field) CONTEXT_FIELD(field, TYPE_FLOAT)
214 #define CONTEXT_FLOAT2(field) CONTEXT_FIELD(field, TYPE_FLOAT_2)
215 #define CONTEXT_FLOAT3(field) CONTEXT_FIELD(field, TYPE_FLOAT_3)
216 #define CONTEXT_FLOAT4(field) CONTEXT_FIELD(field, TYPE_FLOAT_4)
217 #define CONTEXT_MATRIX(field) CONTEXT_FIELD(field, TYPE_MATRIX)
218 #define CONTEXT_MATRIX_T(field) CONTEXT_FIELD(field, TYPE_MATRIX_T)
219
220 #define ARRAY_INT(field) ARRAY_FIELD(field, TYPE_INT)
221 #define ARRAY_ENUM(field) ARRAY_FIELD(field, TYPE_ENUM)
222 #define ARRAY_BOOL(field) ARRAY_FIELD(field, TYPE_BOOLEAN)
223
224 #define EXT(f) \
225 offsetof(struct gl_extensions, f)
226
227 #define EXTRA_EXT(e) \
228 static const int extra_##e[] = { \
229 EXT(e), EXTRA_END \
230 }
231
232 #define EXTRA_EXT2(e1, e2) \
233 static const int extra_##e1##_##e2[] = { \
234 EXT(e1), EXT(e2), EXTRA_END \
235 }
236
237 /* The 'extra' mechanism is a way to specify extra checks (such as
238 * extensions or specific gl versions) or actions (flush current, new
239 * buffers) that we need to do before looking up an enum. We need to
240 * declare them all up front so we can refer to them in the value_desc
241 * structs below.
242 *
243 * Each EXTRA_ will be executed. For EXTRA_* enums of extensions and API
244 * versions, listing multiple ones in an array means an error will be thrown
245 * only if none of them are available. If you need to check for "AND"
246 * behavior, you would need to make a custom EXTRA_ enum.
247 */
248
249 static const int extra_new_buffers[] = {
250 EXTRA_NEW_BUFFERS,
251 EXTRA_END
252 };
253
254 static const int extra_new_frag_clamp[] = {
255 EXTRA_NEW_FRAG_CLAMP,
256 EXTRA_END
257 };
258
259 static const int extra_valid_draw_buffer[] = {
260 EXTRA_VALID_DRAW_BUFFER,
261 EXTRA_END
262 };
263
264 static const int extra_valid_texture_unit[] = {
265 EXTRA_VALID_TEXTURE_UNIT,
266 EXTRA_END
267 };
268
269 static const int extra_valid_clip_distance[] = {
270 EXTRA_VALID_CLIP_DISTANCE,
271 EXTRA_END
272 };
273
274 static const int extra_flush_current_valid_texture_unit[] = {
275 EXTRA_FLUSH_CURRENT,
276 EXTRA_VALID_TEXTURE_UNIT,
277 EXTRA_END
278 };
279
280 static const int extra_flush_current[] = {
281 EXTRA_FLUSH_CURRENT,
282 EXTRA_END
283 };
284
285 static const int extra_EXT_texture_integer_and_new_buffers[] = {
286 EXT(EXT_texture_integer),
287 EXTRA_NEW_BUFFERS,
288 EXTRA_END
289 };
290
291 static const int extra_GLSL_130_es3[] = {
292 EXTRA_GLSL_130,
293 EXTRA_API_ES3,
294 EXTRA_END
295 };
296
297 static const int extra_texture_buffer_object[] = {
298 EXTRA_API_GL_CORE,
299 EXTRA_VERSION_31,
300 EXT(ARB_texture_buffer_object),
301 EXTRA_END
302 };
303
304 static const int extra_ARB_transform_feedback2_api_es3[] = {
305 EXT(ARB_transform_feedback2),
306 EXTRA_API_ES3,
307 EXTRA_END
308 };
309
310 static const int extra_ARB_uniform_buffer_object_and_geometry_shader[] = {
311 EXTRA_EXT_UBO_GS4,
312 EXTRA_END
313 };
314
315 static const int extra_ARB_ES2_compatibility_api_es2[] = {
316 EXT(ARB_ES2_compatibility),
317 EXTRA_API_ES2,
318 EXTRA_END
319 };
320
321 static const int extra_ARB_ES3_compatibility_api_es3[] = {
322 EXT(ARB_ES3_compatibility),
323 EXTRA_API_ES3,
324 EXTRA_END
325 };
326
327 static const int extra_EXT_framebuffer_sRGB_and_new_buffers[] = {
328 EXT(EXT_framebuffer_sRGB),
329 EXTRA_NEW_BUFFERS,
330 EXTRA_END
331 };
332
333 static const int extra_EXT_packed_float[] = {
334 EXT(EXT_packed_float),
335 EXTRA_NEW_BUFFERS,
336 EXTRA_END
337 };
338
339 static const int extra_EXT_texture_array_es3[] = {
340 EXT(EXT_texture_array),
341 EXTRA_API_ES3,
342 EXTRA_END
343 };
344
345 static const int extra_ARB_shader_atomic_counters_and_geometry_shader[] = {
346 EXTRA_EXT_ATOMICS_GS4,
347 EXTRA_END
348 };
349
350 static const int extra_ARB_shader_image_load_store_and_geometry_shader[] = {
351 EXTRA_EXT_SHADER_IMAGE_GS4,
352 EXTRA_END
353 };
354
355 static const int extra_ARB_shader_atomic_counters_and_tessellation[] = {
356 EXTRA_EXT_ATOMICS_TESS,
357 EXTRA_END
358 };
359
360 static const int extra_ARB_shader_image_load_store_and_tessellation[] = {
361 EXTRA_EXT_SHADER_IMAGE_TESS,
362 EXTRA_END
363 };
364
365 /* HACK: remove when ARB_compute_shader is actually supported */
366 static const int extra_ARB_compute_shader_es31[] = {
367 EXT(ARB_compute_shader),
368 EXTRA_API_ES31,
369 EXTRA_END
370 };
371
372 static const int extra_ARB_shader_storage_buffer_object_es31[] = {
373 EXT(ARB_shader_storage_buffer_object),
374 EXTRA_API_ES31,
375 EXTRA_END
376 };
377
378 EXTRA_EXT(ARB_texture_cube_map);
379 EXTRA_EXT(EXT_texture_array);
380 EXTRA_EXT(NV_fog_distance);
381 EXTRA_EXT(EXT_texture_filter_anisotropic);
382 EXTRA_EXT(NV_point_sprite);
383 EXTRA_EXT(NV_texture_rectangle);
384 EXTRA_EXT(EXT_stencil_two_side);
385 EXTRA_EXT(EXT_depth_bounds_test);
386 EXTRA_EXT(ARB_depth_clamp);
387 EXTRA_EXT(ATI_fragment_shader);
388 EXTRA_EXT(EXT_provoking_vertex);
389 EXTRA_EXT(ARB_fragment_shader);
390 EXTRA_EXT(ARB_fragment_program);
391 EXTRA_EXT2(ARB_framebuffer_object, EXT_framebuffer_multisample);
392 EXTRA_EXT(ARB_seamless_cube_map);
393 EXTRA_EXT(ARB_sync);
394 EXTRA_EXT(ARB_vertex_shader);
395 EXTRA_EXT(EXT_transform_feedback);
396 EXTRA_EXT(ARB_transform_feedback3);
397 EXTRA_EXT(EXT_pixel_buffer_object);
398 EXTRA_EXT(ARB_vertex_program);
399 EXTRA_EXT2(NV_point_sprite, ARB_point_sprite);
400 EXTRA_EXT2(ARB_vertex_program, ARB_fragment_program);
401 EXTRA_EXT(ARB_color_buffer_float);
402 EXTRA_EXT(EXT_framebuffer_sRGB);
403 EXTRA_EXT(OES_EGL_image_external);
404 EXTRA_EXT(ARB_blend_func_extended);
405 EXTRA_EXT(ARB_uniform_buffer_object);
406 EXTRA_EXT(ARB_timer_query);
407 EXTRA_EXT(ARB_texture_cube_map_array);
408 EXTRA_EXT(ARB_texture_buffer_range);
409 EXTRA_EXT(ARB_texture_multisample);
410 EXTRA_EXT(ARB_texture_gather);
411 EXTRA_EXT(ARB_shader_atomic_counters);
412 EXTRA_EXT(ARB_draw_indirect);
413 EXTRA_EXT(ARB_shader_image_load_store);
414 EXTRA_EXT(ARB_viewport_array);
415 EXTRA_EXT(ARB_compute_shader);
416 EXTRA_EXT(ARB_gpu_shader5);
417 EXTRA_EXT2(ARB_transform_feedback3, ARB_gpu_shader5);
418 EXTRA_EXT(INTEL_performance_query);
419 EXTRA_EXT(ARB_explicit_uniform_location);
420 EXTRA_EXT(ARB_clip_control);
421 EXTRA_EXT(EXT_polygon_offset_clamp);
422 EXTRA_EXT(ARB_framebuffer_no_attachments);
423 EXTRA_EXT(ARB_tessellation_shader);
424 EXTRA_EXT(ARB_shader_subroutine);
425 EXTRA_EXT(ARB_shader_storage_buffer_object);
426 EXTRA_EXT(ARB_indirect_parameters);
427
428 static const int
429 extra_ARB_color_buffer_float_or_glcore[] = {
430 EXT(ARB_color_buffer_float),
431 EXTRA_API_GL_CORE,
432 EXTRA_END
433 };
434
435 static const int
436 extra_NV_primitive_restart[] = {
437 EXT(NV_primitive_restart),
438 EXTRA_END
439 };
440
441 static const int extra_version_30[] = { EXTRA_VERSION_30, EXTRA_END };
442 static const int extra_version_31[] = { EXTRA_VERSION_31, EXTRA_END };
443 static const int extra_version_32[] = { EXTRA_VERSION_32, EXTRA_END };
444 static const int extra_version_40[] = { EXTRA_VERSION_40, EXTRA_END };
445
446 static const int extra_gl30_es3[] = {
447 EXTRA_VERSION_30,
448 EXTRA_API_ES3,
449 EXTRA_END,
450 };
451
452 static const int extra_gl32_es3[] = {
453 EXTRA_VERSION_32,
454 EXTRA_API_ES3,
455 EXTRA_END,
456 };
457
458 static const int extra_gl40_ARB_sample_shading[] = {
459 EXTRA_VERSION_40,
460 EXT(ARB_sample_shading),
461 EXTRA_END
462 };
463
464 static const int
465 extra_ARB_vertex_program_api_es2[] = {
466 EXT(ARB_vertex_program),
467 EXTRA_API_ES2,
468 EXTRA_END
469 };
470
471 /* The ReadBuffer get token is valid under either full GL or under
472 * GLES2 if the NV_read_buffer extension is available. */
473 static const int
474 extra_NV_read_buffer_api_gl[] = {
475 EXTRA_API_ES2,
476 EXTRA_API_GL,
477 EXTRA_END
478 };
479
480 static const int extra_core_ARB_color_buffer_float_and_new_buffers[] = {
481 EXTRA_API_GL_CORE,
482 EXT(ARB_color_buffer_float),
483 EXTRA_NEW_BUFFERS,
484 EXTRA_END
485 };
486
487 /* This is the big table describing all the enums we accept in
488 * glGet*v(). The table is partitioned into six parts: enums
489 * understood by all GL APIs (OpenGL, GLES and GLES2), enums shared
490 * between OpenGL and GLES, enums exclusive to GLES, etc for the
491 * remaining combinations. To look up the enums valid in a given API
492 * we will use a hash table specific to that API. These tables are in
493 * turn generated at build time and included through get_hash.h.
494 */
495
496 #include "get_hash.h"
497
498 /* All we need now is a way to look up the value struct from the enum.
499 * The code generated by gcc for the old generated big switch
500 * statement is a big, balanced, open coded if/else tree, essentially
501 * an unrolled binary search. It would be natural to sort the new
502 * enum table and use bsearch(), but we will use a read-only hash
503 * table instead. bsearch() has a nice guaranteed worst case
504 * performance, but we're also guaranteed to hit that worst case
505 * (log2(n) iterations) for about half the enums. Instead, using an
506 * open addressing hash table, we can find the enum on the first try
507 * for 80% of the enums, 1 collision for 10% and never more than 5
508 * collisions for any enum (typical numbers). And the code is very
509 * simple, even though it feels a little magic. */
510
511 #ifdef GET_DEBUG
512 static void
513 print_table_stats(int api)
514 {
515 int i, j, collisions[11], count, hash, mask;
516 const struct value_desc *d;
517 const char *api_names[] = {
518 [API_OPENGL_COMPAT] = "GL",
519 [API_OPENGL_CORE] = "GL_CORE",
520 [API_OPENGLES] = "GLES",
521 [API_OPENGLES2] = "GLES2",
522 };
523 const char *api_name;
524
525 api_name = api < ARRAY_SIZE(api_names) ? api_names[api] : "N/A";
526 count = 0;
527 mask = ARRAY_SIZE(table(api)) - 1;
528 memset(collisions, 0, sizeof collisions);
529
530 for (i = 0; i < ARRAY_SIZE(table(api)); i++) {
531 if (!table(api)[i])
532 continue;
533 count++;
534 d = &values[table(api)[i]];
535 hash = (d->pname * prime_factor);
536 j = 0;
537 while (1) {
538 if (values[table(api)[hash & mask]].pname == d->pname)
539 break;
540 hash += prime_step;
541 j++;
542 }
543
544 if (j < 10)
545 collisions[j]++;
546 else
547 collisions[10]++;
548 }
549
550 printf("number of enums for %s: %d (total %ld)\n",
551 api_name, count, ARRAY_SIZE(values));
552 for (i = 0; i < ARRAY_SIZE(collisions) - 1; i++)
553 if (collisions[i] > 0)
554 printf(" %d enums with %d %scollisions\n",
555 collisions[i], i, i == 10 ? "or more " : "");
556 }
557 #endif
558
559 /**
560 * Initialize the enum hash for a given API
561 *
562 * This is called from one_time_init() to insert the enum values that
563 * are valid for the API in question into the enum hash table.
564 *
565 * \param the current context, for determining the API in question
566 */
567 void _mesa_init_get_hash(struct gl_context *ctx)
568 {
569 #ifdef GET_DEBUG
570 print_table_stats(ctx->API);
571 #else
572 (void) ctx;
573 #endif
574 }
575
576 /**
577 * Handle irregular enums
578 *
579 * Some values don't conform to the "well-known type at context
580 * pointer + offset" pattern, so we have this function to catch all
581 * the corner cases. Typically, it's a computed value or a one-off
582 * pointer to a custom struct or something.
583 *
584 * In this case we can't return a pointer to the value, so we'll have
585 * to use the temporary variable 'v' declared back in the calling
586 * glGet*v() function to store the result.
587 *
588 * \param ctx the current context
589 * \param d the struct value_desc that describes the enum
590 * \param v pointer to the tmp declared in the calling glGet*v() function
591 */
592 static void
593 find_custom_value(struct gl_context *ctx, const struct value_desc *d, union value *v)
594 {
595 struct gl_buffer_object **buffer_obj;
596 struct gl_vertex_attrib_array *array;
597 GLuint unit, *p;
598
599 switch (d->pname) {
600 case GL_MAJOR_VERSION:
601 v->value_int = ctx->Version / 10;
602 break;
603 case GL_MINOR_VERSION:
604 v->value_int = ctx->Version % 10;
605 break;
606
607 case GL_TEXTURE_1D:
608 case GL_TEXTURE_2D:
609 case GL_TEXTURE_3D:
610 case GL_TEXTURE_CUBE_MAP_ARB:
611 case GL_TEXTURE_RECTANGLE_NV:
612 case GL_TEXTURE_EXTERNAL_OES:
613 v->value_bool = _mesa_IsEnabled(d->pname);
614 break;
615
616 case GL_LINE_STIPPLE_PATTERN:
617 /* This is the only GLushort, special case it here by promoting
618 * to an int rather than introducing a new type. */
619 v->value_int = ctx->Line.StipplePattern;
620 break;
621
622 case GL_CURRENT_RASTER_TEXTURE_COORDS:
623 unit = ctx->Texture.CurrentUnit;
624 v->value_float_4[0] = ctx->Current.RasterTexCoords[unit][0];
625 v->value_float_4[1] = ctx->Current.RasterTexCoords[unit][1];
626 v->value_float_4[2] = ctx->Current.RasterTexCoords[unit][2];
627 v->value_float_4[3] = ctx->Current.RasterTexCoords[unit][3];
628 break;
629
630 case GL_CURRENT_TEXTURE_COORDS:
631 unit = ctx->Texture.CurrentUnit;
632 v->value_float_4[0] = ctx->Current.Attrib[VERT_ATTRIB_TEX0 + unit][0];
633 v->value_float_4[1] = ctx->Current.Attrib[VERT_ATTRIB_TEX0 + unit][1];
634 v->value_float_4[2] = ctx->Current.Attrib[VERT_ATTRIB_TEX0 + unit][2];
635 v->value_float_4[3] = ctx->Current.Attrib[VERT_ATTRIB_TEX0 + unit][3];
636 break;
637
638 case GL_COLOR_WRITEMASK:
639 v->value_int_4[0] = ctx->Color.ColorMask[0][RCOMP] ? 1 : 0;
640 v->value_int_4[1] = ctx->Color.ColorMask[0][GCOMP] ? 1 : 0;
641 v->value_int_4[2] = ctx->Color.ColorMask[0][BCOMP] ? 1 : 0;
642 v->value_int_4[3] = ctx->Color.ColorMask[0][ACOMP] ? 1 : 0;
643 break;
644
645 case GL_EDGE_FLAG:
646 v->value_bool = ctx->Current.Attrib[VERT_ATTRIB_EDGEFLAG][0] == 1.0F;
647 break;
648
649 case GL_READ_BUFFER:
650 v->value_enum = ctx->ReadBuffer->ColorReadBuffer;
651 break;
652
653 case GL_MAP2_GRID_DOMAIN:
654 v->value_float_4[0] = ctx->Eval.MapGrid2u1;
655 v->value_float_4[1] = ctx->Eval.MapGrid2u2;
656 v->value_float_4[2] = ctx->Eval.MapGrid2v1;
657 v->value_float_4[3] = ctx->Eval.MapGrid2v2;
658 break;
659
660 case GL_TEXTURE_STACK_DEPTH:
661 unit = ctx->Texture.CurrentUnit;
662 v->value_int = ctx->TextureMatrixStack[unit].Depth + 1;
663 break;
664 case GL_TEXTURE_MATRIX:
665 unit = ctx->Texture.CurrentUnit;
666 v->value_matrix = ctx->TextureMatrixStack[unit].Top;
667 break;
668
669 case GL_TEXTURE_COORD_ARRAY:
670 case GL_TEXTURE_COORD_ARRAY_SIZE:
671 case GL_TEXTURE_COORD_ARRAY_TYPE:
672 case GL_TEXTURE_COORD_ARRAY_STRIDE:
673 array = &ctx->Array.VAO->VertexAttrib[VERT_ATTRIB_TEX(ctx->Array.ActiveTexture)];
674 v->value_int = *(GLuint *) ((char *) array + d->offset);
675 break;
676
677 case GL_ACTIVE_TEXTURE_ARB:
678 v->value_int = GL_TEXTURE0_ARB + ctx->Texture.CurrentUnit;
679 break;
680 case GL_CLIENT_ACTIVE_TEXTURE_ARB:
681 v->value_int = GL_TEXTURE0_ARB + ctx->Array.ActiveTexture;
682 break;
683
684 case GL_MODELVIEW_STACK_DEPTH:
685 case GL_PROJECTION_STACK_DEPTH:
686 v->value_int = *(GLint *) ((char *) ctx + d->offset) + 1;
687 break;
688
689 case GL_MAX_TEXTURE_SIZE:
690 case GL_MAX_3D_TEXTURE_SIZE:
691 case GL_MAX_CUBE_MAP_TEXTURE_SIZE_ARB:
692 p = (GLuint *) ((char *) ctx + d->offset);
693 v->value_int = 1 << (*p - 1);
694 break;
695
696 case GL_SCISSOR_BOX:
697 v->value_int_4[0] = ctx->Scissor.ScissorArray[0].X;
698 v->value_int_4[1] = ctx->Scissor.ScissorArray[0].Y;
699 v->value_int_4[2] = ctx->Scissor.ScissorArray[0].Width;
700 v->value_int_4[3] = ctx->Scissor.ScissorArray[0].Height;
701 break;
702
703 case GL_SCISSOR_TEST:
704 v->value_bool = ctx->Scissor.EnableFlags & 1;
705 break;
706
707 case GL_LIST_INDEX:
708 v->value_int =
709 ctx->ListState.CurrentList ? ctx->ListState.CurrentList->Name : 0;
710 break;
711 case GL_LIST_MODE:
712 if (!ctx->CompileFlag)
713 v->value_enum = 0;
714 else if (ctx->ExecuteFlag)
715 v->value_enum = GL_COMPILE_AND_EXECUTE;
716 else
717 v->value_enum = GL_COMPILE;
718 break;
719
720 case GL_VIEWPORT:
721 v->value_float_4[0] = ctx->ViewportArray[0].X;
722 v->value_float_4[1] = ctx->ViewportArray[0].Y;
723 v->value_float_4[2] = ctx->ViewportArray[0].Width;
724 v->value_float_4[3] = ctx->ViewportArray[0].Height;
725 break;
726
727 case GL_DEPTH_RANGE:
728 v->value_double_2[0] = ctx->ViewportArray[0].Near;
729 v->value_double_2[1] = ctx->ViewportArray[0].Far;
730 break;
731
732 case GL_ACTIVE_STENCIL_FACE_EXT:
733 v->value_enum = ctx->Stencil.ActiveFace ? GL_BACK : GL_FRONT;
734 break;
735
736 case GL_STENCIL_FAIL:
737 v->value_enum = ctx->Stencil.FailFunc[ctx->Stencil.ActiveFace];
738 break;
739 case GL_STENCIL_FUNC:
740 v->value_enum = ctx->Stencil.Function[ctx->Stencil.ActiveFace];
741 break;
742 case GL_STENCIL_PASS_DEPTH_FAIL:
743 v->value_enum = ctx->Stencil.ZFailFunc[ctx->Stencil.ActiveFace];
744 break;
745 case GL_STENCIL_PASS_DEPTH_PASS:
746 v->value_enum = ctx->Stencil.ZPassFunc[ctx->Stencil.ActiveFace];
747 break;
748 case GL_STENCIL_REF:
749 v->value_int = _mesa_get_stencil_ref(ctx, ctx->Stencil.ActiveFace);
750 break;
751 case GL_STENCIL_BACK_REF:
752 v->value_int = _mesa_get_stencil_ref(ctx, 1);
753 break;
754 case GL_STENCIL_VALUE_MASK:
755 v->value_int = ctx->Stencil.ValueMask[ctx->Stencil.ActiveFace];
756 break;
757 case GL_STENCIL_WRITEMASK:
758 v->value_int = ctx->Stencil.WriteMask[ctx->Stencil.ActiveFace];
759 break;
760
761 case GL_NUM_EXTENSIONS:
762 v->value_int = _mesa_get_extension_count(ctx);
763 break;
764
765 case GL_IMPLEMENTATION_COLOR_READ_TYPE_OES:
766 v->value_int = _mesa_get_color_read_type(ctx);
767 break;
768 case GL_IMPLEMENTATION_COLOR_READ_FORMAT_OES:
769 v->value_int = _mesa_get_color_read_format(ctx);
770 break;
771
772 case GL_CURRENT_MATRIX_STACK_DEPTH_ARB:
773 v->value_int = ctx->CurrentStack->Depth + 1;
774 break;
775 case GL_CURRENT_MATRIX_ARB:
776 case GL_TRANSPOSE_CURRENT_MATRIX_ARB:
777 v->value_matrix = ctx->CurrentStack->Top;
778 break;
779
780 case GL_NUM_COMPRESSED_TEXTURE_FORMATS_ARB:
781 v->value_int = _mesa_get_compressed_formats(ctx, NULL);
782 break;
783 case GL_COMPRESSED_TEXTURE_FORMATS_ARB:
784 v->value_int_n.n =
785 _mesa_get_compressed_formats(ctx, v->value_int_n.ints);
786 assert(v->value_int_n.n <= (int) ARRAY_SIZE(v->value_int_n.ints));
787 break;
788
789 case GL_MAX_VARYING_FLOATS_ARB:
790 v->value_int = ctx->Const.MaxVarying * 4;
791 break;
792
793 /* Various object names */
794
795 case GL_TEXTURE_BINDING_1D:
796 case GL_TEXTURE_BINDING_2D:
797 case GL_TEXTURE_BINDING_3D:
798 case GL_TEXTURE_BINDING_1D_ARRAY_EXT:
799 case GL_TEXTURE_BINDING_2D_ARRAY_EXT:
800 case GL_TEXTURE_BINDING_CUBE_MAP_ARB:
801 case GL_TEXTURE_BINDING_RECTANGLE_NV:
802 case GL_TEXTURE_BINDING_EXTERNAL_OES:
803 case GL_TEXTURE_BINDING_CUBE_MAP_ARRAY:
804 case GL_TEXTURE_BINDING_2D_MULTISAMPLE:
805 case GL_TEXTURE_BINDING_2D_MULTISAMPLE_ARRAY:
806 unit = ctx->Texture.CurrentUnit;
807 v->value_int =
808 ctx->Texture.Unit[unit].CurrentTex[d->offset]->Name;
809 break;
810
811 /* GL_EXT_packed_float */
812 case GL_RGBA_SIGNED_COMPONENTS_EXT:
813 {
814 /* Note: we only check the 0th color attachment. */
815 const struct gl_renderbuffer *rb =
816 ctx->DrawBuffer->_ColorDrawBuffers[0];
817 if (rb && _mesa_is_format_signed(rb->Format)) {
818 /* Issue 17 of GL_EXT_packed_float: If a component (such as
819 * alpha) has zero bits, the component should not be considered
820 * signed and so the bit for the respective component should be
821 * zeroed.
822 */
823 GLint r_bits =
824 _mesa_get_format_bits(rb->Format, GL_RED_BITS);
825 GLint g_bits =
826 _mesa_get_format_bits(rb->Format, GL_GREEN_BITS);
827 GLint b_bits =
828 _mesa_get_format_bits(rb->Format, GL_BLUE_BITS);
829 GLint a_bits =
830 _mesa_get_format_bits(rb->Format, GL_ALPHA_BITS);
831 GLint l_bits =
832 _mesa_get_format_bits(rb->Format, GL_TEXTURE_LUMINANCE_SIZE);
833 GLint i_bits =
834 _mesa_get_format_bits(rb->Format, GL_TEXTURE_INTENSITY_SIZE);
835
836 v->value_int_4[0] = r_bits + l_bits + i_bits > 0;
837 v->value_int_4[1] = g_bits + l_bits + i_bits > 0;
838 v->value_int_4[2] = b_bits + l_bits + i_bits > 0;
839 v->value_int_4[3] = a_bits + i_bits > 0;
840 }
841 else {
842 v->value_int_4[0] =
843 v->value_int_4[1] =
844 v->value_int_4[2] =
845 v->value_int_4[3] = 0;
846 }
847 }
848 break;
849
850 /* GL_ARB_vertex_buffer_object */
851 case GL_VERTEX_ARRAY_BUFFER_BINDING_ARB:
852 case GL_NORMAL_ARRAY_BUFFER_BINDING_ARB:
853 case GL_COLOR_ARRAY_BUFFER_BINDING_ARB:
854 case GL_INDEX_ARRAY_BUFFER_BINDING_ARB:
855 case GL_EDGE_FLAG_ARRAY_BUFFER_BINDING_ARB:
856 case GL_SECONDARY_COLOR_ARRAY_BUFFER_BINDING_ARB:
857 case GL_FOG_COORDINATE_ARRAY_BUFFER_BINDING_ARB:
858 buffer_obj = (struct gl_buffer_object **)
859 ((char *) ctx->Array.VAO + d->offset);
860 v->value_int = (*buffer_obj)->Name;
861 break;
862 case GL_ARRAY_BUFFER_BINDING_ARB:
863 v->value_int = ctx->Array.ArrayBufferObj->Name;
864 break;
865 case GL_TEXTURE_COORD_ARRAY_BUFFER_BINDING_ARB:
866 v->value_int =
867 ctx->Array.VAO->VertexBinding[VERT_ATTRIB_TEX(ctx->Array.ActiveTexture)].BufferObj->Name;
868 break;
869 case GL_ELEMENT_ARRAY_BUFFER_BINDING_ARB:
870 v->value_int = ctx->Array.VAO->IndexBufferObj->Name;
871 break;
872
873 /* ARB_vertex_array_bgra */
874 case GL_COLOR_ARRAY_SIZE:
875 array = &ctx->Array.VAO->VertexAttrib[VERT_ATTRIB_COLOR0];
876 v->value_int = array->Format == GL_BGRA ? GL_BGRA : array->Size;
877 break;
878 case GL_SECONDARY_COLOR_ARRAY_SIZE:
879 array = &ctx->Array.VAO->VertexAttrib[VERT_ATTRIB_COLOR1];
880 v->value_int = array->Format == GL_BGRA ? GL_BGRA : array->Size;
881 break;
882
883 /* ARB_copy_buffer */
884 case GL_COPY_READ_BUFFER:
885 v->value_int = ctx->CopyReadBuffer->Name;
886 break;
887 case GL_COPY_WRITE_BUFFER:
888 v->value_int = ctx->CopyWriteBuffer->Name;
889 break;
890
891 case GL_PIXEL_PACK_BUFFER_BINDING_EXT:
892 v->value_int = ctx->Pack.BufferObj->Name;
893 break;
894 case GL_PIXEL_UNPACK_BUFFER_BINDING_EXT:
895 v->value_int = ctx->Unpack.BufferObj->Name;
896 break;
897 case GL_TRANSFORM_FEEDBACK_BUFFER_BINDING:
898 v->value_int = ctx->TransformFeedback.CurrentBuffer->Name;
899 break;
900 case GL_TRANSFORM_FEEDBACK_BUFFER_PAUSED:
901 v->value_int = ctx->TransformFeedback.CurrentObject->Paused;
902 break;
903 case GL_TRANSFORM_FEEDBACK_BUFFER_ACTIVE:
904 v->value_int = ctx->TransformFeedback.CurrentObject->Active;
905 break;
906 case GL_TRANSFORM_FEEDBACK_BINDING:
907 v->value_int = ctx->TransformFeedback.CurrentObject->Name;
908 break;
909 case GL_CURRENT_PROGRAM:
910 /* The Changelog of the ARB_separate_shader_objects spec says:
911 *
912 * 24 25 Jul 2011 pbrown Remove the language erroneously deleting
913 * CURRENT_PROGRAM. In the EXT extension, this
914 * token was aliased to ACTIVE_PROGRAM_EXT, and
915 * was used to indicate the last program set by
916 * either ActiveProgramEXT or UseProgram. In
917 * the ARB extension, the SSO active programs
918 * are now program pipeline object state and
919 * CURRENT_PROGRAM should still be used to query
920 * the last program set by UseProgram (bug 7822).
921 */
922 v->value_int =
923 ctx->Shader.ActiveProgram ? ctx->Shader.ActiveProgram->Name : 0;
924 break;
925 case GL_READ_FRAMEBUFFER_BINDING_EXT:
926 v->value_int = ctx->ReadBuffer->Name;
927 break;
928 case GL_RENDERBUFFER_BINDING_EXT:
929 v->value_int =
930 ctx->CurrentRenderbuffer ? ctx->CurrentRenderbuffer->Name : 0;
931 break;
932 case GL_POINT_SIZE_ARRAY_BUFFER_BINDING_OES:
933 v->value_int = ctx->Array.VAO->VertexBinding[VERT_ATTRIB_POINT_SIZE].BufferObj->Name;
934 break;
935
936 case GL_FOG_COLOR:
937 if (_mesa_get_clamp_fragment_color(ctx, ctx->DrawBuffer))
938 COPY_4FV(v->value_float_4, ctx->Fog.Color);
939 else
940 COPY_4FV(v->value_float_4, ctx->Fog.ColorUnclamped);
941 break;
942 case GL_COLOR_CLEAR_VALUE:
943 if (_mesa_get_clamp_fragment_color(ctx, ctx->DrawBuffer)) {
944 v->value_float_4[0] = CLAMP(ctx->Color.ClearColor.f[0], 0.0F, 1.0F);
945 v->value_float_4[1] = CLAMP(ctx->Color.ClearColor.f[1], 0.0F, 1.0F);
946 v->value_float_4[2] = CLAMP(ctx->Color.ClearColor.f[2], 0.0F, 1.0F);
947 v->value_float_4[3] = CLAMP(ctx->Color.ClearColor.f[3], 0.0F, 1.0F);
948 } else
949 COPY_4FV(v->value_float_4, ctx->Color.ClearColor.f);
950 break;
951 case GL_BLEND_COLOR_EXT:
952 if (_mesa_get_clamp_fragment_color(ctx, ctx->DrawBuffer))
953 COPY_4FV(v->value_float_4, ctx->Color.BlendColor);
954 else
955 COPY_4FV(v->value_float_4, ctx->Color.BlendColorUnclamped);
956 break;
957 case GL_ALPHA_TEST_REF:
958 if (_mesa_get_clamp_fragment_color(ctx, ctx->DrawBuffer))
959 v->value_float = ctx->Color.AlphaRef;
960 else
961 v->value_float = ctx->Color.AlphaRefUnclamped;
962 break;
963 case GL_MAX_VERTEX_UNIFORM_VECTORS:
964 v->value_int = ctx->Const.Program[MESA_SHADER_VERTEX].MaxUniformComponents / 4;
965 break;
966
967 case GL_MAX_FRAGMENT_UNIFORM_VECTORS:
968 v->value_int = ctx->Const.Program[MESA_SHADER_FRAGMENT].MaxUniformComponents / 4;
969 break;
970
971 /* GL_ARB_texture_buffer_object */
972 case GL_TEXTURE_BUFFER_ARB:
973 v->value_int = ctx->Texture.BufferObject->Name;
974 break;
975 case GL_TEXTURE_BINDING_BUFFER_ARB:
976 unit = ctx->Texture.CurrentUnit;
977 v->value_int =
978 ctx->Texture.Unit[unit].CurrentTex[TEXTURE_BUFFER_INDEX]->Name;
979 break;
980 case GL_TEXTURE_BUFFER_DATA_STORE_BINDING_ARB:
981 {
982 struct gl_buffer_object *buf =
983 ctx->Texture.Unit[ctx->Texture.CurrentUnit]
984 .CurrentTex[TEXTURE_BUFFER_INDEX]->BufferObject;
985 v->value_int = buf ? buf->Name : 0;
986 }
987 break;
988 case GL_TEXTURE_BUFFER_FORMAT_ARB:
989 v->value_int = ctx->Texture.Unit[ctx->Texture.CurrentUnit]
990 .CurrentTex[TEXTURE_BUFFER_INDEX]->BufferObjectFormat;
991 break;
992
993 /* GL_ARB_sampler_objects */
994 case GL_SAMPLER_BINDING:
995 {
996 struct gl_sampler_object *samp =
997 ctx->Texture.Unit[ctx->Texture.CurrentUnit].Sampler;
998 v->value_int = samp ? samp->Name : 0;
999 }
1000 break;
1001 /* GL_ARB_uniform_buffer_object */
1002 case GL_UNIFORM_BUFFER_BINDING:
1003 v->value_int = ctx->UniformBuffer->Name;
1004 break;
1005 /* GL_ARB_shader_storage_buffer_object */
1006 case GL_SHADER_STORAGE_BUFFER_BINDING:
1007 v->value_int = ctx->ShaderStorageBuffer->Name;
1008 break;
1009 /* GL_ARB_timer_query */
1010 case GL_TIMESTAMP:
1011 if (ctx->Driver.GetTimestamp) {
1012 v->value_int64 = ctx->Driver.GetTimestamp(ctx);
1013 }
1014 else {
1015 _mesa_problem(ctx, "driver doesn't implement GetTimestamp");
1016 }
1017 break;
1018 /* GL_KHR_DEBUG */
1019 case GL_DEBUG_LOGGED_MESSAGES:
1020 case GL_DEBUG_NEXT_LOGGED_MESSAGE_LENGTH:
1021 case GL_DEBUG_GROUP_STACK_DEPTH:
1022 v->value_int = _mesa_get_debug_state_int(ctx, d->pname);
1023 break;
1024 /* GL_ARB_shader_atomic_counters */
1025 case GL_ATOMIC_COUNTER_BUFFER_BINDING:
1026 if (ctx->AtomicBuffer) {
1027 v->value_int = ctx->AtomicBuffer->Name;
1028 } else {
1029 v->value_int = 0;
1030 }
1031 break;
1032 /* GL_ARB_draw_indirect */
1033 case GL_DRAW_INDIRECT_BUFFER_BINDING:
1034 v->value_int = ctx->DrawIndirectBuffer->Name;
1035 break;
1036 /* GL_ARB_indirect_parameters */
1037 case GL_PARAMETER_BUFFER_BINDING_ARB:
1038 v->value_int = ctx->ParameterBuffer->Name;
1039 break;
1040 /* GL_ARB_separate_shader_objects */
1041 case GL_PROGRAM_PIPELINE_BINDING:
1042 if (ctx->Pipeline.Current) {
1043 v->value_int = ctx->Pipeline.Current->Name;
1044 } else {
1045 v->value_int = 0;
1046 }
1047 break;
1048 /* GL_ARB_compute_shader */
1049 case GL_DISPATCH_INDIRECT_BUFFER_BINDING:
1050 v->value_int = ctx->DispatchIndirectBuffer->Name;
1051 break;
1052 }
1053 }
1054
1055 /**
1056 * Check extra constraints on a struct value_desc descriptor
1057 *
1058 * If a struct value_desc has a non-NULL extra pointer, it means that
1059 * there are a number of extra constraints to check or actions to
1060 * perform. The extras is just an integer array where each integer
1061 * encode different constraints or actions.
1062 *
1063 * \param ctx current context
1064 * \param func name of calling glGet*v() function for error reporting
1065 * \param d the struct value_desc that has the extra constraints
1066 *
1067 * \return GL_FALSE if all of the constraints were not satisfied,
1068 * otherwise GL_TRUE.
1069 */
1070 static GLboolean
1071 check_extra(struct gl_context *ctx, const char *func, const struct value_desc *d)
1072 {
1073 const GLuint version = ctx->Version;
1074 GLboolean api_check = GL_FALSE;
1075 GLboolean api_found = GL_FALSE;
1076 const int *e;
1077
1078 for (e = d->extra; *e != EXTRA_END; e++) {
1079 switch (*e) {
1080 case EXTRA_VERSION_30:
1081 api_check = GL_TRUE;
1082 if (version >= 30)
1083 api_found = GL_TRUE;
1084 break;
1085 case EXTRA_VERSION_31:
1086 api_check = GL_TRUE;
1087 if (version >= 31)
1088 api_found = GL_TRUE;
1089 break;
1090 case EXTRA_VERSION_32:
1091 api_check = GL_TRUE;
1092 if (version >= 32)
1093 api_found = GL_TRUE;
1094 break;
1095 case EXTRA_NEW_FRAG_CLAMP:
1096 if (ctx->NewState & (_NEW_BUFFERS | _NEW_FRAG_CLAMP))
1097 _mesa_update_state(ctx);
1098 break;
1099 case EXTRA_API_ES2:
1100 api_check = GL_TRUE;
1101 if (ctx->API == API_OPENGLES2)
1102 api_found = GL_TRUE;
1103 break;
1104 case EXTRA_API_ES3:
1105 api_check = GL_TRUE;
1106 if (_mesa_is_gles3(ctx))
1107 api_found = GL_TRUE;
1108 break;
1109 case EXTRA_API_ES31:
1110 api_check = GL_TRUE;
1111 if (_mesa_is_gles31(ctx))
1112 api_found = GL_TRUE;
1113 break;
1114 case EXTRA_API_GL:
1115 api_check = GL_TRUE;
1116 if (_mesa_is_desktop_gl(ctx))
1117 api_found = GL_TRUE;
1118 break;
1119 case EXTRA_API_GL_CORE:
1120 api_check = GL_TRUE;
1121 if (ctx->API == API_OPENGL_CORE)
1122 api_found = GL_TRUE;
1123 break;
1124 case EXTRA_NEW_BUFFERS:
1125 if (ctx->NewState & _NEW_BUFFERS)
1126 _mesa_update_state(ctx);
1127 break;
1128 case EXTRA_FLUSH_CURRENT:
1129 FLUSH_CURRENT(ctx, 0);
1130 break;
1131 case EXTRA_VALID_DRAW_BUFFER:
1132 if (d->pname - GL_DRAW_BUFFER0_ARB >= ctx->Const.MaxDrawBuffers) {
1133 _mesa_error(ctx, GL_INVALID_OPERATION, "%s(draw buffer %u)",
1134 func, d->pname - GL_DRAW_BUFFER0_ARB);
1135 return GL_FALSE;
1136 }
1137 break;
1138 case EXTRA_VALID_TEXTURE_UNIT:
1139 if (ctx->Texture.CurrentUnit >= ctx->Const.MaxTextureCoordUnits) {
1140 _mesa_error(ctx, GL_INVALID_OPERATION, "%s(texture %u)",
1141 func, ctx->Texture.CurrentUnit);
1142 return GL_FALSE;
1143 }
1144 break;
1145 case EXTRA_VALID_CLIP_DISTANCE:
1146 if (d->pname - GL_CLIP_DISTANCE0 >= ctx->Const.MaxClipPlanes) {
1147 _mesa_error(ctx, GL_INVALID_ENUM, "%s(clip distance %u)",
1148 func, d->pname - GL_CLIP_DISTANCE0);
1149 return GL_FALSE;
1150 }
1151 break;
1152 case EXTRA_GLSL_130:
1153 api_check = GL_TRUE;
1154 if (ctx->Const.GLSLVersion >= 130)
1155 api_found = GL_TRUE;
1156 break;
1157 case EXTRA_EXT_UBO_GS4:
1158 api_check = GL_TRUE;
1159 api_found = (ctx->Extensions.ARB_uniform_buffer_object &&
1160 _mesa_has_geometry_shaders(ctx));
1161 break;
1162 case EXTRA_EXT_ATOMICS_GS4:
1163 api_check = GL_TRUE;
1164 api_found = (ctx->Extensions.ARB_shader_atomic_counters &&
1165 _mesa_has_geometry_shaders(ctx));
1166 break;
1167 case EXTRA_EXT_SHADER_IMAGE_GS4:
1168 api_check = GL_TRUE;
1169 api_found = (ctx->Extensions.ARB_shader_image_load_store &&
1170 _mesa_has_geometry_shaders(ctx));
1171 break;
1172 case EXTRA_EXT_ATOMICS_TESS:
1173 api_check = GL_TRUE;
1174 api_found = ctx->Extensions.ARB_shader_atomic_counters &&
1175 _mesa_has_tessellation(ctx);
1176 break;
1177 case EXTRA_EXT_SHADER_IMAGE_TESS:
1178 api_check = GL_TRUE;
1179 api_found = ctx->Extensions.ARB_shader_image_load_store &&
1180 _mesa_has_tessellation(ctx);
1181 break;
1182 case EXTRA_END:
1183 break;
1184 default: /* *e is a offset into the extension struct */
1185 api_check = GL_TRUE;
1186 if (*(GLboolean *) ((char *) &ctx->Extensions + *e))
1187 api_found = GL_TRUE;
1188 break;
1189 }
1190 }
1191
1192 if (api_check && !api_found) {
1193 _mesa_error(ctx, GL_INVALID_ENUM, "%s(pname=%s)", func,
1194 _mesa_enum_to_string(d->pname));
1195 return GL_FALSE;
1196 }
1197
1198 return GL_TRUE;
1199 }
1200
1201 static const struct value_desc error_value =
1202 { 0, 0, TYPE_INVALID, NO_OFFSET, NO_EXTRA };
1203
1204 /**
1205 * Find the struct value_desc corresponding to the enum 'pname'.
1206 *
1207 * We hash the enum value to get an index into the 'table' array,
1208 * which holds the index in the 'values' array of struct value_desc.
1209 * Once we've found the entry, we do the extra checks, if any, then
1210 * look up the value and return a pointer to it.
1211 *
1212 * If the value has to be computed (for example, it's the result of a
1213 * function call or we need to add 1 to it), we use the tmp 'v' to
1214 * store the result.
1215 *
1216 * \param func name of glGet*v() func for error reporting
1217 * \param pname the enum value we're looking up
1218 * \param p is were we return the pointer to the value
1219 * \param v a tmp union value variable in the calling glGet*v() function
1220 *
1221 * \return the struct value_desc corresponding to the enum or a struct
1222 * value_desc of TYPE_INVALID if not found. This lets the calling
1223 * glGet*v() function jump right into a switch statement and
1224 * handle errors there instead of having to check for NULL.
1225 */
1226 static const struct value_desc *
1227 find_value(const char *func, GLenum pname, void **p, union value *v)
1228 {
1229 GET_CURRENT_CONTEXT(ctx);
1230 struct gl_texture_unit *unit;
1231 int mask, hash;
1232 const struct value_desc *d;
1233 int api;
1234
1235 api = ctx->API;
1236 /* We index into the table_set[] list of per-API hash tables using the API's
1237 * value in the gl_api enum. Since GLES 3 doesn't have an API_OPENGL* enum
1238 * value since it's compatible with GLES2 its entry in table_set[] is at the
1239 * end.
1240 */
1241 STATIC_ASSERT(ARRAY_SIZE(table_set) == API_OPENGL_LAST + 3);
1242 if (_mesa_is_gles3(ctx)) {
1243 api = API_OPENGL_LAST + 1;
1244 }
1245 if (_mesa_is_gles31(ctx)) {
1246 api = API_OPENGL_LAST + 2;
1247 }
1248 mask = ARRAY_SIZE(table(api)) - 1;
1249 hash = (pname * prime_factor);
1250 while (1) {
1251 int idx = table(api)[hash & mask];
1252
1253 /* If the enum isn't valid, the hash walk ends with index 0,
1254 * pointing to the first entry of values[] which doesn't hold
1255 * any valid enum. */
1256 if (unlikely(idx == 0)) {
1257 _mesa_error(ctx, GL_INVALID_ENUM, "%s(pname=%s)", func,
1258 _mesa_enum_to_string(pname));
1259 return &error_value;
1260 }
1261
1262 d = &values[idx];
1263 if (likely(d->pname == pname))
1264 break;
1265
1266 hash += prime_step;
1267 }
1268
1269 if (unlikely(d->extra && !check_extra(ctx, func, d)))
1270 return &error_value;
1271
1272 switch (d->location) {
1273 case LOC_BUFFER:
1274 *p = ((char *) ctx->DrawBuffer + d->offset);
1275 return d;
1276 case LOC_CONTEXT:
1277 *p = ((char *) ctx + d->offset);
1278 return d;
1279 case LOC_ARRAY:
1280 *p = ((char *) ctx->Array.VAO + d->offset);
1281 return d;
1282 case LOC_TEXUNIT:
1283 unit = &ctx->Texture.Unit[ctx->Texture.CurrentUnit];
1284 *p = ((char *) unit + d->offset);
1285 return d;
1286 case LOC_CUSTOM:
1287 find_custom_value(ctx, d, v);
1288 *p = v;
1289 return d;
1290 default:
1291 assert(0);
1292 break;
1293 }
1294
1295 /* silence warning */
1296 return &error_value;
1297 }
1298
1299 static const int transpose[] = {
1300 0, 4, 8, 12,
1301 1, 5, 9, 13,
1302 2, 6, 10, 14,
1303 3, 7, 11, 15
1304 };
1305
1306 void GLAPIENTRY
1307 _mesa_GetBooleanv(GLenum pname, GLboolean *params)
1308 {
1309 const struct value_desc *d;
1310 union value v;
1311 GLmatrix *m;
1312 int shift, i;
1313 void *p;
1314
1315 d = find_value("glGetBooleanv", pname, &p, &v);
1316 switch (d->type) {
1317 case TYPE_INVALID:
1318 break;
1319 case TYPE_CONST:
1320 params[0] = INT_TO_BOOLEAN(d->offset);
1321 break;
1322
1323 case TYPE_FLOAT_4:
1324 case TYPE_FLOATN_4:
1325 params[3] = FLOAT_TO_BOOLEAN(((GLfloat *) p)[3]);
1326 case TYPE_FLOAT_3:
1327 case TYPE_FLOATN_3:
1328 params[2] = FLOAT_TO_BOOLEAN(((GLfloat *) p)[2]);
1329 case TYPE_FLOAT_2:
1330 case TYPE_FLOATN_2:
1331 params[1] = FLOAT_TO_BOOLEAN(((GLfloat *) p)[1]);
1332 case TYPE_FLOAT:
1333 case TYPE_FLOATN:
1334 params[0] = FLOAT_TO_BOOLEAN(((GLfloat *) p)[0]);
1335 break;
1336
1337 case TYPE_DOUBLEN_2:
1338 params[1] = FLOAT_TO_BOOLEAN(((GLdouble *) p)[1]);
1339 case TYPE_DOUBLEN:
1340 params[0] = FLOAT_TO_BOOLEAN(((GLdouble *) p)[0]);
1341 break;
1342
1343 case TYPE_INT_4:
1344 params[3] = INT_TO_BOOLEAN(((GLint *) p)[3]);
1345 case TYPE_INT_3:
1346 params[2] = INT_TO_BOOLEAN(((GLint *) p)[2]);
1347 case TYPE_INT_2:
1348 case TYPE_ENUM_2:
1349 params[1] = INT_TO_BOOLEAN(((GLint *) p)[1]);
1350 case TYPE_INT:
1351 case TYPE_ENUM:
1352 params[0] = INT_TO_BOOLEAN(((GLint *) p)[0]);
1353 break;
1354
1355 case TYPE_INT_N:
1356 for (i = 0; i < v.value_int_n.n; i++)
1357 params[i] = INT_TO_BOOLEAN(v.value_int_n.ints[i]);
1358 break;
1359
1360 case TYPE_INT64:
1361 params[0] = INT64_TO_BOOLEAN(((GLint64 *) p)[0]);
1362 break;
1363
1364 case TYPE_BOOLEAN:
1365 params[0] = ((GLboolean*) p)[0];
1366 break;
1367
1368 case TYPE_MATRIX:
1369 m = *(GLmatrix **) p;
1370 for (i = 0; i < 16; i++)
1371 params[i] = FLOAT_TO_BOOLEAN(m->m[i]);
1372 break;
1373
1374 case TYPE_MATRIX_T:
1375 m = *(GLmatrix **) p;
1376 for (i = 0; i < 16; i++)
1377 params[i] = FLOAT_TO_BOOLEAN(m->m[transpose[i]]);
1378 break;
1379
1380 case TYPE_BIT_0:
1381 case TYPE_BIT_1:
1382 case TYPE_BIT_2:
1383 case TYPE_BIT_3:
1384 case TYPE_BIT_4:
1385 case TYPE_BIT_5:
1386 case TYPE_BIT_6:
1387 case TYPE_BIT_7:
1388 shift = d->type - TYPE_BIT_0;
1389 params[0] = (*(GLbitfield *) p >> shift) & 1;
1390 break;
1391 }
1392 }
1393
1394 void GLAPIENTRY
1395 _mesa_GetFloatv(GLenum pname, GLfloat *params)
1396 {
1397 const struct value_desc *d;
1398 union value v;
1399 GLmatrix *m;
1400 int shift, i;
1401 void *p;
1402
1403 d = find_value("glGetFloatv", pname, &p, &v);
1404 switch (d->type) {
1405 case TYPE_INVALID:
1406 break;
1407 case TYPE_CONST:
1408 params[0] = (GLfloat) d->offset;
1409 break;
1410
1411 case TYPE_FLOAT_4:
1412 case TYPE_FLOATN_4:
1413 params[3] = ((GLfloat *) p)[3];
1414 case TYPE_FLOAT_3:
1415 case TYPE_FLOATN_3:
1416 params[2] = ((GLfloat *) p)[2];
1417 case TYPE_FLOAT_2:
1418 case TYPE_FLOATN_2:
1419 params[1] = ((GLfloat *) p)[1];
1420 case TYPE_FLOAT:
1421 case TYPE_FLOATN:
1422 params[0] = ((GLfloat *) p)[0];
1423 break;
1424
1425 case TYPE_DOUBLEN_2:
1426 params[1] = (GLfloat) (((GLdouble *) p)[1]);
1427 case TYPE_DOUBLEN:
1428 params[0] = (GLfloat) (((GLdouble *) p)[0]);
1429 break;
1430
1431 case TYPE_INT_4:
1432 params[3] = (GLfloat) (((GLint *) p)[3]);
1433 case TYPE_INT_3:
1434 params[2] = (GLfloat) (((GLint *) p)[2]);
1435 case TYPE_INT_2:
1436 case TYPE_ENUM_2:
1437 params[1] = (GLfloat) (((GLint *) p)[1]);
1438 case TYPE_INT:
1439 case TYPE_ENUM:
1440 params[0] = (GLfloat) (((GLint *) p)[0]);
1441 break;
1442
1443 case TYPE_INT_N:
1444 for (i = 0; i < v.value_int_n.n; i++)
1445 params[i] = INT_TO_FLOAT(v.value_int_n.ints[i]);
1446 break;
1447
1448 case TYPE_INT64:
1449 params[0] = (GLfloat) (((GLint64 *) p)[0]);
1450 break;
1451
1452 case TYPE_BOOLEAN:
1453 params[0] = BOOLEAN_TO_FLOAT(*(GLboolean*) p);
1454 break;
1455
1456 case TYPE_MATRIX:
1457 m = *(GLmatrix **) p;
1458 for (i = 0; i < 16; i++)
1459 params[i] = m->m[i];
1460 break;
1461
1462 case TYPE_MATRIX_T:
1463 m = *(GLmatrix **) p;
1464 for (i = 0; i < 16; i++)
1465 params[i] = m->m[transpose[i]];
1466 break;
1467
1468 case TYPE_BIT_0:
1469 case TYPE_BIT_1:
1470 case TYPE_BIT_2:
1471 case TYPE_BIT_3:
1472 case TYPE_BIT_4:
1473 case TYPE_BIT_5:
1474 case TYPE_BIT_6:
1475 case TYPE_BIT_7:
1476 shift = d->type - TYPE_BIT_0;
1477 params[0] = BOOLEAN_TO_FLOAT((*(GLbitfield *) p >> shift) & 1);
1478 break;
1479 }
1480 }
1481
1482 void GLAPIENTRY
1483 _mesa_GetIntegerv(GLenum pname, GLint *params)
1484 {
1485 const struct value_desc *d;
1486 union value v;
1487 GLmatrix *m;
1488 int shift, i;
1489 void *p;
1490
1491 d = find_value("glGetIntegerv", pname, &p, &v);
1492 switch (d->type) {
1493 case TYPE_INVALID:
1494 break;
1495 case TYPE_CONST:
1496 params[0] = d->offset;
1497 break;
1498
1499 case TYPE_FLOAT_4:
1500 params[3] = IROUND(((GLfloat *) p)[3]);
1501 case TYPE_FLOAT_3:
1502 params[2] = IROUND(((GLfloat *) p)[2]);
1503 case TYPE_FLOAT_2:
1504 params[1] = IROUND(((GLfloat *) p)[1]);
1505 case TYPE_FLOAT:
1506 params[0] = IROUND(((GLfloat *) p)[0]);
1507 break;
1508
1509 case TYPE_FLOATN_4:
1510 params[3] = FLOAT_TO_INT(((GLfloat *) p)[3]);
1511 case TYPE_FLOATN_3:
1512 params[2] = FLOAT_TO_INT(((GLfloat *) p)[2]);
1513 case TYPE_FLOATN_2:
1514 params[1] = FLOAT_TO_INT(((GLfloat *) p)[1]);
1515 case TYPE_FLOATN:
1516 params[0] = FLOAT_TO_INT(((GLfloat *) p)[0]);
1517 break;
1518
1519 case TYPE_DOUBLEN_2:
1520 params[1] = FLOAT_TO_INT(((GLdouble *) p)[1]);
1521 case TYPE_DOUBLEN:
1522 params[0] = FLOAT_TO_INT(((GLdouble *) p)[0]);
1523 break;
1524
1525 case TYPE_INT_4:
1526 params[3] = ((GLint *) p)[3];
1527 case TYPE_INT_3:
1528 params[2] = ((GLint *) p)[2];
1529 case TYPE_INT_2:
1530 case TYPE_ENUM_2:
1531 params[1] = ((GLint *) p)[1];
1532 case TYPE_INT:
1533 case TYPE_ENUM:
1534 params[0] = ((GLint *) p)[0];
1535 break;
1536
1537 case TYPE_INT_N:
1538 for (i = 0; i < v.value_int_n.n; i++)
1539 params[i] = v.value_int_n.ints[i];
1540 break;
1541
1542 case TYPE_INT64:
1543 params[0] = INT64_TO_INT(((GLint64 *) p)[0]);
1544 break;
1545
1546 case TYPE_BOOLEAN:
1547 params[0] = BOOLEAN_TO_INT(*(GLboolean*) p);
1548 break;
1549
1550 case TYPE_MATRIX:
1551 m = *(GLmatrix **) p;
1552 for (i = 0; i < 16; i++)
1553 params[i] = FLOAT_TO_INT(m->m[i]);
1554 break;
1555
1556 case TYPE_MATRIX_T:
1557 m = *(GLmatrix **) p;
1558 for (i = 0; i < 16; i++)
1559 params[i] = FLOAT_TO_INT(m->m[transpose[i]]);
1560 break;
1561
1562 case TYPE_BIT_0:
1563 case TYPE_BIT_1:
1564 case TYPE_BIT_2:
1565 case TYPE_BIT_3:
1566 case TYPE_BIT_4:
1567 case TYPE_BIT_5:
1568 case TYPE_BIT_6:
1569 case TYPE_BIT_7:
1570 shift = d->type - TYPE_BIT_0;
1571 params[0] = (*(GLbitfield *) p >> shift) & 1;
1572 break;
1573 }
1574 }
1575
1576 void GLAPIENTRY
1577 _mesa_GetInteger64v(GLenum pname, GLint64 *params)
1578 {
1579 const struct value_desc *d;
1580 union value v;
1581 GLmatrix *m;
1582 int shift, i;
1583 void *p;
1584
1585 d = find_value("glGetInteger64v", pname, &p, &v);
1586 switch (d->type) {
1587 case TYPE_INVALID:
1588 break;
1589 case TYPE_CONST:
1590 params[0] = d->offset;
1591 break;
1592
1593 case TYPE_FLOAT_4:
1594 params[3] = IROUND64(((GLfloat *) p)[3]);
1595 case TYPE_FLOAT_3:
1596 params[2] = IROUND64(((GLfloat *) p)[2]);
1597 case TYPE_FLOAT_2:
1598 params[1] = IROUND64(((GLfloat *) p)[1]);
1599 case TYPE_FLOAT:
1600 params[0] = IROUND64(((GLfloat *) p)[0]);
1601 break;
1602
1603 case TYPE_FLOATN_4:
1604 params[3] = FLOAT_TO_INT64(((GLfloat *) p)[3]);
1605 case TYPE_FLOATN_3:
1606 params[2] = FLOAT_TO_INT64(((GLfloat *) p)[2]);
1607 case TYPE_FLOATN_2:
1608 params[1] = FLOAT_TO_INT64(((GLfloat *) p)[1]);
1609 case TYPE_FLOATN:
1610 params[0] = FLOAT_TO_INT64(((GLfloat *) p)[0]);
1611 break;
1612
1613 case TYPE_DOUBLEN_2:
1614 params[1] = FLOAT_TO_INT64(((GLdouble *) p)[1]);
1615 case TYPE_DOUBLEN:
1616 params[0] = FLOAT_TO_INT64(((GLdouble *) p)[0]);
1617 break;
1618
1619 case TYPE_INT_4:
1620 params[3] = ((GLint *) p)[3];
1621 case TYPE_INT_3:
1622 params[2] = ((GLint *) p)[2];
1623 case TYPE_INT_2:
1624 case TYPE_ENUM_2:
1625 params[1] = ((GLint *) p)[1];
1626 case TYPE_INT:
1627 case TYPE_ENUM:
1628 params[0] = ((GLint *) p)[0];
1629 break;
1630
1631 case TYPE_INT_N:
1632 for (i = 0; i < v.value_int_n.n; i++)
1633 params[i] = INT_TO_BOOLEAN(v.value_int_n.ints[i]);
1634 break;
1635
1636 case TYPE_INT64:
1637 params[0] = ((GLint64 *) p)[0];
1638 break;
1639
1640 case TYPE_BOOLEAN:
1641 params[0] = ((GLboolean*) p)[0];
1642 break;
1643
1644 case TYPE_MATRIX:
1645 m = *(GLmatrix **) p;
1646 for (i = 0; i < 16; i++)
1647 params[i] = FLOAT_TO_INT64(m->m[i]);
1648 break;
1649
1650 case TYPE_MATRIX_T:
1651 m = *(GLmatrix **) p;
1652 for (i = 0; i < 16; i++)
1653 params[i] = FLOAT_TO_INT64(m->m[transpose[i]]);
1654 break;
1655
1656 case TYPE_BIT_0:
1657 case TYPE_BIT_1:
1658 case TYPE_BIT_2:
1659 case TYPE_BIT_3:
1660 case TYPE_BIT_4:
1661 case TYPE_BIT_5:
1662 case TYPE_BIT_6:
1663 case TYPE_BIT_7:
1664 shift = d->type - TYPE_BIT_0;
1665 params[0] = (*(GLbitfield *) p >> shift) & 1;
1666 break;
1667 }
1668 }
1669
1670 void GLAPIENTRY
1671 _mesa_GetDoublev(GLenum pname, GLdouble *params)
1672 {
1673 const struct value_desc *d;
1674 union value v;
1675 GLmatrix *m;
1676 int shift, i;
1677 void *p;
1678
1679 d = find_value("glGetDoublev", pname, &p, &v);
1680 switch (d->type) {
1681 case TYPE_INVALID:
1682 break;
1683 case TYPE_CONST:
1684 params[0] = d->offset;
1685 break;
1686
1687 case TYPE_FLOAT_4:
1688 case TYPE_FLOATN_4:
1689 params[3] = ((GLfloat *) p)[3];
1690 case TYPE_FLOAT_3:
1691 case TYPE_FLOATN_3:
1692 params[2] = ((GLfloat *) p)[2];
1693 case TYPE_FLOAT_2:
1694 case TYPE_FLOATN_2:
1695 params[1] = ((GLfloat *) p)[1];
1696 case TYPE_FLOAT:
1697 case TYPE_FLOATN:
1698 params[0] = ((GLfloat *) p)[0];
1699 break;
1700
1701 case TYPE_DOUBLEN_2:
1702 params[1] = ((GLdouble *) p)[1];
1703 case TYPE_DOUBLEN:
1704 params[0] = ((GLdouble *) p)[0];
1705 break;
1706
1707 case TYPE_INT_4:
1708 params[3] = ((GLint *) p)[3];
1709 case TYPE_INT_3:
1710 params[2] = ((GLint *) p)[2];
1711 case TYPE_INT_2:
1712 case TYPE_ENUM_2:
1713 params[1] = ((GLint *) p)[1];
1714 case TYPE_INT:
1715 case TYPE_ENUM:
1716 params[0] = ((GLint *) p)[0];
1717 break;
1718
1719 case TYPE_INT_N:
1720 for (i = 0; i < v.value_int_n.n; i++)
1721 params[i] = v.value_int_n.ints[i];
1722 break;
1723
1724 case TYPE_INT64:
1725 params[0] = (GLdouble) (((GLint64 *) p)[0]);
1726 break;
1727
1728 case TYPE_BOOLEAN:
1729 params[0] = *(GLboolean*) p;
1730 break;
1731
1732 case TYPE_MATRIX:
1733 m = *(GLmatrix **) p;
1734 for (i = 0; i < 16; i++)
1735 params[i] = m->m[i];
1736 break;
1737
1738 case TYPE_MATRIX_T:
1739 m = *(GLmatrix **) p;
1740 for (i = 0; i < 16; i++)
1741 params[i] = m->m[transpose[i]];
1742 break;
1743
1744 case TYPE_BIT_0:
1745 case TYPE_BIT_1:
1746 case TYPE_BIT_2:
1747 case TYPE_BIT_3:
1748 case TYPE_BIT_4:
1749 case TYPE_BIT_5:
1750 case TYPE_BIT_6:
1751 case TYPE_BIT_7:
1752 shift = d->type - TYPE_BIT_0;
1753 params[0] = (*(GLbitfield *) p >> shift) & 1;
1754 break;
1755 }
1756 }
1757
1758 /**
1759 * Convert a GL texture binding enum such as GL_TEXTURE_BINDING_2D
1760 * into the corresponding Mesa texture target index.
1761 * \return TEXTURE_x_INDEX or -1 if binding is invalid
1762 */
1763 static int
1764 tex_binding_to_index(const struct gl_context *ctx, GLenum binding)
1765 {
1766 switch (binding) {
1767 case GL_TEXTURE_BINDING_1D:
1768 return _mesa_is_desktop_gl(ctx) ? TEXTURE_1D_INDEX : -1;
1769 case GL_TEXTURE_BINDING_2D:
1770 return TEXTURE_2D_INDEX;
1771 case GL_TEXTURE_BINDING_3D:
1772 return ctx->API != API_OPENGLES ? TEXTURE_3D_INDEX : -1;
1773 case GL_TEXTURE_BINDING_CUBE_MAP:
1774 return ctx->Extensions.ARB_texture_cube_map
1775 ? TEXTURE_CUBE_INDEX : -1;
1776 case GL_TEXTURE_BINDING_RECTANGLE:
1777 return _mesa_is_desktop_gl(ctx) && ctx->Extensions.NV_texture_rectangle
1778 ? TEXTURE_RECT_INDEX : -1;
1779 case GL_TEXTURE_BINDING_1D_ARRAY:
1780 return _mesa_is_desktop_gl(ctx) && ctx->Extensions.EXT_texture_array
1781 ? TEXTURE_1D_ARRAY_INDEX : -1;
1782 case GL_TEXTURE_BINDING_2D_ARRAY:
1783 return (_mesa_is_desktop_gl(ctx) && ctx->Extensions.EXT_texture_array)
1784 || _mesa_is_gles3(ctx)
1785 ? TEXTURE_2D_ARRAY_INDEX : -1;
1786 case GL_TEXTURE_BINDING_BUFFER:
1787 return ctx->API == API_OPENGL_CORE &&
1788 ctx->Extensions.ARB_texture_buffer_object ?
1789 TEXTURE_BUFFER_INDEX : -1;
1790 case GL_TEXTURE_BINDING_CUBE_MAP_ARRAY:
1791 return _mesa_is_desktop_gl(ctx) && ctx->Extensions.ARB_texture_cube_map_array
1792 ? TEXTURE_CUBE_ARRAY_INDEX : -1;
1793 case GL_TEXTURE_BINDING_2D_MULTISAMPLE:
1794 return _mesa_is_desktop_gl(ctx) && ctx->Extensions.ARB_texture_multisample
1795 ? TEXTURE_2D_MULTISAMPLE_INDEX : -1;
1796 case GL_TEXTURE_BINDING_2D_MULTISAMPLE_ARRAY:
1797 return _mesa_is_desktop_gl(ctx) && ctx->Extensions.ARB_texture_multisample
1798 ? TEXTURE_2D_MULTISAMPLE_ARRAY_INDEX : -1;
1799 default:
1800 return -1;
1801 }
1802 }
1803
1804 static enum value_type
1805 find_value_indexed(const char *func, GLenum pname, GLuint index, union value *v)
1806 {
1807 GET_CURRENT_CONTEXT(ctx);
1808
1809 switch (pname) {
1810
1811 case GL_BLEND:
1812 if (index >= ctx->Const.MaxDrawBuffers)
1813 goto invalid_value;
1814 if (!ctx->Extensions.EXT_draw_buffers2)
1815 goto invalid_enum;
1816 v->value_int = (ctx->Color.BlendEnabled >> index) & 1;
1817 return TYPE_INT;
1818
1819 case GL_BLEND_SRC:
1820 /* fall-through */
1821 case GL_BLEND_SRC_RGB:
1822 if (index >= ctx->Const.MaxDrawBuffers)
1823 goto invalid_value;
1824 if (!ctx->Extensions.ARB_draw_buffers_blend)
1825 goto invalid_enum;
1826 v->value_int = ctx->Color.Blend[index].SrcRGB;
1827 return TYPE_INT;
1828 case GL_BLEND_SRC_ALPHA:
1829 if (index >= ctx->Const.MaxDrawBuffers)
1830 goto invalid_value;
1831 if (!ctx->Extensions.ARB_draw_buffers_blend)
1832 goto invalid_enum;
1833 v->value_int = ctx->Color.Blend[index].SrcA;
1834 return TYPE_INT;
1835 case GL_BLEND_DST:
1836 /* fall-through */
1837 case GL_BLEND_DST_RGB:
1838 if (index >= ctx->Const.MaxDrawBuffers)
1839 goto invalid_value;
1840 if (!ctx->Extensions.ARB_draw_buffers_blend)
1841 goto invalid_enum;
1842 v->value_int = ctx->Color.Blend[index].DstRGB;
1843 return TYPE_INT;
1844 case GL_BLEND_DST_ALPHA:
1845 if (index >= ctx->Const.MaxDrawBuffers)
1846 goto invalid_value;
1847 if (!ctx->Extensions.ARB_draw_buffers_blend)
1848 goto invalid_enum;
1849 v->value_int = ctx->Color.Blend[index].DstA;
1850 return TYPE_INT;
1851 case GL_BLEND_EQUATION_RGB:
1852 if (index >= ctx->Const.MaxDrawBuffers)
1853 goto invalid_value;
1854 if (!ctx->Extensions.ARB_draw_buffers_blend)
1855 goto invalid_enum;
1856 v->value_int = ctx->Color.Blend[index].EquationRGB;
1857 return TYPE_INT;
1858 case GL_BLEND_EQUATION_ALPHA:
1859 if (index >= ctx->Const.MaxDrawBuffers)
1860 goto invalid_value;
1861 if (!ctx->Extensions.ARB_draw_buffers_blend)
1862 goto invalid_enum;
1863 v->value_int = ctx->Color.Blend[index].EquationA;
1864 return TYPE_INT;
1865
1866 case GL_COLOR_WRITEMASK:
1867 if (index >= ctx->Const.MaxDrawBuffers)
1868 goto invalid_value;
1869 if (!ctx->Extensions.EXT_draw_buffers2)
1870 goto invalid_enum;
1871 v->value_int_4[0] = ctx->Color.ColorMask[index][RCOMP] ? 1 : 0;
1872 v->value_int_4[1] = ctx->Color.ColorMask[index][GCOMP] ? 1 : 0;
1873 v->value_int_4[2] = ctx->Color.ColorMask[index][BCOMP] ? 1 : 0;
1874 v->value_int_4[3] = ctx->Color.ColorMask[index][ACOMP] ? 1 : 0;
1875 return TYPE_INT_4;
1876
1877 case GL_SCISSOR_BOX:
1878 if (index >= ctx->Const.MaxViewports)
1879 goto invalid_value;
1880 v->value_int_4[0] = ctx->Scissor.ScissorArray[index].X;
1881 v->value_int_4[1] = ctx->Scissor.ScissorArray[index].Y;
1882 v->value_int_4[2] = ctx->Scissor.ScissorArray[index].Width;
1883 v->value_int_4[3] = ctx->Scissor.ScissorArray[index].Height;
1884 return TYPE_INT_4;
1885
1886 case GL_VIEWPORT:
1887 if (index >= ctx->Const.MaxViewports)
1888 goto invalid_value;
1889 v->value_float_4[0] = ctx->ViewportArray[index].X;
1890 v->value_float_4[1] = ctx->ViewportArray[index].Y;
1891 v->value_float_4[2] = ctx->ViewportArray[index].Width;
1892 v->value_float_4[3] = ctx->ViewportArray[index].Height;
1893 return TYPE_FLOAT_4;
1894
1895 case GL_DEPTH_RANGE:
1896 if (index >= ctx->Const.MaxViewports)
1897 goto invalid_value;
1898 v->value_double_2[0] = ctx->ViewportArray[index].Near;
1899 v->value_double_2[1] = ctx->ViewportArray[index].Far;
1900 return TYPE_DOUBLEN_2;
1901
1902 case GL_TRANSFORM_FEEDBACK_BUFFER_START:
1903 if (index >= ctx->Const.MaxTransformFeedbackBuffers)
1904 goto invalid_value;
1905 if (!ctx->Extensions.EXT_transform_feedback)
1906 goto invalid_enum;
1907 v->value_int64 = ctx->TransformFeedback.CurrentObject->Offset[index];
1908 return TYPE_INT64;
1909
1910 case GL_TRANSFORM_FEEDBACK_BUFFER_SIZE:
1911 if (index >= ctx->Const.MaxTransformFeedbackBuffers)
1912 goto invalid_value;
1913 if (!ctx->Extensions.EXT_transform_feedback)
1914 goto invalid_enum;
1915 v->value_int64
1916 = ctx->TransformFeedback.CurrentObject->RequestedSize[index];
1917 return TYPE_INT64;
1918
1919 case GL_TRANSFORM_FEEDBACK_BUFFER_BINDING:
1920 if (index >= ctx->Const.MaxTransformFeedbackBuffers)
1921 goto invalid_value;
1922 if (!ctx->Extensions.EXT_transform_feedback)
1923 goto invalid_enum;
1924 v->value_int = ctx->TransformFeedback.CurrentObject->BufferNames[index];
1925 return TYPE_INT;
1926
1927 case GL_UNIFORM_BUFFER_BINDING:
1928 if (index >= ctx->Const.MaxUniformBufferBindings)
1929 goto invalid_value;
1930 if (!ctx->Extensions.ARB_uniform_buffer_object)
1931 goto invalid_enum;
1932 v->value_int = ctx->UniformBufferBindings[index].BufferObject->Name;
1933 return TYPE_INT;
1934
1935 case GL_UNIFORM_BUFFER_START:
1936 if (index >= ctx->Const.MaxUniformBufferBindings)
1937 goto invalid_value;
1938 if (!ctx->Extensions.ARB_uniform_buffer_object)
1939 goto invalid_enum;
1940 v->value_int = ctx->UniformBufferBindings[index].Offset < 0 ? 0 :
1941 ctx->UniformBufferBindings[index].Offset;
1942 return TYPE_INT;
1943
1944 case GL_UNIFORM_BUFFER_SIZE:
1945 if (index >= ctx->Const.MaxUniformBufferBindings)
1946 goto invalid_value;
1947 if (!ctx->Extensions.ARB_uniform_buffer_object)
1948 goto invalid_enum;
1949 v->value_int = ctx->UniformBufferBindings[index].Size < 0 ? 0 :
1950 ctx->UniformBufferBindings[index].Size;
1951 return TYPE_INT;
1952
1953 /* ARB_shader_storage_buffer_object */
1954 case GL_SHADER_STORAGE_BUFFER_BINDING:
1955 if (!ctx->Extensions.ARB_shader_storage_buffer_object)
1956 goto invalid_enum;
1957 if (index >= ctx->Const.MaxShaderStorageBufferBindings)
1958 goto invalid_value;
1959 v->value_int = ctx->ShaderStorageBufferBindings[index].BufferObject->Name;
1960 return TYPE_INT;
1961
1962 case GL_SHADER_STORAGE_BUFFER_START:
1963 if (!ctx->Extensions.ARB_shader_storage_buffer_object)
1964 goto invalid_enum;
1965 if (index >= ctx->Const.MaxShaderStorageBufferBindings)
1966 goto invalid_value;
1967 v->value_int = ctx->ShaderStorageBufferBindings[index].Offset < 0 ? 0 :
1968 ctx->ShaderStorageBufferBindings[index].Offset;
1969 return TYPE_INT;
1970
1971 case GL_SHADER_STORAGE_BUFFER_SIZE:
1972 if (!ctx->Extensions.ARB_shader_storage_buffer_object)
1973 goto invalid_enum;
1974 if (index >= ctx->Const.MaxShaderStorageBufferBindings)
1975 goto invalid_value;
1976 v->value_int = ctx->ShaderStorageBufferBindings[index].Size < 0 ? 0 :
1977 ctx->ShaderStorageBufferBindings[index].Size;
1978 return TYPE_INT;
1979
1980 /* ARB_texture_multisample / GL3.2 */
1981 case GL_SAMPLE_MASK_VALUE:
1982 if (index != 0)
1983 goto invalid_value;
1984 if (!ctx->Extensions.ARB_texture_multisample)
1985 goto invalid_enum;
1986 v->value_int = ctx->Multisample.SampleMaskValue;
1987 return TYPE_INT;
1988
1989 case GL_ATOMIC_COUNTER_BUFFER_BINDING:
1990 if (!ctx->Extensions.ARB_shader_atomic_counters)
1991 goto invalid_enum;
1992 if (index >= ctx->Const.MaxAtomicBufferBindings)
1993 goto invalid_value;
1994 v->value_int = ctx->AtomicBufferBindings[index].BufferObject->Name;
1995 return TYPE_INT;
1996
1997 case GL_ATOMIC_COUNTER_BUFFER_START:
1998 if (!ctx->Extensions.ARB_shader_atomic_counters)
1999 goto invalid_enum;
2000 if (index >= ctx->Const.MaxAtomicBufferBindings)
2001 goto invalid_value;
2002 v->value_int64 = ctx->AtomicBufferBindings[index].Offset;
2003 return TYPE_INT64;
2004
2005 case GL_ATOMIC_COUNTER_BUFFER_SIZE:
2006 if (!ctx->Extensions.ARB_shader_atomic_counters)
2007 goto invalid_enum;
2008 if (index >= ctx->Const.MaxAtomicBufferBindings)
2009 goto invalid_value;
2010 v->value_int64 = ctx->AtomicBufferBindings[index].Size;
2011 return TYPE_INT64;
2012
2013 case GL_VERTEX_BINDING_DIVISOR:
2014 if ((!_mesa_is_desktop_gl(ctx) || !ctx->Extensions.ARB_instanced_arrays) &&
2015 !_mesa_is_gles31(ctx))
2016 goto invalid_enum;
2017 if (index >= ctx->Const.Program[MESA_SHADER_VERTEX].MaxAttribs)
2018 goto invalid_value;
2019 v->value_int = ctx->Array.VAO->VertexBinding[VERT_ATTRIB_GENERIC(index)].InstanceDivisor;
2020 return TYPE_INT;
2021
2022 case GL_VERTEX_BINDING_OFFSET:
2023 if (!_mesa_is_desktop_gl(ctx) && !_mesa_is_gles31(ctx))
2024 goto invalid_enum;
2025 if (index >= ctx->Const.Program[MESA_SHADER_VERTEX].MaxAttribs)
2026 goto invalid_value;
2027 v->value_int = ctx->Array.VAO->VertexBinding[VERT_ATTRIB_GENERIC(index)].Offset;
2028 return TYPE_INT;
2029
2030 case GL_VERTEX_BINDING_STRIDE:
2031 if (!_mesa_is_desktop_gl(ctx) && !_mesa_is_gles31(ctx))
2032 goto invalid_enum;
2033 if (index >= ctx->Const.Program[MESA_SHADER_VERTEX].MaxAttribs)
2034 goto invalid_value;
2035 v->value_int = ctx->Array.VAO->VertexBinding[VERT_ATTRIB_GENERIC(index)].Stride;
2036 return TYPE_INT;
2037
2038 case GL_VERTEX_BINDING_BUFFER:
2039 if (ctx->API == API_OPENGLES2 && ctx->Version < 31)
2040 goto invalid_enum;
2041 if (index >= ctx->Const.Program[MESA_SHADER_VERTEX].MaxAttribs)
2042 goto invalid_value;
2043 v->value_int = ctx->Array.VAO->VertexBinding[VERT_ATTRIB_GENERIC(index)].BufferObj->Name;
2044 return TYPE_INT;
2045
2046 /* ARB_shader_image_load_store */
2047 case GL_IMAGE_BINDING_NAME: {
2048 struct gl_texture_object *t;
2049
2050 if (!ctx->Extensions.ARB_shader_image_load_store)
2051 goto invalid_enum;
2052 if (index >= ctx->Const.MaxImageUnits)
2053 goto invalid_value;
2054
2055 t = ctx->ImageUnits[index].TexObj;
2056 v->value_int = (t ? t->Name : 0);
2057 return TYPE_INT;
2058 }
2059
2060 case GL_IMAGE_BINDING_LEVEL:
2061 if (!ctx->Extensions.ARB_shader_image_load_store)
2062 goto invalid_enum;
2063 if (index >= ctx->Const.MaxImageUnits)
2064 goto invalid_value;
2065
2066 v->value_int = ctx->ImageUnits[index].Level;
2067 return TYPE_INT;
2068
2069 case GL_IMAGE_BINDING_LAYERED:
2070 if (!ctx->Extensions.ARB_shader_image_load_store)
2071 goto invalid_enum;
2072 if (index >= ctx->Const.MaxImageUnits)
2073 goto invalid_value;
2074
2075 v->value_int = ctx->ImageUnits[index].Layered;
2076 return TYPE_INT;
2077
2078 case GL_IMAGE_BINDING_LAYER:
2079 if (!ctx->Extensions.ARB_shader_image_load_store)
2080 goto invalid_enum;
2081 if (index >= ctx->Const.MaxImageUnits)
2082 goto invalid_value;
2083
2084 v->value_int = ctx->ImageUnits[index].Layer;
2085 return TYPE_INT;
2086
2087 case GL_IMAGE_BINDING_ACCESS:
2088 if (!ctx->Extensions.ARB_shader_image_load_store)
2089 goto invalid_enum;
2090 if (index >= ctx->Const.MaxImageUnits)
2091 goto invalid_value;
2092
2093 v->value_int = ctx->ImageUnits[index].Access;
2094 return TYPE_INT;
2095
2096 case GL_IMAGE_BINDING_FORMAT:
2097 if (!ctx->Extensions.ARB_shader_image_load_store)
2098 goto invalid_enum;
2099 if (index >= ctx->Const.MaxImageUnits)
2100 goto invalid_value;
2101
2102 v->value_int = ctx->ImageUnits[index].Format;
2103 return TYPE_INT;
2104
2105 /* ARB_direct_state_access */
2106 case GL_TEXTURE_BINDING_1D:
2107 case GL_TEXTURE_BINDING_1D_ARRAY:
2108 case GL_TEXTURE_BINDING_2D:
2109 case GL_TEXTURE_BINDING_2D_ARRAY:
2110 case GL_TEXTURE_BINDING_2D_MULTISAMPLE:
2111 case GL_TEXTURE_BINDING_2D_MULTISAMPLE_ARRAY:
2112 case GL_TEXTURE_BINDING_3D:
2113 case GL_TEXTURE_BINDING_BUFFER:
2114 case GL_TEXTURE_BINDING_CUBE_MAP:
2115 case GL_TEXTURE_BINDING_CUBE_MAP_ARRAY:
2116 case GL_TEXTURE_BINDING_RECTANGLE: {
2117 int target;
2118
2119 if (ctx->API != API_OPENGL_CORE)
2120 goto invalid_enum;
2121 target = tex_binding_to_index(ctx, pname);
2122 if (target < 0)
2123 goto invalid_enum;
2124 if (index >= _mesa_max_tex_unit(ctx))
2125 goto invalid_value;
2126
2127 v->value_int = ctx->Texture.Unit[index].CurrentTex[target]->Name;
2128 return TYPE_INT;
2129 }
2130
2131 case GL_SAMPLER_BINDING: {
2132 struct gl_sampler_object *samp;
2133
2134 if (ctx->API != API_OPENGL_CORE)
2135 goto invalid_enum;
2136 if (index >= _mesa_max_tex_unit(ctx))
2137 goto invalid_value;
2138
2139 samp = ctx->Texture.Unit[index].Sampler;
2140 v->value_int = samp ? samp->Name : 0;
2141 return TYPE_INT;
2142 }
2143
2144 case GL_MAX_COMPUTE_WORK_GROUP_COUNT:
2145 if (!_mesa_has_compute_shaders(ctx))
2146 goto invalid_enum;
2147 if (index >= 3)
2148 goto invalid_value;
2149 v->value_int = ctx->Const.MaxComputeWorkGroupCount[index];
2150 return TYPE_INT;
2151
2152 case GL_MAX_COMPUTE_WORK_GROUP_SIZE:
2153 if (!_mesa_has_compute_shaders(ctx))
2154 goto invalid_enum;
2155 if (index >= 3)
2156 goto invalid_value;
2157 v->value_int = ctx->Const.MaxComputeWorkGroupSize[index];
2158 return TYPE_INT;
2159 }
2160
2161 invalid_enum:
2162 _mesa_error(ctx, GL_INVALID_ENUM, "%s(pname=%s)", func,
2163 _mesa_enum_to_string(pname));
2164 return TYPE_INVALID;
2165 invalid_value:
2166 _mesa_error(ctx, GL_INVALID_VALUE, "%s(pname=%s)", func,
2167 _mesa_enum_to_string(pname));
2168 return TYPE_INVALID;
2169 }
2170
2171 void GLAPIENTRY
2172 _mesa_GetBooleani_v( GLenum pname, GLuint index, GLboolean *params )
2173 {
2174 union value v;
2175 enum value_type type =
2176 find_value_indexed("glGetBooleani_v", pname, index, &v);
2177
2178 switch (type) {
2179 case TYPE_INT:
2180 params[0] = INT_TO_BOOLEAN(v.value_int);
2181 break;
2182 case TYPE_INT_4:
2183 params[0] = INT_TO_BOOLEAN(v.value_int_4[0]);
2184 params[1] = INT_TO_BOOLEAN(v.value_int_4[1]);
2185 params[2] = INT_TO_BOOLEAN(v.value_int_4[2]);
2186 params[3] = INT_TO_BOOLEAN(v.value_int_4[3]);
2187 break;
2188 case TYPE_INT64:
2189 params[0] = INT64_TO_BOOLEAN(v.value_int64);
2190 break;
2191 default:
2192 ; /* nothing - GL error was recorded */
2193 }
2194 }
2195
2196 void GLAPIENTRY
2197 _mesa_GetIntegeri_v( GLenum pname, GLuint index, GLint *params )
2198 {
2199 union value v;
2200 enum value_type type =
2201 find_value_indexed("glGetIntegeri_v", pname, index, &v);
2202
2203 switch (type) {
2204 case TYPE_FLOAT_4:
2205 case TYPE_FLOATN_4:
2206 params[3] = IROUND(v.value_float_4[3]);
2207 case TYPE_FLOAT_3:
2208 case TYPE_FLOATN_3:
2209 params[2] = IROUND(v.value_float_4[2]);
2210 case TYPE_FLOAT_2:
2211 case TYPE_FLOATN_2:
2212 params[1] = IROUND(v.value_float_4[1]);
2213 case TYPE_FLOAT:
2214 case TYPE_FLOATN:
2215 params[0] = IROUND(v.value_float_4[0]);
2216 break;
2217
2218 case TYPE_DOUBLEN_2:
2219 params[1] = IROUND(v.value_double_2[1]);
2220 case TYPE_DOUBLEN:
2221 params[0] = IROUND(v.value_double_2[0]);
2222 break;
2223
2224 case TYPE_INT:
2225 params[0] = v.value_int;
2226 break;
2227 case TYPE_INT_4:
2228 params[0] = v.value_int_4[0];
2229 params[1] = v.value_int_4[1];
2230 params[2] = v.value_int_4[2];
2231 params[3] = v.value_int_4[3];
2232 break;
2233 case TYPE_INT64:
2234 params[0] = INT64_TO_INT(v.value_int64);
2235 break;
2236 default:
2237 ; /* nothing - GL error was recorded */
2238 }
2239 }
2240
2241 void GLAPIENTRY
2242 _mesa_GetInteger64i_v( GLenum pname, GLuint index, GLint64 *params )
2243 {
2244 union value v;
2245 enum value_type type =
2246 find_value_indexed("glGetInteger64i_v", pname, index, &v);
2247
2248 switch (type) {
2249 case TYPE_INT:
2250 params[0] = v.value_int;
2251 break;
2252 case TYPE_INT_4:
2253 params[0] = v.value_int_4[0];
2254 params[1] = v.value_int_4[1];
2255 params[2] = v.value_int_4[2];
2256 params[3] = v.value_int_4[3];
2257 break;
2258 case TYPE_INT64:
2259 params[0] = v.value_int64;
2260 break;
2261 default:
2262 ; /* nothing - GL error was recorded */
2263 }
2264 }
2265
2266 void GLAPIENTRY
2267 _mesa_GetFloati_v(GLenum pname, GLuint index, GLfloat *params)
2268 {
2269 int i;
2270 GLmatrix *m;
2271 union value v;
2272 enum value_type type =
2273 find_value_indexed("glGetFloati_v", pname, index, &v);
2274
2275 switch (type) {
2276 case TYPE_FLOAT_4:
2277 case TYPE_FLOATN_4:
2278 params[3] = v.value_float_4[3];
2279 case TYPE_FLOAT_3:
2280 case TYPE_FLOATN_3:
2281 params[2] = v.value_float_4[2];
2282 case TYPE_FLOAT_2:
2283 case TYPE_FLOATN_2:
2284 params[1] = v.value_float_4[1];
2285 case TYPE_FLOAT:
2286 case TYPE_FLOATN:
2287 params[0] = v.value_float_4[0];
2288 break;
2289
2290 case TYPE_DOUBLEN_2:
2291 params[1] = (GLfloat) v.value_double_2[1];
2292 case TYPE_DOUBLEN:
2293 params[0] = (GLfloat) v.value_double_2[0];
2294 break;
2295
2296 case TYPE_INT_4:
2297 params[3] = (GLfloat) v.value_int_4[3];
2298 case TYPE_INT_3:
2299 params[2] = (GLfloat) v.value_int_4[2];
2300 case TYPE_INT_2:
2301 case TYPE_ENUM_2:
2302 params[1] = (GLfloat) v.value_int_4[1];
2303 case TYPE_INT:
2304 case TYPE_ENUM:
2305 params[0] = (GLfloat) v.value_int_4[0];
2306 break;
2307
2308 case TYPE_INT_N:
2309 for (i = 0; i < v.value_int_n.n; i++)
2310 params[i] = INT_TO_FLOAT(v.value_int_n.ints[i]);
2311 break;
2312
2313 case TYPE_INT64:
2314 params[0] = (GLfloat) v.value_int64;
2315 break;
2316
2317 case TYPE_BOOLEAN:
2318 params[0] = BOOLEAN_TO_FLOAT(v.value_bool);
2319 break;
2320
2321 case TYPE_MATRIX:
2322 m = *(GLmatrix **) &v;
2323 for (i = 0; i < 16; i++)
2324 params[i] = m->m[i];
2325 break;
2326
2327 case TYPE_MATRIX_T:
2328 m = *(GLmatrix **) &v;
2329 for (i = 0; i < 16; i++)
2330 params[i] = m->m[transpose[i]];
2331 break;
2332
2333 default:
2334 ;
2335 }
2336 }
2337
2338 void GLAPIENTRY
2339 _mesa_GetDoublei_v(GLenum pname, GLuint index, GLdouble *params)
2340 {
2341 int i;
2342 GLmatrix *m;
2343 union value v;
2344 enum value_type type =
2345 find_value_indexed("glGetDoublei_v", pname, index, &v);
2346
2347 switch (type) {
2348 case TYPE_FLOAT_4:
2349 case TYPE_FLOATN_4:
2350 params[3] = (GLdouble) v.value_float_4[3];
2351 case TYPE_FLOAT_3:
2352 case TYPE_FLOATN_3:
2353 params[2] = (GLdouble) v.value_float_4[2];
2354 case TYPE_FLOAT_2:
2355 case TYPE_FLOATN_2:
2356 params[1] = (GLdouble) v.value_float_4[1];
2357 case TYPE_FLOAT:
2358 case TYPE_FLOATN:
2359 params[0] = (GLdouble) v.value_float_4[0];
2360 break;
2361
2362 case TYPE_DOUBLEN_2:
2363 params[1] = v.value_double_2[1];
2364 case TYPE_DOUBLEN:
2365 params[0] = v.value_double_2[0];
2366 break;
2367
2368 case TYPE_INT_4:
2369 params[3] = (GLdouble) v.value_int_4[3];
2370 case TYPE_INT_3:
2371 params[2] = (GLdouble) v.value_int_4[2];
2372 case TYPE_INT_2:
2373 case TYPE_ENUM_2:
2374 params[1] = (GLdouble) v.value_int_4[1];
2375 case TYPE_INT:
2376 case TYPE_ENUM:
2377 params[0] = (GLdouble) v.value_int_4[0];
2378 break;
2379
2380 case TYPE_INT_N:
2381 for (i = 0; i < v.value_int_n.n; i++)
2382 params[i] = (GLdouble) INT_TO_FLOAT(v.value_int_n.ints[i]);
2383 break;
2384
2385 case TYPE_INT64:
2386 params[0] = (GLdouble) v.value_int64;
2387 break;
2388
2389 case TYPE_BOOLEAN:
2390 params[0] = (GLdouble) BOOLEAN_TO_FLOAT(v.value_bool);
2391 break;
2392
2393 case TYPE_MATRIX:
2394 m = *(GLmatrix **) &v;
2395 for (i = 0; i < 16; i++)
2396 params[i] = (GLdouble) m->m[i];
2397 break;
2398
2399 case TYPE_MATRIX_T:
2400 m = *(GLmatrix **) &v;
2401 for (i = 0; i < 16; i++)
2402 params[i] = (GLdouble) m->m[transpose[i]];
2403 break;
2404
2405 default:
2406 ;
2407 }
2408 }
2409
2410 void GLAPIENTRY
2411 _mesa_GetFixedv(GLenum pname, GLfixed *params)
2412 {
2413 const struct value_desc *d;
2414 union value v;
2415 GLmatrix *m;
2416 int shift, i;
2417 void *p;
2418
2419 d = find_value("glGetDoublev", pname, &p, &v);
2420 switch (d->type) {
2421 case TYPE_INVALID:
2422 break;
2423 case TYPE_CONST:
2424 params[0] = INT_TO_FIXED(d->offset);
2425 break;
2426
2427 case TYPE_FLOAT_4:
2428 case TYPE_FLOATN_4:
2429 params[3] = FLOAT_TO_FIXED(((GLfloat *) p)[3]);
2430 case TYPE_FLOAT_3:
2431 case TYPE_FLOATN_3:
2432 params[2] = FLOAT_TO_FIXED(((GLfloat *) p)[2]);
2433 case TYPE_FLOAT_2:
2434 case TYPE_FLOATN_2:
2435 params[1] = FLOAT_TO_FIXED(((GLfloat *) p)[1]);
2436 case TYPE_FLOAT:
2437 case TYPE_FLOATN:
2438 params[0] = FLOAT_TO_FIXED(((GLfloat *) p)[0]);
2439 break;
2440
2441 case TYPE_DOUBLEN_2:
2442 params[1] = FLOAT_TO_FIXED(((GLdouble *) p)[1]);
2443 case TYPE_DOUBLEN:
2444 params[0] = FLOAT_TO_FIXED(((GLdouble *) p)[0]);
2445 break;
2446
2447 case TYPE_INT_4:
2448 params[3] = INT_TO_FIXED(((GLint *) p)[3]);
2449 case TYPE_INT_3:
2450 params[2] = INT_TO_FIXED(((GLint *) p)[2]);
2451 case TYPE_INT_2:
2452 case TYPE_ENUM_2:
2453 params[1] = INT_TO_FIXED(((GLint *) p)[1]);
2454 case TYPE_INT:
2455 case TYPE_ENUM:
2456 params[0] = INT_TO_FIXED(((GLint *) p)[0]);
2457 break;
2458
2459 case TYPE_INT_N:
2460 for (i = 0; i < v.value_int_n.n; i++)
2461 params[i] = INT_TO_FIXED(v.value_int_n.ints[i]);
2462 break;
2463
2464 case TYPE_INT64:
2465 params[0] = ((GLint64 *) p)[0];
2466 break;
2467
2468 case TYPE_BOOLEAN:
2469 params[0] = BOOLEAN_TO_FIXED(((GLboolean*) p)[0]);
2470 break;
2471
2472 case TYPE_MATRIX:
2473 m = *(GLmatrix **) p;
2474 for (i = 0; i < 16; i++)
2475 params[i] = FLOAT_TO_FIXED(m->m[i]);
2476 break;
2477
2478 case TYPE_MATRIX_T:
2479 m = *(GLmatrix **) p;
2480 for (i = 0; i < 16; i++)
2481 params[i] = FLOAT_TO_FIXED(m->m[transpose[i]]);
2482 break;
2483
2484 case TYPE_BIT_0:
2485 case TYPE_BIT_1:
2486 case TYPE_BIT_2:
2487 case TYPE_BIT_3:
2488 case TYPE_BIT_4:
2489 case TYPE_BIT_5:
2490 case TYPE_BIT_6:
2491 case TYPE_BIT_7:
2492 shift = d->type - TYPE_BIT_0;
2493 params[0] = BOOLEAN_TO_FIXED((*(GLbitfield *) p >> shift) & 1);
2494 break;
2495 }
2496 }