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