2 * Copyright (C) 2010 Brian Paul All Rights Reserved.
3 * Copyright (C) 2010 Intel Corporation
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:
12 * The above copyright notice and this permission notice shall be included
13 * in all copies or substantial portions of the Software.
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.
23 * Author: Kristian Høgsberg <krh@bitplanet.net>
31 #include "extensions.h"
36 #include "texcompress.h"
37 #include "framebuffer.h"
38 #include "samplerobj.h"
41 /* This is a table driven implemetation of the glGet*v() functions.
42 * The basic idea is that most getters just look up an int somewhere
43 * in struct gl_context and then convert it to a bool or float according to
44 * which of glGetIntegerv() glGetBooleanv() etc is being called.
45 * Instead of generating code to do this, we can just record the enum
46 * value and the offset into struct gl_context in an array of structs. Then
47 * in glGet*(), we lookup the struct for the enum in question, and use
48 * the offset to get the int we need.
50 * Sometimes we need to look up a float, a boolean, a bit in a
51 * bitfield, a matrix or other types instead, so we need to track the
52 * type of the value in struct gl_context. And sometimes the value isn't in
53 * struct gl_context but in the drawbuffer, the array object, current texture
54 * unit, or maybe it's a computed value. So we need to also track
55 * where or how to find the value. Finally, we sometimes need to
56 * check that one of a number of extensions are enabled, the GL
57 * version or flush or call _mesa_update_state(). This is done by
58 * attaching optional extra information to the value description
59 * struct, it's sort of like an array of opcodes that describe extra
62 * Putting all this together we end up with struct value_desc below,
63 * and with a couple of macros to help, the table of struct value_desc
64 * is about as concise as the specification in the old python script.
67 #define FLOAT_TO_BOOLEAN(X) ( (X) ? GL_TRUE : GL_FALSE )
68 #define FLOAT_TO_FIXED(F) ( ((F) * 65536.0f > INT_MAX) ? INT_MAX : \
69 ((F) * 65536.0f < INT_MIN) ? INT_MIN : \
70 (GLint) ((F) * 65536.0f) )
72 #define INT_TO_BOOLEAN(I) ( (I) ? GL_TRUE : GL_FALSE )
73 #define INT_TO_FIXED(I) ( ((I) > SHRT_MAX) ? INT_MAX : \
74 ((I) < SHRT_MIN) ? INT_MIN : \
75 (GLint) ((I) * 65536) )
77 #define INT64_TO_BOOLEAN(I) ( (I) ? GL_TRUE : GL_FALSE )
78 #define INT64_TO_INT(I) ( (GLint)((I > INT_MAX) ? INT_MAX : ((I < INT_MIN) ? INT_MIN : (I))) )
80 #define BOOLEAN_TO_INT(B) ( (GLint) (B) )
81 #define BOOLEAN_TO_INT64(B) ( (GLint64) (B) )
82 #define BOOLEAN_TO_FLOAT(B) ( (B) ? 1.0F : 0.0F )
83 #define BOOLEAN_TO_FIXED(B) ( (GLint) ((B) ? 1 : 0) << 16 )
85 #define ENUM_TO_INT64(E) ( (GLint64) (E) )
86 #define ENUM_TO_FIXED(E) (E)
122 enum value_location
{
141 EXTRA_NEW_FRAG_CLAMP
,
142 EXTRA_VALID_DRAW_BUFFER
,
143 EXTRA_VALID_TEXTURE_UNIT
,
144 EXTRA_VALID_CLIP_DISTANCE
,
148 EXTRA_EXT_ATOMICS_GS4
,
149 EXTRA_EXT_SHADER_IMAGE_GS4
,
152 #define NO_EXTRA NULL
157 GLubyte location
; /**< enum value_location */
158 GLubyte type
; /**< enum value_type */
165 GLfloat value_float_4
[4];
166 GLdouble value_double_2
[2];
167 GLmatrix
*value_matrix
;
169 GLint value_int_4
[4];
173 /* Sigh, see GL_COMPRESSED_TEXTURE_FORMATS_ARB handling */
177 GLboolean value_bool
;
180 #define BUFFER_FIELD(field, type) \
181 LOC_BUFFER, type, offsetof(struct gl_framebuffer, field)
182 #define CONTEXT_FIELD(field, type) \
183 LOC_CONTEXT, type, offsetof(struct gl_context, field)
184 #define ARRAY_FIELD(field, type) \
185 LOC_ARRAY, type, offsetof(struct gl_vertex_array_object, field)
186 #undef CONST /* already defined through windows.h */
187 #define CONST(value) \
188 LOC_CONTEXT, TYPE_CONST, value
190 #define BUFFER_INT(field) BUFFER_FIELD(field, TYPE_INT)
191 #define BUFFER_ENUM(field) BUFFER_FIELD(field, TYPE_ENUM)
192 #define BUFFER_BOOL(field) BUFFER_FIELD(field, TYPE_BOOLEAN)
194 #define CONTEXT_INT(field) CONTEXT_FIELD(field, TYPE_INT)
195 #define CONTEXT_INT2(field) CONTEXT_FIELD(field, TYPE_INT_2)
196 #define CONTEXT_INT64(field) CONTEXT_FIELD(field, TYPE_INT64)
197 #define CONTEXT_ENUM(field) CONTEXT_FIELD(field, TYPE_ENUM)
198 #define CONTEXT_ENUM2(field) CONTEXT_FIELD(field, TYPE_ENUM_2)
199 #define CONTEXT_BOOL(field) CONTEXT_FIELD(field, TYPE_BOOLEAN)
200 #define CONTEXT_BIT0(field) CONTEXT_FIELD(field, TYPE_BIT_0)
201 #define CONTEXT_BIT1(field) CONTEXT_FIELD(field, TYPE_BIT_1)
202 #define CONTEXT_BIT2(field) CONTEXT_FIELD(field, TYPE_BIT_2)
203 #define CONTEXT_BIT3(field) CONTEXT_FIELD(field, TYPE_BIT_3)
204 #define CONTEXT_BIT4(field) CONTEXT_FIELD(field, TYPE_BIT_4)
205 #define CONTEXT_BIT5(field) CONTEXT_FIELD(field, TYPE_BIT_5)
206 #define CONTEXT_BIT6(field) CONTEXT_FIELD(field, TYPE_BIT_6)
207 #define CONTEXT_BIT7(field) CONTEXT_FIELD(field, TYPE_BIT_7)
208 #define CONTEXT_FLOAT(field) CONTEXT_FIELD(field, TYPE_FLOAT)
209 #define CONTEXT_FLOAT2(field) CONTEXT_FIELD(field, TYPE_FLOAT_2)
210 #define CONTEXT_FLOAT3(field) CONTEXT_FIELD(field, TYPE_FLOAT_3)
211 #define CONTEXT_FLOAT4(field) CONTEXT_FIELD(field, TYPE_FLOAT_4)
212 #define CONTEXT_MATRIX(field) CONTEXT_FIELD(field, TYPE_MATRIX)
213 #define CONTEXT_MATRIX_T(field) CONTEXT_FIELD(field, TYPE_MATRIX_T)
215 #define ARRAY_INT(field) ARRAY_FIELD(field, TYPE_INT)
216 #define ARRAY_ENUM(field) ARRAY_FIELD(field, TYPE_ENUM)
217 #define ARRAY_BOOL(field) ARRAY_FIELD(field, TYPE_BOOLEAN)
220 offsetof(struct gl_extensions, f)
222 #define EXTRA_EXT(e) \
223 static const int extra_##e[] = { \
227 #define EXTRA_EXT2(e1, e2) \
228 static const int extra_##e1##_##e2[] = { \
229 EXT(e1), EXT(e2), EXTRA_END \
232 /* The 'extra' mechanism is a way to specify extra checks (such as
233 * extensions or specific gl versions) or actions (flush current, new
234 * buffers) that we need to do before looking up an enum. We need to
235 * declare them all up front so we can refer to them in the value_desc
238 * Each EXTRA_ will be executed. For EXTRA_* enums of extensions and API
239 * versions, listing multiple ones in an array means an error will be thrown
240 * only if none of them are available. If you need to check for "AND"
241 * behavior, you would need to make a custom EXTRA_ enum.
244 static const int extra_new_buffers
[] = {
249 static const int extra_new_frag_clamp
[] = {
250 EXTRA_NEW_FRAG_CLAMP
,
254 static const int extra_valid_draw_buffer
[] = {
255 EXTRA_VALID_DRAW_BUFFER
,
259 static const int extra_valid_texture_unit
[] = {
260 EXTRA_VALID_TEXTURE_UNIT
,
264 static const int extra_valid_clip_distance
[] = {
265 EXTRA_VALID_CLIP_DISTANCE
,
269 static const int extra_flush_current_valid_texture_unit
[] = {
271 EXTRA_VALID_TEXTURE_UNIT
,
275 static const int extra_flush_current
[] = {
280 static const int extra_EXT_texture_integer
[] = {
281 EXT(EXT_texture_integer
),
285 static const int extra_EXT_texture_integer_and_new_buffers
[] = {
286 EXT(EXT_texture_integer
),
291 static const int extra_GLSL_130_es3
[] = {
297 static const int extra_texture_buffer_object
[] = {
300 EXT(ARB_texture_buffer_object
),
304 static const int extra_ARB_transform_feedback2_api_es3
[] = {
305 EXT(ARB_transform_feedback2
),
310 static const int extra_ARB_uniform_buffer_object_and_geometry_shader
[] = {
315 static const int extra_ARB_ES2_compatibility_api_es2
[] = {
316 EXT(ARB_ES2_compatibility
),
321 static const int extra_ARB_ES3_compatibility_api_es3
[] = {
322 EXT(ARB_ES3_compatibility
),
327 static const int extra_EXT_framebuffer_sRGB_and_new_buffers
[] = {
328 EXT(EXT_framebuffer_sRGB
),
333 static const int extra_EXT_packed_float
[] = {
334 EXT(EXT_packed_float
),
339 static const int extra_EXT_texture_array_es3
[] = {
340 EXT(EXT_texture_array
),
345 static const int extra_ARB_shader_atomic_counters_and_geometry_shader
[] = {
346 EXTRA_EXT_ATOMICS_GS4
,
350 static const int extra_ARB_shader_image_load_store_and_geometry_shader
[] = {
351 EXTRA_EXT_SHADER_IMAGE_GS4
,
355 EXTRA_EXT(ARB_texture_cube_map
);
356 EXTRA_EXT(EXT_texture_array
);
357 EXTRA_EXT(NV_fog_distance
);
358 EXTRA_EXT(EXT_texture_filter_anisotropic
);
359 EXTRA_EXT(NV_point_sprite
);
360 EXTRA_EXT(NV_texture_rectangle
);
361 EXTRA_EXT(EXT_stencil_two_side
);
362 EXTRA_EXT(EXT_depth_bounds_test
);
363 EXTRA_EXT(ARB_depth_clamp
);
364 EXTRA_EXT(ATI_fragment_shader
);
365 EXTRA_EXT(EXT_provoking_vertex
);
366 EXTRA_EXT(ARB_fragment_shader
);
367 EXTRA_EXT(ARB_fragment_program
);
368 EXTRA_EXT2(ARB_framebuffer_object
, EXT_framebuffer_multisample
);
369 EXTRA_EXT(ARB_seamless_cube_map
);
371 EXTRA_EXT(ARB_vertex_shader
);
372 EXTRA_EXT(EXT_transform_feedback
);
373 EXTRA_EXT(ARB_transform_feedback3
);
374 EXTRA_EXT(EXT_pixel_buffer_object
);
375 EXTRA_EXT(ARB_vertex_program
);
376 EXTRA_EXT2(NV_point_sprite
, ARB_point_sprite
);
377 EXTRA_EXT2(ARB_vertex_program
, ARB_fragment_program
);
378 EXTRA_EXT(ARB_geometry_shader4
);
379 EXTRA_EXT(ARB_color_buffer_float
);
380 EXTRA_EXT(EXT_framebuffer_sRGB
);
381 EXTRA_EXT(OES_EGL_image_external
);
382 EXTRA_EXT(ARB_blend_func_extended
);
383 EXTRA_EXT(ARB_uniform_buffer_object
);
384 EXTRA_EXT(ARB_timer_query
);
385 EXTRA_EXT(ARB_texture_cube_map_array
);
386 EXTRA_EXT(ARB_texture_buffer_range
);
387 EXTRA_EXT(ARB_texture_multisample
);
388 EXTRA_EXT(ARB_texture_gather
);
389 EXTRA_EXT(ARB_shader_atomic_counters
);
390 EXTRA_EXT(ARB_draw_indirect
);
391 EXTRA_EXT(ARB_shader_image_load_store
);
392 EXTRA_EXT(ARB_viewport_array
);
393 EXTRA_EXT(ARB_compute_shader
);
396 extra_ARB_color_buffer_float_or_glcore
[] = {
397 EXT(ARB_color_buffer_float
),
403 extra_NV_primitive_restart
[] = {
404 EXT(NV_primitive_restart
),
408 static const int extra_version_30
[] = { EXTRA_VERSION_30
, EXTRA_END
};
409 static const int extra_version_31
[] = { EXTRA_VERSION_31
, EXTRA_END
};
410 static const int extra_version_32
[] = { EXTRA_VERSION_32
, EXTRA_END
};
411 static const int extra_version_40
[] = { EXTRA_VERSION_40
, EXTRA_END
};
413 static const int extra_gl30_es3
[] = {
419 static const int extra_gl32_es3
[] = {
425 static const int extra_gl32_ARB_geometry_shader4
[] = {
427 EXT(ARB_geometry_shader4
),
431 static const int extra_gl40_ARB_sample_shading
[] = {
433 EXT(ARB_sample_shading
),
438 extra_ARB_vertex_program_api_es2
[] = {
439 EXT(ARB_vertex_program
),
444 /* The ReadBuffer get token is valid under either full GL or under
445 * GLES2 if the NV_read_buffer extension is available. */
447 extra_NV_read_buffer_api_gl
[] = {
453 static const int extra_core_ARB_color_buffer_float_and_new_buffers
[] = {
455 EXT(ARB_color_buffer_float
),
460 /* This is the big table describing all the enums we accept in
461 * glGet*v(). The table is partitioned into six parts: enums
462 * understood by all GL APIs (OpenGL, GLES and GLES2), enums shared
463 * between OpenGL and GLES, enums exclusive to GLES, etc for the
464 * remaining combinations. To look up the enums valid in a given API
465 * we will use a hash table specific to that API. These tables are in
466 * turn generated at build time and included through get_hash.h.
469 #include "get_hash.h"
471 /* All we need now is a way to look up the value struct from the enum.
472 * The code generated by gcc for the old generated big switch
473 * statement is a big, balanced, open coded if/else tree, essentially
474 * an unrolled binary search. It would be natural to sort the new
475 * enum table and use bsearch(), but we will use a read-only hash
476 * table instead. bsearch() has a nice guaranteed worst case
477 * performance, but we're also guaranteed to hit that worst case
478 * (log2(n) iterations) for about half the enums. Instead, using an
479 * open addressing hash table, we can find the enum on the first try
480 * for 80% of the enums, 1 collision for 10% and never more than 5
481 * collisions for any enum (typical numbers). And the code is very
482 * simple, even though it feels a little magic. */
486 print_table_stats(int api
)
488 int i
, j
, collisions
[11], count
, hash
, mask
;
489 const struct value_desc
*d
;
490 const char *api_names
[] = {
491 [API_OPENGL_COMPAT
] = "GL",
492 [API_OPENGL_CORE
] = "GL_CORE",
493 [API_OPENGLES
] = "GLES",
494 [API_OPENGLES2
] = "GLES2",
496 const char *api_name
;
498 api_name
= api
< Elements(api_names
) ? api_names
[api
] : "N/A";
500 mask
= Elements(table(api
)) - 1;
501 memset(collisions
, 0, sizeof collisions
);
503 for (i
= 0; i
< Elements(table(api
)); i
++) {
507 d
= &values
[table(api
)[i
]];
508 hash
= (d
->pname
* prime_factor
);
511 if (values
[table(api
)[hash
& mask
]].pname
== d
->pname
)
523 printf("number of enums for %s: %d (total %ld)\n",
524 api_name
, count
, Elements(values
));
525 for (i
= 0; i
< Elements(collisions
) - 1; i
++)
526 if (collisions
[i
] > 0)
527 printf(" %d enums with %d %scollisions\n",
528 collisions
[i
], i
, i
== 10 ? "or more " : "");
533 * Initialize the enum hash for a given API
535 * This is called from one_time_init() to insert the enum values that
536 * are valid for the API in question into the enum hash table.
538 * \param the current context, for determining the API in question
540 void _mesa_init_get_hash(struct gl_context
*ctx
)
543 print_table_stats(ctx
->API
);
550 * Handle irregular enums
552 * Some values don't conform to the "well-known type at context
553 * pointer + offset" pattern, so we have this function to catch all
554 * the corner cases. Typically, it's a computed value or a one-off
555 * pointer to a custom struct or something.
557 * In this case we can't return a pointer to the value, so we'll have
558 * to use the temporary variable 'v' declared back in the calling
559 * glGet*v() function to store the result.
561 * \param ctx the current context
562 * \param d the struct value_desc that describes the enum
563 * \param v pointer to the tmp declared in the calling glGet*v() function
566 find_custom_value(struct gl_context
*ctx
, const struct value_desc
*d
, union value
*v
)
568 struct gl_buffer_object
**buffer_obj
;
569 struct gl_vertex_attrib_array
*array
;
573 case GL_MAJOR_VERSION
:
574 v
->value_int
= ctx
->Version
/ 10;
576 case GL_MINOR_VERSION
:
577 v
->value_int
= ctx
->Version
% 10;
583 case GL_TEXTURE_CUBE_MAP_ARB
:
584 case GL_TEXTURE_RECTANGLE_NV
:
585 case GL_TEXTURE_EXTERNAL_OES
:
586 v
->value_bool
= _mesa_IsEnabled(d
->pname
);
589 case GL_LINE_STIPPLE_PATTERN
:
590 /* This is the only GLushort, special case it here by promoting
591 * to an int rather than introducing a new type. */
592 v
->value_int
= ctx
->Line
.StipplePattern
;
595 case GL_CURRENT_RASTER_TEXTURE_COORDS
:
596 unit
= ctx
->Texture
.CurrentUnit
;
597 v
->value_float_4
[0] = ctx
->Current
.RasterTexCoords
[unit
][0];
598 v
->value_float_4
[1] = ctx
->Current
.RasterTexCoords
[unit
][1];
599 v
->value_float_4
[2] = ctx
->Current
.RasterTexCoords
[unit
][2];
600 v
->value_float_4
[3] = ctx
->Current
.RasterTexCoords
[unit
][3];
603 case GL_CURRENT_TEXTURE_COORDS
:
604 unit
= ctx
->Texture
.CurrentUnit
;
605 v
->value_float_4
[0] = ctx
->Current
.Attrib
[VERT_ATTRIB_TEX0
+ unit
][0];
606 v
->value_float_4
[1] = ctx
->Current
.Attrib
[VERT_ATTRIB_TEX0
+ unit
][1];
607 v
->value_float_4
[2] = ctx
->Current
.Attrib
[VERT_ATTRIB_TEX0
+ unit
][2];
608 v
->value_float_4
[3] = ctx
->Current
.Attrib
[VERT_ATTRIB_TEX0
+ unit
][3];
611 case GL_COLOR_WRITEMASK
:
612 v
->value_int_4
[0] = ctx
->Color
.ColorMask
[0][RCOMP
] ? 1 : 0;
613 v
->value_int_4
[1] = ctx
->Color
.ColorMask
[0][GCOMP
] ? 1 : 0;
614 v
->value_int_4
[2] = ctx
->Color
.ColorMask
[0][BCOMP
] ? 1 : 0;
615 v
->value_int_4
[3] = ctx
->Color
.ColorMask
[0][ACOMP
] ? 1 : 0;
619 v
->value_bool
= ctx
->Current
.Attrib
[VERT_ATTRIB_EDGEFLAG
][0] == 1.0;
623 v
->value_enum
= ctx
->ReadBuffer
->ColorReadBuffer
;
626 case GL_MAP2_GRID_DOMAIN
:
627 v
->value_float_4
[0] = ctx
->Eval
.MapGrid2u1
;
628 v
->value_float_4
[1] = ctx
->Eval
.MapGrid2u2
;
629 v
->value_float_4
[2] = ctx
->Eval
.MapGrid2v1
;
630 v
->value_float_4
[3] = ctx
->Eval
.MapGrid2v2
;
633 case GL_TEXTURE_STACK_DEPTH
:
634 unit
= ctx
->Texture
.CurrentUnit
;
635 v
->value_int
= ctx
->TextureMatrixStack
[unit
].Depth
+ 1;
637 case GL_TEXTURE_MATRIX
:
638 unit
= ctx
->Texture
.CurrentUnit
;
639 v
->value_matrix
= ctx
->TextureMatrixStack
[unit
].Top
;
642 case GL_TEXTURE_COORD_ARRAY
:
643 case GL_TEXTURE_COORD_ARRAY_SIZE
:
644 case GL_TEXTURE_COORD_ARRAY_TYPE
:
645 case GL_TEXTURE_COORD_ARRAY_STRIDE
:
646 array
= &ctx
->Array
.VAO
->VertexAttrib
[VERT_ATTRIB_TEX(ctx
->Array
.ActiveTexture
)];
647 v
->value_int
= *(GLuint
*) ((char *) array
+ d
->offset
);
650 case GL_ACTIVE_TEXTURE_ARB
:
651 v
->value_int
= GL_TEXTURE0_ARB
+ ctx
->Texture
.CurrentUnit
;
653 case GL_CLIENT_ACTIVE_TEXTURE_ARB
:
654 v
->value_int
= GL_TEXTURE0_ARB
+ ctx
->Array
.ActiveTexture
;
657 case GL_MODELVIEW_STACK_DEPTH
:
658 case GL_PROJECTION_STACK_DEPTH
:
659 v
->value_int
= *(GLint
*) ((char *) ctx
+ d
->offset
) + 1;
662 case GL_MAX_TEXTURE_SIZE
:
663 case GL_MAX_3D_TEXTURE_SIZE
:
664 case GL_MAX_CUBE_MAP_TEXTURE_SIZE_ARB
:
665 p
= (GLuint
*) ((char *) ctx
+ d
->offset
);
666 v
->value_int
= 1 << (*p
- 1);
670 v
->value_int_4
[0] = ctx
->Scissor
.ScissorArray
[0].X
;
671 v
->value_int_4
[1] = ctx
->Scissor
.ScissorArray
[0].Y
;
672 v
->value_int_4
[2] = ctx
->Scissor
.ScissorArray
[0].Width
;
673 v
->value_int_4
[3] = ctx
->Scissor
.ScissorArray
[0].Height
;
676 case GL_SCISSOR_TEST
:
677 v
->value_bool
= ctx
->Scissor
.EnableFlags
& 1;
682 ctx
->ListState
.CurrentList
? ctx
->ListState
.CurrentList
->Name
: 0;
685 if (!ctx
->CompileFlag
)
687 else if (ctx
->ExecuteFlag
)
688 v
->value_enum
= GL_COMPILE_AND_EXECUTE
;
690 v
->value_enum
= GL_COMPILE
;
694 v
->value_float_4
[0] = ctx
->ViewportArray
[0].X
;
695 v
->value_float_4
[1] = ctx
->ViewportArray
[0].Y
;
696 v
->value_float_4
[2] = ctx
->ViewportArray
[0].Width
;
697 v
->value_float_4
[3] = ctx
->ViewportArray
[0].Height
;
701 v
->value_double_2
[0] = ctx
->ViewportArray
[0].Near
;
702 v
->value_double_2
[1] = ctx
->ViewportArray
[0].Far
;
705 case GL_ACTIVE_STENCIL_FACE_EXT
:
706 v
->value_enum
= ctx
->Stencil
.ActiveFace
? GL_BACK
: GL_FRONT
;
709 case GL_STENCIL_FAIL
:
710 v
->value_enum
= ctx
->Stencil
.FailFunc
[ctx
->Stencil
.ActiveFace
];
712 case GL_STENCIL_FUNC
:
713 v
->value_enum
= ctx
->Stencil
.Function
[ctx
->Stencil
.ActiveFace
];
715 case GL_STENCIL_PASS_DEPTH_FAIL
:
716 v
->value_enum
= ctx
->Stencil
.ZFailFunc
[ctx
->Stencil
.ActiveFace
];
718 case GL_STENCIL_PASS_DEPTH_PASS
:
719 v
->value_enum
= ctx
->Stencil
.ZPassFunc
[ctx
->Stencil
.ActiveFace
];
722 v
->value_int
= _mesa_get_stencil_ref(ctx
, ctx
->Stencil
.ActiveFace
);
724 case GL_STENCIL_BACK_REF
:
725 v
->value_int
= _mesa_get_stencil_ref(ctx
, 1);
727 case GL_STENCIL_VALUE_MASK
:
728 v
->value_int
= ctx
->Stencil
.ValueMask
[ctx
->Stencil
.ActiveFace
];
730 case GL_STENCIL_WRITEMASK
:
731 v
->value_int
= ctx
->Stencil
.WriteMask
[ctx
->Stencil
.ActiveFace
];
734 case GL_NUM_EXTENSIONS
:
735 v
->value_int
= _mesa_get_extension_count(ctx
);
738 case GL_IMPLEMENTATION_COLOR_READ_TYPE_OES
:
739 v
->value_int
= _mesa_get_color_read_type(ctx
);
741 case GL_IMPLEMENTATION_COLOR_READ_FORMAT_OES
:
742 v
->value_int
= _mesa_get_color_read_format(ctx
);
745 case GL_CURRENT_MATRIX_STACK_DEPTH_ARB
:
746 v
->value_int
= ctx
->CurrentStack
->Depth
+ 1;
748 case GL_CURRENT_MATRIX_ARB
:
749 case GL_TRANSPOSE_CURRENT_MATRIX_ARB
:
750 v
->value_matrix
= ctx
->CurrentStack
->Top
;
753 case GL_NUM_COMPRESSED_TEXTURE_FORMATS_ARB
:
754 v
->value_int
= _mesa_get_compressed_formats(ctx
, NULL
);
756 case GL_COMPRESSED_TEXTURE_FORMATS_ARB
:
758 _mesa_get_compressed_formats(ctx
, v
->value_int_n
.ints
);
759 ASSERT(v
->value_int_n
.n
<= (int) ARRAY_SIZE(v
->value_int_n
.ints
));
762 case GL_MAX_VARYING_FLOATS_ARB
:
763 v
->value_int
= ctx
->Const
.MaxVarying
* 4;
766 /* Various object names */
768 case GL_TEXTURE_BINDING_1D
:
769 case GL_TEXTURE_BINDING_2D
:
770 case GL_TEXTURE_BINDING_3D
:
771 case GL_TEXTURE_BINDING_1D_ARRAY_EXT
:
772 case GL_TEXTURE_BINDING_2D_ARRAY_EXT
:
773 case GL_TEXTURE_BINDING_CUBE_MAP_ARB
:
774 case GL_TEXTURE_BINDING_RECTANGLE_NV
:
775 case GL_TEXTURE_BINDING_EXTERNAL_OES
:
776 case GL_TEXTURE_BINDING_CUBE_MAP_ARRAY
:
777 case GL_TEXTURE_BINDING_2D_MULTISAMPLE
:
778 case GL_TEXTURE_BINDING_2D_MULTISAMPLE_ARRAY
:
779 unit
= ctx
->Texture
.CurrentUnit
;
781 ctx
->Texture
.Unit
[unit
].CurrentTex
[d
->offset
]->Name
;
784 /* GL_EXT_packed_float */
785 case GL_RGBA_SIGNED_COMPONENTS_EXT
:
787 /* Note: we only check the 0th color attachment. */
788 const struct gl_renderbuffer
*rb
=
789 ctx
->DrawBuffer
->_ColorDrawBuffers
[0];
790 if (rb
&& _mesa_is_format_signed(rb
->Format
)) {
791 /* Issue 17 of GL_EXT_packed_float: If a component (such as
792 * alpha) has zero bits, the component should not be considered
793 * signed and so the bit for the respective component should be
797 _mesa_get_format_bits(rb
->Format
, GL_RED_BITS
);
799 _mesa_get_format_bits(rb
->Format
, GL_GREEN_BITS
);
801 _mesa_get_format_bits(rb
->Format
, GL_BLUE_BITS
);
803 _mesa_get_format_bits(rb
->Format
, GL_ALPHA_BITS
);
805 _mesa_get_format_bits(rb
->Format
, GL_TEXTURE_LUMINANCE_SIZE
);
807 _mesa_get_format_bits(rb
->Format
, GL_TEXTURE_INTENSITY_SIZE
);
809 v
->value_int_4
[0] = r_bits
+ l_bits
+ i_bits
> 0;
810 v
->value_int_4
[1] = g_bits
+ l_bits
+ i_bits
> 0;
811 v
->value_int_4
[2] = b_bits
+ l_bits
+ i_bits
> 0;
812 v
->value_int_4
[3] = a_bits
+ i_bits
> 0;
818 v
->value_int_4
[3] = 0;
823 /* GL_ARB_vertex_buffer_object */
824 case GL_VERTEX_ARRAY_BUFFER_BINDING_ARB
:
825 case GL_NORMAL_ARRAY_BUFFER_BINDING_ARB
:
826 case GL_COLOR_ARRAY_BUFFER_BINDING_ARB
:
827 case GL_INDEX_ARRAY_BUFFER_BINDING_ARB
:
828 case GL_EDGE_FLAG_ARRAY_BUFFER_BINDING_ARB
:
829 case GL_SECONDARY_COLOR_ARRAY_BUFFER_BINDING_ARB
:
830 case GL_FOG_COORDINATE_ARRAY_BUFFER_BINDING_ARB
:
831 buffer_obj
= (struct gl_buffer_object
**)
832 ((char *) ctx
->Array
.VAO
+ d
->offset
);
833 v
->value_int
= (*buffer_obj
)->Name
;
835 case GL_ARRAY_BUFFER_BINDING_ARB
:
836 v
->value_int
= ctx
->Array
.ArrayBufferObj
->Name
;
838 case GL_TEXTURE_COORD_ARRAY_BUFFER_BINDING_ARB
:
840 ctx
->Array
.VAO
->VertexBinding
[VERT_ATTRIB_TEX(ctx
->Array
.ActiveTexture
)].BufferObj
->Name
;
842 case GL_ELEMENT_ARRAY_BUFFER_BINDING_ARB
:
843 v
->value_int
= ctx
->Array
.VAO
->IndexBufferObj
->Name
;
846 /* ARB_copy_buffer */
847 case GL_COPY_READ_BUFFER
:
848 v
->value_int
= ctx
->CopyReadBuffer
->Name
;
850 case GL_COPY_WRITE_BUFFER
:
851 v
->value_int
= ctx
->CopyWriteBuffer
->Name
;
854 case GL_PIXEL_PACK_BUFFER_BINDING_EXT
:
855 v
->value_int
= ctx
->Pack
.BufferObj
->Name
;
857 case GL_PIXEL_UNPACK_BUFFER_BINDING_EXT
:
858 v
->value_int
= ctx
->Unpack
.BufferObj
->Name
;
860 case GL_TRANSFORM_FEEDBACK_BUFFER_BINDING
:
861 v
->value_int
= ctx
->TransformFeedback
.CurrentBuffer
->Name
;
863 case GL_TRANSFORM_FEEDBACK_BUFFER_PAUSED
:
864 v
->value_int
= ctx
->TransformFeedback
.CurrentObject
->Paused
;
866 case GL_TRANSFORM_FEEDBACK_BUFFER_ACTIVE
:
867 v
->value_int
= ctx
->TransformFeedback
.CurrentObject
->Active
;
869 case GL_TRANSFORM_FEEDBACK_BINDING
:
870 v
->value_int
= ctx
->TransformFeedback
.CurrentObject
->Name
;
872 case GL_CURRENT_PROGRAM
:
874 ctx
->Shader
.ActiveProgram
? ctx
->Shader
.ActiveProgram
->Name
: 0;
876 case GL_READ_FRAMEBUFFER_BINDING_EXT
:
877 v
->value_int
= ctx
->ReadBuffer
->Name
;
879 case GL_RENDERBUFFER_BINDING_EXT
:
881 ctx
->CurrentRenderbuffer
? ctx
->CurrentRenderbuffer
->Name
: 0;
883 case GL_POINT_SIZE_ARRAY_BUFFER_BINDING_OES
:
884 v
->value_int
= ctx
->Array
.VAO
->VertexBinding
[VERT_ATTRIB_POINT_SIZE
].BufferObj
->Name
;
888 if (_mesa_get_clamp_fragment_color(ctx
))
889 COPY_4FV(v
->value_float_4
, ctx
->Fog
.Color
);
891 COPY_4FV(v
->value_float_4
, ctx
->Fog
.ColorUnclamped
);
893 case GL_COLOR_CLEAR_VALUE
:
894 if (_mesa_get_clamp_fragment_color(ctx
)) {
895 v
->value_float_4
[0] = CLAMP(ctx
->Color
.ClearColor
.f
[0], 0.0F
, 1.0F
);
896 v
->value_float_4
[1] = CLAMP(ctx
->Color
.ClearColor
.f
[1], 0.0F
, 1.0F
);
897 v
->value_float_4
[2] = CLAMP(ctx
->Color
.ClearColor
.f
[2], 0.0F
, 1.0F
);
898 v
->value_float_4
[3] = CLAMP(ctx
->Color
.ClearColor
.f
[3], 0.0F
, 1.0F
);
900 COPY_4FV(v
->value_float_4
, ctx
->Color
.ClearColor
.f
);
902 case GL_BLEND_COLOR_EXT
:
903 if (_mesa_get_clamp_fragment_color(ctx
))
904 COPY_4FV(v
->value_float_4
, ctx
->Color
.BlendColor
);
906 COPY_4FV(v
->value_float_4
, ctx
->Color
.BlendColorUnclamped
);
908 case GL_ALPHA_TEST_REF
:
909 if (_mesa_get_clamp_fragment_color(ctx
))
910 v
->value_float
= ctx
->Color
.AlphaRef
;
912 v
->value_float
= ctx
->Color
.AlphaRefUnclamped
;
914 case GL_MAX_VERTEX_UNIFORM_VECTORS
:
915 v
->value_int
= ctx
->Const
.Program
[MESA_SHADER_VERTEX
].MaxUniformComponents
/ 4;
918 case GL_MAX_FRAGMENT_UNIFORM_VECTORS
:
919 v
->value_int
= ctx
->Const
.Program
[MESA_SHADER_FRAGMENT
].MaxUniformComponents
/ 4;
922 /* GL_ARB_texture_buffer_object */
923 case GL_TEXTURE_BUFFER_ARB
:
924 v
->value_int
= ctx
->Texture
.BufferObject
->Name
;
926 case GL_TEXTURE_BINDING_BUFFER_ARB
:
927 unit
= ctx
->Texture
.CurrentUnit
;
929 ctx
->Texture
.Unit
[unit
].CurrentTex
[TEXTURE_BUFFER_INDEX
]->Name
;
931 case GL_TEXTURE_BUFFER_DATA_STORE_BINDING_ARB
:
933 struct gl_buffer_object
*buf
=
934 ctx
->Texture
.Unit
[ctx
->Texture
.CurrentUnit
]
935 .CurrentTex
[TEXTURE_BUFFER_INDEX
]->BufferObject
;
936 v
->value_int
= buf
? buf
->Name
: 0;
939 case GL_TEXTURE_BUFFER_FORMAT_ARB
:
940 v
->value_int
= ctx
->Texture
.Unit
[ctx
->Texture
.CurrentUnit
]
941 .CurrentTex
[TEXTURE_BUFFER_INDEX
]->BufferObjectFormat
;
944 /* GL_ARB_sampler_objects */
945 case GL_SAMPLER_BINDING
:
947 struct gl_sampler_object
*samp
=
948 ctx
->Texture
.Unit
[ctx
->Texture
.CurrentUnit
].Sampler
;
951 * The sampler object may have been deleted on another context,
952 * so we try to lookup the sampler object before returning its Name.
954 if (samp
&& _mesa_lookup_samplerobj(ctx
, samp
->Name
)) {
955 v
->value_int
= samp
->Name
;
961 /* GL_ARB_uniform_buffer_object */
962 case GL_UNIFORM_BUFFER_BINDING
:
963 v
->value_int
= ctx
->UniformBuffer
->Name
;
965 /* GL_ARB_timer_query */
967 if (ctx
->Driver
.GetTimestamp
) {
968 v
->value_int64
= ctx
->Driver
.GetTimestamp(ctx
);
971 _mesa_problem(ctx
, "driver doesn't implement GetTimestamp");
974 /* GL_ARB_shader_atomic_counters */
975 case GL_ATOMIC_COUNTER_BUFFER_BINDING
:
976 v
->value_int
= ctx
->AtomicBuffer
->Name
;
978 /* GL_ARB_draw_indirect */
979 case GL_DRAW_INDIRECT_BUFFER_BINDING
:
980 v
->value_int
= ctx
->DrawIndirectBuffer
->Name
;
986 * Check extra constraints on a struct value_desc descriptor
988 * If a struct value_desc has a non-NULL extra pointer, it means that
989 * there are a number of extra constraints to check or actions to
990 * perform. The extras is just an integer array where each integer
991 * encode different constraints or actions.
993 * \param ctx current context
994 * \param func name of calling glGet*v() function for error reporting
995 * \param d the struct value_desc that has the extra constraints
997 * \return GL_FALSE if all of the constraints were not satisfied,
1001 check_extra(struct gl_context
*ctx
, const char *func
, const struct value_desc
*d
)
1003 const GLuint version
= ctx
->Version
;
1004 GLboolean api_check
= GL_FALSE
;
1005 GLboolean api_found
= GL_FALSE
;
1008 for (e
= d
->extra
; *e
!= EXTRA_END
; e
++) {
1010 case EXTRA_VERSION_30
:
1011 api_check
= GL_TRUE
;
1013 api_found
= GL_TRUE
;
1015 case EXTRA_VERSION_31
:
1016 api_check
= GL_TRUE
;
1018 api_found
= GL_TRUE
;
1020 case EXTRA_VERSION_32
:
1021 api_check
= GL_TRUE
;
1023 api_found
= GL_TRUE
;
1025 case EXTRA_NEW_FRAG_CLAMP
:
1026 if (ctx
->NewState
& (_NEW_BUFFERS
| _NEW_FRAG_CLAMP
))
1027 _mesa_update_state(ctx
);
1030 api_check
= GL_TRUE
;
1031 if (ctx
->API
== API_OPENGLES2
)
1032 api_found
= GL_TRUE
;
1035 api_check
= GL_TRUE
;
1036 if (_mesa_is_gles3(ctx
))
1037 api_found
= GL_TRUE
;
1040 api_check
= GL_TRUE
;
1041 if (_mesa_is_desktop_gl(ctx
))
1042 api_found
= GL_TRUE
;
1044 case EXTRA_API_GL_CORE
:
1045 api_check
= GL_TRUE
;
1046 if (ctx
->API
== API_OPENGL_CORE
)
1047 api_found
= GL_TRUE
;
1049 case EXTRA_NEW_BUFFERS
:
1050 if (ctx
->NewState
& _NEW_BUFFERS
)
1051 _mesa_update_state(ctx
);
1053 case EXTRA_FLUSH_CURRENT
:
1054 FLUSH_CURRENT(ctx
, 0);
1056 case EXTRA_VALID_DRAW_BUFFER
:
1057 if (d
->pname
- GL_DRAW_BUFFER0_ARB
>= ctx
->Const
.MaxDrawBuffers
) {
1058 _mesa_error(ctx
, GL_INVALID_OPERATION
, "%s(draw buffer %u)",
1059 func
, d
->pname
- GL_DRAW_BUFFER0_ARB
);
1063 case EXTRA_VALID_TEXTURE_UNIT
:
1064 if (ctx
->Texture
.CurrentUnit
>= ctx
->Const
.MaxTextureCoordUnits
) {
1065 _mesa_error(ctx
, GL_INVALID_OPERATION
, "%s(texture %u)",
1066 func
, ctx
->Texture
.CurrentUnit
);
1070 case EXTRA_VALID_CLIP_DISTANCE
:
1071 if (d
->pname
- GL_CLIP_DISTANCE0
>= ctx
->Const
.MaxClipPlanes
) {
1072 _mesa_error(ctx
, GL_INVALID_ENUM
, "%s(clip distance %u)",
1073 func
, d
->pname
- GL_CLIP_DISTANCE0
);
1077 case EXTRA_GLSL_130
:
1078 api_check
= GL_TRUE
;
1079 if (ctx
->Const
.GLSLVersion
>= 130)
1080 api_found
= GL_TRUE
;
1082 case EXTRA_EXT_UBO_GS4
:
1083 api_check
= GL_TRUE
;
1084 api_found
= (ctx
->Extensions
.ARB_uniform_buffer_object
&&
1085 _mesa_has_geometry_shaders(ctx
));
1087 case EXTRA_EXT_ATOMICS_GS4
:
1088 api_check
= GL_TRUE
;
1089 api_found
= (ctx
->Extensions
.ARB_shader_atomic_counters
&&
1090 _mesa_has_geometry_shaders(ctx
));
1092 case EXTRA_EXT_SHADER_IMAGE_GS4
:
1093 api_check
= GL_TRUE
;
1094 api_found
= (ctx
->Extensions
.ARB_shader_image_load_store
&&
1095 _mesa_has_geometry_shaders(ctx
));
1099 default: /* *e is a offset into the extension struct */
1100 api_check
= GL_TRUE
;
1101 if (*(GLboolean
*) ((char *) &ctx
->Extensions
+ *e
))
1102 api_found
= GL_TRUE
;
1107 if (api_check
&& !api_found
) {
1108 _mesa_error(ctx
, GL_INVALID_ENUM
, "%s(pname=%s)", func
,
1109 _mesa_lookup_enum_by_nr(d
->pname
));
1116 static const struct value_desc error_value
=
1117 { 0, 0, TYPE_INVALID
, NO_OFFSET
, NO_EXTRA
};
1120 * Find the struct value_desc corresponding to the enum 'pname'.
1122 * We hash the enum value to get an index into the 'table' array,
1123 * which holds the index in the 'values' array of struct value_desc.
1124 * Once we've found the entry, we do the extra checks, if any, then
1125 * look up the value and return a pointer to it.
1127 * If the value has to be computed (for example, it's the result of a
1128 * function call or we need to add 1 to it), we use the tmp 'v' to
1131 * \param func name of glGet*v() func for error reporting
1132 * \param pname the enum value we're looking up
1133 * \param p is were we return the pointer to the value
1134 * \param v a tmp union value variable in the calling glGet*v() function
1136 * \return the struct value_desc corresponding to the enum or a struct
1137 * value_desc of TYPE_INVALID if not found. This lets the calling
1138 * glGet*v() function jump right into a switch statement and
1139 * handle errors there instead of having to check for NULL.
1141 static const struct value_desc
*
1142 find_value(const char *func
, GLenum pname
, void **p
, union value
*v
)
1144 GET_CURRENT_CONTEXT(ctx
);
1145 struct gl_texture_unit
*unit
;
1147 const struct value_desc
*d
;
1151 /* We index into the table_set[] list of per-API hash tables using the API's
1152 * value in the gl_api enum. Since GLES 3 doesn't have an API_OPENGL* enum
1153 * value since it's compatible with GLES2 its entry in table_set[] is at the
1156 STATIC_ASSERT(Elements(table_set
) == API_OPENGL_LAST
+ 2);
1157 if (_mesa_is_gles3(ctx
)) {
1158 api
= API_OPENGL_LAST
+ 1;
1160 mask
= Elements(table(api
)) - 1;
1161 hash
= (pname
* prime_factor
);
1163 int idx
= table(api
)[hash
& mask
];
1165 /* If the enum isn't valid, the hash walk ends with index 0,
1166 * pointing to the first entry of values[] which doesn't hold
1167 * any valid enum. */
1168 if (unlikely(idx
== 0)) {
1169 _mesa_error(ctx
, GL_INVALID_ENUM
, "%s(pname=%s)", func
,
1170 _mesa_lookup_enum_by_nr(pname
));
1171 return &error_value
;
1175 if (likely(d
->pname
== pname
))
1181 if (unlikely(d
->extra
&& !check_extra(ctx
, func
, d
)))
1182 return &error_value
;
1184 switch (d
->location
) {
1186 *p
= ((char *) ctx
->DrawBuffer
+ d
->offset
);
1189 *p
= ((char *) ctx
+ d
->offset
);
1192 *p
= ((char *) ctx
->Array
.VAO
+ d
->offset
);
1195 unit
= &ctx
->Texture
.Unit
[ctx
->Texture
.CurrentUnit
];
1196 *p
= ((char *) unit
+ d
->offset
);
1199 find_custom_value(ctx
, d
, v
);
1207 /* silence warning */
1208 return &error_value
;
1211 static const int transpose
[] = {
1219 _mesa_GetBooleanv(GLenum pname
, GLboolean
*params
)
1221 const struct value_desc
*d
;
1227 d
= find_value("glGetBooleanv", pname
, &p
, &v
);
1232 params
[0] = INT_TO_BOOLEAN(d
->offset
);
1237 params
[3] = FLOAT_TO_BOOLEAN(((GLfloat
*) p
)[3]);
1240 params
[2] = FLOAT_TO_BOOLEAN(((GLfloat
*) p
)[2]);
1243 params
[1] = FLOAT_TO_BOOLEAN(((GLfloat
*) p
)[1]);
1246 params
[0] = FLOAT_TO_BOOLEAN(((GLfloat
*) p
)[0]);
1249 case TYPE_DOUBLEN_2
:
1250 params
[1] = FLOAT_TO_BOOLEAN(((GLdouble
*) p
)[1]);
1252 params
[0] = FLOAT_TO_BOOLEAN(((GLdouble
*) p
)[0]);
1256 params
[3] = INT_TO_BOOLEAN(((GLint
*) p
)[3]);
1258 params
[2] = INT_TO_BOOLEAN(((GLint
*) p
)[2]);
1261 params
[1] = INT_TO_BOOLEAN(((GLint
*) p
)[1]);
1264 params
[0] = INT_TO_BOOLEAN(((GLint
*) p
)[0]);
1268 for (i
= 0; i
< v
.value_int_n
.n
; i
++)
1269 params
[i
] = INT_TO_BOOLEAN(v
.value_int_n
.ints
[i
]);
1273 params
[0] = INT64_TO_BOOLEAN(((GLint64
*) p
)[0]);
1277 params
[0] = ((GLboolean
*) p
)[0];
1281 m
= *(GLmatrix
**) p
;
1282 for (i
= 0; i
< 16; i
++)
1283 params
[i
] = FLOAT_TO_BOOLEAN(m
->m
[i
]);
1287 m
= *(GLmatrix
**) p
;
1288 for (i
= 0; i
< 16; i
++)
1289 params
[i
] = FLOAT_TO_BOOLEAN(m
->m
[transpose
[i
]]);
1300 shift
= d
->type
- TYPE_BIT_0
;
1301 params
[0] = (*(GLbitfield
*) p
>> shift
) & 1;
1307 _mesa_GetFloatv(GLenum pname
, GLfloat
*params
)
1309 const struct value_desc
*d
;
1315 d
= find_value("glGetFloatv", pname
, &p
, &v
);
1320 params
[0] = (GLfloat
) d
->offset
;
1325 params
[3] = ((GLfloat
*) p
)[3];
1328 params
[2] = ((GLfloat
*) p
)[2];
1331 params
[1] = ((GLfloat
*) p
)[1];
1334 params
[0] = ((GLfloat
*) p
)[0];
1337 case TYPE_DOUBLEN_2
:
1338 params
[1] = (GLfloat
) (((GLdouble
*) p
)[1]);
1340 params
[0] = (GLfloat
) (((GLdouble
*) p
)[0]);
1344 params
[3] = (GLfloat
) (((GLint
*) p
)[3]);
1346 params
[2] = (GLfloat
) (((GLint
*) p
)[2]);
1349 params
[1] = (GLfloat
) (((GLint
*) p
)[1]);
1352 params
[0] = (GLfloat
) (((GLint
*) p
)[0]);
1356 for (i
= 0; i
< v
.value_int_n
.n
; i
++)
1357 params
[i
] = INT_TO_FLOAT(v
.value_int_n
.ints
[i
]);
1361 params
[0] = (GLfloat
) (((GLint64
*) p
)[0]);
1365 params
[0] = BOOLEAN_TO_FLOAT(*(GLboolean
*) p
);
1369 m
= *(GLmatrix
**) p
;
1370 for (i
= 0; i
< 16; i
++)
1371 params
[i
] = m
->m
[i
];
1375 m
= *(GLmatrix
**) p
;
1376 for (i
= 0; i
< 16; i
++)
1377 params
[i
] = m
->m
[transpose
[i
]];
1388 shift
= d
->type
- TYPE_BIT_0
;
1389 params
[0] = BOOLEAN_TO_FLOAT((*(GLbitfield
*) p
>> shift
) & 1);
1395 _mesa_GetIntegerv(GLenum pname
, GLint
*params
)
1397 const struct value_desc
*d
;
1403 d
= find_value("glGetIntegerv", pname
, &p
, &v
);
1408 params
[0] = d
->offset
;
1412 params
[3] = IROUND(((GLfloat
*) p
)[3]);
1414 params
[2] = IROUND(((GLfloat
*) p
)[2]);
1416 params
[1] = IROUND(((GLfloat
*) p
)[1]);
1418 params
[0] = IROUND(((GLfloat
*) p
)[0]);
1422 params
[3] = FLOAT_TO_INT(((GLfloat
*) p
)[3]);
1424 params
[2] = FLOAT_TO_INT(((GLfloat
*) p
)[2]);
1426 params
[1] = FLOAT_TO_INT(((GLfloat
*) p
)[1]);
1428 params
[0] = FLOAT_TO_INT(((GLfloat
*) p
)[0]);
1431 case TYPE_DOUBLEN_2
:
1432 params
[1] = FLOAT_TO_INT(((GLdouble
*) p
)[1]);
1434 params
[0] = FLOAT_TO_INT(((GLdouble
*) p
)[0]);
1438 params
[3] = ((GLint
*) p
)[3];
1440 params
[2] = ((GLint
*) p
)[2];
1443 params
[1] = ((GLint
*) p
)[1];
1446 params
[0] = ((GLint
*) p
)[0];
1450 for (i
= 0; i
< v
.value_int_n
.n
; i
++)
1451 params
[i
] = v
.value_int_n
.ints
[i
];
1455 params
[0] = INT64_TO_INT(((GLint64
*) p
)[0]);
1459 params
[0] = BOOLEAN_TO_INT(*(GLboolean
*) p
);
1463 m
= *(GLmatrix
**) p
;
1464 for (i
= 0; i
< 16; i
++)
1465 params
[i
] = FLOAT_TO_INT(m
->m
[i
]);
1469 m
= *(GLmatrix
**) p
;
1470 for (i
= 0; i
< 16; i
++)
1471 params
[i
] = FLOAT_TO_INT(m
->m
[transpose
[i
]]);
1482 shift
= d
->type
- TYPE_BIT_0
;
1483 params
[0] = (*(GLbitfield
*) p
>> shift
) & 1;
1489 _mesa_GetInteger64v(GLenum pname
, GLint64
*params
)
1491 const struct value_desc
*d
;
1497 d
= find_value("glGetInteger64v", pname
, &p
, &v
);
1502 params
[0] = d
->offset
;
1506 params
[3] = IROUND64(((GLfloat
*) p
)[3]);
1508 params
[2] = IROUND64(((GLfloat
*) p
)[2]);
1510 params
[1] = IROUND64(((GLfloat
*) p
)[1]);
1512 params
[0] = IROUND64(((GLfloat
*) p
)[0]);
1516 params
[3] = FLOAT_TO_INT64(((GLfloat
*) p
)[3]);
1518 params
[2] = FLOAT_TO_INT64(((GLfloat
*) p
)[2]);
1520 params
[1] = FLOAT_TO_INT64(((GLfloat
*) p
)[1]);
1522 params
[0] = FLOAT_TO_INT64(((GLfloat
*) p
)[0]);
1525 case TYPE_DOUBLEN_2
:
1526 params
[1] = FLOAT_TO_INT64(((GLdouble
*) p
)[1]);
1528 params
[0] = FLOAT_TO_INT64(((GLdouble
*) p
)[0]);
1532 params
[3] = ((GLint
*) p
)[3];
1534 params
[2] = ((GLint
*) p
)[2];
1537 params
[1] = ((GLint
*) p
)[1];
1540 params
[0] = ((GLint
*) p
)[0];
1544 for (i
= 0; i
< v
.value_int_n
.n
; i
++)
1545 params
[i
] = INT_TO_BOOLEAN(v
.value_int_n
.ints
[i
]);
1549 params
[0] = ((GLint64
*) p
)[0];
1553 params
[0] = ((GLboolean
*) p
)[0];
1557 m
= *(GLmatrix
**) p
;
1558 for (i
= 0; i
< 16; i
++)
1559 params
[i
] = FLOAT_TO_INT64(m
->m
[i
]);
1563 m
= *(GLmatrix
**) p
;
1564 for (i
= 0; i
< 16; i
++)
1565 params
[i
] = FLOAT_TO_INT64(m
->m
[transpose
[i
]]);
1576 shift
= d
->type
- TYPE_BIT_0
;
1577 params
[0] = (*(GLbitfield
*) p
>> shift
) & 1;
1583 _mesa_GetDoublev(GLenum pname
, GLdouble
*params
)
1585 const struct value_desc
*d
;
1591 d
= find_value("glGetDoublev", pname
, &p
, &v
);
1596 params
[0] = d
->offset
;
1601 params
[3] = ((GLfloat
*) p
)[3];
1604 params
[2] = ((GLfloat
*) p
)[2];
1607 params
[1] = ((GLfloat
*) p
)[1];
1610 params
[0] = ((GLfloat
*) p
)[0];
1613 case TYPE_DOUBLEN_2
:
1614 params
[1] = ((GLdouble
*) p
)[1];
1616 params
[0] = ((GLdouble
*) p
)[0];
1620 params
[3] = ((GLint
*) p
)[3];
1622 params
[2] = ((GLint
*) p
)[2];
1625 params
[1] = ((GLint
*) p
)[1];
1628 params
[0] = ((GLint
*) p
)[0];
1632 for (i
= 0; i
< v
.value_int_n
.n
; i
++)
1633 params
[i
] = v
.value_int_n
.ints
[i
];
1637 params
[0] = (GLdouble
) (((GLint64
*) p
)[0]);
1641 params
[0] = *(GLboolean
*) p
;
1645 m
= *(GLmatrix
**) p
;
1646 for (i
= 0; i
< 16; i
++)
1647 params
[i
] = m
->m
[i
];
1651 m
= *(GLmatrix
**) p
;
1652 for (i
= 0; i
< 16; i
++)
1653 params
[i
] = m
->m
[transpose
[i
]];
1664 shift
= d
->type
- TYPE_BIT_0
;
1665 params
[0] = (*(GLbitfield
*) p
>> shift
) & 1;
1670 static enum value_type
1671 find_value_indexed(const char *func
, GLenum pname
, GLuint index
, union value
*v
)
1673 GET_CURRENT_CONTEXT(ctx
);
1678 if (index
>= ctx
->Const
.MaxDrawBuffers
)
1680 if (!ctx
->Extensions
.EXT_draw_buffers2
)
1682 v
->value_int
= (ctx
->Color
.BlendEnabled
>> index
) & 1;
1687 case GL_BLEND_SRC_RGB
:
1688 if (index
>= ctx
->Const
.MaxDrawBuffers
)
1690 if (!ctx
->Extensions
.ARB_draw_buffers_blend
)
1692 v
->value_int
= ctx
->Color
.Blend
[index
].SrcRGB
;
1694 case GL_BLEND_SRC_ALPHA
:
1695 if (index
>= ctx
->Const
.MaxDrawBuffers
)
1697 if (!ctx
->Extensions
.ARB_draw_buffers_blend
)
1699 v
->value_int
= ctx
->Color
.Blend
[index
].SrcA
;
1703 case GL_BLEND_DST_RGB
:
1704 if (index
>= ctx
->Const
.MaxDrawBuffers
)
1706 if (!ctx
->Extensions
.ARB_draw_buffers_blend
)
1708 v
->value_int
= ctx
->Color
.Blend
[index
].DstRGB
;
1710 case GL_BLEND_DST_ALPHA
:
1711 if (index
>= ctx
->Const
.MaxDrawBuffers
)
1713 if (!ctx
->Extensions
.ARB_draw_buffers_blend
)
1715 v
->value_int
= ctx
->Color
.Blend
[index
].DstA
;
1717 case GL_BLEND_EQUATION_RGB
:
1718 if (index
>= ctx
->Const
.MaxDrawBuffers
)
1720 if (!ctx
->Extensions
.ARB_draw_buffers_blend
)
1722 v
->value_int
= ctx
->Color
.Blend
[index
].EquationRGB
;
1724 case GL_BLEND_EQUATION_ALPHA
:
1725 if (index
>= ctx
->Const
.MaxDrawBuffers
)
1727 if (!ctx
->Extensions
.ARB_draw_buffers_blend
)
1729 v
->value_int
= ctx
->Color
.Blend
[index
].EquationA
;
1732 case GL_COLOR_WRITEMASK
:
1733 if (index
>= ctx
->Const
.MaxDrawBuffers
)
1735 if (!ctx
->Extensions
.EXT_draw_buffers2
)
1737 v
->value_int_4
[0] = ctx
->Color
.ColorMask
[index
][RCOMP
] ? 1 : 0;
1738 v
->value_int_4
[1] = ctx
->Color
.ColorMask
[index
][GCOMP
] ? 1 : 0;
1739 v
->value_int_4
[2] = ctx
->Color
.ColorMask
[index
][BCOMP
] ? 1 : 0;
1740 v
->value_int_4
[3] = ctx
->Color
.ColorMask
[index
][ACOMP
] ? 1 : 0;
1743 case GL_SCISSOR_BOX
:
1744 if (index
>= ctx
->Const
.MaxViewports
)
1746 v
->value_int_4
[0] = ctx
->Scissor
.ScissorArray
[index
].X
;
1747 v
->value_int_4
[1] = ctx
->Scissor
.ScissorArray
[index
].Y
;
1748 v
->value_int_4
[2] = ctx
->Scissor
.ScissorArray
[index
].Width
;
1749 v
->value_int_4
[3] = ctx
->Scissor
.ScissorArray
[index
].Height
;
1753 if (index
>= ctx
->Const
.MaxViewports
)
1755 v
->value_float_4
[0] = ctx
->ViewportArray
[index
].X
;
1756 v
->value_float_4
[1] = ctx
->ViewportArray
[index
].Y
;
1757 v
->value_float_4
[2] = ctx
->ViewportArray
[index
].Width
;
1758 v
->value_float_4
[3] = ctx
->ViewportArray
[index
].Height
;
1759 return TYPE_FLOAT_4
;
1761 case GL_DEPTH_RANGE
:
1762 if (index
>= ctx
->Const
.MaxViewports
)
1764 v
->value_double_2
[0] = ctx
->ViewportArray
[index
].Near
;
1765 v
->value_double_2
[1] = ctx
->ViewportArray
[index
].Far
;
1766 return TYPE_DOUBLEN_2
;
1768 case GL_TRANSFORM_FEEDBACK_BUFFER_START
:
1769 if (index
>= ctx
->Const
.MaxTransformFeedbackBuffers
)
1771 if (!ctx
->Extensions
.EXT_transform_feedback
)
1773 v
->value_int64
= ctx
->TransformFeedback
.CurrentObject
->Offset
[index
];
1776 case GL_TRANSFORM_FEEDBACK_BUFFER_SIZE
:
1777 if (index
>= ctx
->Const
.MaxTransformFeedbackBuffers
)
1779 if (!ctx
->Extensions
.EXT_transform_feedback
)
1782 = ctx
->TransformFeedback
.CurrentObject
->RequestedSize
[index
];
1785 case GL_TRANSFORM_FEEDBACK_BUFFER_BINDING
:
1786 if (index
>= ctx
->Const
.MaxTransformFeedbackBuffers
)
1788 if (!ctx
->Extensions
.EXT_transform_feedback
)
1790 v
->value_int
= ctx
->TransformFeedback
.CurrentObject
->BufferNames
[index
];
1793 case GL_UNIFORM_BUFFER_BINDING
:
1794 if (index
>= ctx
->Const
.MaxUniformBufferBindings
)
1796 if (!ctx
->Extensions
.ARB_uniform_buffer_object
)
1798 v
->value_int
= ctx
->UniformBufferBindings
[index
].BufferObject
->Name
;
1801 case GL_UNIFORM_BUFFER_START
:
1802 if (index
>= ctx
->Const
.MaxUniformBufferBindings
)
1804 if (!ctx
->Extensions
.ARB_uniform_buffer_object
)
1806 v
->value_int
= ctx
->UniformBufferBindings
[index
].Offset
;
1809 case GL_UNIFORM_BUFFER_SIZE
:
1810 if (index
>= ctx
->Const
.MaxUniformBufferBindings
)
1812 if (!ctx
->Extensions
.ARB_uniform_buffer_object
)
1814 v
->value_int
= ctx
->UniformBufferBindings
[index
].Size
;
1817 /* ARB_texture_multisample / GL3.2 */
1818 case GL_SAMPLE_MASK_VALUE
:
1821 if (!ctx
->Extensions
.ARB_texture_multisample
)
1823 v
->value_int
= ctx
->Multisample
.SampleMaskValue
;
1826 case GL_ATOMIC_COUNTER_BUFFER_BINDING
:
1827 if (!ctx
->Extensions
.ARB_shader_atomic_counters
)
1829 if (index
>= ctx
->Const
.MaxAtomicBufferBindings
)
1831 v
->value_int
= ctx
->AtomicBufferBindings
[index
].BufferObject
->Name
;
1834 case GL_ATOMIC_COUNTER_BUFFER_START
:
1835 if (!ctx
->Extensions
.ARB_shader_atomic_counters
)
1837 if (index
>= ctx
->Const
.MaxAtomicBufferBindings
)
1839 v
->value_int64
= ctx
->AtomicBufferBindings
[index
].Offset
;
1842 case GL_ATOMIC_COUNTER_BUFFER_SIZE
:
1843 if (!ctx
->Extensions
.ARB_shader_atomic_counters
)
1845 if (index
>= ctx
->Const
.MaxAtomicBufferBindings
)
1847 v
->value_int64
= ctx
->AtomicBufferBindings
[index
].Size
;
1850 case GL_VERTEX_BINDING_DIVISOR
:
1851 if (!_mesa_is_desktop_gl(ctx
) || !ctx
->Extensions
.ARB_instanced_arrays
)
1853 if (index
>= ctx
->Const
.Program
[MESA_SHADER_VERTEX
].MaxAttribs
)
1855 v
->value_int
= ctx
->Array
.VAO
->VertexBinding
[VERT_ATTRIB_GENERIC(index
)].InstanceDivisor
;
1858 case GL_VERTEX_BINDING_OFFSET
:
1859 if (!_mesa_is_desktop_gl(ctx
))
1861 if (index
>= ctx
->Const
.Program
[MESA_SHADER_VERTEX
].MaxAttribs
)
1863 v
->value_int
= ctx
->Array
.VAO
->VertexBinding
[VERT_ATTRIB_GENERIC(index
)].Offset
;
1866 case GL_VERTEX_BINDING_STRIDE
:
1867 if (!_mesa_is_desktop_gl(ctx
))
1869 if (index
>= ctx
->Const
.Program
[MESA_SHADER_VERTEX
].MaxAttribs
)
1871 v
->value_int
= ctx
->Array
.VAO
->VertexBinding
[VERT_ATTRIB_GENERIC(index
)].Stride
;
1873 /* ARB_shader_image_load_store */
1874 case GL_IMAGE_BINDING_NAME
: {
1875 struct gl_texture_object
*t
;
1877 if (!ctx
->Extensions
.ARB_shader_image_load_store
)
1879 if (index
>= ctx
->Const
.MaxImageUnits
)
1882 t
= ctx
->ImageUnits
[index
].TexObj
;
1883 v
->value_int
= (t
? t
->Name
: 0);
1887 case GL_IMAGE_BINDING_LEVEL
:
1888 if (!ctx
->Extensions
.ARB_shader_image_load_store
)
1890 if (index
>= ctx
->Const
.MaxImageUnits
)
1893 v
->value_int
= ctx
->ImageUnits
[index
].Level
;
1896 case GL_IMAGE_BINDING_LAYERED
:
1897 if (!ctx
->Extensions
.ARB_shader_image_load_store
)
1899 if (index
>= ctx
->Const
.MaxImageUnits
)
1902 v
->value_int
= ctx
->ImageUnits
[index
].Layered
;
1905 case GL_IMAGE_BINDING_LAYER
:
1906 if (!ctx
->Extensions
.ARB_shader_image_load_store
)
1908 if (index
>= ctx
->Const
.MaxImageUnits
)
1911 v
->value_int
= ctx
->ImageUnits
[index
].Layer
;
1914 case GL_IMAGE_BINDING_ACCESS
:
1915 if (!ctx
->Extensions
.ARB_shader_image_load_store
)
1917 if (index
>= ctx
->Const
.MaxImageUnits
)
1920 v
->value_int
= ctx
->ImageUnits
[index
].Access
;
1923 case GL_IMAGE_BINDING_FORMAT
:
1924 if (!ctx
->Extensions
.ARB_shader_image_load_store
)
1926 if (index
>= ctx
->Const
.MaxImageUnits
)
1929 v
->value_int
= ctx
->ImageUnits
[index
].Format
;
1932 case GL_MAX_COMPUTE_WORK_GROUP_SIZE
:
1933 if (!_mesa_is_desktop_gl(ctx
) || !ctx
->Extensions
.ARB_compute_shader
)
1937 v
->value_int
= ctx
->Const
.MaxComputeWorkGroupSize
[index
];
1942 _mesa_error(ctx
, GL_INVALID_ENUM
, "%s(pname=%s)", func
,
1943 _mesa_lookup_enum_by_nr(pname
));
1944 return TYPE_INVALID
;
1946 _mesa_error(ctx
, GL_INVALID_VALUE
, "%s(pname=%s)", func
,
1947 _mesa_lookup_enum_by_nr(pname
));
1948 return TYPE_INVALID
;
1952 _mesa_GetBooleani_v( GLenum pname
, GLuint index
, GLboolean
*params
)
1955 enum value_type type
=
1956 find_value_indexed("glGetBooleani_v", pname
, index
, &v
);
1960 params
[0] = INT_TO_BOOLEAN(v
.value_int
);
1963 params
[0] = INT_TO_BOOLEAN(v
.value_int_4
[0]);
1964 params
[1] = INT_TO_BOOLEAN(v
.value_int_4
[1]);
1965 params
[2] = INT_TO_BOOLEAN(v
.value_int_4
[2]);
1966 params
[3] = INT_TO_BOOLEAN(v
.value_int_4
[3]);
1969 params
[0] = INT64_TO_BOOLEAN(v
.value_int
);
1972 ; /* nothing - GL error was recorded */
1977 _mesa_GetIntegeri_v( GLenum pname
, GLuint index
, GLint
*params
)
1980 enum value_type type
=
1981 find_value_indexed("glGetIntegeri_v", pname
, index
, &v
);
1986 params
[3] = IROUND(v
.value_float_4
[3]);
1989 params
[2] = IROUND(v
.value_float_4
[2]);
1992 params
[1] = IROUND(v
.value_float_4
[1]);
1995 params
[0] = IROUND(v
.value_float_4
[0]);
1998 case TYPE_DOUBLEN_2
:
1999 params
[1] = IROUND(v
.value_double_2
[1]);
2001 params
[0] = IROUND(v
.value_double_2
[0]);
2005 params
[0] = v
.value_int
;
2008 params
[0] = v
.value_int_4
[0];
2009 params
[1] = v
.value_int_4
[1];
2010 params
[2] = v
.value_int_4
[2];
2011 params
[3] = v
.value_int_4
[3];
2014 params
[0] = INT64_TO_INT(v
.value_int
);
2017 ; /* nothing - GL error was recorded */
2022 _mesa_GetInteger64i_v( GLenum pname
, GLuint index
, GLint64
*params
)
2025 enum value_type type
=
2026 find_value_indexed("glGetInteger64i_v", pname
, index
, &v
);
2030 params
[0] = v
.value_int
;
2033 params
[0] = v
.value_int_4
[0];
2034 params
[1] = v
.value_int_4
[1];
2035 params
[2] = v
.value_int_4
[2];
2036 params
[3] = v
.value_int_4
[3];
2039 params
[0] = v
.value_int
;
2042 ; /* nothing - GL error was recorded */
2047 _mesa_GetFloati_v(GLenum pname
, GLuint index
, GLfloat
*params
)
2052 enum value_type type
=
2053 find_value_indexed("glGetFloati_v", pname
, index
, &v
);
2058 params
[3] = v
.value_float_4
[3];
2061 params
[2] = v
.value_float_4
[2];
2064 params
[1] = v
.value_float_4
[1];
2067 params
[0] = v
.value_float_4
[0];
2070 case TYPE_DOUBLEN_2
:
2071 params
[1] = (GLfloat
) v
.value_double_2
[1];
2073 params
[0] = (GLfloat
) v
.value_double_2
[0];
2077 params
[3] = (GLfloat
) v
.value_int_4
[3];
2079 params
[2] = (GLfloat
) v
.value_int_4
[2];
2082 params
[1] = (GLfloat
) v
.value_int_4
[1];
2085 params
[0] = (GLfloat
) v
.value_int_4
[0];
2089 for (i
= 0; i
< v
.value_int_n
.n
; i
++)
2090 params
[i
] = INT_TO_FLOAT(v
.value_int_n
.ints
[i
]);
2094 params
[0] = (GLfloat
) v
.value_int64
;
2098 params
[0] = BOOLEAN_TO_FLOAT(v
.value_bool
);
2102 m
= *(GLmatrix
**) &v
;
2103 for (i
= 0; i
< 16; i
++)
2104 params
[i
] = m
->m
[i
];
2108 m
= *(GLmatrix
**) &v
;
2109 for (i
= 0; i
< 16; i
++)
2110 params
[i
] = m
->m
[transpose
[i
]];
2119 _mesa_GetDoublei_v(GLenum pname
, GLuint index
, GLdouble
*params
)
2124 enum value_type type
=
2125 find_value_indexed("glGetDoublei_v", pname
, index
, &v
);
2130 params
[3] = (GLdouble
) v
.value_float_4
[3];
2133 params
[2] = (GLdouble
) v
.value_float_4
[2];
2136 params
[1] = (GLdouble
) v
.value_float_4
[1];
2139 params
[0] = (GLdouble
) v
.value_float_4
[0];
2142 case TYPE_DOUBLEN_2
:
2143 params
[1] = v
.value_double_2
[1];
2145 params
[0] = v
.value_double_2
[0];
2149 params
[3] = (GLdouble
) v
.value_int_4
[3];
2151 params
[2] = (GLdouble
) v
.value_int_4
[2];
2154 params
[1] = (GLdouble
) v
.value_int_4
[1];
2157 params
[0] = (GLdouble
) v
.value_int_4
[0];
2161 for (i
= 0; i
< v
.value_int_n
.n
; i
++)
2162 params
[i
] = (GLdouble
) INT_TO_FLOAT(v
.value_int_n
.ints
[i
]);
2166 params
[0] = (GLdouble
) v
.value_int64
;
2170 params
[0] = (GLdouble
) BOOLEAN_TO_FLOAT(v
.value_bool
);
2174 m
= *(GLmatrix
**) &v
;
2175 for (i
= 0; i
< 16; i
++)
2176 params
[i
] = (GLdouble
) m
->m
[i
];
2180 m
= *(GLmatrix
**) &v
;
2181 for (i
= 0; i
< 16; i
++)
2182 params
[i
] = (GLdouble
) m
->m
[transpose
[i
]];
2191 _mesa_GetFixedv(GLenum pname
, GLfixed
*params
)
2193 const struct value_desc
*d
;
2199 d
= find_value("glGetDoublev", pname
, &p
, &v
);
2204 params
[0] = INT_TO_FIXED(d
->offset
);
2209 params
[3] = FLOAT_TO_FIXED(((GLfloat
*) p
)[3]);
2212 params
[2] = FLOAT_TO_FIXED(((GLfloat
*) p
)[2]);
2215 params
[1] = FLOAT_TO_FIXED(((GLfloat
*) p
)[1]);
2218 params
[0] = FLOAT_TO_FIXED(((GLfloat
*) p
)[0]);
2221 case TYPE_DOUBLEN_2
:
2222 params
[1] = FLOAT_TO_FIXED(((GLdouble
*) p
)[1]);
2224 params
[0] = FLOAT_TO_FIXED(((GLdouble
*) p
)[0]);
2228 params
[3] = INT_TO_FIXED(((GLint
*) p
)[3]);
2230 params
[2] = INT_TO_FIXED(((GLint
*) p
)[2]);
2233 params
[1] = INT_TO_FIXED(((GLint
*) p
)[1]);
2236 params
[0] = INT_TO_FIXED(((GLint
*) p
)[0]);
2240 for (i
= 0; i
< v
.value_int_n
.n
; i
++)
2241 params
[i
] = INT_TO_FIXED(v
.value_int_n
.ints
[i
]);
2245 params
[0] = ((GLint64
*) p
)[0];
2249 params
[0] = BOOLEAN_TO_FIXED(((GLboolean
*) p
)[0]);
2253 m
= *(GLmatrix
**) p
;
2254 for (i
= 0; i
< 16; i
++)
2255 params
[i
] = FLOAT_TO_FIXED(m
->m
[i
]);
2259 m
= *(GLmatrix
**) p
;
2260 for (i
= 0; i
< 16; i
++)
2261 params
[i
] = FLOAT_TO_FIXED(m
->m
[transpose
[i
]]);
2272 shift
= d
->type
- TYPE_BIT_0
;
2273 params
[0] = BOOLEAN_TO_FIXED((*(GLbitfield
*) p
>> shift
) & 1);