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