src/mesa/main/texparam.c

   1 /*
   2  * Mesa 3-D graphics library
   3  * Version:  7.5
   4  *
   5  * Copyright (C) 1999-2008  Brian Paul   All Rights Reserved.
   6  * Copyright (C) 2009  VMware, Inc.  All Rights Reserved.
   7  *
   8  * Permission is hereby granted, free of charge, to any person obtaining a
   9  * copy of this software and associated documentation files (the "Software"),
  10  * to deal in the Software without restriction, including without limitation
  11  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
  12  * and/or sell copies of the Software, and to permit persons to whom the
  13  * Software is furnished to do so, subject to the following conditions:
  14  *
  15  * The above copyright notice and this permission notice shall be included
  16  * in all copies or substantial portions of the Software.
  17  *
  18  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
  19  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  20  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
  21  * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
  22  * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
  23  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  24  */
  25
  26 /**
  27  * \file texparam.c
  28  *
  29  * glTexParameter-related functions
  30  */
  31
  32
  33 #include "main/glheader.h"
  34 #include "main/colormac.h"
  35 #include "main/context.h"
  36 #include "main/enums.h"
  37 #include "main/formats.h"
  38 #include "main/macros.h"
  39 #include "main/mfeatures.h"
  40 #include "main/mtypes.h"
  41 #include "main/texcompress.h"
  42 #include "main/texparam.h"
  43 #include "main/teximage.h"
  44 #include "main/texstate.h"
  45 #include "main/texfetch.h"
  46 #include "program/prog_instruction.h"
  47
  48
  49 /**
  50  * Check if a coordinate wrap mode is supported for the texture target.
  51  * \return GL_TRUE if legal, GL_FALSE otherwise
  52  */
  53 static GLboolean
  54 validate_texture_wrap_mode(struct gl_context * ctx, GLenum target, GLenum wrap)
  55 {
  56    const struct gl_extensions * const e = & ctx->Extensions;
  57
  58    if (wrap == GL_CLAMP || wrap == GL_CLAMP_TO_EDGE ||
  59        (wrap == GL_CLAMP_TO_BORDER && e->ARB_texture_border_clamp)) {
  60       /* any texture target */
  61       return GL_TRUE;
  62    }
  63    else if (target != GL_TEXTURE_RECTANGLE_NV &&
  64             (wrap == GL_REPEAT ||
  65              (wrap == GL_MIRRORED_REPEAT &&
  66               e->ARB_texture_mirrored_repeat) ||
  67              (wrap == GL_MIRROR_CLAMP_EXT &&
  68               (e->ATI_texture_mirror_once || e->EXT_texture_mirror_clamp)) ||
  69              (wrap == GL_MIRROR_CLAMP_TO_EDGE_EXT &&
  70               (e->ATI_texture_mirror_once || e->EXT_texture_mirror_clamp)) ||
  71              (wrap == GL_MIRROR_CLAMP_TO_BORDER_EXT &&
  72               (e->EXT_texture_mirror_clamp)))) {
  73       /* non-rectangle texture */
  74       return GL_TRUE;
  75    }
  76
  77    _mesa_error( ctx, GL_INVALID_ENUM, "glTexParameter(param=0x%x)", wrap );
  78    return GL_FALSE;
  79 }
  80
  81
  82 /**
  83  * Get current texture object for given target.
  84  * Return NULL if any error (and record the error).
  85  * Note that this is different from _mesa_select_tex_object() in that proxy
  86  * targets are not accepted.
  87  * Only the glGetTexLevelParameter() functions accept proxy targets.
  88  */
  89 static struct gl_texture_object *
  90 get_texobj(struct gl_context *ctx, GLenum target, GLboolean get)
  91 {
  92    struct gl_texture_unit *texUnit;
  93
  94    if (ctx->Texture.CurrentUnit >= ctx->Const.MaxCombinedTextureImageUnits) {
  95       _mesa_error(ctx, GL_INVALID_OPERATION,
  96                   "gl%sTexParameter(current unit)", get ? "Get" : "");
  97       return NULL;
  98    }
  99
 100    texUnit = _mesa_get_current_tex_unit(ctx);
 101
 102    switch (target) {
 103    case GL_TEXTURE_1D:
 104       return texUnit->CurrentTex[TEXTURE_1D_INDEX];
 105    case GL_TEXTURE_2D:
 106       return texUnit->CurrentTex[TEXTURE_2D_INDEX];
 107    case GL_TEXTURE_3D:
 108       return texUnit->CurrentTex[TEXTURE_3D_INDEX];
 109    case GL_TEXTURE_CUBE_MAP:
 110       if (ctx->Extensions.ARB_texture_cube_map) {
 111          return texUnit->CurrentTex[TEXTURE_CUBE_INDEX];
 112       }
 113       break;
 114    case GL_TEXTURE_RECTANGLE_NV:
 115       if (ctx->Extensions.NV_texture_rectangle) {
 116          return texUnit->CurrentTex[TEXTURE_RECT_INDEX];
 117       }
 118       break;
 119    case GL_TEXTURE_1D_ARRAY_EXT:
 120       if (ctx->Extensions.MESA_texture_array ||
 121           ctx->Extensions.EXT_texture_array) {
 122          return texUnit->CurrentTex[TEXTURE_1D_ARRAY_INDEX];
 123       }
 124       break;
 125    case GL_TEXTURE_2D_ARRAY_EXT:
 126       if (ctx->Extensions.MESA_texture_array ||
 127           ctx->Extensions.EXT_texture_array) {
 128          return texUnit->CurrentTex[TEXTURE_2D_ARRAY_INDEX];
 129       }
 130       break;
 131    default:
 132       ;
 133    }
 134
 135    _mesa_error(ctx, GL_INVALID_ENUM,
 136                   "gl%sTexParameter(target)", get ? "Get" : "");
 137    return NULL;
 138 }
 139
 140
 141 /**
 142  * Convert GL_RED/GREEN/BLUE/ALPHA/ZERO/ONE to SWIZZLE_X/Y/Z/W/ZERO/ONE.
 143  * \return -1 if error.
 144  */
 145 static GLint
 146 comp_to_swizzle(GLenum comp)
 147 {
 148    switch (comp) {
 149    case GL_RED:
 150       return SWIZZLE_X;
 151    case GL_GREEN:
 152       return SWIZZLE_Y;
 153    case GL_BLUE:
 154       return SWIZZLE_Z;
 155    case GL_ALPHA:
 156       return SWIZZLE_W;
 157    case GL_ZERO:
 158       return SWIZZLE_ZERO;
 159    case GL_ONE:
 160       return SWIZZLE_ONE;
 161    default:
 162       return -1;
 163    }
 164 }
 165
 166
 167 static void
 168 set_swizzle_component(GLuint *swizzle, GLuint comp, GLuint swz)
 169 {
 170    ASSERT(comp < 4);
 171    ASSERT(swz <= SWIZZLE_NIL);
 172    {
 173       GLuint mask = 0x7 << (3 * comp);
 174       GLuint s = (*swizzle & ~mask) | (swz << (3 * comp));
 175       *swizzle = s;
 176    }
 177 }
 178
 179
 180 /**
 181  * This is called just prior to changing any texture object state which
 182  * will not effect texture completeness.
 183  */
 184 static INLINE void
 185 flush(struct gl_context *ctx)
 186 {
 187    FLUSH_VERTICES(ctx, _NEW_TEXTURE);
 188 }
 189
 190
 191 /**
 192  * This is called just prior to changing any texture object state which
 193  * can effect texture completeness (texture base level, max level,
 194  * minification filter).
 195  * Any pending rendering will be flushed out, we'll set the _NEW_TEXTURE
 196  * state flag and then mark the texture object as 'incomplete' so that any
 197  * per-texture derived state gets recomputed.
 198  */
 199 static INLINE void
 200 incomplete(struct gl_context *ctx, struct gl_texture_object *texObj)
 201 {
 202    FLUSH_VERTICES(ctx, _NEW_TEXTURE);
 203    texObj->_Complete = GL_FALSE;
 204 }
 205
 206
 207 /**
 208  * Set an integer-valued texture parameter
 209  * \return GL_TRUE if legal AND the value changed, GL_FALSE otherwise
 210  */
 211 static GLboolean
 212 set_tex_parameteri(struct gl_context *ctx,
 213                    struct gl_texture_object *texObj,
 214                    GLenum pname, const GLint *params)
 215 {
 216    switch (pname) {
 217    case GL_TEXTURE_MIN_FILTER:
 218       if (texObj->MinFilter == params[0])
 219          return GL_FALSE;
 220       switch (params[0]) {
 221       case GL_NEAREST:
 222       case GL_LINEAR:
 223          incomplete(ctx, texObj);
 224          texObj->MinFilter = params[0];
 225          return GL_TRUE;
 226       case GL_NEAREST_MIPMAP_NEAREST:
 227       case GL_LINEAR_MIPMAP_NEAREST:
 228       case GL_NEAREST_MIPMAP_LINEAR:
 229       case GL_LINEAR_MIPMAP_LINEAR:
 230          if (texObj->Target != GL_TEXTURE_RECTANGLE_NV) {
 231             incomplete(ctx, texObj);
 232             texObj->MinFilter = params[0];
 233             return GL_TRUE;
 234          }
 235          /* fall-through */
 236       default:
 237          goto invalid_param;
 238       }
 239       return GL_FALSE;
 240
 241    case GL_TEXTURE_MAG_FILTER:
 242       if (texObj->MagFilter == params[0])
 243          return GL_FALSE;
 244       switch (params[0]) {
 245       case GL_NEAREST:
 246       case GL_LINEAR:
 247          flush(ctx); /* does not effect completeness */
 248          texObj->MagFilter = params[0];
 249          return GL_TRUE;
 250       default:
 251          goto invalid_param;
 252       }
 253       return GL_FALSE;
 254
 255    case GL_TEXTURE_WRAP_S:
 256       if (texObj->WrapS == params[0])
 257          return GL_FALSE;
 258       if (validate_texture_wrap_mode(ctx, texObj->Target, params[0])) {
 259          flush(ctx);
 260          texObj->WrapS = params[0];
 261          return GL_TRUE;
 262       }
 263       return GL_FALSE;
 264
 265    case GL_TEXTURE_WRAP_T:
 266       if (texObj->WrapT == params[0])
 267          return GL_FALSE;
 268       if (validate_texture_wrap_mode(ctx, texObj->Target, params[0])) {
 269          flush(ctx);
 270          texObj->WrapT = params[0];
 271          return GL_TRUE;
 272       }
 273       return GL_FALSE;
 274
 275    case GL_TEXTURE_WRAP_R:
 276       if (texObj->WrapR == params[0])
 277          return GL_FALSE;
 278       if (validate_texture_wrap_mode(ctx, texObj->Target, params[0])) {
 279          flush(ctx);
 280          texObj->WrapR = params[0];
 281          return GL_TRUE;
 282       }
 283       return GL_FALSE;
 284
 285    case GL_TEXTURE_BASE_LEVEL:
 286       if (texObj->BaseLevel == params[0])
 287          return GL_FALSE;
 288       if (params[0] < 0 ||
 289           (texObj->Target == GL_TEXTURE_RECTANGLE_ARB && params[0] != 0)) {
 290          _mesa_error(ctx, GL_INVALID_VALUE,
 291                      "glTexParameter(param=%d)", params[0]);
 292          return GL_FALSE;
 293       }
 294       incomplete(ctx, texObj);
 295       texObj->BaseLevel = params[0];
 296       return GL_TRUE;
 297
 298    case GL_TEXTURE_MAX_LEVEL:
 299       if (texObj->MaxLevel == params[0])
 300          return GL_FALSE;
 301       if (params[0] < 0 || texObj->Target == GL_TEXTURE_RECTANGLE_ARB) {
 302          _mesa_error(ctx, GL_INVALID_OPERATION,
 303                      "glTexParameter(param=%d)", params[0]);
 304          return GL_FALSE;
 305       }
 306       incomplete(ctx, texObj);
 307       texObj->MaxLevel = params[0];
 308       return GL_TRUE;
 309
 310    case GL_GENERATE_MIPMAP_SGIS:
 311       if (texObj->GenerateMipmap != params[0]) {
 312          /* no flush() */
 313          texObj->GenerateMipmap = params[0] ? GL_TRUE : GL_FALSE;
 314          return GL_TRUE;
 315       }
 316       return GL_FALSE;
 317
 318    case GL_TEXTURE_COMPARE_MODE_ARB:
 319       if (ctx->Extensions.ARB_shadow) {
 320          if (texObj->CompareMode == params[0])
 321             return GL_FALSE;
 322          if (params[0] == GL_NONE ||
 323              params[0] == GL_COMPARE_R_TO_TEXTURE_ARB) {
 324             flush(ctx);
 325             texObj->CompareMode = params[0];
 326             return GL_TRUE;
 327          }
 328          goto invalid_param;
 329       }
 330       goto invalid_pname;
 331
 332    case GL_TEXTURE_COMPARE_FUNC_ARB:
 333       if (ctx->Extensions.ARB_shadow) {
 334          if (texObj->CompareFunc == params[0])
 335             return GL_FALSE;
 336          switch (params[0]) {
 337          case GL_LEQUAL:
 338          case GL_GEQUAL:
 339             flush(ctx);
 340             texObj->CompareFunc = params[0];
 341             return GL_TRUE;
 342          case GL_EQUAL:
 343          case GL_NOTEQUAL:
 344          case GL_LESS:
 345          case GL_GREATER:
 346          case GL_ALWAYS:
 347          case GL_NEVER:
 348             if (ctx->Extensions.EXT_shadow_funcs) {
 349                flush(ctx);
 350                texObj->CompareFunc = params[0];
 351                return GL_TRUE;
 352             }
 353             /* fall-through */
 354          default:
 355             goto invalid_param;
 356          }
 357       }
 358       goto invalid_pname;
 359
 360    case GL_DEPTH_TEXTURE_MODE_ARB:
 361       if (ctx->Extensions.ARB_depth_texture) {
 362          if (texObj->DepthMode == params[0])
 363             return GL_FALSE;
 364          if (params[0] == GL_LUMINANCE ||
 365              params[0] == GL_INTENSITY ||
 366              params[0] == GL_ALPHA ||
 367              (ctx->Extensions.ARB_texture_rg && params[0] == GL_RED)) {
 368             flush(ctx);
 369             texObj->DepthMode = params[0];
 370             return GL_TRUE;
 371          }
 372          goto invalid_param;
 373       }
 374       goto invalid_pname;
 375
 376 #if FEATURE_OES_draw_texture
 377    case GL_TEXTURE_CROP_RECT_OES:
 378       texObj->CropRect[0] = params[0];
 379       texObj->CropRect[1] = params[1];
 380       texObj->CropRect[2] = params[2];
 381       texObj->CropRect[3] = params[3];
 382       return GL_TRUE;
 383 #endif
 384
 385    case GL_TEXTURE_SWIZZLE_R_EXT:
 386    case GL_TEXTURE_SWIZZLE_G_EXT:
 387    case GL_TEXTURE_SWIZZLE_B_EXT:
 388    case GL_TEXTURE_SWIZZLE_A_EXT:
 389       if (ctx->Extensions.EXT_texture_swizzle) {
 390          const GLuint comp = pname - GL_TEXTURE_SWIZZLE_R_EXT;
 391          const GLint swz = comp_to_swizzle(params[0]);
 392          if (swz < 0) {
 393             _mesa_error(ctx, GL_INVALID_OPERATION,
 394                         "glTexParameter(swizzle 0x%x)", params[0]);
 395             return GL_FALSE;
 396          }
 397          ASSERT(comp < 4);
 398          if (swz >= 0) {
 399             flush(ctx);
 400             texObj->Swizzle[comp] = params[0];
 401             set_swizzle_component(&texObj->_Swizzle, comp, swz);
 402             return GL_TRUE;
 403          }
 404       }
 405       goto invalid_pname;
 406
 407    case GL_TEXTURE_SWIZZLE_RGBA_EXT:
 408       if (ctx->Extensions.EXT_texture_swizzle) {
 409          GLuint comp;
 410          flush(ctx);
 411          for (comp = 0; comp < 4; comp++) {
 412             const GLint swz = comp_to_swizzle(params[comp]);
 413             if (swz >= 0) {
 414                texObj->Swizzle[comp] = params[comp];
 415                set_swizzle_component(&texObj->_Swizzle, comp, swz);
 416             }
 417             else {
 418                _mesa_error(ctx, GL_INVALID_OPERATION,
 419                            "glTexParameter(swizzle 0x%x)", params[comp]);
 420                return GL_FALSE;
 421             }
 422          }
 423          return GL_TRUE;
 424       }
 425       goto invalid_pname;
 426
 427    case GL_TEXTURE_SRGB_DECODE_EXT:
 428       if (ctx->Extensions.EXT_texture_sRGB_decode) {
 429          GLenum decode = params[0];
 430          if (decode == GL_DECODE_EXT || decode == GL_SKIP_DECODE_EXT) {
 431             if (texObj->sRGBDecode != decode) {
 432                flush(ctx);
 433                texObj->sRGBDecode = decode;
 434                _mesa_update_fetch_functions(texObj);
 435             }
 436             return GL_TRUE;
 437          }
 438       }
 439       goto invalid_pname;
 440
 441    default:
 442       goto invalid_pname;
 443    }
 444
 445 invalid_pname:
 446    _mesa_error(ctx, GL_INVALID_ENUM, "glTexParameter(pname=%s)",
 447                _mesa_lookup_enum_by_nr(pname));
 448    return GL_FALSE;
 449
 450 invalid_param:
 451    _mesa_error(ctx, GL_INVALID_ENUM, "glTexParameter(param=%s)",
 452                _mesa_lookup_enum_by_nr(params[0]));
 453    return GL_FALSE;
 454 }
 455
 456
 457 /**
 458  * Set a float-valued texture parameter
 459  * \return GL_TRUE if legal AND the value changed, GL_FALSE otherwise
 460  */
 461 static GLboolean
 462 set_tex_parameterf(struct gl_context *ctx,
 463                    struct gl_texture_object *texObj,
 464                    GLenum pname, const GLfloat *params)
 465 {
 466    switch (pname) {
 467    case GL_TEXTURE_MIN_LOD:
 468       if (texObj->MinLod == params[0])
 469          return GL_FALSE;
 470       flush(ctx);
 471       texObj->MinLod = params[0];
 472       return GL_TRUE;
 473
 474    case GL_TEXTURE_MAX_LOD:
 475       if (texObj->MaxLod == params[0])
 476          return GL_FALSE;
 477       flush(ctx);
 478       texObj->MaxLod = params[0];
 479       return GL_TRUE;
 480
 481    case GL_TEXTURE_PRIORITY:
 482       flush(ctx);
 483       texObj->Priority = CLAMP(params[0], 0.0F, 1.0F);
 484       return GL_TRUE;
 485
 486    case GL_TEXTURE_MAX_ANISOTROPY_EXT:
 487       if (ctx->Extensions.EXT_texture_filter_anisotropic) {
 488          if (texObj->MaxAnisotropy == params[0])
 489             return GL_FALSE;
 490          if (params[0] < 1.0) {
 491             _mesa_error(ctx, GL_INVALID_VALUE, "glTexParameter(param)" );
 492             return GL_FALSE;
 493          }
 494          flush(ctx);
 495          /* clamp to max, that's what NVIDIA does */
 496          texObj->MaxAnisotropy = MIN2(params[0],
 497                                       ctx->Const.MaxTextureMaxAnisotropy);
 498          return GL_TRUE;
 499       }
 500       else {
 501          static GLuint count = 0;
 502          if (count++ < 10)
 503             _mesa_error(ctx, GL_INVALID_ENUM,
 504                         "glTexParameter(pname=GL_TEXTURE_MAX_ANISOTROPY_EXT)");
 505       }
 506       return GL_FALSE;
 507
 508    case GL_TEXTURE_COMPARE_FAIL_VALUE_ARB:
 509       if (ctx->Extensions.ARB_shadow_ambient) {
 510          if (texObj->CompareFailValue != params[0]) {
 511             flush(ctx);
 512             texObj->CompareFailValue = CLAMP(params[0], 0.0F, 1.0F);
 513             return GL_TRUE;
 514          }
 515       }
 516       else {
 517          _mesa_error(ctx, GL_INVALID_ENUM,
 518                     "glTexParameter(pname=GL_TEXTURE_COMPARE_FAIL_VALUE_ARB)");
 519       }
 520       return GL_FALSE;
 521
 522    case GL_TEXTURE_LOD_BIAS:
 523       /* NOTE: this is really part of OpenGL 1.4, not EXT_texture_lod_bias */
 524       if (ctx->Extensions.EXT_texture_lod_bias) {
 525          if (texObj->LodBias != params[0]) {
 526             flush(ctx);
 527             texObj->LodBias = params[0];
 528             return GL_TRUE;
 529          }
 530          return GL_FALSE;
 531       }
 532       break;
 533
 534    case GL_TEXTURE_BORDER_COLOR:
 535       flush(ctx);
 536       texObj->BorderColor.f[RCOMP] = params[0];
 537       texObj->BorderColor.f[GCOMP] = params[1];
 538       texObj->BorderColor.f[BCOMP] = params[2];
 539       texObj->BorderColor.f[ACOMP] = params[3];
 540       return GL_TRUE;
 541
 542    default:
 543       _mesa_error(ctx, GL_INVALID_ENUM, "glTexParameter(pname=0x%x)", pname);
 544    }
 545    return GL_FALSE;
 546 }
 547
 548
 549 void GLAPIENTRY
 550 _mesa_TexParameterf(GLenum target, GLenum pname, GLfloat param)
 551 {
 552    GLboolean need_update;
 553    struct gl_texture_object *texObj;
 554    GET_CURRENT_CONTEXT(ctx);
 555    ASSERT_OUTSIDE_BEGIN_END(ctx);
 556
 557    texObj = get_texobj(ctx, target, GL_FALSE);
 558    if (!texObj)
 559       return;
 560
 561    switch (pname) {
 562    case GL_TEXTURE_MIN_FILTER:
 563    case GL_TEXTURE_MAG_FILTER:
 564    case GL_TEXTURE_WRAP_S:
 565    case GL_TEXTURE_WRAP_T:
 566    case GL_TEXTURE_WRAP_R:
 567    case GL_TEXTURE_BASE_LEVEL:
 568    case GL_TEXTURE_MAX_LEVEL:
 569    case GL_GENERATE_MIPMAP_SGIS:
 570    case GL_TEXTURE_COMPARE_MODE_ARB:
 571    case GL_TEXTURE_COMPARE_FUNC_ARB:
 572    case GL_DEPTH_TEXTURE_MODE_ARB:
 573    case GL_TEXTURE_SRGB_DECODE_EXT:
 574       {
 575          /* convert float param to int */
 576          GLint p[4];
 577          p[0] = (GLint) param;
 578          p[1] = p[2] = p[3] = 0;
 579          need_update = set_tex_parameteri(ctx, texObj, pname, p);
 580       }
 581       break;
 582    default:
 583       {
 584          /* this will generate an error if pname is illegal */
 585          GLfloat p[4];
 586          p[0] = param;
 587          p[1] = p[2] = p[3] = 0.0F;
 588          need_update = set_tex_parameterf(ctx, texObj, pname, p);
 589       }
 590    }
 591
 592    if (ctx->Driver.TexParameter && need_update) {
 593       ctx->Driver.TexParameter(ctx, target, texObj, pname, &param);
 594    }
 595 }
 596
 597
 598 void GLAPIENTRY
 599 _mesa_TexParameterfv(GLenum target, GLenum pname, const GLfloat *params)
 600 {
 601    GLboolean need_update;
 602    struct gl_texture_object *texObj;
 603    GET_CURRENT_CONTEXT(ctx);
 604    ASSERT_OUTSIDE_BEGIN_END(ctx);
 605
 606    texObj = get_texobj(ctx, target, GL_FALSE);
 607    if (!texObj)
 608       return;
 609
 610    switch (pname) {
 611    case GL_TEXTURE_MIN_FILTER:
 612    case GL_TEXTURE_MAG_FILTER:
 613    case GL_TEXTURE_WRAP_S:
 614    case GL_TEXTURE_WRAP_T:
 615    case GL_TEXTURE_WRAP_R:
 616    case GL_TEXTURE_BASE_LEVEL:
 617    case GL_TEXTURE_MAX_LEVEL:
 618    case GL_GENERATE_MIPMAP_SGIS:
 619    case GL_TEXTURE_COMPARE_MODE_ARB:
 620    case GL_TEXTURE_COMPARE_FUNC_ARB:
 621    case GL_DEPTH_TEXTURE_MODE_ARB:
 622    case GL_TEXTURE_SRGB_DECODE_EXT:
 623       {
 624          /* convert float param to int */
 625          GLint p[4];
 626          p[0] = (GLint) params[0];
 627          p[1] = p[2] = p[3] = 0;
 628          need_update = set_tex_parameteri(ctx, texObj, pname, p);
 629       }
 630       break;
 631
 632 #if FEATURE_OES_draw_texture
 633    case GL_TEXTURE_CROP_RECT_OES:
 634       {
 635          /* convert float params to int */
 636          GLint iparams[4];
 637          iparams[0] = (GLint) params[0];
 638          iparams[1] = (GLint) params[1];
 639          iparams[2] = (GLint) params[2];
 640          iparams[3] = (GLint) params[3];
 641          need_update = set_tex_parameteri(ctx, texObj, pname, iparams);
 642       }
 643       break;
 644 #endif
 645
 646    default:
 647       /* this will generate an error if pname is illegal */
 648       need_update = set_tex_parameterf(ctx, texObj, pname, params);
 649    }
 650
 651    if (ctx->Driver.TexParameter && need_update) {
 652       ctx->Driver.TexParameter(ctx, target, texObj, pname, params);
 653    }
 654 }
 655
 656
 657 void GLAPIENTRY
 658 _mesa_TexParameteri(GLenum target, GLenum pname, GLint param)
 659 {
 660    GLboolean need_update;
 661    struct gl_texture_object *texObj;
 662    GET_CURRENT_CONTEXT(ctx);
 663    ASSERT_OUTSIDE_BEGIN_END(ctx);
 664
 665    texObj = get_texobj(ctx, target, GL_FALSE);
 666    if (!texObj)
 667       return;
 668
 669    switch (pname) {
 670    case GL_TEXTURE_MIN_LOD:
 671    case GL_TEXTURE_MAX_LOD:
 672    case GL_TEXTURE_PRIORITY:
 673    case GL_TEXTURE_MAX_ANISOTROPY_EXT:
 674    case GL_TEXTURE_LOD_BIAS:
 675    case GL_TEXTURE_COMPARE_FAIL_VALUE_ARB:
 676       {
 677          GLfloat fparam[4];
 678          fparam[0] = (GLfloat) param;
 679          fparam[1] = fparam[2] = fparam[3] = 0.0F;
 680          /* convert int param to float */
 681          need_update = set_tex_parameterf(ctx, texObj, pname, fparam);
 682       }
 683       break;
 684    default:
 685       /* this will generate an error if pname is illegal */
 686       {
 687          GLint iparam[4];
 688          iparam[0] = param;
 689          iparam[1] = iparam[2] = iparam[3] = 0;
 690          need_update = set_tex_parameteri(ctx, texObj, pname, iparam);
 691       }
 692    }
 693
 694    if (ctx->Driver.TexParameter && need_update) {
 695       GLfloat fparam = (GLfloat) param;
 696       ctx->Driver.TexParameter(ctx, target, texObj, pname, &fparam);
 697    }
 698 }
 699
 700
 701 void GLAPIENTRY
 702 _mesa_TexParameteriv(GLenum target, GLenum pname, const GLint *params)
 703 {
 704    GLboolean need_update;
 705    struct gl_texture_object *texObj;
 706    GET_CURRENT_CONTEXT(ctx);
 707    ASSERT_OUTSIDE_BEGIN_END(ctx);
 708
 709    texObj = get_texobj(ctx, target, GL_FALSE);
 710    if (!texObj)
 711       return;
 712
 713    switch (pname) {
 714    case GL_TEXTURE_BORDER_COLOR:
 715       {
 716          /* convert int params to float */
 717          GLfloat fparams[4];
 718          fparams[0] = INT_TO_FLOAT(params[0]);
 719          fparams[1] = INT_TO_FLOAT(params[1]);
 720          fparams[2] = INT_TO_FLOAT(params[2]);
 721          fparams[3] = INT_TO_FLOAT(params[3]);
 722          need_update = set_tex_parameterf(ctx, texObj, pname, fparams);
 723       }
 724       break;
 725    case GL_TEXTURE_MIN_LOD:
 726    case GL_TEXTURE_MAX_LOD:
 727    case GL_TEXTURE_PRIORITY:
 728    case GL_TEXTURE_MAX_ANISOTROPY_EXT:
 729    case GL_TEXTURE_LOD_BIAS:
 730    case GL_TEXTURE_COMPARE_FAIL_VALUE_ARB:
 731       {
 732          /* convert int param to float */
 733          GLfloat fparams[4];
 734          fparams[0] = (GLfloat) params[0];
 735          fparams[1] = fparams[2] = fparams[3] = 0.0F;
 736          need_update = set_tex_parameterf(ctx, texObj, pname, fparams);
 737       }
 738       break;
 739    default:
 740       /* this will generate an error if pname is illegal */
 741       need_update = set_tex_parameteri(ctx, texObj, pname, params);
 742    }
 743
 744    if (ctx->Driver.TexParameter && need_update) {
 745       GLfloat fparams[4];
 746       fparams[0] = INT_TO_FLOAT(params[0]);
 747       if (pname == GL_TEXTURE_BORDER_COLOR ||
 748           pname == GL_TEXTURE_CROP_RECT_OES) {
 749          fparams[1] = INT_TO_FLOAT(params[1]);
 750          fparams[2] = INT_TO_FLOAT(params[2]);
 751          fparams[3] = INT_TO_FLOAT(params[3]);
 752       }
 753       ctx->Driver.TexParameter(ctx, target, texObj, pname, fparams);
 754    }
 755 }
 756
 757
 758 /**
 759  * Set tex parameter to integer value(s).  Primarily intended to set
 760  * integer-valued texture border color (for integer-valued textures).
 761  * New in GL 3.0.
 762  */
 763 void GLAPIENTRY
 764 _mesa_TexParameterIiv(GLenum target, GLenum pname, const GLint *params)
 765 {
 766    struct gl_texture_object *texObj;
 767    GET_CURRENT_CONTEXT(ctx);
 768    ASSERT_OUTSIDE_BEGIN_END(ctx);
 769
 770    texObj = get_texobj(ctx, target, GL_FALSE);
 771    if (!texObj)
 772       return;
 773
 774    switch (pname) {
 775    case GL_TEXTURE_BORDER_COLOR:
 776       FLUSH_VERTICES(ctx, _NEW_TEXTURE);
 777       /* set the integer-valued border color */
 778       COPY_4V(texObj->BorderColor.i, params);
 779       break;
 780    default:
 781       _mesa_TexParameteriv(target, pname, params);
 782       break;
 783    }
 784    /* XXX no driver hook for TexParameterIiv() yet */
 785 }
 786
 787
 788 /**
 789  * Set tex parameter to unsigned integer value(s).  Primarily intended to set
 790  * uint-valued texture border color (for integer-valued textures).
 791  * New in GL 3.0
 792  */
 793 void GLAPIENTRY
 794 _mesa_TexParameterIuiv(GLenum target, GLenum pname, const GLuint *params)
 795 {
 796    struct gl_texture_object *texObj;
 797    GET_CURRENT_CONTEXT(ctx);
 798    ASSERT_OUTSIDE_BEGIN_END(ctx);
 799
 800    texObj = get_texobj(ctx, target, GL_FALSE);
 801    if (!texObj)
 802       return;
 803
 804    switch (pname) {
 805    case GL_TEXTURE_BORDER_COLOR:
 806       FLUSH_VERTICES(ctx, _NEW_TEXTURE);
 807       /* set the unsigned integer-valued border color */
 808       COPY_4V(texObj->BorderColor.ui, params);
 809       break;
 810    default:
 811       _mesa_TexParameteriv(target, pname, (const GLint *) params);
 812       break;
 813    }
 814    /* XXX no driver hook for TexParameterIuiv() yet */
 815 }
 816
 817
 818
 819
 820 void GLAPIENTRY
 821 _mesa_GetTexLevelParameterfv( GLenum target, GLint level,
 822                               GLenum pname, GLfloat *params )
 823 {
 824    GLint iparam;
 825    _mesa_GetTexLevelParameteriv( target, level, pname, &iparam );
 826    *params = (GLfloat) iparam;
 827 }
 828
 829
 830 void GLAPIENTRY
 831 _mesa_GetTexLevelParameteriv( GLenum target, GLint level,
 832                               GLenum pname, GLint *params )
 833 {
 834    const struct gl_texture_unit *texUnit;
 835    struct gl_texture_object *texObj;
 836    const struct gl_texture_image *img = NULL;
 837    GLint maxLevels;
 838    gl_format texFormat;
 839    GET_CURRENT_CONTEXT(ctx);
 840    ASSERT_OUTSIDE_BEGIN_END(ctx);
 841
 842    if (ctx->Texture.CurrentUnit >= ctx->Const.MaxCombinedTextureImageUnits) {
 843       _mesa_error(ctx, GL_INVALID_OPERATION,
 844                   "glGetTexLevelParameteriv(current unit)");
 845       return;
 846    }
 847
 848    texUnit = _mesa_get_current_tex_unit(ctx);
 849
 850    /* this will catch bad target values */
 851    maxLevels = _mesa_max_texture_levels(ctx, target);
 852    if (maxLevels == 0) {
 853       _mesa_error(ctx, GL_INVALID_ENUM,
 854                   "glGetTexLevelParameter[if]v(target=0x%x)", target);
 855       return;
 856    }
 857
 858    if (level < 0 || level >= maxLevels) {
 859       _mesa_error( ctx, GL_INVALID_VALUE, "glGetTexLevelParameter[if]v" );
 860       return;
 861    }
 862
 863    texObj = _mesa_select_tex_object(ctx, texUnit, target);
 864
 865    img = _mesa_select_tex_image(ctx, texObj, target, level);
 866    if (!img || !img->TexFormat) {
 867       /* undefined texture image */
 868       if (pname == GL_TEXTURE_COMPONENTS)
 869          *params = 1;
 870       else
 871          *params = 0;
 872       return;
 873    }
 874
 875    texFormat = img->TexFormat;
 876
 877    switch (pname) {
 878       case GL_TEXTURE_WIDTH:
 879          *params = img->Width;
 880          break;
 881       case GL_TEXTURE_HEIGHT:
 882          *params = img->Height;
 883          break;
 884       case GL_TEXTURE_DEPTH:
 885          *params = img->Depth;
 886          break;
 887       case GL_TEXTURE_INTERNAL_FORMAT:
 888          if (_mesa_is_format_compressed(texFormat)) {
 889             /* need to return the actual compressed format */
 890             *params = _mesa_compressed_format_to_glenum(ctx, texFormat);
 891          }
 892          else {
 893             /* return the user's requested internal format */
 894             *params = img->InternalFormat;
 895          }
 896          break;
 897       case GL_TEXTURE_BORDER:
 898          *params = img->Border;
 899          break;
 900       case GL_TEXTURE_RED_SIZE:
 901          if (img->_BaseFormat == GL_RED) {
 902             *params = _mesa_get_format_bits(texFormat, pname);
 903             break;
 904          }
 905          /* FALLTHROUGH */
 906       case GL_TEXTURE_GREEN_SIZE:
 907          if (img->_BaseFormat == GL_RG) {
 908             *params = _mesa_get_format_bits(texFormat, pname);
 909             break;
 910          }
 911          /* FALLTHROUGH */
 912       case GL_TEXTURE_BLUE_SIZE:
 913          if (img->_BaseFormat == GL_RGB || img->_BaseFormat == GL_RGBA)
 914             *params = _mesa_get_format_bits(texFormat, pname);
 915          else
 916             *params = 0;
 917          break;
 918       case GL_TEXTURE_ALPHA_SIZE:
 919          if (img->_BaseFormat == GL_ALPHA ||
 920              img->_BaseFormat == GL_LUMINANCE_ALPHA ||
 921              img->_BaseFormat == GL_RGBA)
 922             *params = _mesa_get_format_bits(texFormat, pname);
 923          else
 924             *params = 0;
 925          break;
 926       case GL_TEXTURE_INTENSITY_SIZE:
 927          if (img->_BaseFormat != GL_INTENSITY)
 928             *params = 0;
 929          else {
 930             *params = _mesa_get_format_bits(texFormat, pname);
 931             if (*params == 0) {
 932                /* intensity probably stored as rgb texture */
 933                *params = MIN2(_mesa_get_format_bits(texFormat, GL_TEXTURE_RED_SIZE),
 934                               _mesa_get_format_bits(texFormat, GL_TEXTURE_GREEN_SIZE));
 935             }
 936          }
 937          break;
 938       case GL_TEXTURE_LUMINANCE_SIZE:
 939          if (img->_BaseFormat != GL_LUMINANCE &&
 940              img->_BaseFormat != GL_LUMINANCE_ALPHA)
 941             *params = 0;
 942          else {
 943             *params = _mesa_get_format_bits(texFormat, pname);
 944             if (*params == 0) {
 945                /* luminance probably stored as rgb texture */
 946                *params = MIN2(_mesa_get_format_bits(texFormat, GL_TEXTURE_RED_SIZE),
 947                               _mesa_get_format_bits(texFormat, GL_TEXTURE_GREEN_SIZE));
 948             }
 949          }
 950          break;
 951       case GL_TEXTURE_INDEX_SIZE_EXT:
 952          if (img->_BaseFormat == GL_COLOR_INDEX)
 953             *params = _mesa_get_format_bits(texFormat, pname);
 954          else
 955             *params = 0;
 956          break;
 957       case GL_TEXTURE_DEPTH_SIZE_ARB:
 958          if (ctx->Extensions.ARB_depth_texture)
 959             *params = _mesa_get_format_bits(texFormat, pname);
 960          else
 961             goto invalid_pname;
 962          break;
 963       case GL_TEXTURE_STENCIL_SIZE_EXT:
 964          if (ctx->Extensions.EXT_packed_depth_stencil ||
 965              ctx->Extensions.ARB_framebuffer_object) {
 966             *params = _mesa_get_format_bits(texFormat, pname);
 967          }
 968          else {
 969             goto invalid_pname;
 970          }
 971          break;
 972       case GL_TEXTURE_SHARED_SIZE:
 973          if (ctx->VersionMajor >= 3) {
 974             /* XXX return number of exponent bits for shared exponent texture
 975              * formats, like GL_RGB9_E5.
 976              */
 977             *params = 0;
 978          }
 979          else {
 980             goto invalid_pname;
 981          }
 982          break;
 983
 984       /* GL_ARB_texture_compression */
 985       case GL_TEXTURE_COMPRESSED_IMAGE_SIZE:
 986          if (_mesa_is_format_compressed(texFormat) &&
 987              !_mesa_is_proxy_texture(target)) {
 988             *params = _mesa_format_image_size(texFormat, img->Width,
 989                                               img->Height, img->Depth);
 990          }
 991          else {
 992             _mesa_error(ctx, GL_INVALID_OPERATION,
 993                         "glGetTexLevelParameter[if]v(pname)");
 994          }
 995          break;
 996       case GL_TEXTURE_COMPRESSED:
 997          *params = (GLint) _mesa_is_format_compressed(texFormat);
 998          break;
 999
1000       /* GL_ARB_texture_float */
1001       case GL_TEXTURE_RED_TYPE_ARB:
1002          if (ctx->Extensions.ARB_texture_float) {
1003             *params = _mesa_get_format_bits(texFormat, GL_TEXTURE_RED_SIZE) ?
1004                _mesa_get_format_datatype(texFormat) : GL_NONE;
1005          }
1006          else {
1007             goto invalid_pname;
1008          }
1009          break;
1010       case GL_TEXTURE_GREEN_TYPE_ARB:
1011          if (ctx->Extensions.ARB_texture_float) {
1012             *params = _mesa_get_format_bits(texFormat, GL_TEXTURE_GREEN_SIZE) ?
1013                _mesa_get_format_datatype(texFormat) : GL_NONE;
1014          }
1015          else {
1016             goto invalid_pname;
1017          }
1018          break;
1019       case GL_TEXTURE_BLUE_TYPE_ARB:
1020          if (ctx->Extensions.ARB_texture_float) {
1021             *params = _mesa_get_format_bits(texFormat, GL_TEXTURE_BLUE_SIZE) ?
1022                _mesa_get_format_datatype(texFormat) : GL_NONE;
1023          }
1024          else {
1025             goto invalid_pname;
1026          }
1027          break;
1028       case GL_TEXTURE_ALPHA_TYPE_ARB:
1029          if (ctx->Extensions.ARB_texture_float) {
1030             *params = _mesa_get_format_bits(texFormat, GL_TEXTURE_ALPHA_SIZE) ?
1031                _mesa_get_format_datatype(texFormat) : GL_NONE;
1032          }
1033          else {
1034             goto invalid_pname;
1035          }
1036          break;
1037       case GL_TEXTURE_LUMINANCE_TYPE_ARB:
1038          if (ctx->Extensions.ARB_texture_float) {
1039             *params = _mesa_get_format_bits(texFormat, GL_TEXTURE_LUMINANCE_SIZE) ?
1040                _mesa_get_format_datatype(texFormat) : GL_NONE;
1041          }
1042          else {
1043             goto invalid_pname;
1044          }
1045          break;
1046       case GL_TEXTURE_INTENSITY_TYPE_ARB:
1047          if (ctx->Extensions.ARB_texture_float) {
1048             *params = _mesa_get_format_bits(texFormat, GL_TEXTURE_INTENSITY_SIZE) ?
1049                _mesa_get_format_datatype(texFormat) : GL_NONE;
1050          }
1051          else {
1052             goto invalid_pname;
1053          }
1054          break;
1055       case GL_TEXTURE_DEPTH_TYPE_ARB:
1056          if (ctx->Extensions.ARB_texture_float) {
1057             *params = _mesa_get_format_bits(texFormat, GL_TEXTURE_DEPTH_SIZE) ?
1058                _mesa_get_format_datatype(texFormat) : GL_NONE;
1059          }
1060          else {
1061             goto invalid_pname;
1062          }
1063          break;
1064
1065       default:
1066          goto invalid_pname;
1067    }
1068
1069    /* no error if we get here */
1070    return;
1071
1072 invalid_pname:
1073    _mesa_error(ctx, GL_INVALID_ENUM,
1074                "glGetTexLevelParameter[if]v(pname=%s)",
1075                _mesa_lookup_enum_by_nr(pname));
1076 }
1077
1078
1079
1080 void GLAPIENTRY
1081 _mesa_GetTexParameterfv( GLenum target, GLenum pname, GLfloat *params )
1082 {
1083    struct gl_texture_object *obj;
1084    GLboolean error = GL_FALSE;
1085    GET_CURRENT_CONTEXT(ctx);
1086    ASSERT_OUTSIDE_BEGIN_END(ctx);
1087
1088    obj = get_texobj(ctx, target, GL_TRUE);
1089    if (!obj)
1090       return;
1091
1092    _mesa_lock_texture(ctx, obj);
1093    switch (pname) {
1094       case GL_TEXTURE_MAG_FILTER:
1095          *params = ENUM_TO_FLOAT(obj->MagFilter);
1096          break;
1097       case GL_TEXTURE_MIN_FILTER:
1098          *params = ENUM_TO_FLOAT(obj->MinFilter);
1099          break;
1100       case GL_TEXTURE_WRAP_S:
1101          *params = ENUM_TO_FLOAT(obj->WrapS);
1102          break;
1103       case GL_TEXTURE_WRAP_T:
1104          *params = ENUM_TO_FLOAT(obj->WrapT);
1105          break;
1106       case GL_TEXTURE_WRAP_R:
1107          *params = ENUM_TO_FLOAT(obj->WrapR);
1108          break;
1109       case GL_TEXTURE_BORDER_COLOR:
1110          params[0] = CLAMP(obj->BorderColor.f[0], 0.0F, 1.0F);
1111          params[1] = CLAMP(obj->BorderColor.f[1], 0.0F, 1.0F);
1112          params[2] = CLAMP(obj->BorderColor.f[2], 0.0F, 1.0F);
1113          params[3] = CLAMP(obj->BorderColor.f[3], 0.0F, 1.0F);
1114          break;
1115       case GL_TEXTURE_RESIDENT:
1116          {
1117             GLboolean resident;
1118             if (ctx->Driver.IsTextureResident)
1119                resident = ctx->Driver.IsTextureResident(ctx, obj);
1120             else
1121                resident = GL_TRUE;
1122             *params = ENUM_TO_FLOAT(resident);
1123          }
1124          break;
1125       case GL_TEXTURE_PRIORITY:
1126          *params = obj->Priority;
1127          break;
1128       case GL_TEXTURE_MIN_LOD:
1129          *params = obj->MinLod;
1130          break;
1131       case GL_TEXTURE_MAX_LOD:
1132          *params = obj->MaxLod;
1133          break;
1134       case GL_TEXTURE_BASE_LEVEL:
1135          *params = (GLfloat) obj->BaseLevel;
1136          break;
1137       case GL_TEXTURE_MAX_LEVEL:
1138          *params = (GLfloat) obj->MaxLevel;
1139          break;
1140       case GL_TEXTURE_MAX_ANISOTROPY_EXT:
1141          if (ctx->Extensions.EXT_texture_filter_anisotropic) {
1142             *params = obj->MaxAnisotropy;
1143          }
1144          else
1145             error = GL_TRUE;
1146          break;
1147       case GL_TEXTURE_COMPARE_FAIL_VALUE_ARB:
1148          if (ctx->Extensions.ARB_shadow_ambient) {
1149             *params = obj->CompareFailValue;
1150          }
1151          else
1152             error = GL_TRUE;
1153          break;
1154       case GL_GENERATE_MIPMAP_SGIS:
1155          *params = (GLfloat) obj->GenerateMipmap;
1156          break;
1157       case GL_TEXTURE_COMPARE_MODE_ARB:
1158          if (ctx->Extensions.ARB_shadow) {
1159             *params = (GLfloat) obj->CompareMode;
1160          }
1161          else
1162             error = GL_TRUE;
1163          break;
1164       case GL_TEXTURE_COMPARE_FUNC_ARB:
1165          if (ctx->Extensions.ARB_shadow) {
1166             *params = (GLfloat) obj->CompareFunc;
1167          }
1168          else
1169             error = GL_TRUE;
1170          break;
1171       case GL_DEPTH_TEXTURE_MODE_ARB:
1172          if (ctx->Extensions.ARB_depth_texture) {
1173             *params = (GLfloat) obj->DepthMode;
1174          }
1175          else
1176             error = GL_TRUE;
1177          break;
1178       case GL_TEXTURE_LOD_BIAS:
1179          if (ctx->Extensions.EXT_texture_lod_bias) {
1180             *params = obj->LodBias;
1181          }
1182          else
1183             error = GL_TRUE;
1184          break;
1185 #if FEATURE_OES_draw_texture
1186       case GL_TEXTURE_CROP_RECT_OES:
1187          params[0] = obj->CropRect[0];
1188          params[1] = obj->CropRect[1];
1189          params[2] = obj->CropRect[2];
1190          params[3] = obj->CropRect[3];
1191          break;
1192 #endif
1193
1194       case GL_TEXTURE_SWIZZLE_R_EXT:
1195       case GL_TEXTURE_SWIZZLE_G_EXT:
1196       case GL_TEXTURE_SWIZZLE_B_EXT:
1197       case GL_TEXTURE_SWIZZLE_A_EXT:
1198          if (ctx->Extensions.EXT_texture_swizzle) {
1199             GLuint comp = pname - GL_TEXTURE_SWIZZLE_R_EXT;
1200             *params = (GLfloat) obj->Swizzle[comp];
1201          }
1202          else {
1203             error = GL_TRUE;
1204          }
1205          break;
1206
1207       case GL_TEXTURE_SWIZZLE_RGBA_EXT:
1208          if (ctx->Extensions.EXT_texture_swizzle) {
1209             GLuint comp;
1210             for (comp = 0; comp < 4; comp++) {
1211                params[comp] = (GLfloat) obj->Swizzle[comp];
1212             }
1213          }
1214          else {
1215             error = GL_TRUE;
1216          }
1217          break;
1218
1219       default:
1220          error = GL_TRUE;
1221          break;
1222    }
1223
1224    if (error)
1225       _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexParameterfv(pname=0x%x)",
1226                   pname);
1227
1228    _mesa_unlock_texture(ctx, obj);
1229 }
1230
1231
1232 void GLAPIENTRY
1233 _mesa_GetTexParameteriv( GLenum target, GLenum pname, GLint *params )
1234 {
1235    struct gl_texture_object *obj;
1236    GLboolean error = GL_FALSE;
1237    GET_CURRENT_CONTEXT(ctx);
1238    ASSERT_OUTSIDE_BEGIN_END(ctx);
1239
1240     obj = get_texobj(ctx, target, GL_TRUE);
1241     if (!obj)
1242        return;
1243
1244    _mesa_lock_texture(ctx, obj);
1245    switch (pname) {
1246       case GL_TEXTURE_MAG_FILTER:
1247          *params = (GLint) obj->MagFilter;
1248          break;;
1249       case GL_TEXTURE_MIN_FILTER:
1250          *params = (GLint) obj->MinFilter;
1251          break;;
1252       case GL_TEXTURE_WRAP_S:
1253          *params = (GLint) obj->WrapS;
1254          break;;
1255       case GL_TEXTURE_WRAP_T:
1256          *params = (GLint) obj->WrapT;
1257          break;;
1258       case GL_TEXTURE_WRAP_R:
1259          *params = (GLint) obj->WrapR;
1260          break;;
1261       case GL_TEXTURE_BORDER_COLOR:
1262          {
1263             GLfloat b[4];
1264             b[0] = CLAMP(obj->BorderColor.f[0], 0.0F, 1.0F);
1265             b[1] = CLAMP(obj->BorderColor.f[1], 0.0F, 1.0F);
1266             b[2] = CLAMP(obj->BorderColor.f[2], 0.0F, 1.0F);
1267             b[3] = CLAMP(obj->BorderColor.f[3], 0.0F, 1.0F);
1268             params[0] = FLOAT_TO_INT(b[0]);
1269             params[1] = FLOAT_TO_INT(b[1]);
1270             params[2] = FLOAT_TO_INT(b[2]);
1271             params[3] = FLOAT_TO_INT(b[3]);
1272          }
1273          break;;
1274       case GL_TEXTURE_RESIDENT:
1275          {
1276             GLboolean resident;
1277             if (ctx->Driver.IsTextureResident)
1278                resident = ctx->Driver.IsTextureResident(ctx, obj);
1279             else
1280                resident = GL_TRUE;
1281             *params = (GLint) resident;
1282          }
1283          break;;
1284       case GL_TEXTURE_PRIORITY:
1285          *params = FLOAT_TO_INT(obj->Priority);
1286          break;;
1287       case GL_TEXTURE_MIN_LOD:
1288          *params = (GLint) obj->MinLod;
1289          break;;
1290       case GL_TEXTURE_MAX_LOD:
1291          *params = (GLint) obj->MaxLod;
1292          break;;
1293       case GL_TEXTURE_BASE_LEVEL:
1294          *params = obj->BaseLevel;
1295          break;;
1296       case GL_TEXTURE_MAX_LEVEL:
1297          *params = obj->MaxLevel;
1298          break;;
1299       case GL_TEXTURE_MAX_ANISOTROPY_EXT:
1300          if (ctx->Extensions.EXT_texture_filter_anisotropic) {
1301             *params = (GLint) obj->MaxAnisotropy;
1302          }
1303          else {
1304             error = GL_TRUE;
1305          }
1306          break;
1307       case GL_TEXTURE_COMPARE_FAIL_VALUE_ARB:
1308          if (ctx->Extensions.ARB_shadow_ambient) {
1309             *params = (GLint) FLOAT_TO_INT(obj->CompareFailValue);
1310          }
1311          else {
1312             error = GL_TRUE;
1313          }
1314          break;
1315       case GL_GENERATE_MIPMAP_SGIS:
1316          *params = (GLint) obj->GenerateMipmap;
1317          break;
1318       case GL_TEXTURE_COMPARE_MODE_ARB:
1319          if (ctx->Extensions.ARB_shadow) {
1320             *params = (GLint) obj->CompareMode;
1321          }
1322          else {
1323             error = GL_TRUE;
1324          }
1325          break;
1326       case GL_TEXTURE_COMPARE_FUNC_ARB:
1327          if (ctx->Extensions.ARB_shadow) {
1328             *params = (GLint) obj->CompareFunc;
1329          }
1330          else {
1331             error = GL_TRUE;
1332          }
1333          break;
1334       case GL_DEPTH_TEXTURE_MODE_ARB:
1335          if (ctx->Extensions.ARB_depth_texture) {
1336             *params = (GLint) obj->DepthMode;
1337          }
1338          else {
1339             error = GL_TRUE;
1340          }
1341          break;
1342       case GL_TEXTURE_LOD_BIAS:
1343          if (ctx->Extensions.EXT_texture_lod_bias) {
1344             *params = (GLint) obj->LodBias;
1345          }
1346          else {
1347             error = GL_TRUE;
1348          }
1349          break;
1350 #if FEATURE_OES_draw_texture
1351       case GL_TEXTURE_CROP_RECT_OES:
1352          params[0] = obj->CropRect[0];
1353          params[1] = obj->CropRect[1];
1354          params[2] = obj->CropRect[2];
1355          params[3] = obj->CropRect[3];
1356          break;
1357 #endif
1358       case GL_TEXTURE_SWIZZLE_R_EXT:
1359       case GL_TEXTURE_SWIZZLE_G_EXT:
1360       case GL_TEXTURE_SWIZZLE_B_EXT:
1361       case GL_TEXTURE_SWIZZLE_A_EXT:
1362          if (ctx->Extensions.EXT_texture_swizzle) {
1363             GLuint comp = pname - GL_TEXTURE_SWIZZLE_R_EXT;
1364             *params = obj->Swizzle[comp];
1365          }
1366          else {
1367             error = GL_TRUE;
1368          }
1369          break;
1370
1371       case GL_TEXTURE_SWIZZLE_RGBA_EXT:
1372          if (ctx->Extensions.EXT_texture_swizzle) {
1373             COPY_4V(params, obj->Swizzle);
1374          }
1375          else {
1376             error = GL_TRUE;
1377          }
1378          break;
1379
1380       default:
1381          ; /* silence warnings */
1382    }
1383
1384    if (error)
1385       _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexParameteriv(pname=0x%x)",
1386                   pname);
1387
1388    _mesa_unlock_texture(ctx, obj);
1389 }
1390
1391
1392 /** New in GL 3.0 */
1393 void GLAPIENTRY
1394 _mesa_GetTexParameterIiv(GLenum target, GLenum pname, GLint *params)
1395 {
1396    struct gl_texture_object *texObj;
1397    GET_CURRENT_CONTEXT(ctx);
1398    ASSERT_OUTSIDE_BEGIN_END(ctx);
1399
1400    texObj = get_texobj(ctx, target, GL_TRUE);
1401
1402    switch (pname) {
1403    case GL_TEXTURE_BORDER_COLOR:
1404       COPY_4V(params, texObj->BorderColor.i);
1405       break;
1406    default:
1407       _mesa_GetTexParameteriv(target, pname, params);
1408    }
1409 }
1410
1411
1412 /** New in GL 3.0 */
1413 void GLAPIENTRY
1414 _mesa_GetTexParameterIuiv(GLenum target, GLenum pname, GLuint *params)
1415 {
1416    struct gl_texture_object *texObj;
1417    GET_CURRENT_CONTEXT(ctx);
1418    ASSERT_OUTSIDE_BEGIN_END(ctx);
1419
1420    texObj = get_texobj(ctx, target, GL_TRUE);
1421
1422    switch (pname) {
1423    case GL_TEXTURE_BORDER_COLOR:
1424       COPY_4V(params, texObj->BorderColor.i);
1425       break;
1426    default:
1427       {
1428          GLint ip[4];
1429          _mesa_GetTexParameteriv(target, pname, ip);
1430          params[0] = ip[0];
1431          if (pname == GL_TEXTURE_SWIZZLE_RGBA_EXT ||
1432              pname == GL_TEXTURE_CROP_RECT_OES) {
1433             params[1] = ip[1];
1434             params[2] = ip[2];
1435             params[3] = ip[3];
1436          }
1437       }
1438    }
1439 }