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