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