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