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