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