projects / mesa.git / blob
? search:


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