src/mesa/main/varray.c

   1 /*
   2  * Mesa 3-D graphics library
   3  * Version:  7.6
   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 #include "glheader.h"
  28 #include "imports.h"
  29 #include "bufferobj.h"
  30 #include "context.h"
  31 #include "enable.h"
  32 #include "enums.h"
  33 #include "hash.h"
  34 #include "image.h"
  35 #include "macros.h"
  36 #include "mfeatures.h"
  37 #include "mtypes.h"
  38 #include "varray.h"
  39 #include "arrayobj.h"
  40 #include "main/dispatch.h"
  41
  42
  43 /** Used to do error checking for GL_EXT_vertex_array_bgra */
  44 #define BGRA_OR_4  5
  45
  46
  47 /** Used to indicate which GL datatypes are accepted by each of the
  48  * glVertex/Color/Attrib/EtcPointer() functions.
  49  */
  50 #define BOOL_BIT             0x1
  51 #define BYTE_BIT             0x2
  52 #define UNSIGNED_BYTE_BIT    0x4
  53 #define SHORT_BIT            0x8
  54 #define UNSIGNED_SHORT_BIT   0x10
  55 #define INT_BIT              0x20
  56 #define UNSIGNED_INT_BIT     0x40
  57 #define HALF_BIT             0x80
  58 #define FLOAT_BIT            0x100
  59 #define DOUBLE_BIT           0x200
  60 #define FIXED_ES_BIT         0x400
  61 #define FIXED_GL_BIT         0x800
  62 #define UNSIGNED_INT_2_10_10_10_REV_BIT 0x1000
  63 #define INT_2_10_10_10_REV_BIT 0x2000
  64
  65
  66 /** Convert GL datatype enum into a <type>_BIT value seen above */
  67 static GLbitfield
  68 type_to_bit(const struct gl_context *ctx, GLenum type)
  69 {
  70    switch (type) {
  71    case GL_BOOL:
  72       return BOOL_BIT;
  73    case GL_BYTE:
  74       return BYTE_BIT;
  75    case GL_UNSIGNED_BYTE:
  76       return UNSIGNED_BYTE_BIT;
  77    case GL_SHORT:
  78       return SHORT_BIT;
  79    case GL_UNSIGNED_SHORT:
  80       return UNSIGNED_SHORT_BIT;
  81    case GL_INT:
  82       return INT_BIT;
  83    case GL_UNSIGNED_INT:
  84       return UNSIGNED_INT_BIT;
  85    case GL_HALF_FLOAT:
  86       if (ctx->Extensions.ARB_half_float_vertex)
  87          return HALF_BIT;
  88       else
  89          return 0x0;
  90    case GL_FLOAT:
  91       return FLOAT_BIT;
  92    case GL_DOUBLE:
  93       return DOUBLE_BIT;
  94    case GL_FIXED:
  95       return _mesa_is_desktop_gl(ctx) ? FIXED_GL_BIT : FIXED_ES_BIT;
  96    case GL_UNSIGNED_INT_2_10_10_10_REV:
  97       return UNSIGNED_INT_2_10_10_10_REV_BIT;
  98    case GL_INT_2_10_10_10_REV:
  99       return INT_2_10_10_10_REV_BIT;
 100    default:
 101       return 0;
 102    }
 103 }
 104
 105
 106 /**
 107  * Do error checking and update state for glVertex/Color/TexCoord/...Pointer
 108  * functions.
 109  *
 110  * \param func  name of calling function used for error reporting
 111  * \param attrib  the attribute array index to update
 112  * \param legalTypes  bitmask of *_BIT above indicating legal datatypes
 113  * \param sizeMin  min allowable size value
 114  * \param sizeMax  max allowable size value (may also be BGRA_OR_4)
 115  * \param size  components per element (1, 2, 3 or 4)
 116  * \param type  datatype of each component (GL_FLOAT, GL_INT, etc)
 117  * \param stride  stride between elements, in elements
 118  * \param normalized  are integer types converted to floats in [-1, 1]?
 119  * \param integer  integer-valued values (will not be normalized to [-1,1])
 120  * \param ptr  the address (or offset inside VBO) of the array data
 121  */
 122 static void
 123 update_array(struct gl_context *ctx,
 124              const char *func,
 125              GLuint attrib, GLbitfield legalTypesMask,
 126              GLint sizeMin, GLint sizeMax,
 127              GLint size, GLenum type, GLsizei stride,
 128              GLboolean normalized, GLboolean integer,
 129              const GLvoid *ptr)
 130 {
 131    struct gl_client_array *array;
 132    GLbitfield typeBit;
 133    GLsizei elementSize;
 134    GLenum format = GL_RGBA;
 135
 136    /* Page 407 (page 423 of the PDF) of the OpenGL 3.0 spec says:
 137     *
 138     *     "Client vertex arrays - all vertex array attribute pointers must
 139     *     refer to buffer objects (section 2.9.2). The default vertex array
 140     *     object (the name zero) is also deprecated. Calling
 141     *     VertexAttribPointer when no buffer object or no vertex array object
 142     *     is bound will generate an INVALID_OPERATION error..."
 143     *
 144     * The check for VBOs is handled below.
 145     */
 146    if (ctx->API == API_OPENGL_CORE
 147        && (ctx->Array.ArrayObj == ctx->Array.DefaultArrayObj)) {
 148       _mesa_error(ctx, GL_INVALID_OPERATION, "%s(no array object bound)",
 149                   func);
 150       return;
 151    }
 152
 153    if (_mesa_is_gles(ctx)) {
 154       /* Once Mesa gets support for GL_OES_vertex_half_float this mask will
 155        * change.  Adding support for this extension isn't quite as trivial as
 156        * we'd like because ES uses a different enum value for GL_HALF_FLOAT.
 157        */
 158       legalTypesMask &= ~(FIXED_GL_BIT | HALF_BIT | DOUBLE_BIT);
 159
 160       /* GL_INT and GL_UNSIGNED_INT data is not allowed in OpenGL ES until
 161        * 3.0.  The 2_10_10_10 types are added in OpenGL ES 3.0 or
 162        * GL_OES_vertex_type_10_10_10_2.
 163        */
 164       if (ctx->Version < 30) {
 165          legalTypesMask &= ~(UNSIGNED_INT_BIT
 166                              | INT_BIT
 167                              | UNSIGNED_INT_2_10_10_10_REV_BIT
 168                              | INT_2_10_10_10_REV_BIT);
 169       }
 170
 171       /* BGRA ordering is not supported in ES contexts.
 172        */
 173       if (sizeMax == BGRA_OR_4)
 174          sizeMax = 4;
 175    } else {
 176       legalTypesMask &= ~FIXED_ES_BIT;
 177
 178       if (!ctx->Extensions.ARB_ES2_compatibility)
 179          legalTypesMask &= ~FIXED_GL_BIT;
 180
 181       if (!ctx->Extensions.ARB_vertex_type_2_10_10_10_rev)
 182          legalTypesMask &= ~(UNSIGNED_INT_2_10_10_10_REV_BIT |
 183                              INT_2_10_10_10_REV_BIT);
 184    }
 185
 186    typeBit = type_to_bit(ctx, type);
 187    if (typeBit == 0x0 || (typeBit & legalTypesMask) == 0x0) {
 188       _mesa_error(ctx, GL_INVALID_ENUM, "%s(type = %s)",
 189                   func, _mesa_lookup_enum_by_nr(type));
 190       return;
 191    }
 192
 193    /* Do size parameter checking.
 194     * If sizeMax = BGRA_OR_4 it means that size = GL_BGRA is legal and
 195     * must be handled specially.
 196     */
 197    if (ctx->Extensions.EXT_vertex_array_bgra &&
 198        sizeMax == BGRA_OR_4 &&
 199        size == GL_BGRA) {
 200       GLboolean bgra_error = GL_FALSE;
 201
 202       if (ctx->Extensions.ARB_vertex_type_2_10_10_10_rev) {
 203          if (type != GL_UNSIGNED_INT_2_10_10_10_REV &&
 204              type != GL_INT_2_10_10_10_REV &&
 205              type != GL_UNSIGNED_BYTE)
 206             bgra_error = GL_TRUE;
 207       } else if (type != GL_UNSIGNED_BYTE)
 208          bgra_error = GL_TRUE;
 209
 210       if (bgra_error) {
 211          _mesa_error(ctx, GL_INVALID_VALUE, "%s(GL_BGRA/GLubyte)", func);
 212          return;
 213       }
 214       format = GL_BGRA;
 215       size = 4;
 216    }
 217    else if (size < sizeMin || size > sizeMax || size > 4) {
 218       _mesa_error(ctx, GL_INVALID_VALUE, "%s(size=%d)", func, size);
 219       return;
 220    }
 221
 222    if (ctx->Extensions.ARB_vertex_type_2_10_10_10_rev &&
 223        (type == GL_UNSIGNED_INT_2_10_10_10_REV ||
 224         type == GL_INT_2_10_10_10_REV) && size != 4) {
 225       _mesa_error(ctx, GL_INVALID_OPERATION, "%s(size=%d)", func, size);
 226       return;
 227    }
 228
 229    ASSERT(size <= 4);
 230
 231    if (stride < 0) {
 232       _mesa_error( ctx, GL_INVALID_VALUE, "%s(stride=%d)", func, stride );
 233       return;
 234    }
 235
 236    /* Page 29 (page 44 of the PDF) of the OpenGL 3.3 spec says:
 237     *
 238     *     "An INVALID_OPERATION error is generated under any of the following
 239     *     conditions:
 240     *
 241     *     ...
 242     *
 243     *     * any of the *Pointer commands specifying the location and
 244     *       organization of vertex array data are called while zero is bound
 245     *       to the ARRAY_BUFFER buffer object binding point (see section
 246     *       2.9.6), and the pointer argument is not NULL."
 247     */
 248    if (ptr != NULL && ctx->Array.ArrayObj->ARBsemantics &&
 249        !_mesa_is_bufferobj(ctx->Array.ArrayBufferObj)) {
 250       _mesa_error(ctx, GL_INVALID_OPERATION, "%s(non-VBO array)", func);
 251       return;
 252    }
 253
 254    elementSize = _mesa_sizeof_type(type) * size;
 255
 256    array = &ctx->Array.ArrayObj->VertexAttrib[attrib];
 257    array->Size = size;
 258    array->Type = type;
 259    array->Format = format;
 260    array->Stride = stride;
 261    array->StrideB = stride ? stride : elementSize;
 262    array->Normalized = normalized;
 263    array->Integer = integer;
 264    array->Ptr = (const GLubyte *) ptr;
 265    array->_ElementSize = elementSize;
 266
 267    _mesa_reference_buffer_object(ctx, &array->BufferObj,
 268                                  ctx->Array.ArrayBufferObj);
 269
 270    ctx->NewState |= _NEW_ARRAY;
 271    ctx->Array.ArrayObj->NewArrays |= VERT_BIT(attrib);
 272 }
 273
 274
 275 void GLAPIENTRY
 276 _mesa_VertexPointer(GLint size, GLenum type, GLsizei stride, const GLvoid *ptr)
 277 {
 278    GET_CURRENT_CONTEXT(ctx);
 279    GLbitfield legalTypes = (ctx->API == API_OPENGLES)
 280       ? (BYTE_BIT | SHORT_BIT | FLOAT_BIT | FIXED_ES_BIT)
 281       : (SHORT_BIT | INT_BIT | FLOAT_BIT |
 282          DOUBLE_BIT | HALF_BIT |
 283          UNSIGNED_INT_2_10_10_10_REV_BIT |
 284          INT_2_10_10_10_REV_BIT);
 285    ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx);
 286
 287    update_array(ctx, "glVertexPointer", VERT_ATTRIB_POS,
 288                 legalTypes, 2, 4,
 289                 size, type, stride, GL_FALSE, GL_FALSE, ptr);
 290 }
 291
 292
 293 void GLAPIENTRY
 294 _mesa_NormalPointer(GLenum type, GLsizei stride, const GLvoid *ptr )
 295 {
 296    GET_CURRENT_CONTEXT(ctx);
 297    const GLbitfield legalTypes = (ctx->API == API_OPENGLES)
 298       ? (BYTE_BIT | SHORT_BIT | FLOAT_BIT | FIXED_ES_BIT)
 299       : (BYTE_BIT | SHORT_BIT | INT_BIT |
 300          HALF_BIT | FLOAT_BIT | DOUBLE_BIT |
 301          UNSIGNED_INT_2_10_10_10_REV_BIT |
 302          INT_2_10_10_10_REV_BIT);
 303    ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx);
 304
 305    update_array(ctx, "glNormalPointer", VERT_ATTRIB_NORMAL,
 306                 legalTypes, 3, 3,
 307                 3, type, stride, GL_TRUE, GL_FALSE, ptr);
 308 }
 309
 310
 311 void GLAPIENTRY
 312 _mesa_ColorPointer(GLint size, GLenum type, GLsizei stride, const GLvoid *ptr)
 313 {
 314    GET_CURRENT_CONTEXT(ctx);
 315    const GLbitfield legalTypes = (ctx->API == API_OPENGLES)
 316       ? (UNSIGNED_BYTE_BIT | HALF_BIT | FLOAT_BIT | FIXED_ES_BIT)
 317       : (BYTE_BIT | UNSIGNED_BYTE_BIT |
 318          SHORT_BIT | UNSIGNED_SHORT_BIT |
 319          INT_BIT | UNSIGNED_INT_BIT |
 320          HALF_BIT | FLOAT_BIT | DOUBLE_BIT |
 321          UNSIGNED_INT_2_10_10_10_REV_BIT |
 322          INT_2_10_10_10_REV_BIT);
 323    const GLint sizeMin = (ctx->API == API_OPENGLES) ? 4 : 3;
 324    ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx);
 325
 326    update_array(ctx, "glColorPointer", VERT_ATTRIB_COLOR0,
 327                 legalTypes, sizeMin, BGRA_OR_4,
 328                 size, type, stride, GL_TRUE, GL_FALSE, ptr);
 329 }
 330
 331
 332 void GLAPIENTRY
 333 _mesa_FogCoordPointerEXT(GLenum type, GLsizei stride, const GLvoid *ptr)
 334 {
 335    const GLbitfield legalTypes = (HALF_BIT | FLOAT_BIT | DOUBLE_BIT);
 336    GET_CURRENT_CONTEXT(ctx);
 337    ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx);
 338
 339    update_array(ctx, "glFogCoordPointer", VERT_ATTRIB_FOG,
 340                 legalTypes, 1, 1,
 341                 1, type, stride, GL_FALSE, GL_FALSE, ptr);
 342 }
 343
 344
 345 void GLAPIENTRY
 346 _mesa_IndexPointer(GLenum type, GLsizei stride, const GLvoid *ptr)
 347 {
 348    const GLbitfield legalTypes = (UNSIGNED_BYTE_BIT | SHORT_BIT | INT_BIT |
 349                                   FLOAT_BIT | DOUBLE_BIT);
 350    GET_CURRENT_CONTEXT(ctx);
 351    ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx);
 352
 353    update_array(ctx, "glIndexPointer", VERT_ATTRIB_COLOR_INDEX,
 354                 legalTypes, 1, 1,
 355                 1, type, stride, GL_FALSE, GL_FALSE, ptr);
 356 }
 357
 358
 359 void GLAPIENTRY
 360 _mesa_SecondaryColorPointerEXT(GLint size, GLenum type,
 361                                GLsizei stride, const GLvoid *ptr)
 362 {
 363    const GLbitfield legalTypes = (BYTE_BIT | UNSIGNED_BYTE_BIT |
 364                                   SHORT_BIT | UNSIGNED_SHORT_BIT |
 365                                   INT_BIT | UNSIGNED_INT_BIT |
 366                                   HALF_BIT | FLOAT_BIT | DOUBLE_BIT |
 367                                   UNSIGNED_INT_2_10_10_10_REV_BIT |
 368                                   INT_2_10_10_10_REV_BIT);
 369    GET_CURRENT_CONTEXT(ctx);
 370    ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx);
 371
 372    update_array(ctx, "glSecondaryColorPointer", VERT_ATTRIB_COLOR1,
 373                 legalTypes, 3, BGRA_OR_4,
 374                 size, type, stride, GL_TRUE, GL_FALSE, ptr);
 375 }
 376
 377
 378 void GLAPIENTRY
 379 _mesa_TexCoordPointer(GLint size, GLenum type, GLsizei stride,
 380                       const GLvoid *ptr)
 381 {
 382    GET_CURRENT_CONTEXT(ctx);
 383    GLbitfield legalTypes = (ctx->API == API_OPENGLES)
 384       ? (BYTE_BIT | SHORT_BIT | FLOAT_BIT | FIXED_ES_BIT)
 385       : (SHORT_BIT | INT_BIT |
 386          HALF_BIT | FLOAT_BIT | DOUBLE_BIT |
 387          UNSIGNED_INT_2_10_10_10_REV_BIT |
 388          INT_2_10_10_10_REV_BIT);
 389    const GLint sizeMin = (ctx->API == API_OPENGLES) ? 2 : 1;
 390    const GLuint unit = ctx->Array.ActiveTexture;
 391    ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx);
 392
 393    update_array(ctx, "glTexCoordPointer", VERT_ATTRIB_TEX(unit),
 394                 legalTypes, sizeMin, 4,
 395                 size, type, stride, GL_FALSE, GL_FALSE,
 396                 ptr);
 397 }
 398
 399
 400 void GLAPIENTRY
 401 _mesa_EdgeFlagPointer(GLsizei stride, const GLvoid *ptr)
 402 {
 403    const GLbitfield legalTypes = UNSIGNED_BYTE_BIT;
 404    /* see table 2.4 edits in GL_EXT_gpu_shader4 spec: */
 405    const GLboolean integer = GL_TRUE;
 406    GET_CURRENT_CONTEXT(ctx);
 407    ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx);
 408
 409    update_array(ctx, "glEdgeFlagPointer", VERT_ATTRIB_EDGEFLAG,
 410                 legalTypes, 1, 1,
 411                 1, GL_UNSIGNED_BYTE, stride, GL_FALSE, integer, ptr);
 412 }
 413
 414
 415 void GLAPIENTRY
 416 _mesa_PointSizePointer(GLenum type, GLsizei stride, const GLvoid *ptr)
 417 {
 418    const GLbitfield legalTypes = (FLOAT_BIT | FIXED_ES_BIT);
 419    GET_CURRENT_CONTEXT(ctx);
 420    ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx);
 421
 422    if (ctx->API != API_OPENGLES) {
 423       _mesa_error(ctx, GL_INVALID_OPERATION,
 424                   "glPointSizePointer(ES 1.x only)");
 425       return;
 426    }
 427
 428    update_array(ctx, "glPointSizePointer", VERT_ATTRIB_POINT_SIZE,
 429                 legalTypes, 1, 1,
 430                 1, type, stride, GL_FALSE, GL_FALSE, ptr);
 431 }
 432
 433
 434 /**
 435  * Set a generic vertex attribute array.
 436  * Note that these arrays DO NOT alias the conventional GL vertex arrays
 437  * (position, normal, color, fog, texcoord, etc).
 438  */
 439 void GLAPIENTRY
 440 _mesa_VertexAttribPointerARB(GLuint index, GLint size, GLenum type,
 441                              GLboolean normalized,
 442                              GLsizei stride, const GLvoid *ptr)
 443 {
 444    const GLbitfield legalTypes = (BYTE_BIT | UNSIGNED_BYTE_BIT |
 445                                   SHORT_BIT | UNSIGNED_SHORT_BIT |
 446                                   INT_BIT | UNSIGNED_INT_BIT |
 447                                   HALF_BIT | FLOAT_BIT | DOUBLE_BIT |
 448                                   FIXED_ES_BIT | FIXED_GL_BIT |
 449                                   UNSIGNED_INT_2_10_10_10_REV_BIT |
 450                                   INT_2_10_10_10_REV_BIT);
 451    GET_CURRENT_CONTEXT(ctx);
 452    ASSERT_OUTSIDE_BEGIN_END(ctx);
 453
 454    if (index >= ctx->Const.VertexProgram.MaxAttribs) {
 455       _mesa_error(ctx, GL_INVALID_VALUE, "glVertexAttribPointerARB(index)");
 456       return;
 457    }
 458
 459    update_array(ctx, "glVertexAttribPointer", VERT_ATTRIB_GENERIC(index),
 460                 legalTypes, 1, BGRA_OR_4,
 461                 size, type, stride, normalized, GL_FALSE, ptr);
 462 }
 463
 464
 465 /**
 466  * GL_EXT_gpu_shader4 / GL 3.0.
 467  * Set an integer-valued vertex attribute array.
 468  * Note that these arrays DO NOT alias the conventional GL vertex arrays
 469  * (position, normal, color, fog, texcoord, etc).
 470  */
 471 void GLAPIENTRY
 472 _mesa_VertexAttribIPointer(GLuint index, GLint size, GLenum type,
 473                            GLsizei stride, const GLvoid *ptr)
 474 {
 475    const GLbitfield legalTypes = (BYTE_BIT | UNSIGNED_BYTE_BIT |
 476                                   SHORT_BIT | UNSIGNED_SHORT_BIT |
 477                                   INT_BIT | UNSIGNED_INT_BIT);
 478    const GLboolean normalized = GL_FALSE;
 479    const GLboolean integer = GL_TRUE;
 480    GET_CURRENT_CONTEXT(ctx);
 481    ASSERT_OUTSIDE_BEGIN_END(ctx);
 482
 483    if (index >= ctx->Const.VertexProgram.MaxAttribs) {
 484       _mesa_error(ctx, GL_INVALID_VALUE, "glVertexAttribIPointer(index)");
 485       return;
 486    }
 487
 488    update_array(ctx, "glVertexAttribIPointer", VERT_ATTRIB_GENERIC(index),
 489                 legalTypes, 1, 4,
 490                 size, type, stride, normalized, integer, ptr);
 491 }
 492
 493
 494
 495 void GLAPIENTRY
 496 _mesa_EnableVertexAttribArrayARB(GLuint index)
 497 {
 498    struct gl_array_object *arrayObj;
 499    GET_CURRENT_CONTEXT(ctx);
 500    ASSERT_OUTSIDE_BEGIN_END(ctx);
 501
 502    if (index >= ctx->Const.VertexProgram.MaxAttribs) {
 503       _mesa_error(ctx, GL_INVALID_VALUE,
 504                   "glEnableVertexAttribArrayARB(index)");
 505       return;
 506    }
 507
 508    arrayObj = ctx->Array.ArrayObj;
 509
 510    ASSERT(VERT_ATTRIB_GENERIC(index) < Elements(arrayObj->VertexAttrib));
 511
 512    if (!arrayObj->VertexAttrib[VERT_ATTRIB_GENERIC(index)].Enabled) {
 513       /* was disabled, now being enabled */
 514       FLUSH_VERTICES(ctx, _NEW_ARRAY);
 515       arrayObj->VertexAttrib[VERT_ATTRIB_GENERIC(index)].Enabled = GL_TRUE;
 516       arrayObj->_Enabled |= VERT_BIT_GENERIC(index);
 517       arrayObj->NewArrays |= VERT_BIT_GENERIC(index);
 518    }
 519 }
 520
 521
 522 void GLAPIENTRY
 523 _mesa_DisableVertexAttribArrayARB(GLuint index)
 524 {
 525    struct gl_array_object *arrayObj;
 526    GET_CURRENT_CONTEXT(ctx);
 527    ASSERT_OUTSIDE_BEGIN_END(ctx);
 528
 529    if (index >= ctx->Const.VertexProgram.MaxAttribs) {
 530       _mesa_error(ctx, GL_INVALID_VALUE,
 531                   "glDisableVertexAttribArrayARB(index)");
 532       return;
 533    }
 534
 535    arrayObj = ctx->Array.ArrayObj;
 536
 537    ASSERT(VERT_ATTRIB_GENERIC(index) < Elements(arrayObj->VertexAttrib));
 538
 539    if (arrayObj->VertexAttrib[VERT_ATTRIB_GENERIC(index)].Enabled) {
 540       /* was enabled, now being disabled */
 541       FLUSH_VERTICES(ctx, _NEW_ARRAY);
 542       arrayObj->VertexAttrib[VERT_ATTRIB_GENERIC(index)].Enabled = GL_FALSE;
 543       arrayObj->_Enabled &= ~VERT_BIT_GENERIC(index);
 544       arrayObj->NewArrays |= VERT_BIT_GENERIC(index);
 545    }
 546 }
 547
 548
 549 /**
 550  * Return info for a vertex attribute array (no alias with legacy
 551  * vertex attributes (pos, normal, color, etc)).  This function does
 552  * not handle the 4-element GL_CURRENT_VERTEX_ATTRIB_ARB query.
 553  */
 554 static GLuint
 555 get_vertex_array_attrib(struct gl_context *ctx, GLuint index, GLenum pname,
 556                   const char *caller)
 557 {
 558    const struct gl_client_array *array;
 559
 560    if (index >= ctx->Const.VertexProgram.MaxAttribs) {
 561       _mesa_error(ctx, GL_INVALID_VALUE, "%s(index=%u)", caller, index);
 562       return 0;
 563    }
 564
 565    ASSERT(VERT_ATTRIB_GENERIC(index) < Elements(ctx->Array.ArrayObj->VertexAttrib));
 566
 567    array = &ctx->Array.ArrayObj->VertexAttrib[VERT_ATTRIB_GENERIC(index)];
 568
 569    switch (pname) {
 570    case GL_VERTEX_ATTRIB_ARRAY_ENABLED_ARB:
 571       return array->Enabled;
 572    case GL_VERTEX_ATTRIB_ARRAY_SIZE_ARB:
 573       return array->Size;
 574    case GL_VERTEX_ATTRIB_ARRAY_STRIDE_ARB:
 575       return array->Stride;
 576    case GL_VERTEX_ATTRIB_ARRAY_TYPE_ARB:
 577       return array->Type;
 578    case GL_VERTEX_ATTRIB_ARRAY_NORMALIZED_ARB:
 579       return array->Normalized;
 580    case GL_VERTEX_ATTRIB_ARRAY_BUFFER_BINDING_ARB:
 581       return array->BufferObj->Name;
 582    case GL_VERTEX_ATTRIB_ARRAY_INTEGER:
 583       if ((_mesa_is_desktop_gl(ctx)
 584            && (ctx->Version >= 30 || ctx->Extensions.EXT_gpu_shader4))
 585           || _mesa_is_gles3(ctx)) {
 586          return array->Integer;
 587       }
 588       goto error;
 589    case GL_VERTEX_ATTRIB_ARRAY_DIVISOR_ARB:
 590       if ((_mesa_is_desktop_gl(ctx) && ctx->Extensions.ARB_instanced_arrays)
 591           || _mesa_is_gles3(ctx)) {
 592          return array->InstanceDivisor;
 593       }
 594       goto error;
 595    default:
 596       ; /* fall-through */
 597    }
 598
 599 error:
 600    _mesa_error(ctx, GL_INVALID_ENUM, "%s(pname=0x%x)", caller, pname);
 601    return 0;
 602 }
 603
 604
 605 static const GLfloat *
 606 get_current_attrib(struct gl_context *ctx, GLuint index, const char *function)
 607 {
 608    if (index == 0) {
 609       /* In OpenGL 3.1 attribute 0 becomes non-magic, just like in OpenGL ES
 610        * 2.0.  Note that we cannot just check for API_OPENGL_CORE here because
 611        * that will erroneously allow this usage in a 3.0 forward-compatible
 612        * context too.
 613        */
 614       if ((ctx->API != API_OPENGL_CORE || ctx->Version < 31)
 615           && ctx->API != API_OPENGLES2) {
 616          _mesa_error(ctx, GL_INVALID_OPERATION, "%s(index==0)", function);
 617          return NULL;
 618       }
 619    }
 620    else if (index >= ctx->Const.VertexProgram.MaxAttribs) {
 621       _mesa_error(ctx, GL_INVALID_VALUE,
 622                   "%s(index>=GL_MAX_VERTEX_ATTRIBS)", function);
 623       return NULL;
 624    }
 625
 626    ASSERT(VERT_ATTRIB_GENERIC(index) < Elements(ctx->Array.ArrayObj->VertexAttrib));
 627
 628    FLUSH_CURRENT(ctx, 0);
 629    return ctx->Current.Attrib[VERT_ATTRIB_GENERIC(index)];
 630 }
 631
 632 void GLAPIENTRY
 633 _mesa_GetVertexAttribfvARB(GLuint index, GLenum pname, GLfloat *params)
 634 {
 635    GET_CURRENT_CONTEXT(ctx);
 636    ASSERT_OUTSIDE_BEGIN_END(ctx);
 637
 638    if (pname == GL_CURRENT_VERTEX_ATTRIB_ARB) {
 639       const GLfloat *v = get_current_attrib(ctx, index, "glGetVertexAttribfv");
 640       if (v != NULL) {
 641          COPY_4V(params, v);
 642       }
 643    }
 644    else {
 645       params[0] = (GLfloat) get_vertex_array_attrib(ctx, index, pname,
 646                                                     "glGetVertexAttribfv");
 647    }
 648 }
 649
 650
 651 void GLAPIENTRY
 652 _mesa_GetVertexAttribdvARB(GLuint index, GLenum pname, GLdouble *params)
 653 {
 654    GET_CURRENT_CONTEXT(ctx);
 655    ASSERT_OUTSIDE_BEGIN_END(ctx);
 656
 657    if (pname == GL_CURRENT_VERTEX_ATTRIB_ARB) {
 658       const GLfloat *v = get_current_attrib(ctx, index, "glGetVertexAttribdv");
 659       if (v != NULL) {
 660          params[0] = (GLdouble) v[0];
 661          params[1] = (GLdouble) v[1];
 662          params[2] = (GLdouble) v[2];
 663          params[3] = (GLdouble) v[3];
 664       }
 665    }
 666    else {
 667       params[0] = (GLdouble) get_vertex_array_attrib(ctx, index, pname,
 668                                                      "glGetVertexAttribdv");
 669    }
 670 }
 671
 672
 673 void GLAPIENTRY
 674 _mesa_GetVertexAttribivARB(GLuint index, GLenum pname, GLint *params)
 675 {
 676    GET_CURRENT_CONTEXT(ctx);
 677    ASSERT_OUTSIDE_BEGIN_END(ctx);
 678
 679    if (pname == GL_CURRENT_VERTEX_ATTRIB_ARB) {
 680       const GLfloat *v = get_current_attrib(ctx, index, "glGetVertexAttribiv");
 681       if (v != NULL) {
 682          /* XXX should floats in[0,1] be scaled to full int range? */
 683          params[0] = (GLint) v[0];
 684          params[1] = (GLint) v[1];
 685          params[2] = (GLint) v[2];
 686          params[3] = (GLint) v[3];
 687       }
 688    }
 689    else {
 690       params[0] = (GLint) get_vertex_array_attrib(ctx, index, pname,
 691                                                   "glGetVertexAttribiv");
 692    }
 693 }
 694
 695
 696 /** GL 3.0 */
 697 void GLAPIENTRY
 698 _mesa_GetVertexAttribIiv(GLuint index, GLenum pname, GLint *params)
 699 {
 700    GET_CURRENT_CONTEXT(ctx);
 701    ASSERT_OUTSIDE_BEGIN_END(ctx);
 702
 703    if (pname == GL_CURRENT_VERTEX_ATTRIB_ARB) {
 704       const GLint *v = (const GLint *)
 705          get_current_attrib(ctx, index, "glGetVertexAttribIiv");
 706       if (v != NULL) {
 707          COPY_4V(params, v);
 708       }
 709    }
 710    else {
 711       params[0] = (GLint) get_vertex_array_attrib(ctx, index, pname,
 712                                                   "glGetVertexAttribIiv");
 713    }
 714 }
 715
 716
 717 /** GL 3.0 */
 718 void GLAPIENTRY
 719 _mesa_GetVertexAttribIuiv(GLuint index, GLenum pname, GLuint *params)
 720 {
 721    GET_CURRENT_CONTEXT(ctx);
 722    ASSERT_OUTSIDE_BEGIN_END(ctx);
 723
 724    if (pname == GL_CURRENT_VERTEX_ATTRIB_ARB) {
 725       const GLuint *v = (const GLuint *)
 726          get_current_attrib(ctx, index, "glGetVertexAttribIuiv");
 727       if (v != NULL) {
 728          COPY_4V(params, v);
 729       }
 730    }
 731    else {
 732       params[0] = get_vertex_array_attrib(ctx, index, pname,
 733                                           "glGetVertexAttribIuiv");
 734    }
 735 }
 736
 737
 738 void GLAPIENTRY
 739 _mesa_GetVertexAttribPointervARB(GLuint index, GLenum pname, GLvoid **pointer)
 740 {
 741    GET_CURRENT_CONTEXT(ctx);
 742    ASSERT_OUTSIDE_BEGIN_END(ctx);
 743
 744    if (index >= ctx->Const.VertexProgram.MaxAttribs) {
 745       _mesa_error(ctx, GL_INVALID_VALUE, "glGetVertexAttribPointerARB(index)");
 746       return;
 747    }
 748
 749    if (pname != GL_VERTEX_ATTRIB_ARRAY_POINTER_ARB) {
 750       _mesa_error(ctx, GL_INVALID_ENUM, "glGetVertexAttribPointerARB(pname)");
 751       return;
 752    }
 753
 754    ASSERT(VERT_ATTRIB_GENERIC(index) < Elements(ctx->Array.ArrayObj->VertexAttrib));
 755
 756    *pointer = (GLvoid *) ctx->Array.ArrayObj->VertexAttrib[VERT_ATTRIB_GENERIC(index)].Ptr;
 757 }
 758
 759
 760 void GLAPIENTRY
 761 _mesa_VertexPointerEXT(GLint size, GLenum type, GLsizei stride,
 762                        GLsizei count, const GLvoid *ptr)
 763 {
 764    (void) count;
 765    _mesa_VertexPointer(size, type, stride, ptr);
 766 }
 767
 768
 769 void GLAPIENTRY
 770 _mesa_NormalPointerEXT(GLenum type, GLsizei stride, GLsizei count,
 771                        const GLvoid *ptr)
 772 {
 773    (void) count;
 774    _mesa_NormalPointer(type, stride, ptr);
 775 }
 776
 777
 778 void GLAPIENTRY
 779 _mesa_ColorPointerEXT(GLint size, GLenum type, GLsizei stride, GLsizei count,
 780                       const GLvoid *ptr)
 781 {
 782    (void) count;
 783    _mesa_ColorPointer(size, type, stride, ptr);
 784 }
 785
 786
 787 void GLAPIENTRY
 788 _mesa_IndexPointerEXT(GLenum type, GLsizei stride, GLsizei count,
 789                       const GLvoid *ptr)
 790 {
 791    (void) count;
 792    _mesa_IndexPointer(type, stride, ptr);
 793 }
 794
 795
 796 void GLAPIENTRY
 797 _mesa_TexCoordPointerEXT(GLint size, GLenum type, GLsizei stride,
 798                          GLsizei count, const GLvoid *ptr)
 799 {
 800    (void) count;
 801    _mesa_TexCoordPointer(size, type, stride, ptr);
 802 }
 803
 804
 805 void GLAPIENTRY
 806 _mesa_EdgeFlagPointerEXT(GLsizei stride, GLsizei count, const GLboolean *ptr)
 807 {
 808    (void) count;
 809    _mesa_EdgeFlagPointer(stride, ptr);
 810 }
 811
 812
 813 void GLAPIENTRY
 814 _mesa_InterleavedArrays(GLenum format, GLsizei stride, const GLvoid *pointer)
 815 {
 816    GET_CURRENT_CONTEXT(ctx);
 817    GLboolean tflag, cflag, nflag;  /* enable/disable flags */
 818    GLint tcomps, ccomps, vcomps;   /* components per texcoord, color, vertex */
 819    GLenum ctype = 0;               /* color type */
 820    GLint coffset = 0, noffset = 0, voffset;/* color, normal, vertex offsets */
 821    const GLint toffset = 0;        /* always zero */
 822    GLint defstride;                /* default stride */
 823    GLint c, f;
 824
 825    ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx);
 826
 827    f = sizeof(GLfloat);
 828    c = f * ((4 * sizeof(GLubyte) + (f - 1)) / f);
 829
 830    if (stride < 0) {
 831       _mesa_error( ctx, GL_INVALID_VALUE, "glInterleavedArrays(stride)" );
 832       return;
 833    }
 834
 835    switch (format) {
 836       case GL_V2F:
 837          tflag = GL_FALSE;  cflag = GL_FALSE;  nflag = GL_FALSE;
 838          tcomps = 0;  ccomps = 0;  vcomps = 2;
 839          voffset = 0;
 840          defstride = 2*f;
 841          break;
 842       case GL_V3F:
 843          tflag = GL_FALSE;  cflag = GL_FALSE;  nflag = GL_FALSE;
 844          tcomps = 0;  ccomps = 0;  vcomps = 3;
 845          voffset = 0;
 846          defstride = 3*f;
 847          break;
 848       case GL_C4UB_V2F:
 849          tflag = GL_FALSE;  cflag = GL_TRUE;  nflag = GL_FALSE;
 850          tcomps = 0;  ccomps = 4;  vcomps = 2;
 851          ctype = GL_UNSIGNED_BYTE;
 852          coffset = 0;
 853          voffset = c;
 854          defstride = c + 2*f;
 855          break;
 856       case GL_C4UB_V3F:
 857          tflag = GL_FALSE;  cflag = GL_TRUE;  nflag = GL_FALSE;
 858          tcomps = 0;  ccomps = 4;  vcomps = 3;
 859          ctype = GL_UNSIGNED_BYTE;
 860          coffset = 0;
 861          voffset = c;
 862          defstride = c + 3*f;
 863          break;
 864       case GL_C3F_V3F:
 865          tflag = GL_FALSE;  cflag = GL_TRUE;  nflag = GL_FALSE;
 866          tcomps = 0;  ccomps = 3;  vcomps = 3;
 867          ctype = GL_FLOAT;
 868          coffset = 0;
 869          voffset = 3*f;
 870          defstride = 6*f;
 871          break;
 872       case GL_N3F_V3F:
 873          tflag = GL_FALSE;  cflag = GL_FALSE;  nflag = GL_TRUE;
 874          tcomps = 0;  ccomps = 0;  vcomps = 3;
 875          noffset = 0;
 876          voffset = 3*f;
 877          defstride = 6*f;
 878          break;
 879       case GL_C4F_N3F_V3F:
 880          tflag = GL_FALSE;  cflag = GL_TRUE;  nflag = GL_TRUE;
 881          tcomps = 0;  ccomps = 4;  vcomps = 3;
 882          ctype = GL_FLOAT;
 883          coffset = 0;
 884          noffset = 4*f;
 885          voffset = 7*f;
 886          defstride = 10*f;
 887          break;
 888       case GL_T2F_V3F:
 889          tflag = GL_TRUE;  cflag = GL_FALSE;  nflag = GL_FALSE;
 890          tcomps = 2;  ccomps = 0;  vcomps = 3;
 891          voffset = 2*f;
 892          defstride = 5*f;
 893          break;
 894       case GL_T4F_V4F:
 895          tflag = GL_TRUE;  cflag = GL_FALSE;  nflag = GL_FALSE;
 896          tcomps = 4;  ccomps = 0;  vcomps = 4;
 897          voffset = 4*f;
 898          defstride = 8*f;
 899          break;
 900       case GL_T2F_C4UB_V3F:
 901          tflag = GL_TRUE;  cflag = GL_TRUE;  nflag = GL_FALSE;
 902          tcomps = 2;  ccomps = 4;  vcomps = 3;
 903          ctype = GL_UNSIGNED_BYTE;
 904          coffset = 2*f;
 905          voffset = c+2*f;
 906          defstride = c+5*f;
 907          break;
 908       case GL_T2F_C3F_V3F:
 909          tflag = GL_TRUE;  cflag = GL_TRUE;  nflag = GL_FALSE;
 910          tcomps = 2;  ccomps = 3;  vcomps = 3;
 911          ctype = GL_FLOAT;
 912          coffset = 2*f;
 913          voffset = 5*f;
 914          defstride = 8*f;
 915          break;
 916       case GL_T2F_N3F_V3F:
 917          tflag = GL_TRUE;  cflag = GL_FALSE;  nflag = GL_TRUE;
 918          tcomps = 2;  ccomps = 0;  vcomps = 3;
 919          noffset = 2*f;
 920          voffset = 5*f;
 921          defstride = 8*f;
 922          break;
 923       case GL_T2F_C4F_N3F_V3F:
 924          tflag = GL_TRUE;  cflag = GL_TRUE;  nflag = GL_TRUE;
 925          tcomps = 2;  ccomps = 4;  vcomps = 3;
 926          ctype = GL_FLOAT;
 927          coffset = 2*f;
 928          noffset = 6*f;
 929          voffset = 9*f;
 930          defstride = 12*f;
 931          break;
 932       case GL_T4F_C4F_N3F_V4F:
 933          tflag = GL_TRUE;  cflag = GL_TRUE;  nflag = GL_TRUE;
 934          tcomps = 4;  ccomps = 4;  vcomps = 4;
 935          ctype = GL_FLOAT;
 936          coffset = 4*f;
 937          noffset = 8*f;
 938          voffset = 11*f;
 939          defstride = 15*f;
 940          break;
 941       default:
 942          _mesa_error( ctx, GL_INVALID_ENUM, "glInterleavedArrays(format)" );
 943          return;
 944    }
 945
 946    if (stride==0) {
 947       stride = defstride;
 948    }
 949
 950    _mesa_DisableClientState( GL_EDGE_FLAG_ARRAY );
 951    _mesa_DisableClientState( GL_INDEX_ARRAY );
 952    /* XXX also disable secondary color and generic arrays? */
 953
 954    /* Texcoords */
 955    if (tflag) {
 956       _mesa_EnableClientState( GL_TEXTURE_COORD_ARRAY );
 957       _mesa_TexCoordPointer( tcomps, GL_FLOAT, stride,
 958                              (GLubyte *) pointer + toffset );
 959    }
 960    else {
 961       _mesa_DisableClientState( GL_TEXTURE_COORD_ARRAY );
 962    }
 963
 964    /* Color */
 965    if (cflag) {
 966       _mesa_EnableClientState( GL_COLOR_ARRAY );
 967       _mesa_ColorPointer( ccomps, ctype, stride,
 968                           (GLubyte *) pointer + coffset );
 969    }
 970    else {
 971       _mesa_DisableClientState( GL_COLOR_ARRAY );
 972    }
 973
 974
 975    /* Normals */
 976    if (nflag) {
 977       _mesa_EnableClientState( GL_NORMAL_ARRAY );
 978       _mesa_NormalPointer( GL_FLOAT, stride, (GLubyte *) pointer + noffset );
 979    }
 980    else {
 981       _mesa_DisableClientState( GL_NORMAL_ARRAY );
 982    }
 983
 984    /* Vertices */
 985    _mesa_EnableClientState( GL_VERTEX_ARRAY );
 986    _mesa_VertexPointer( vcomps, GL_FLOAT, stride,
 987                         (GLubyte *) pointer + voffset );
 988 }
 989
 990
 991 void GLAPIENTRY
 992 _mesa_LockArraysEXT(GLint first, GLsizei count)
 993 {
 994    GET_CURRENT_CONTEXT(ctx);
 995    ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx);
 996
 997    if (MESA_VERBOSE & VERBOSE_API)
 998       _mesa_debug(ctx, "glLockArrays %d %d\n", first, count);
 999
