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