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