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