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