projects / mesa.git / blob
? search:


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