1000    if (first < 0) {
1001       _mesa_error( ctx, GL_INVALID_VALUE, "glLockArraysEXT(first)" );
1002       return;
1003    }
1004    if (count <= 0) {
1005       _mesa_error( ctx, GL_INVALID_VALUE, "glLockArraysEXT(count)" );
1006       return;
1007    }
1008    if (ctx->Array.LockCount != 0) {
1009       _mesa_error( ctx, GL_INVALID_OPERATION, "glLockArraysEXT(reentry)" );
1010       return;
1011    }
1012
1013    ctx->Array.LockFirst = first;
1014    ctx->Array.LockCount = count;
1015
1016    ctx->NewState |= _NEW_ARRAY;
1017 }
1018
1019
1020 void GLAPIENTRY
1021 _mesa_UnlockArraysEXT( void )
1022 {
1023    GET_CURRENT_CONTEXT(ctx);
1024    ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx);
1025
1026    if (MESA_VERBOSE & VERBOSE_API)
1027       _mesa_debug(ctx, "glUnlockArrays\n");
1028
1029    if (ctx->Array.LockCount == 0) {
1030       _mesa_error( ctx, GL_INVALID_OPERATION, "glUnlockArraysEXT(reexit)" );
1031       return;
1032    }
1033
1034    ctx->Array.LockFirst = 0;
1035    ctx->Array.LockCount = 0;
1036    ctx->NewState |= _NEW_ARRAY;
1037 }
1038
1039
1040 /* GL_EXT_multi_draw_arrays */
1041 void GLAPIENTRY
1042 _mesa_MultiDrawArraysEXT( GLenum mode, const GLint *first,
1043                           const GLsizei *count, GLsizei primcount )
1044 {
1045    GET_CURRENT_CONTEXT(ctx);
1046    GLint i;
1047
1048    ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx);
1049
1050    for (i = 0; i < primcount; i++) {
1051       if (count[i] > 0) {
1052          CALL_DrawArrays(ctx->Exec, (mode, first[i], count[i]));
1053       }
1054    }
1055 }
1056
1057
1058 /* GL_IBM_multimode_draw_arrays */
1059 void GLAPIENTRY
1060 _mesa_MultiModeDrawArraysIBM( const GLenum * mode, const GLint * first,
1061                               const GLsizei * count,
1062                               GLsizei primcount, GLint modestride )
1063 {
1064    GET_CURRENT_CONTEXT(ctx);
1065    GLint i;
1066
1067    ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx);
1068
1069    for ( i = 0 ; i < primcount ; i++ ) {
1070       if ( count[i] > 0 ) {
1071          GLenum m = *((GLenum *) ((GLubyte *) mode + i * modestride));
1072          CALL_DrawArrays(ctx->Exec, ( m, first[i], count[i] ));
1073       }
1074    }
1075 }
1076
1077
1078 /* GL_IBM_multimode_draw_arrays */
1079 void GLAPIENTRY
1080 _mesa_MultiModeDrawElementsIBM( const GLenum * mode, const GLsizei * count,
1081                                 GLenum type, const GLvoid * const * indices,
1082                                 GLsizei primcount, GLint modestride )
1083 {
1084    GET_CURRENT_CONTEXT(ctx);
1085    GLint i;
1086
1087    ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx);
1088
1089    /* XXX not sure about ARB_vertex_buffer_object handling here */
1090
1091    for ( i = 0 ; i < primcount ; i++ ) {
1092       if ( count[i] > 0 ) {
1093          GLenum m = *((GLenum *) ((GLubyte *) mode + i * modestride));
1094          CALL_DrawElements(ctx->Exec, ( m, count[i], type, indices[i] ));
1095       }
1096    }
1097 }
1098
1099
1100 /**
1101  * GL_NV_primitive_restart and GL 3.1
1102  */
1103 void GLAPIENTRY
1104 _mesa_PrimitiveRestartIndex(GLuint index)
1105 {
1106    GET_CURRENT_CONTEXT(ctx);
1107
1108    if (!ctx->Extensions.NV_primitive_restart && ctx->Version < 31) {
1109       _mesa_error(ctx, GL_INVALID_OPERATION, "glPrimitiveRestartIndexNV()");
1110       return;
1111    }
1112
1113    ASSERT_OUTSIDE_BEGIN_END(ctx);
1114
1115    if (ctx->Array.RestartIndex != index) {
1116       FLUSH_VERTICES(ctx, _NEW_TRANSFORM);
1117       ctx->Array.RestartIndex = index;
1118    }
1119 }
1120
1121
1122 /**
1123  * See GL_ARB_instanced_arrays.
1124  * Note that the instance divisor only applies to generic arrays, not
1125  * the legacy vertex arrays.
1126  */
1127 void GLAPIENTRY
1128 _mesa_VertexAttribDivisor(GLuint index, GLuint divisor)
1129 {
1130    struct gl_client_array *array;
1131    GET_CURRENT_CONTEXT(ctx);
1132    ASSERT_OUTSIDE_BEGIN_END(ctx);
1133
1134    if (!ctx->Extensions.ARB_instanced_arrays) {
1135       _mesa_error(ctx, GL_INVALID_OPERATION, "glVertexAttribDivisor()");
1136       return;
1137    }
1138
1139    if (index >= ctx->Const.VertexProgram.MaxAttribs) {
1140       _mesa_error(ctx, GL_INVALID_ENUM, "glVertexAttribDivisor(index = %u)",
1141                   index);
1142       return;
1143    }
1144
1145    ASSERT(VERT_ATTRIB_GENERIC(index) < Elements(ctx->Array.ArrayObj->VertexAttrib));
1146
1147    array = &ctx->Array.ArrayObj->VertexAttrib[VERT_ATTRIB_GENERIC(index)];
1148    if (array->InstanceDivisor != divisor) {
1149       FLUSH_VERTICES(ctx, _NEW_ARRAY);
1150       array->InstanceDivisor = divisor;
1151       ctx->Array.ArrayObj->NewArrays |= VERT_BIT(VERT_ATTRIB_GENERIC(index));
1152    }
1153 }
1154
1155
1156
1157 /**
1158  * Copy one client vertex array to another.
1159  */
1160 void
1161 _mesa_copy_client_array(struct gl_context *ctx,
1162                         struct gl_client_array *dst,
1163                         struct gl_client_array *src)
1164 {
1165    dst->Size = src->Size;
1166    dst->Type = src->Type;
1167    dst->Format = src->Format;
1168    dst->Stride = src->Stride;
1169    dst->StrideB = src->StrideB;
1170    dst->Ptr = src->Ptr;
1171    dst->Enabled = src->Enabled;
1172    dst->Normalized = src->Normalized;
1173    dst->Integer = src->Integer;
1174    dst->InstanceDivisor = src->InstanceDivisor;
1175    dst->_ElementSize = src->_ElementSize;
1176    _mesa_reference_buffer_object(ctx, &dst->BufferObj, src->BufferObj);
1177    dst->_MaxElement = src->_MaxElement;
1178 }
1179
1180
1181
1182 /**
1183  * Print vertex array's fields.
1184  */
1185 static void
1186 print_array(const char *name, GLint index, const struct gl_client_array *array)
1187 {
1188    if (index >= 0)
1189       printf("  %s[%d]: ", name, index);
1190    else
1191       printf("  %s: ", name);
1192    printf("Ptr=%p, Type=0x%x, Size=%d, ElemSize=%u, Stride=%d, Buffer=%u(Size %lu), MaxElem=%u\n",
1193           array->Ptr, array->Type, array->Size,
1194           array->_ElementSize, array->StrideB,
1195           array->BufferObj->Name, (unsigned long) array->BufferObj->Size,
1196           array->_MaxElement);
1197 }
1198
1199
1200 /**
1201  * Print current vertex object/array info.  For debug.
1202  */
1203 void
1204 _mesa_print_arrays(struct gl_context *ctx)
1205 {
1206    struct gl_array_object *arrayObj = ctx->Array.ArrayObj;
1207    GLuint i;
1208
1209    _mesa_update_array_object_max_element(ctx, arrayObj);
1210
1211    printf("Array Object %u\n", arrayObj->Name);
1212    if (arrayObj->VertexAttrib[VERT_ATTRIB_POS].Enabled)
1213       print_array("Vertex", -1, &arrayObj->VertexAttrib[VERT_ATTRIB_POS]);
1214    if (arrayObj->VertexAttrib[VERT_ATTRIB_NORMAL].Enabled)
1215       print_array("Normal", -1, &arrayObj->VertexAttrib[VERT_ATTRIB_NORMAL]);
1216    if (arrayObj->VertexAttrib[VERT_ATTRIB_COLOR0].Enabled)
1217       print_array("Color", -1, &arrayObj->VertexAttrib[VERT_ATTRIB_COLOR0]);
1218    for (i = 0; i < ctx->Const.MaxTextureCoordUnits; i++)
1219       if (arrayObj->VertexAttrib[VERT_ATTRIB_TEX(i)].Enabled)
1220          print_array("TexCoord", i, &arrayObj->VertexAttrib[VERT_ATTRIB_TEX(i)]);
1221    for (i = 0; i < VERT_ATTRIB_GENERIC_MAX; i++)
1222       if (arrayObj->VertexAttrib[VERT_ATTRIB_GENERIC(i)].Enabled)
1223          print_array("Attrib", i, &arrayObj->VertexAttrib[VERT_ATTRIB_GENERIC(i)]);
1224    printf("  _MaxElement = %u\n", arrayObj->_MaxElement);
1225 }
1226
1227
1228 /**
1229  * Initialize vertex array state for given context.
1230  */
1231 void
1232 _mesa_init_varray(struct gl_context *ctx)
1233 {
1234    ctx->Array.DefaultArrayObj = ctx->Driver.NewArrayObject(ctx, 0);
1235    _mesa_reference_array_object(ctx, &ctx->Array.ArrayObj,
1236                                 ctx->Array.DefaultArrayObj);
1237    ctx->Array.ActiveTexture = 0;   /* GL_ARB_multitexture */
1238
1239    ctx->Array.Objects = _mesa_NewHashTable();
1240 }
1241
1242
1243 /**
1244  * Callback for deleting an array object.  Called by _mesa_HashDeleteAll().
1245  */
1246 static void
1247 delete_arrayobj_cb(GLuint id, void *data, void *userData)
1248 {
1249    struct gl_array_object *arrayObj = (struct gl_array_object *) data;
1250    struct gl_context *ctx = (struct gl_context *) userData;
1251    _mesa_delete_array_object(ctx, arrayObj);
1252 }
1253
1254
1255 /**
1256  * Free vertex array state for given context.
1257  */
1258 void
1259 _mesa_free_varray_data(struct gl_context *ctx)
1260 {
1261    _mesa_HashDeleteAll(ctx->Array.Objects, delete_arrayobj_cb, ctx);
1262    _mesa_DeleteHashTable(ctx->Array.Objects);
1263 }