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_MATRIX,
 117    TYPE_MATRIX_T,
 118    TYPE_CONST
 119 };
 120
 121 enum value_location {
 122    LOC_BUFFER,
 123    LOC_CONTEXT,
 124    LOC_ARRAY,
 125    LOC_TEXUNIT,
 126    LOC_CUSTOM
 127 };
 128
 129 enum value_extra {
 130    EXTRA_END = 0x8000,
 131    EXTRA_VERSION_30,
 132    EXTRA_VERSION_31,
 133    EXTRA_VERSION_32,
 134    EXTRA_API_GL,
 135    EXTRA_API_GL_CORE,
 136    EXTRA_API_ES2,
 137    EXTRA_API_ES3,
 138    EXTRA_NEW_BUFFERS,
 139    EXTRA_NEW_FRAG_CLAMP,
 140    EXTRA_VALID_DRAW_BUFFER,
 141    EXTRA_VALID_TEXTURE_UNIT,
 142    EXTRA_VALID_CLIP_DISTANCE,
 143    EXTRA_FLUSH_CURRENT,
 144    EXTRA_GLSL_130,
 145    EXTRA_EXT_UBO_GS4,
 146 };
 147
 148 #define NO_EXTRA NULL
 149 #define NO_OFFSET 0
 150
 151 struct value_desc {
 152    GLenum pname;
 153    GLubyte location;  /**< enum value_location */
 154    GLubyte type;      /**< enum value_type */
 155    int offset;
 156    const int *extra;
 157 };
 158
 159 union value {
 160    GLfloat value_float;
 161    GLfloat value_float_4[4];
 162    GLmatrix *value_matrix;
 163    GLint value_int;
 164    GLint value_int_4[4];
 165    GLint64 value_int64;
 166    GLenum value_enum;
 167
 168    /* Sigh, see GL_COMPRESSED_TEXTURE_FORMATS_ARB handling */
 169    struct {
 170       GLint n, ints[100];
 171    } value_int_n;
 172    GLboolean value_bool;
 173 };
 174
 175 #define BUFFER_FIELD(field, type) \
 176    LOC_BUFFER, type, offsetof(struct gl_framebuffer, field)
 177 #define CONTEXT_FIELD(field, type) \
 178    LOC_CONTEXT, type, offsetof(struct gl_context, field)
 179 #define ARRAY_FIELD(field, type) \
 180    LOC_ARRAY, type, offsetof(struct gl_array_object, field)
 181 #undef CONST /* already defined through windows.h */
 182 #define CONST(value) \
 183    LOC_CONTEXT, TYPE_CONST, value
 184
 185 #define BUFFER_INT(field) BUFFER_FIELD(field, TYPE_INT)
 186 #define BUFFER_ENUM(field) BUFFER_FIELD(field, TYPE_ENUM)
 187 #define BUFFER_BOOL(field) BUFFER_FIELD(field, TYPE_BOOLEAN)
 188
 189 #define CONTEXT_INT(field) CONTEXT_FIELD(field, TYPE_INT)
 190 #define CONTEXT_INT2(field) CONTEXT_FIELD(field, TYPE_INT_2)
 191 #define CONTEXT_INT64(field) CONTEXT_FIELD(field, TYPE_INT64)
 192 #define CONTEXT_ENUM(field) CONTEXT_FIELD(field, TYPE_ENUM)
 193 #define CONTEXT_ENUM2(field) CONTEXT_FIELD(field, TYPE_ENUM_2)
 194 #define CONTEXT_BOOL(field) CONTEXT_FIELD(field, TYPE_BOOLEAN)
 195 #define CONTEXT_BIT0(field) CONTEXT_FIELD(field, TYPE_BIT_0)
 196 #define CONTEXT_BIT1(field) CONTEXT_FIELD(field, TYPE_BIT_1)
 197 #define CONTEXT_BIT2(field) CONTEXT_FIELD(field, TYPE_BIT_2)
 198 #define CONTEXT_BIT3(field) CONTEXT_FIELD(field, TYPE_BIT_3)
 199 #define CONTEXT_BIT4(field) CONTEXT_FIELD(field, TYPE_BIT_4)
 200 #define CONTEXT_BIT5(field) CONTEXT_FIELD(field, TYPE_BIT_5)
 201 #define CONTEXT_BIT6(field) CONTEXT_FIELD(field, TYPE_BIT_6)
 202 #define CONTEXT_BIT7(field) CONTEXT_FIELD(field, TYPE_BIT_7)
 203 #define CONTEXT_FLOAT(field) CONTEXT_FIELD(field, TYPE_FLOAT)
 204 #define CONTEXT_FLOAT2(field) CONTEXT_FIELD(field, TYPE_FLOAT_2)
 205 #define CONTEXT_FLOAT3(field) CONTEXT_FIELD(field, TYPE_FLOAT_3)
 206 #define CONTEXT_FLOAT4(field) CONTEXT_FIELD(field, TYPE_FLOAT_4)
 207 #define CONTEXT_MATRIX(field) CONTEXT_FIELD(field, TYPE_MATRIX)
 208 #define CONTEXT_MATRIX_T(field) CONTEXT_FIELD(field, TYPE_MATRIX_T)
 209
 210 #define ARRAY_INT(field) ARRAY_FIELD(field, TYPE_INT)
 211 #define ARRAY_ENUM(field) ARRAY_FIELD(field, TYPE_ENUM)
 212 #define ARRAY_BOOL(field) ARRAY_FIELD(field, TYPE_BOOLEAN)
 213
 214 #define EXT(f)                                  \
 215    offsetof(struct gl_extensions, f)
 216
 217 #define EXTRA_EXT(e)                            \
 218    static const int extra_##e[] = {             \
 219       EXT(e), EXTRA_END                         \
 220    }
 221
 222 #define EXTRA_EXT2(e1, e2)                      \
 223    static const int extra_##e1##_##e2[] = {     \
 224       EXT(e1), EXT(e2), EXTRA_END               \
 225    }
 226
 227 /* The 'extra' mechanism is a way to specify extra checks (such as
 228  * extensions or specific gl versions) or actions (flush current, new
 229  * buffers) that we need to do before looking up an enum.  We need to
 230  * declare them all up front so we can refer to them in the value_desc
 231  * structs below.
 232  *
 233  * Each EXTRA_ will be executed.  For EXTRA_* enums of extensions and API
 234  * versions, listing multiple ones in an array means an error will be thrown
 235  * only if none of them are available.  If you need to check for "AND"
 236  * behavior, you would need to make a custom EXTRA_ enum.
 237  */
 238
 239 static const int extra_new_buffers[] = {
 240    EXTRA_NEW_BUFFERS,
 241    EXTRA_END
 242 };
 243
 244 static const int extra_new_frag_clamp[] = {
 245    EXTRA_NEW_FRAG_CLAMP,
 246    EXTRA_END
 247 };
 248
 249 static const int extra_valid_draw_buffer[] = {
 250    EXTRA_VALID_DRAW_BUFFER,
 251    EXTRA_END
 252 };
 253
 254 static const int extra_valid_texture_unit[] = {
 255    EXTRA_VALID_TEXTURE_UNIT,
 256    EXTRA_END
 257 };
 258
 259 static const int extra_valid_clip_distance[] = {
 260    EXTRA_VALID_CLIP_DISTANCE,
 261    EXTRA_END
 262 };
 263
 264 static const int extra_flush_current_valid_texture_unit[] = {
 265    EXTRA_FLUSH_CURRENT,
 266    EXTRA_VALID_TEXTURE_UNIT,
 267    EXTRA_END
 268 };
 269
 270 static const int extra_flush_current[] = {
 271    EXTRA_FLUSH_CURRENT,
 272    EXTRA_END
 273 };
 274
 275 static const int extra_EXT_secondary_color_flush_current[] = {
 276    EXT(EXT_secondary_color),
 277    EXTRA_FLUSH_CURRENT,
 278    EXTRA_END
 279 };
 280
 281 static const int extra_EXT_fog_coord_flush_current[] = {
 282    EXT(EXT_fog_coord),
 283    EXTRA_FLUSH_CURRENT,
 284    EXTRA_END
 285 };
 286
 287 static const int extra_EXT_texture_integer[] = {
 288    EXT(EXT_texture_integer),
 289    EXTRA_END
 290 };
 291
 292 static const int extra_EXT_texture_integer_and_new_buffers[] = {
 293    EXT(EXT_texture_integer),
 294    EXTRA_NEW_BUFFERS,
 295    EXTRA_END
 296 };
 297
 298 static const int extra_GLSL_130_es3[] = {
 299    EXTRA_GLSL_130,
 300    EXTRA_API_ES3,
 301    EXTRA_END
 302 };
 303
 304 static const int extra_texture_buffer_object[] = {
 305    EXTRA_API_GL_CORE,
 306    EXTRA_VERSION_31,
 307    EXT(ARB_texture_buffer_object),
 308    EXTRA_END
 309 };
 310
 311 static const int extra_ARB_transform_feedback2_api_es3[] = {
 312    EXT(ARB_transform_feedback2),
 313    EXTRA_API_ES3,
 314    EXTRA_END
 315 };
 316
 317 static const int extra_ARB_uniform_buffer_object_and_geometry_shader[] = {
 318    EXTRA_EXT_UBO_GS4,
 319    EXTRA_END
 320 };
 321
 322 static const int extra_ARB_ES2_compatibility_api_es2[] = {
 323    EXT(ARB_ES2_compatibility),
 324    EXTRA_API_ES2,
 325    EXTRA_END
 326 };
 327
 328 static const int extra_ARB_ES3_compatibility_api_es3[] = {
 329    EXT(ARB_ES3_compatibility),
 330    EXTRA_API_ES3,
 331    EXTRA_END
 332 };
 333
 334 static const int extra_EXT_framebuffer_sRGB_and_new_buffers[] = {
 335    EXT(EXT_framebuffer_sRGB),
 336    EXTRA_NEW_BUFFERS,
 337    EXTRA_END
 338 };
 339
 340 static const int extra_MESA_texture_array_es3[] = {
 341    EXT(MESA_texture_array),
 342    EXTRA_API_ES3,
 343    EXTRA_END
 344 };
 345
 346 EXTRA_EXT(ARB_texture_cube_map);
 347 EXTRA_EXT(MESA_texture_array);
 348 EXTRA_EXT2(EXT_secondary_color, ARB_vertex_program);
 349 EXTRA_EXT(EXT_secondary_color);
 350 EXTRA_EXT(EXT_fog_coord);
 351 EXTRA_EXT(NV_fog_distance);
 352 EXTRA_EXT(EXT_texture_filter_anisotropic);
 353 EXTRA_EXT(NV_point_sprite);
 354 EXTRA_EXT(NV_texture_rectangle);
 355 EXTRA_EXT(EXT_stencil_two_side);
 356 EXTRA_EXT(EXT_depth_bounds_test);
 357 EXTRA_EXT(ARB_depth_clamp);
 358 EXTRA_EXT(ATI_fragment_shader);
 359 EXTRA_EXT(EXT_framebuffer_blit);
 360 EXTRA_EXT(ARB_shader_objects);
 361 EXTRA_EXT(EXT_provoking_vertex);
 362 EXTRA_EXT(ARB_fragment_shader);
 363 EXTRA_EXT(ARB_fragment_program);
 364 EXTRA_EXT2(ARB_framebuffer_object, EXT_framebuffer_multisample);
 365 EXTRA_EXT(EXT_framebuffer_object);
 366 EXTRA_EXT(ARB_seamless_cube_map);
 367 EXTRA_EXT(ARB_sync);
 368 EXTRA_EXT(ARB_vertex_shader);
 369 EXTRA_EXT(EXT_transform_feedback);
 370 EXTRA_EXT(ARB_transform_feedback3);
 371 EXTRA_EXT(EXT_pixel_buffer_object);
 372 EXTRA_EXT(ARB_vertex_program);
 373 EXTRA_EXT2(NV_point_sprite, ARB_point_sprite);
 374 EXTRA_EXT2(ARB_vertex_program, ARB_fragment_program);
 375 EXTRA_EXT(ARB_geometry_shader4);
 376 EXTRA_EXT(ARB_color_buffer_float);
 377 EXTRA_EXT(EXT_framebuffer_sRGB);
 378 EXTRA_EXT(OES_EGL_image_external);
 379 EXTRA_EXT(ARB_blend_func_extended);
 380 EXTRA_EXT(ARB_uniform_buffer_object);
 381 EXTRA_EXT(ARB_timer_query);
 382 EXTRA_EXT(ARB_map_buffer_alignment);
 383 EXTRA_EXT(ARB_texture_cube_map_array);
 384 EXTRA_EXT(ARB_texture_buffer_range);
 385 EXTRA_EXT(ARB_texture_multisample);
 386
 387 static const int
 388 extra_ARB_color_buffer_float_or_glcore[] = {
 389    EXT(ARB_color_buffer_float),
 390    EXTRA_API_GL_CORE,
 391    EXTRA_END
 392 };
 393
 394 static const int
 395 extra_NV_primitive_restart[] = {
 396    EXT(NV_primitive_restart),
 397    EXTRA_END
 398 };
 399
 400 static const int extra_version_30[] = { EXTRA_VERSION_30, EXTRA_END };
 401 static const int extra_version_31[] = { EXTRA_VERSION_31, EXTRA_END };
 402 static const int extra_version_32[] = { EXTRA_VERSION_32, EXTRA_END };
 403
 404 static const int extra_gl30_es3[] = {
 405     EXTRA_VERSION_30,
 406     EXTRA_API_ES3,
 407     EXTRA_END,
 408 };
 409
 410 static const int extra_gl32_es3[] = {
 411     EXTRA_VERSION_32,
 412     EXTRA_API_ES3,
 413     EXTRA_END,
 414 };
 415
 416 static const int
 417 extra_ARB_vertex_program_api_es2[] = {
 418    EXT(ARB_vertex_program),
 419    EXTRA_API_ES2,
 420    EXTRA_END
 421 };
 422
 423 /* The ReadBuffer get token is valid under either full GL or under
 424  * GLES2 if the NV_read_buffer extension is available. */
 425 static const int
 426 extra_NV_read_buffer_api_gl[] = {
 427    EXTRA_API_ES2,
 428    EXTRA_API_GL,
 429    EXTRA_END
 430 };
 431
 432 static const int extra_core_ARB_color_buffer_float_and_new_buffers[] = {
 433    EXTRA_API_GL_CORE,
 434    EXT(ARB_color_buffer_float),
 435    EXTRA_NEW_BUFFERS,
 436    EXTRA_END
 437 };
 438
 439 /* This is the big table describing all the enums we accept in
 440  * glGet*v().  The table is partitioned into six parts: enums
 441  * understood by all GL APIs (OpenGL, GLES and GLES2), enums shared
 442  * between OpenGL and GLES, enums exclusive to GLES, etc for the
 443  * remaining combinations. To look up the enums valid in a given API
 444  * we will use a hash table specific to that API. These tables are in
 445  * turn generated at build time and included through get_hash.h.
 446  */
 447
 448 #include "get_hash.h"
 449
 450 /* All we need now is a way to look up the value struct from the enum.
 451  * The code generated by gcc for the old generated big switch
 452  * statement is a big, balanced, open coded if/else tree, essentially
 453  * an unrolled binary search.  It would be natural to sort the new
 454  * enum table and use bsearch(), but we will use a read-only hash
 455  * table instead.  bsearch() has a nice guaranteed worst case
 456  * performance, but we're also guaranteed to hit that worst case
 457  * (log2(n) iterations) for about half the enums.  Instead, using an
 458  * open addressing hash table, we can find the enum on the first try
 459  * for 80% of the enums, 1 collision for 10% and never more than 5
 460  * collisions for any enum (typical numbers).  And the code is very
 461  * simple, even though it feels a little magic. */
 462
 463 #ifdef GET_DEBUG
 464 static void
 465 print_table_stats(int api)
 466 {
 467    int i, j, collisions[11], count, hash, mask;
 468    const struct value_desc *d;
 469    const char *api_names[] = {
 470       [API_OPENGL_COMPAT] = "GL",
 471       [API_OPENGL_CORE] = "GL_CORE",
 472       [API_OPENGLES] = "GLES",
 473       [API_OPENGLES2] = "GLES2",
 474    };
 475    const char *api_name;
 476
 477    api_name = api < Elements(api_names) ? api_names[api] : "N/A";
 478    count = 0;
 479    mask = Elements(table(api)) - 1;
 480    memset(collisions, 0, sizeof collisions);
 481
 482    for (i = 0; i < Elements(table(api)); i++) {
 483       if (!table(api)[i])
 484          continue;
 485       count++;
 486       d = &values[table(api)[i]];
 487       hash = (d->pname * prime_factor);
 488       j = 0;
 489       while (1) {
 490          if (values[table(api)[hash & mask]].pname == d->pname)
 491             break;
 492          hash += prime_step;
 493          j++;
 494       }
 495
 496       if (j < 10)
 497          collisions[j]++;
 498       else
 499          collisions[10]++;
 500    }
 501
 502    printf("number of enums for %s: %d (total %ld)\n",
 503          api_name, count, Elements(values));
 504    for (i = 0; i < Elements(collisions) - 1; i++)
 505       if (collisions[i] > 0)
 506          printf("  %d enums with %d %scollisions\n",
 507                collisions[i], i, i == 10 ? "or more " : "");
 508 }
 509 #endif
 510
 511 /**
 512  * Initialize the enum hash for a given API
 513  *
 514  * This is called from one_time_init() to insert the enum values that
 515  * are valid for the API in question into the enum hash table.
 516  *
 517  * \param the current context, for determining the API in question
 518  */
 519 void _mesa_init_get_hash(struct gl_context *ctx)
 520 {
 521 #ifdef GET_DEBUG
 522    print_table_stats();
 523 #endif
 524 }
 525
 526 /**
 527  * Handle irregular enums
 528  *
 529  * Some values don't conform to the "well-known type at context
 530  * pointer + offset" pattern, so we have this function to catch all
 531  * the corner cases.  Typically, it's a computed value or a one-off
 532  * pointer to a custom struct or something.
 533  *
 534  * In this case we can't return a pointer to the value, so we'll have
 535  * to use the temporary variable 'v' declared back in the calling
 536  * glGet*v() function to store the result.
 537  *
 538  * \param ctx the current context
 539  * \param d the struct value_desc that describes the enum
 540  * \param v pointer to the tmp declared in the calling glGet*v() function
 541  */
 542 static void
 543 find_custom_value(struct gl_context *ctx, const struct value_desc *d, union value *v)
 544 {
 545    struct gl_buffer_object **buffer_obj;
 546    struct gl_client_array *array;
 547    GLuint unit, *p;
 548
 549    switch (d->pname) {
 550    case GL_MAJOR_VERSION:
 551       v->value_int = ctx->Version / 10;
 552       break;
 553    case GL_MINOR_VERSION:
 554       v->value_int = ctx->Version % 10;
 555       break;
 556
 557    case GL_TEXTURE_1D:
 558    case GL_TEXTURE_2D:
 559    case GL_TEXTURE_3D:
 560    case GL_TEXTURE_1D_ARRAY_EXT:
 561    case GL_TEXTURE_2D_ARRAY_EXT:
 562    case GL_TEXTURE_CUBE_MAP_ARB:
 563    case GL_TEXTURE_RECTANGLE_NV:
 564    case GL_TEXTURE_EXTERNAL_OES:
 565       v->value_bool = _mesa_IsEnabled(d->pname);
 566       break;
 567
 568    case GL_LINE_STIPPLE_PATTERN:
 569       /* This is the only GLushort, special case it here by promoting
 570        * to an int rather than introducing a new type. */
 571       v->value_int = ctx->Line.StipplePattern;
 572       break;
 573
 574    case GL_CURRENT_RASTER_TEXTURE_COORDS:
 575       unit = ctx->Texture.CurrentUnit;
 576       v->value_float_4[0] = ctx->Current.RasterTexCoords[unit][0];
 577       v->value_float_4[1] = ctx->Current.RasterTexCoords[unit][1];
 578       v->value_float_4[2] = ctx->Current.RasterTexCoords[unit][2];
 579       v->value_float_4[3] = ctx->Current.RasterTexCoords[unit][3];
 580       break;
 581
 582    case GL_CURRENT_TEXTURE_COORDS:
 583       unit = ctx->Texture.CurrentUnit;
 584       v->value_float_4[0] = ctx->Current.Attrib[VERT_ATTRIB_TEX0 + unit][0];
 585       v->value_float_4[1] = ctx->Current.Attrib[VERT_ATTRIB_TEX0 + unit][1];
 586       v->value_float_4[2] = ctx->Current.Attrib[VERT_ATTRIB_TEX0 + unit][2];
 587       v->value_float_4[3] = ctx->Current.Attrib[VERT_ATTRIB_TEX0 + unit][3];
 588       break;
 589
 590    case GL_COLOR_WRITEMASK:
 591       v->value_int_4[0] = ctx->Color.ColorMask[0][RCOMP] ? 1 : 0;
 592       v->value_int_4[1] = ctx->Color.ColorMask[0][GCOMP] ? 1 : 0;
 593       v->value_int_4[2] = ctx->Color.ColorMask[0][BCOMP] ? 1 : 0;
 594       v->value_int_4[3] = ctx->Color.ColorMask[0][ACOMP] ? 1 : 0;
 595       break;
 596
 597    case GL_EDGE_FLAG:
 598       v->value_bool = ctx->Current.Attrib[VERT_ATTRIB_EDGEFLAG][0] == 1.0;
 599       break;
 600
 601    case GL_READ_BUFFER:
 602       v->value_enum = ctx->ReadBuffer->ColorReadBuffer;
 603       break;
 604
 605    case GL_MAP2_GRID_DOMAIN:
 606       v->value_float_4[0] = ctx->Eval.MapGrid2u1;
 607       v->value_float_4[1] = ctx->Eval.MapGrid2u2;
 608       v->value_float_4[2] = ctx->Eval.MapGrid2v1;
 609       v->value_float_4[3] = ctx->Eval.MapGrid2v2;
 610       break;
 611
 612    case GL_TEXTURE_STACK_DEPTH:
 613       unit = ctx->Texture.CurrentUnit;
 614       v->value_int = ctx->TextureMatrixStack[unit].Depth + 1;
 615       break;
 616    case GL_TEXTURE_MATRIX:
 617       unit = ctx->Texture.CurrentUnit;
 618       v->value_matrix = ctx->TextureMatrixStack[unit].Top;
 619       break;
 620
 621    case GL_TEXTURE_COORD_ARRAY:
 622    case GL_TEXTURE_COORD_ARRAY_SIZE:
 623    case GL_TEXTURE_COORD_ARRAY_TYPE:
 624    case GL_TEXTURE_COORD_ARRAY_STRIDE:
 625       array = &ctx->Array.ArrayObj->VertexAttrib[VERT_ATTRIB_TEX(ctx->Array.ActiveTexture)];
 626       v->value_int = *(GLuint *) ((char *) array + d->offset);
 627       break;
 628
 629    case GL_ACTIVE_TEXTURE_ARB:
 630       v->value_int = GL_TEXTURE0_ARB + ctx->Texture.CurrentUnit;
 631       break;
 632    case GL_CLIENT_ACTIVE_TEXTURE_ARB:
 633       v->value_int = GL_TEXTURE0_ARB + ctx->Array.ActiveTexture;
 634       break;
 635
 636    case GL_MODELVIEW_STACK_DEPTH:
 637    case GL_PROJECTION_STACK_DEPTH:
 638       v->value_int = *(GLint *) ((char *) ctx + d->offset) + 1;
 639       break;
 640
 641    case GL_MAX_TEXTURE_SIZE:
 642    case GL_MAX_3D_TEXTURE_SIZE:
 643    case GL_MAX_CUBE_MAP_TEXTURE_SIZE_ARB:
 644       p = (GLuint *) ((char *) ctx + d->offset);
 645       v->value_int = 1 << (*p - 1);
 646       break;
 647
 648    case GL_SCISSOR_BOX:
 649       v->value_int_4[0] = ctx->Scissor.X;
 650       v->value_int_4[1] = ctx->Scissor.Y;
 651       v->value_int_4[2] = ctx->Scissor.Width;
 652       v->value_int_4[3] = ctx->Scissor.Height;
 653       break;
 654
 655    case GL_LIST_INDEX:
 656       v->value_int =
 657          ctx->ListState.CurrentList ? ctx->ListState.CurrentList->Name : 0;
 658       break;
 659    case GL_LIST_MODE:
 660       if (!ctx->CompileFlag)
 661          v->value_enum = 0;
 662       else if (ctx->ExecuteFlag)
 663          v->value_enum = GL_COMPILE_AND_EXECUTE;
 664       else
 665          v->value_enum = GL_COMPILE;
 666       break;
 667
 668    case GL_VIEWPORT:
 669       v->value_int_4[0] = ctx->Viewport.X;
 670       v->value_int_4[1] = ctx->Viewport.Y;
 671       v->value_int_4[2] = ctx->Viewport.Width;
 672       v->value_int_4[3] = ctx->Viewport.Height;
 673       break;
 674
 675    case GL_ACTIVE_STENCIL_FACE_EXT:
 676       v->value_enum = ctx->Stencil.ActiveFace ? GL_BACK : GL_FRONT;
 677       break;
 678
 679    case GL_STENCIL_FAIL:
 680       v->value_enum = ctx->Stencil.FailFunc[ctx->Stencil.ActiveFace];
 681       break;
 682    case GL_STENCIL_FUNC:
 683       v->value_enum = ctx->Stencil.Function[ctx->Stencil.ActiveFace];
 684       break;
 685    case GL_STENCIL_PASS_DEPTH_FAIL:
 686       v->value_enum = ctx->Stencil.ZFailFunc[ctx->Stencil.ActiveFace];
 687       break;
 688    case GL_STENCIL_PASS_DEPTH_PASS:
 689       v->value_enum = ctx->Stencil.ZPassFunc[ctx->Stencil.ActiveFace];
 690       break;
 691    case GL_STENCIL_REF:
 692       v->value_int = _mesa_get_stencil_ref(ctx, ctx->Stencil.ActiveFace);
 693       break;
 694    case GL_STENCIL_BACK_REF:
 695       v->value_int = _mesa_get_stencil_ref(ctx, 1);
 696       break;
 697    case GL_STENCIL_VALUE_MASK:
 698       v->value_int = ctx->Stencil.ValueMask[ctx->Stencil.ActiveFace];
 699       break;
 700    case GL_STENCIL_WRITEMASK:
 701       v->value_int = ctx->Stencil.WriteMask[ctx->Stencil.ActiveFace];
 702       break;
 703
 704    case GL_NUM_EXTENSIONS:
 705       v->value_int = _mesa_get_extension_count(ctx);
 706       break;
 707
 708    case GL_IMPLEMENTATION_COLOR_READ_TYPE_OES:
 709       v->value_int = _mesa_get_color_read_type(ctx);
 710       break;
 711    case GL_IMPLEMENTATION_COLOR_READ_FORMAT_OES:
 712       v->value_int = _mesa_get_color_read_format(ctx);
 713       break;
 714
 715    case GL_CURRENT_MATRIX_STACK_DEPTH_ARB:
 716       v->value_int = ctx->CurrentStack->Depth + 1;
 717       break;
 718    case GL_CURRENT_MATRIX_ARB:
 719    case GL_TRANSPOSE_CURRENT_MATRIX_ARB:
 720       v->value_matrix = ctx->CurrentStack->Top;
 721       break;
 722
 723    case GL_NUM_COMPRESSED_TEXTURE_FORMATS_ARB:
 724       v->value_int = _mesa_get_compressed_formats(ctx, NULL);
 725       break;
 726    case GL_COMPRESSED_TEXTURE_FORMATS_ARB:
 727       v->value_int_n.n =
 728          _mesa_get_compressed_formats(ctx, v->value_int_n.ints);
 729       ASSERT(v->value_int_n.n <= 100);
 730       break;
 731
 732    case GL_MAX_VARYING_FLOATS_ARB:
 733    case GL_MAX_FRAGMENT_INPUT_COMPONENTS:
 734       v->value_int = ctx->Const.MaxVarying * 4;
 735       break;
 736
 737    /* Various object names */
 738
 739    case GL_TEXTURE_BINDING_1D:
 740    case GL_TEXTURE_BINDING_2D:
 741    case GL_TEXTURE_BINDING_3D:
 742    case GL_TEXTURE_BINDING_1D_ARRAY_EXT:
 743    case GL_TEXTURE_BINDING_2D_ARRAY_EXT:
 744    case GL_TEXTURE_BINDING_CUBE_MAP_ARB:
 745    case GL_TEXTURE_BINDING_RECTANGLE_NV:
 746    case GL_TEXTURE_BINDING_EXTERNAL_OES:
 747    case GL_TEXTURE_BINDING_CUBE_MAP_ARRAY:
 748    case GL_TEXTURE_BINDING_2D_MULTISAMPLE:
 749    case GL_TEXTURE_BINDING_2D_MULTISAMPLE_ARRAY:
 750       unit = ctx->Texture.CurrentUnit;
 751       v->value_int =
 752          ctx->Texture.Unit[unit].CurrentTex[d->offset]->Name;
 753       break;
 754
 755    /* GL_ARB_vertex_buffer_object */
 756    case GL_VERTEX_ARRAY_BUFFER_BINDING_ARB:
 757    case GL_NORMAL_ARRAY_BUFFER_BINDING_ARB:
 758    case GL_COLOR_ARRAY_BUFFER_BINDING_ARB:
 759    case GL_INDEX_ARRAY_BUFFER_BINDING_ARB:
 760    case GL_EDGE_FLAG_ARRAY_BUFFER_BINDING_ARB:
 761    case GL_SECONDARY_COLOR_ARRAY_BUFFER_BINDING_ARB:
 762    case GL_FOG_COORDINATE_ARRAY_BUFFER_BINDING_ARB:
 763       buffer_obj = (struct gl_buffer_object **)
 764          ((char *) ctx->Array.ArrayObj + d->offset);
 765       v->value_int = (*buffer_obj)->Name;
 766       break;
 767    case GL_ARRAY_BUFFER_BINDING_ARB:
 768       v->value_int = ctx->Array.ArrayBufferObj->Name;
 769       break;
 770    case GL_TEXTURE_COORD_ARRAY_BUFFER_BINDING_ARB:
 771       v->value_int =
 772          ctx->Array.ArrayObj->VertexAttrib[VERT_ATTRIB_TEX(ctx->Array.ActiveTexture)].BufferObj->Name;
 773       break;
 774    case GL_ELEMENT_ARRAY_BUFFER_BINDING_ARB:
 775       v->value_int = ctx->Array.ArrayObj->ElementArrayBufferObj->Name;
 776       break;
 777
 778    /* ARB_copy_buffer */
 779    case GL_COPY_READ_BUFFER:
 780       v->value_int = ctx->CopyReadBuffer->Name;
 781       break;
 782    case GL_COPY_WRITE_BUFFER:
 783       v->value_int = ctx->CopyWriteBuffer->Name;
 784       break;
 785
 786    case GL_PIXEL_PACK_BUFFER_BINDING_EXT:
 787       v->value_int = ctx->Pack.BufferObj->Name;
 788       break;
 789    case GL_PIXEL_UNPACK_BUFFER_BINDING_EXT:
 790       v->value_int = ctx->Unpack.BufferObj->Name;
 791       break;
 792    case GL_TRANSFORM_FEEDBACK_BUFFER_BINDING:
 793       v->value_int = ctx->TransformFeedback.CurrentBuffer->Name;
 794       break;
 795    case GL_TRANSFORM_FEEDBACK_BUFFER_PAUSED:
 796       v->value_int = ctx->TransformFeedback.CurrentObject->Paused;
 797       break;
 798    case GL_TRANSFORM_FEEDBACK_BUFFER_ACTIVE:
 799       v->value_int = ctx->TransformFeedback.CurrentObject->Active;
 800       break;
 801    case GL_TRANSFORM_FEEDBACK_BINDING:
 802       v->value_int = ctx->TransformFeedback.CurrentObject->Name;
 803       break;
 804    case GL_CURRENT_PROGRAM:
 805       v->value_int =
 806          ctx->Shader.ActiveProgram ? ctx->Shader.ActiveProgram->Name : 0;
 807       break;
 808    case GL_READ_FRAMEBUFFER_BINDING_EXT:
 809       v->value_int = ctx->ReadBuffer->Name;
 810       break;
 811    case GL_RENDERBUFFER_BINDING_EXT:
 812       v->value_int =
 813          ctx->CurrentRenderbuffer ? ctx->CurrentRenderbuffer->Name : 0;
 814       break;
 815    case GL_POINT_SIZE_ARRAY_BUFFER_BINDING_OES:
 816       v->value_int = ctx->Array.ArrayObj->VertexAttrib[VERT_ATTRIB_POINT_SIZE].BufferObj->Name;
 817       break;
 818
 819    case GL_FOG_COLOR:
 820       if (_mesa_get_clamp_fragment_color(ctx))
 821          COPY_4FV(v->value_float_4, ctx->Fog.Color);
 822       else
 823          COPY_4FV(v->value_float_4, ctx->Fog.ColorUnclamped);
 824       break;
 825    case GL_COLOR_CLEAR_VALUE:
 826       if (_mesa_get_clamp_fragment_color(ctx)) {
 827          v->value_float_4[0] = CLAMP(ctx->Color.ClearColor.f[0], 0.0F, 1.0F);
 828          v->value_float_4[1] = CLAMP(ctx->Color.ClearColor.f[1], 0.0F, 1.0F);
 829          v->value_float_4[2] = CLAMP(ctx->Color.ClearColor.f[2], 0.0F, 1.0F);
 830          v->value_float_4[3] = CLAMP(ctx->Color.ClearColor.f[3], 0.0F, 1.0F);
 831       } else
 832          COPY_4FV(v->value_float_4, ctx->Color.ClearColor.f);
 833       break;
 834    case GL_BLEND_COLOR_EXT:
 835       if (_mesa_get_clamp_fragment_color(ctx))
 836          COPY_4FV(v->value_float_4, ctx->Color.BlendColor);
 837       else
 838          COPY_4FV(v->value_float_4, ctx->Color.BlendColorUnclamped);
 839       break;
 840    case GL_ALPHA_TEST_REF:
 841       if (_mesa_get_clamp_fragment_color(ctx))
 842          v->value_float = ctx->Color.AlphaRef;
 843       else
 844          v->value_float = ctx->Color.AlphaRefUnclamped;
 845       break;
 846    case GL_MAX_VERTEX_UNIFORM_VECTORS:
 847       v->value_int = ctx->Const.VertexProgram.MaxUniformComponents / 4;
 848       break;
 849
 850    case GL_MAX_FRAGMENT_UNIFORM_VECTORS:
 851       v->value_int = ctx->Const.FragmentProgram.MaxUniformComponents / 4;
 852       break;
 853
 854    /* GL_ARB_texture_buffer_object */
 855    case GL_TEXTURE_BUFFER_ARB:
 856       v->value_int = ctx->Texture.BufferObject->Name;
 857       break;
 858    case GL_TEXTURE_BINDING_BUFFER_ARB:
 859       unit = ctx->Texture.CurrentUnit;
 860       v->value_int =
 861          ctx->Texture.Unit[unit].CurrentTex[TEXTURE_BUFFER_INDEX]->Name;
 862       break;
 863    case GL_TEXTURE_BUFFER_DATA_STORE_BINDING_ARB:
 864       {
 865          struct gl_buffer_object *buf =
 866             ctx->Texture.Unit[ctx->Texture.CurrentUnit]
 867             .CurrentTex[TEXTURE_BUFFER_INDEX]->BufferObject;
 868          v->value_int = buf ? buf->Name : 0;
 869       }
 870       break;
 871    case GL_TEXTURE_BUFFER_FORMAT_ARB:
 872       v->value_int = ctx->Texture.Unit[ctx->Texture.CurrentUnit]
 873          .CurrentTex[TEXTURE_BUFFER_INDEX]->BufferObjectFormat;
 874       break;
 875
 876    /* GL_ARB_sampler_objects */
 877    case GL_SAMPLER_BINDING:
 878       {
 879          struct gl_sampler_object *samp =
 880             ctx->Texture.Unit[ctx->Texture.CurrentUnit].Sampler;
 881
 882          /*
 883           * The sampler object may have been deleted on another context,
 884           * so we try to lookup the sampler object before returning its Name.
 885           */
 886          if (samp && _mesa_lookup_samplerobj(ctx, samp->Name)) {
 887             v->value_int = samp->Name;
 888          } else {
 889             v->value_int = 0;
 890          }
 891       }
 892       break;
 893    /* GL_ARB_uniform_buffer_object */
 894    case GL_UNIFORM_BUFFER_BINDING:
 895       v->value_int = ctx->UniformBuffer->Name;
 896       break;
 897    /* GL_ARB_timer_query */
 898    case GL_TIMESTAMP:
 899       if (ctx->Driver.GetTimestamp) {
 900          v->value_int64 = ctx->Driver.GetTimestamp(ctx);
 901       }
 902       else {
 903          _mesa_problem(ctx, "driver doesn't implement GetTimestamp");
 904       }
 905       break;
 906    }
 907 }
 908
 909 /**
 910  * Check extra constraints on a struct value_desc descriptor
 911  *
 912  * If a struct value_desc has a non-NULL extra pointer, it means that
 913  * there are a number of extra constraints to check or actions to
 914  * perform.  The extras is just an integer array where each integer
 915  * encode different constraints or actions.
 916  *
 917  * \param ctx current context
 918  * \param func name of calling glGet*v() function for error reporting
 919  * \param d the struct value_desc that has the extra constraints
 920  *
 921  * \return GL_FALSE if all of the constraints were not satisfied,
 922  *     otherwise GL_TRUE.
 923  */
 924 static GLboolean
 925 check_extra(struct gl_context *ctx, const char *func, const struct value_desc *d)
 926 {
 927    const GLuint version = ctx->Version;
 928    GLboolean api_check = GL_FALSE;
 929    GLboolean api_found = GL_FALSE;
 930    const int *e;
 931
 932    for (e = d->extra; *e != EXTRA_END; e++) {
 933       switch (*e) {
 934       case EXTRA_VERSION_30:
 935          api_check = GL_TRUE;
 936          if (version >= 30)
 937             api_found = GL_TRUE;
 938          break;
 939       case EXTRA_VERSION_31:
 940          api_check = GL_TRUE;
 941          if (version >= 31)
 942             api_found = GL_TRUE;
 943          break;
 944       case EXTRA_VERSION_32:
 945          api_check = GL_TRUE;
 946          if (version >= 32)
 947             api_found = GL_TRUE;
 948          break;
 949       case EXTRA_NEW_FRAG_CLAMP:
 950          if (ctx->NewState & (_NEW_BUFFERS | _NEW_FRAG_CLAMP))
 951             _mesa_update_state(ctx);
 952          break;
 953       case EXTRA_API_ES2:
 954          api_check = GL_TRUE;
 955          if (ctx->API == API_OPENGLES2)
 956             api_found = GL_TRUE;
 957          break;
 958       case EXTRA_API_ES3:
 959          api_check = GL_TRUE;
 960          if (_mesa_is_gles3(ctx))
 961             api_found = GL_TRUE;
 962          break;
 963       case EXTRA_API_GL:
 964          api_check = GL_TRUE;
 965          if (_mesa_is_desktop_gl(ctx))
 966             api_found = GL_TRUE;
 967          break;
 968       case EXTRA_API_GL_CORE:
 969          api_check = GL_TRUE;
 970          if (ctx->API == API_OPENGL_CORE)
 971             api_found = GL_TRUE;
 972          break;
 973       case EXTRA_NEW_BUFFERS:
 974          if (ctx->NewState & _NEW_BUFFERS)
 975             _mesa_update_state(ctx);
 976          break;
 977       case EXTRA_FLUSH_CURRENT:
 978          FLUSH_CURRENT(ctx, 0);
 979          break;
 980       case EXTRA_VALID_DRAW_BUFFER:
 981          if (d->pname - GL_DRAW_BUFFER0_ARB >= ctx->Const.MaxDrawBuffers) {
 982             _mesa_error(ctx, GL_INVALID_OPERATION, "%s(draw buffer %u)",
 983                         func, d->pname - GL_DRAW_BUFFER0_ARB);
 984             return GL_FALSE;
 985          }
 986          break;
 987       case EXTRA_VALID_TEXTURE_UNIT:
 988          if (ctx->Texture.CurrentUnit >= ctx->Const.MaxTextureCoordUnits) {
 989             _mesa_error(ctx, GL_INVALID_OPERATION, "%s(texture %u)",
 990                         func, ctx->Texture.CurrentUnit);
 991             return GL_FALSE;
 992          }
 993          break;
 994       case EXTRA_VALID_CLIP_DISTANCE:
 995          if (d->pname - GL_CLIP_DISTANCE0 >= ctx->Const.MaxClipPlanes) {
 996             _mesa_error(ctx, GL_INVALID_ENUM, "%s(clip distance %u)",
 997                         func, d->pname - GL_CLIP_DISTANCE0);
 998             return GL_FALSE;
 999          }
1000          break;
1001       case EXTRA_GLSL_130:
1002          api_check = GL_TRUE;
1003          if (ctx->Const.GLSLVersion >= 130)
1004             api_found = GL_TRUE;
1005          break;
1006       case EXTRA_EXT_UBO_GS4:
1007          api_check = GL_TRUE;
1008          api_found = (ctx->Extensions.ARB_uniform_buffer_object &&
1009                       ctx->Extensions.ARB_geometry_shader4);
1010          break;
1011       case EXTRA_END:
1012          break;
1013       default: /* *e is a offset into the extension struct */
1014          api_check = GL_TRUE;
1015          if (*(GLboolean *) ((char *) &ctx->Extensions + *e))
1016             api_found = GL_TRUE;
1017          break;
1018       }
1019    }
1020
1021    if (api_check && !api_found) {
1022       _mesa_error(ctx, GL_INVALID_ENUM, "%s(pname=%s)", func,
1023                   _mesa_lookup_enum_by_nr(d->pname));
1024       return GL_FALSE;
1025    }
1026
1027    return GL_TRUE;
1028 }
1029
1030 static const struct value_desc error_value =
1031    { 0, 0, TYPE_INVALID, NO_OFFSET, NO_EXTRA };
1032
1033 /**
1034  * Find the struct value_desc corresponding to the enum 'pname'.
1035  *
1036  * We hash the enum value to get an index into the 'table' array,
1037  * which holds the index in the 'values' array of struct value_desc.
1038  * Once we've found the entry, we do the extra checks, if any, then
1039  * look up the value and return a pointer to it.
1040  *
1041  * If the value has to be computed (for example, it's the result of a
1042  * function call or we need to add 1 to it), we use the tmp 'v' to
1043  * store the result.
1044  *
1045  * \param func name of glGet*v() func for error reporting
1046  * \param pname the enum value we're looking up
1047  * \param p is were we return the pointer to the value
1048  * \param v a tmp union value variable in the calling glGet*v() function
1049  *
1050  * \return the struct value_desc corresponding to the enum or a struct
1051  *     value_desc of TYPE_INVALID if not found.  This lets the calling
1052  *     glGet*v() function jump right into a switch statement and
1053  *     handle errors there instead of having to check for NULL.
1054  */
1055 static const struct value_desc *
1056 find_value(const char *func, GLenum pname, void **p, union value *v)
1057 {
1058    GET_CURRENT_CONTEXT(ctx);
1059    struct gl_texture_unit *unit;
1060    int mask, hash;
1061    const struct value_desc *d;
1062    int api;
1063
1064    api = ctx->API;
1065    /* We index into the table_set[] list of per-API hash tables using the API's
1066     * value in the gl_api enum. Since GLES 3 doesn't have an API_OPENGL* enum
1067     * value since it's compatible with GLES2 its entry in table_set[] is at the
1068     * end.
1069     */
1070    STATIC_ASSERT(Elements(table_set) == API_OPENGL_LAST + 2);
1071    if (_mesa_is_gles3(ctx)) {
1072       api = API_OPENGL_LAST + 1;
1073    }
1074    mask = Elements(table(api)) - 1;
1075    hash = (pname * prime_factor);
1076    while (1) {
1077       int idx = table(api)[hash & mask];
1078
1079       /* If the enum isn't valid, the hash walk ends with index 0,
1080        * pointing to the first entry of values[] which doesn't hold
1081        * any valid enum. */
1082       if (unlikely(idx == 0)) {
1083          _mesa_error(ctx, GL_INVALID_ENUM, "%s(pname=%s)", func,
1084                _mesa_lookup_enum_by_nr(pname));
1085          return &error_value;
1086       }
1087
1088       d = &values[idx];
1089       if (likely(d->pname == pname))
1090          break;
1091
1092       hash += prime_step;
1093    }
1094
1095    if (unlikely(d->extra && !check_extra(ctx, func, d)))
1096       return &error_value;
1097
1098    switch (d->location) {
1099    case LOC_BUFFER:
1100       *p = ((char *) ctx->DrawBuffer + d->offset);
1101       return d;
1102    case LOC_CONTEXT:
1103       *p = ((char *) ctx + d->offset);
1104       return d;
1105    case LOC_ARRAY:
1106       *p = ((char *) ctx->Array.ArrayObj + d->offset);
1107       return d;
1108    case LOC_TEXUNIT:
1109       unit = &ctx->Texture.Unit[ctx->Texture.CurrentUnit];
1110       *p = ((char *) unit + d->offset);
1111       return d;
1112    case LOC_CUSTOM:
1113       find_custom_value(ctx, d, v);
1114       *p = v;
1115       return d;
1116    default:
1117       assert(0);
1118       break;
1119    }
1120
1121    /* silence warning */
1122    return &error_value;
1123 }
1124
1125 static const int transpose[] = {
1126    0, 4,  8, 12,
1127    1, 5,  9, 13,
1128    2, 6, 10, 14,
1129    3, 7, 11, 15
1130 };
1131
1132 void GLAPIENTRY
1133 _mesa_GetBooleanv(GLenum pname, GLboolean *params)
1134 {
1135    const struct value_desc *d;
1136    union value v;
1137    GLmatrix *m;
1138    int shift, i;
1139    void *p;
1140
1141    d = find_value("glGetBooleanv", pname, &p, &v);
1142    switch (d->type) {
1143    case TYPE_INVALID:
1144       break;
1145    case TYPE_CONST:
1146       params[0] = INT_TO_BOOLEAN(d->offset);
1147       break;
1148
1149    case TYPE_FLOAT_4:
1150    case TYPE_FLOATN_4:
1151       params[3] = FLOAT_TO_BOOLEAN(((GLfloat *) p)[3]);
1152    case TYPE_FLOAT_3:
1153    case TYPE_FLOATN_3:
1154       params[2] = FLOAT_TO_BOOLEAN(((GLfloat *) p)[2]);
1155    case TYPE_FLOAT_2:
1156    case TYPE_FLOATN_2:
1157       params[1] = FLOAT_TO_BOOLEAN(((GLfloat *) p)[1]);
1158    case TYPE_FLOAT:
1159    case TYPE_FLOATN:
1160       params[0] = FLOAT_TO_BOOLEAN(((GLfloat *) p)[0]);
1161       break;
1162
1163    case TYPE_DOUBLEN:
1164       params[0] = FLOAT_TO_BOOLEAN(((GLdouble *) p)[0]);
1165       break;
1166
1167    case TYPE_INT_4:
1168       params[3] = INT_TO_BOOLEAN(((GLint *) p)[3]);
1169    case TYPE_INT_3:
1170       params[2] = INT_TO_BOOLEAN(((GLint *) p)[2]);
1171    case TYPE_INT_2:
1172    case TYPE_ENUM_2:
1173       params[1] = INT_TO_BOOLEAN(((GLint *) p)[1]);
1174    case TYPE_INT:
1175    case TYPE_ENUM:
1176       params[0] = INT_TO_BOOLEAN(((GLint *) p)[0]);
1177       break;
1178
1179    case TYPE_INT_N:
1180       for (i = 0; i < v.value_int_n.n; i++)
1181          params[i] = INT_TO_BOOLEAN(v.value_int_n.ints[i]);
1182       break;
1183
1184    case TYPE_INT64:
1185       params[0] = INT64_TO_BOOLEAN(((GLint64 *) p)[0]);
1186       break;
1187
1188    case TYPE_BOOLEAN:
1189       params[0] = ((GLboolean*) p)[0];
1190       break;
1191
1192    case TYPE_MATRIX:
1193       m = *(GLmatrix **) p;
1194       for (i = 0; i < 16; i++)
1195          params[i] = FLOAT_TO_BOOLEAN(m->m[i]);
1196       break;
1197
1198    case TYPE_MATRIX_T:
1199       m = *(GLmatrix **) p;
1200       for (i = 0; i < 16; i++)
1201          params[i] = FLOAT_TO_BOOLEAN(m->m[transpose[i]]);
1202       break;
1203
1204    case TYPE_BIT_0:
1205    case TYPE_BIT_1:
1206    case TYPE_BIT_2:
1207    case TYPE_BIT_3:
1208    case TYPE_BIT_4:
1209    case TYPE_BIT_5:
1210    case TYPE_BIT_6:
1211    case TYPE_BIT_7:
1212       shift = d->type - TYPE_BIT_0;
1213       params[0] = (*(GLbitfield *) p >> shift) & 1;
1214       break;
1215    }
1216 }
1217
1218 void GLAPIENTRY
1219 _mesa_GetFloatv(GLenum pname, GLfloat *params)
1220 {
1221    const struct value_desc *d;
1222    union value v;
1223    GLmatrix *m;
1224    int shift, i;
1225    void *p;
1226
1227    d = find_value("glGetFloatv", pname, &p, &v);
1228    switch (d->type) {
1229    case TYPE_INVALID:
1230       break;
1231    case TYPE_CONST:
1232       params[0] = (GLfloat) d->offset;
1233       break;
1234
1235    case TYPE_FLOAT_4:
1236    case TYPE_FLOATN_4:
1237       params[3] = ((GLfloat *) p)[3];
1238    case TYPE_FLOAT_3:
1239    case TYPE_FLOATN_3:
1240       params[2] = ((GLfloat *) p)[2];
1241    case TYPE_FLOAT_2:
1242    case TYPE_FLOATN_2:
1243       params[1] = ((GLfloat *) p)[1];
1244    case TYPE_FLOAT:
1245    case TYPE_FLOATN:
1246       params[0] = ((GLfloat *) p)[0];
1247       break;
1248
1249    case TYPE_DOUBLEN:
1250       params[0] = (GLfloat) (((GLdouble *) p)[0]);
1251       break;
1252
1253    case TYPE_INT_4:
1254       params[3] = (GLfloat) (((GLint *) p)[3]);
1255    case TYPE_INT_3:
1256       params[2] = (GLfloat) (((GLint *) p)[2]);
1257    case TYPE_INT_2:
1258    case TYPE_ENUM_2:
1259       params[1] = (GLfloat) (((GLint *) p)[1]);
1260    case TYPE_INT:
1261    case TYPE_ENUM:
1262       params[0] = (GLfloat) (((GLint *) p)[0]);
1263       break;
1264
1265    case TYPE_INT_N:
1266       for (i = 0; i < v.value_int_n.n; i++)
1267          params[i] = INT_TO_FLOAT(v.value_int_n.ints[i]);
1268       break;
1269
1270    case TYPE_INT64:
1271       params[0] = (GLfloat) (((GLint64 *) p)[0]);
1272       break;
1273
1274    case TYPE_BOOLEAN:
1275       params[0] = BOOLEAN_TO_FLOAT(*(GLboolean*) p);
1276       break;
1277
1278    case TYPE_MATRIX:
1279       m = *(GLmatrix **) p;
1280       for (i = 0; i < 16; i++)
1281          params[i] = m->m[i];
1282       break;
1283
1284    case TYPE_MATRIX_T:
1285       m = *(GLmatrix **) p;
1286       for (i = 0; i < 16; i++)
1287          params[i] = m->m[transpose[i]];
1288       break;
1289
1290    case TYPE_BIT_0:
1291    case TYPE_BIT_1:
1292    case TYPE_BIT_2:
1293    case TYPE_BIT_3:
1294    case TYPE_BIT_4:
1295    case TYPE_BIT_5:
1296    case TYPE_BIT_6:
1297    case TYPE_BIT_7:
1298       shift = d->type - TYPE_BIT_0;
1299       params[0] = BOOLEAN_TO_FLOAT((*(GLbitfield *) p >> shift) & 1);
1300       break;
1301    }
1302 }
1303
1304 void GLAPIENTRY
1305 _mesa_GetIntegerv(GLenum pname, GLint *params)
1306 {
1307    const struct value_desc *d;
1308    union value v;
1309    GLmatrix *m;
1310    int shift, i;
1311    void *p;
1312
1313    d = find_value("glGetIntegerv", pname, &p, &v);
1314    switch (d->type) {
1315    case TYPE_INVALID:
1316       break;
1317    case TYPE_CONST:
1318       params[0] = d->offset;
1319       break;
1320
1321    case TYPE_FLOAT_4:
1322       params[3] = IROUND(((GLfloat *) p)[3]);
1323    case TYPE_FLOAT_3:
1324       params[2] = IROUND(((GLfloat *) p)[2]);
1325    case TYPE_FLOAT_2:
1326       params[1] = IROUND(((GLfloat *) p)[1]);
1327    case TYPE_FLOAT:
1328       params[0] = IROUND(((GLfloat *) p)[0]);
1329       break;
1330
1331    case TYPE_FLOATN_4:
1332       params[3] = FLOAT_TO_INT(((GLfloat *) p)[3]);
1333    case TYPE_FLOATN_3:
1334       params[2] = FLOAT_TO_INT(((GLfloat *) p)[2]);
1335    case TYPE_FLOATN_2:
1336       params[1] = FLOAT_TO_INT(((GLfloat *) p)[1]);
1337    case TYPE_FLOATN:
1338       params[0] = FLOAT_TO_INT(((GLfloat *) p)[0]);
1339       break;
1340
1341    case TYPE_DOUBLEN:
1342       params[0] = FLOAT_TO_INT(((GLdouble *) p)[0]);
1343       break;
1344
1345    case TYPE_INT_4:
1346       params[3] = ((GLint *) p)[3];
1347    case TYPE_INT_3:
1348       params[2] = ((GLint *) p)[2];
1349    case TYPE_INT_2:
1350    case TYPE_ENUM_2:
1351       params[1] = ((GLint *) p)[1];
1352    case TYPE_INT:
1353    case TYPE_ENUM:
1354       params[0] = ((GLint *) p)[0];
1355       break;
1356
1357    case TYPE_INT_N:
1358       for (i = 0; i < v.value_int_n.n; i++)
1359          params[i] = v.value_int_n.ints[i];
1360       break;
1361
1362    case TYPE_INT64:
1363       params[0] = INT64_TO_INT(((GLint64 *) p)[0]);
1364       break;
1365
1366    case TYPE_BOOLEAN:
1367       params[0] = BOOLEAN_TO_INT(*(GLboolean*) p);
1368       break;
1369
1370    case TYPE_MATRIX:
1371       m = *(GLmatrix **) p;
1372       for (i = 0; i < 16; i++)
1373          params[i] = FLOAT_TO_INT(m->m[i]);
1374       break;
1375
1376    case TYPE_MATRIX_T:
1377       m = *(GLmatrix **) p;
1378       for (i = 0; i < 16; i++)
1379          params[i] = FLOAT_TO_INT(m->m[transpose[i]]);
1380       break;
1381
1382    case TYPE_BIT_0:
1383    case TYPE_BIT_1:
1384    case TYPE_BIT_2:
1385    case TYPE_BIT_3:
1386    case TYPE_BIT_4:
1387    case TYPE_BIT_5:
1388    case TYPE_BIT_6:
1389    case TYPE_BIT_7:
1390       shift = d->type - TYPE_BIT_0;
1391       params[0] = (*(GLbitfield *) p >> shift) & 1;
1392       break;
1393    }
1394 }
1395
1396 void GLAPIENTRY
1397 _mesa_GetInteger64v(GLenum pname, GLint64 *params)
1398 {
1399    const struct value_desc *d;
1400    union value v;
1401    GLmatrix *m;
1402    int shift, i;
1403    void *p;
1404
1405    d = find_value("glGetInteger64v", pname, &p, &v);
1406    switch (d->type) {
1407    case TYPE_INVALID:
1408       break;
1409    case TYPE_CONST:
1410       params[0] = d->offset;
1411       break;
1412
1413    case TYPE_FLOAT_4:
1414       params[3] = IROUND64(((GLfloat *) p)[3]);
1415    case TYPE_FLOAT_3:
1416       params[2] = IROUND64(((GLfloat *) p)[2]);
1417    case TYPE_FLOAT_2:
1418       params[1] = IROUND64(((GLfloat *) p)[1]);
1419    case TYPE_FLOAT:
1420       params[0] = IROUND64(((GLfloat *) p)[0]);
1421       break;
1422
1423    case TYPE_FLOATN_4:
1424       params[3] = FLOAT_TO_INT64(((GLfloat *) p)[3]);
1425    case TYPE_FLOATN_3:
1426       params[2] = FLOAT_TO_INT64(((GLfloat *) p)[2]);
1427    case TYPE_FLOATN_2:
1428       params[1] = FLOAT_TO_INT64(((GLfloat *) p)[1]);
1429    case TYPE_FLOATN:
1430       params[0] = FLOAT_TO_INT64(((GLfloat *) p)[0]);
1431       break;
1432
1433    case TYPE_DOUBLEN:
1434       params[0] = FLOAT_TO_INT64(((GLdouble *) p)[0]);
1435       break;
1436
1437    case TYPE_INT_4:
1438       params[3] = ((GLint *) p)[3];
1439    case TYPE_INT_3:
1440       params[2] = ((GLint *) p)[2];
1441    case TYPE_INT_2:
1442    case TYPE_ENUM_2:
1443       params[1] = ((GLint *) p)[1];
1444    case TYPE_INT:
1445    case TYPE_ENUM:
1446       params[0] = ((GLint *) p)[0];
1447       break;
1448
1449    case TYPE_INT_N:
1450       for (i = 0; i < v.value_int_n.n; i++)
1451          params[i] = INT_TO_BOOLEAN(v.value_int_n.ints[i]);
1452       break;
1453
1454    case TYPE_INT64:
1455       params[0] = ((GLint64 *) p)[0];
1456       break;
1457
1458    case TYPE_BOOLEAN:
1459       params[0] = ((GLboolean*) p)[0];
1460       break;
1461
1462    case TYPE_MATRIX:
1463       m = *(GLmatrix **) p;
1464       for (i = 0; i < 16; i++)
1465          params[i] = FLOAT_TO_INT64(m->m[i]);
1466       break;
1467
1468    case TYPE_MATRIX_T:
1469       m = *(GLmatrix **) p;
1470       for (i = 0; i < 16; i++)
1471          params[i] = FLOAT_TO_INT64(m->m[transpose[i]]);
1472       break;
1473
1474    case TYPE_BIT_0:
1475    case TYPE_BIT_1:
1476    case TYPE_BIT_2:
1477    case TYPE_BIT_3:
1478    case TYPE_BIT_4:
1479    case TYPE_BIT_5:
1480    case TYPE_BIT_6:
1481    case TYPE_BIT_7:
1482       shift = d->type - TYPE_BIT_0;
1483       params[0] = (*(GLbitfield *) p >> shift) & 1;
1484       break;
1485    }
1486 }
1487
1488 void GLAPIENTRY
1489 _mesa_GetDoublev(GLenum pname, GLdouble *params)
1490 {
1491    const struct value_desc *d;
1492    union value v;
1493    GLmatrix *m;
1494    int shift, i;
1495    void *p;
1496
1497    d = find_value("glGetDoublev", pname, &p, &v);
1498    switch (d->type) {
1499    case TYPE_INVALID:
1500       break;
1501    case TYPE_CONST:
1502       params[0] = d->offset;
1503       break;
1504
1505    case TYPE_FLOAT_4:
1506    case TYPE_FLOATN_4:
1507       params[3] = ((GLfloat *) p)[3];
1508    case TYPE_FLOAT_3:
1509    case TYPE_FLOATN_3:
1510       params[2] = ((GLfloat *) p)[2];
1511    case TYPE_FLOAT_2:
1512    case TYPE_FLOATN_2:
1513       params[1] = ((GLfloat *) p)[1];
1514    case TYPE_FLOAT:
1515    case TYPE_FLOATN:
1516       params[0] = ((GLfloat *) p)[0];
1517       break;
1518
1519    case TYPE_DOUBLEN:
1520       params[0] = ((GLdouble *) p)[0];
1521       break;
1522
1523    case TYPE_INT_4:
1524       params[3] = ((GLint *) p)[3];
1525    case TYPE_INT_3:
1526       params[2] = ((GLint *) p)[2];
1527    case TYPE_INT_2:
1528    case TYPE_ENUM_2:
1529       params[1] = ((GLint *) p)[1];
1530    case TYPE_INT:
1531    case TYPE_ENUM:
1532       params[0] = ((GLint *) p)[0];
1533       break;
1534
1535    case TYPE_INT_N:
1536       for (i = 0; i < v.value_int_n.n; i++)
1537          params[i] = v.value_int_n.ints[i];
1538       break;
1539
1540    case TYPE_INT64:
1541       params[0] = (GLdouble) (((GLint64 *) p)[0]);
1542       break;
1543
1544    case TYPE_BOOLEAN:
1545       params[0] = *(GLboolean*) p;
1546       break;
1547
1548    case TYPE_MATRIX:
1549       m = *(GLmatrix **) p;
1550       for (i = 0; i < 16; i++)
1551          params[i] = m->m[i];
1552       break;
1553
1554    case TYPE_MATRIX_T:
1555       m = *(GLmatrix **) p;
1556       for (i = 0; i < 16; i++)
1557          params[i] = m->m[transpose[i]];
1558       break;
1559
1560    case TYPE_BIT_0:
1561    case TYPE_BIT_1:
1562    case TYPE_BIT_2:
1563    case TYPE_BIT_3:
1564    case TYPE_BIT_4:
1565    case TYPE_BIT_5:
1566    case TYPE_BIT_6:
1567    case TYPE_BIT_7:
1568       shift = d->type - TYPE_BIT_0;
1569       params[0] = (*(GLbitfield *) p >> shift) & 1;
1570       break;
1571    }
1572 }
1573
1574 static enum value_type
1575 find_value_indexed(const char *func, GLenum pname, GLuint index, union value *v)
1576 {
1577    GET_CURRENT_CONTEXT(ctx);
1578
1579    switch (pname) {
1580
1581    case GL_BLEND:
1582       if (index >= ctx->Const.MaxDrawBuffers)
1583          goto invalid_value;
1584       if (!ctx->Extensions.EXT_draw_buffers2)
1585          goto invalid_enum;
1586       v->value_int = (ctx->Color.BlendEnabled >> index) & 1;
1587       return TYPE_INT;
1588
1589    case GL_BLEND_SRC:
1590       /* fall-through */
1591    case GL_BLEND_SRC_RGB:
1592       if (index >= ctx->Const.MaxDrawBuffers)
1593          goto invalid_value;
1594       if (!ctx->Extensions.ARB_draw_buffers_blend)
1595          goto invalid_enum;
1596       v->value_int = ctx->Color.Blend[index].SrcRGB;
1597       return TYPE_INT;
1598    case GL_BLEND_SRC_ALPHA:
1599       if (index >= ctx->Const.MaxDrawBuffers)
1600          goto invalid_value;
1601       if (!ctx->Extensions.ARB_draw_buffers_blend)
1602          goto invalid_enum;
1603       v->value_int = ctx->Color.Blend[index].SrcA;
1604       return TYPE_INT;
1605    case GL_BLEND_DST:
1606       /* fall-through */
1607    case GL_BLEND_DST_RGB:
1608       if (index >= ctx->Const.MaxDrawBuffers)
1609          goto invalid_value;
1610       if (!ctx->Extensions.ARB_draw_buffers_blend)
1611          goto invalid_enum;
1612       v->value_int = ctx->Color.Blend[index].DstRGB;
1613       return TYPE_INT;
1614    case GL_BLEND_DST_ALPHA:
1615       if (index >= ctx->Const.MaxDrawBuffers)
1616          goto invalid_value;
1617       if (!ctx->Extensions.ARB_draw_buffers_blend)
1618          goto invalid_enum;
1619       v->value_int = ctx->Color.Blend[index].DstA;
1620       return TYPE_INT;
1621    case GL_BLEND_EQUATION_RGB:
1622       if (index >= ctx->Const.MaxDrawBuffers)
1623          goto invalid_value;
1624       if (!ctx->Extensions.ARB_draw_buffers_blend)
1625          goto invalid_enum;
1626       v->value_int = ctx->Color.Blend[index].EquationRGB;
1627       return TYPE_INT;
1628    case GL_BLEND_EQUATION_ALPHA:
1629       if (index >= ctx->Const.MaxDrawBuffers)
1630          goto invalid_value;
1631       if (!ctx->Extensions.ARB_draw_buffers_blend)
1632          goto invalid_enum;
1633       v->value_int = ctx->Color.Blend[index].EquationA;
1634       return TYPE_INT;
1635
1636    case GL_COLOR_WRITEMASK:
1637       if (index >= ctx->Const.MaxDrawBuffers)
1638          goto invalid_value;
1639       if (!ctx->Extensions.EXT_draw_buffers2)
1640          goto invalid_enum;
1641       v->value_int_4[0] = ctx->Color.ColorMask[index][RCOMP] ? 1 : 0;
1642       v->value_int_4[1] = ctx->Color.ColorMask[index][GCOMP] ? 1 : 0;
1643       v->value_int_4[2] = ctx->Color.ColorMask[index][BCOMP] ? 1 : 0;
1644       v->value_int_4[3] = ctx->Color.ColorMask[index][ACOMP] ? 1 : 0;
1645       return TYPE_INT_4;
1646
1647    case GL_TRANSFORM_FEEDBACK_BUFFER_START:
1648       if (index >= ctx->Const.MaxTransformFeedbackBuffers)
1649          goto invalid_value;
1650       if (!ctx->Extensions.EXT_transform_feedback)
1651          goto invalid_enum;
1652       v->value_int64 = ctx->TransformFeedback.CurrentObject->Offset[index];
1653       return TYPE_INT64;
1654
1655    case GL_TRANSFORM_FEEDBACK_BUFFER_SIZE:
1656       if (index >= ctx->Const.MaxTransformFeedbackBuffers)
1657          goto invalid_value;
1658       if (!ctx->Extensions.EXT_transform_feedback)
1659          goto invalid_enum;
1660       v->value_int64
1661          = ctx->TransformFeedback.CurrentObject->RequestedSize[index];
1662       return TYPE_INT64;
1663
1664    case GL_TRANSFORM_FEEDBACK_BUFFER_BINDING:
1665       if (index >= ctx->Const.MaxTransformFeedbackBuffers)
1666          goto invalid_value;
1667       if (!ctx->Extensions.EXT_transform_feedback)
1668          goto invalid_enum;
1669       v->value_int = ctx->TransformFeedback.CurrentObject->BufferNames[index];
1670       return TYPE_INT;
1671
1672    case GL_UNIFORM_BUFFER_BINDING:
1673       if (index >= ctx->Const.MaxUniformBufferBindings)
1674          goto invalid_value;
1675       if (!ctx->Extensions.ARB_uniform_buffer_object)
1676          goto invalid_enum;
1677       v->value_int = ctx->UniformBufferBindings[index].BufferObject->Name;
1678       return TYPE_INT;
1679
1680    case GL_UNIFORM_BUFFER_START:
1681       if (index >= ctx->Const.MaxUniformBufferBindings)
1682          goto invalid_value;
1683       if (!ctx->Extensions.ARB_uniform_buffer_object)
1684          goto invalid_enum;
1685       v->value_int = ctx->UniformBufferBindings[index].Offset;
1686       return TYPE_INT;
1687
1688    case GL_UNIFORM_BUFFER_SIZE:
1689       if (index >= ctx->Const.MaxUniformBufferBindings)
1690          goto invalid_value;
1691       if (!ctx->Extensions.ARB_uniform_buffer_object)
1692          goto invalid_enum;
1693       v->value_int = ctx->UniformBufferBindings[index].Size;
1694       return TYPE_INT;
1695
1696    /* ARB_texture_multisample / GL3.2 */
1697    case GL_SAMPLE_MASK_VALUE:
1698       if (index != 0)
1699          goto invalid_value;
1700       if (!ctx->Extensions.ARB_texture_multisample)
1701          goto invalid_enum;
1702       v->value_int = ctx->Multisample.SampleMaskValue;
1703       return TYPE_INT;
1704    }
1705
1706  invalid_enum:
1707    _mesa_error(ctx, GL_INVALID_ENUM, "%s(pname=%s)", func,
1708                _mesa_lookup_enum_by_nr(pname));
1709    return TYPE_INVALID;
1710  invalid_value:
1711    _mesa_error(ctx, GL_INVALID_VALUE, "%s(pname=%s)", func,
1712                _mesa_lookup_enum_by_nr(pname));
1713    return TYPE_INVALID;
1714 }
1715
1716 void GLAPIENTRY
1717 _mesa_GetBooleani_v( GLenum pname, GLuint index, GLboolean *params )
1718 {
1719    union value v;
1720    enum value_type type =
1721       find_value_indexed("glGetBooleani_v", pname, index, &v);
1722
1723    switch (type) {
1724    case TYPE_INT:
1725       params[0] = INT_TO_BOOLEAN(v.value_int);
1726       break;
1727    case TYPE_INT_4:
1728       params[0] = INT_TO_BOOLEAN(v.value_int_4[0]);
1729       params[1] = INT_TO_BOOLEAN(v.value_int_4[1]);
1730       params[2] = INT_TO_BOOLEAN(v.value_int_4[2]);
1731       params[3] = INT_TO_BOOLEAN(v.value_int_4[3]);
1732       break;
1733    case TYPE_INT64:
1734       params[0] = INT64_TO_BOOLEAN(v.value_int);
1735       break;
1736    default:
1737       ; /* nothing - GL error was recorded */
1738    }
1739 }
1740
1741 void GLAPIENTRY
1742 _mesa_GetIntegeri_v( GLenum pname, GLuint index, GLint *params )
1743 {
1744    union value v;
1745    enum value_type type =
1746       find_value_indexed("glGetIntegeri_v", pname, index, &v);
1747
1748    switch (type) {
1749    case TYPE_INT:
1750       params[0] = v.value_int;
1751       break;
1752    case TYPE_INT_4:
1753       params[0] = v.value_int_4[0];
1754       params[1] = v.value_int_4[1];
1755       params[2] = v.value_int_4[2];
1756       params[3] = v.value_int_4[3];
1757       break;
1758    case TYPE_INT64:
1759       params[0] = INT64_TO_INT(v.value_int);
1760       break;
1761    default:
1762       ; /* nothing - GL error was recorded */
1763    }
1764 }
1765
1766 void GLAPIENTRY
1767 _mesa_GetInteger64i_v( GLenum pname, GLuint index, GLint64 *params )
1768 {
1769    union value v;
1770    enum value_type type =
1771       find_value_indexed("glGetInteger64i_v", pname, index, &v);
1772
1773    switch (type) {
1774    case TYPE_INT:
1775       params[0] = v.value_int;
1776       break;
1777    case TYPE_INT_4:
1778       params[0] = v.value_int_4[0];
1779       params[1] = v.value_int_4[1];
1780       params[2] = v.value_int_4[2];
1781       params[3] = v.value_int_4[3];
1782       break;
1783    case TYPE_INT64:
1784       params[0] = v.value_int;
1785       break;
1786    default:
1787       ; /* nothing - GL error was recorded */
1788    }
1789 }
1790
1791 void GLAPIENTRY
1792 _mesa_GetFixedv(GLenum pname, GLfixed *params)
1793 {
1794    const struct value_desc *d;
1795    union value v;
1796    GLmatrix *m;
1797    int shift, i;
1798    void *p;
1799
1800    d = find_value("glGetDoublev", pname, &p, &v);
1801    switch (d->type) {
1802    case TYPE_INVALID:
1803       break;
1804    case TYPE_CONST:
1805       params[0] = INT_TO_FIXED(d->offset);
1806       break;
1807
1808    case TYPE_FLOAT_4:
1809    case TYPE_FLOATN_4:
1810       params[3] = FLOAT_TO_FIXED(((GLfloat *) p)[3]);
1811    case TYPE_FLOAT_3:
1812    case TYPE_FLOATN_3:
1813       params[2] = FLOAT_TO_FIXED(((GLfloat *) p)[2]);
1814    case TYPE_FLOAT_2:
1815    case TYPE_FLOATN_2:
1816       params[1] = FLOAT_TO_FIXED(((GLfloat *) p)[1]);
1817    case TYPE_FLOAT:
1818    case TYPE_FLOATN:
1819       params[0] = FLOAT_TO_FIXED(((GLfloat *) p)[0]);
1820       break;
1821
1822    case TYPE_DOUBLEN:
1823       params[0] = FLOAT_TO_FIXED(((GLdouble *) p)[0]);
1824       break;
1825
1826    case TYPE_INT_4:
1827       params[3] = INT_TO_FIXED(((GLint *) p)[3]);
1828    case TYPE_INT_3:
1829       params[2] = INT_TO_FIXED(((GLint *) p)[2]);
1830    case TYPE_INT_2:
1831    case TYPE_ENUM_2:
1832       params[1] = INT_TO_FIXED(((GLint *) p)[1]);
1833    case TYPE_INT:
1834    case TYPE_ENUM:
1835       params[0] = INT_TO_FIXED(((GLint *) p)[0]);
1836       break;
1837
1838    case TYPE_INT_N:
1839       for (i = 0; i < v.value_int_n.n; i++)
1840          params[i] = INT_TO_FIXED(v.value_int_n.ints[i]);
1841       break;
1842
1843    case TYPE_INT64:
1844       params[0] = ((GLint64 *) p)[0];
1845       break;
1846
1847    case TYPE_BOOLEAN:
1848       params[0] = BOOLEAN_TO_FIXED(((GLboolean*) p)[0]);
1849       break;
1850
1851    case TYPE_MATRIX:
1852       m = *(GLmatrix **) p;
1853       for (i = 0; i < 16; i++)
1854          params[i] = FLOAT_TO_FIXED(m->m[i]);
1855       break;
1856
1857    case TYPE_MATRIX_T:
1858       m = *(GLmatrix **) p;
1859       for (i = 0; i < 16; i++)
1860          params[i] = FLOAT_TO_FIXED(m->m[transpose[i]]);
1861       break;
1862
1863    case TYPE_BIT_0:
1864    case TYPE_BIT_1:
1865    case TYPE_BIT_2:
1866    case TYPE_BIT_3:
1867    case TYPE_BIT_4:
1868    case TYPE_BIT_5:
1869    case TYPE_BIT_6:
1870    case TYPE_BIT_7:
1871       shift = d->type - TYPE_BIT_0;
1872       params[0] = BOOLEAN_TO_FIXED((*(GLbitfield *) p >> shift) & 1);
1873       break;
1874    }
1875 }