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