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