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