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