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