src/mesa/main/get.c

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