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