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