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