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