Subversion Repositories shark

Rev

Blame | Last modification | View Log | RSS feed

/* $Id: t_dd_vbtmp.h,v 1.1 2003-02-28 11:54:02 pj Exp $ */

/*
 * Mesa 3-D graphics library
 * Version:  4.1
 *
 * Copyright (C) 1999-2002  Brian Paul   All Rights Reserved.
 *
 * Permission is hereby granted, free of charge, to any person obtaining a
 * copy of this software and associated documentation files (the "Software"),
 * to deal in the Software without restriction, including without limitation
 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
 * and/or sell copies of the Software, and to permit persons to whom the
 * Software is furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included
 * in all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
 * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 *
 * Authors:
 *    Keith Whitwell <keith@tungstengraphics.com>
 */



/* Unlike the other templates here, this assumes quite a bit about the
 * underlying hardware.  Specifically it assumes a d3d-like vertex
 * format, with a layout more or less constrained to look like the
 * following:
 *
 * union {
 *    struct {
 *        float x, y, z, w;
 *        struct { char r, g, b, a; } color;
 *        struct { char r, g, b, fog; } spec;
 *        float u0, v0;
 *        float u1, v1;
 *        float u2, v2;
 *        float u3, v3;
 *    } v;
 *    struct {
 *        float x, y, z, w;
 *        struct { char r, g, b, a; } color;
 *        struct { char r, g, b, fog; } spec;
 *        float u0, v0, q0;
 *        float u1, v1, q1;
 *        float u2, v2, q2;
 *        float u3, v3, q3;
 *    } pv;
 *    struct {
 *        float x, y, z;
 *        struct { char r, g, b, a; } color;
 *    } tv;
 *    float f[16];
 *    unsigned int ui[16];
 *    unsigned char ub4[4][16];
 * }
 *
 
 * VERTEX:   hw vertex type as above
 * VERTEX_COLOR: hw color struct type in VERTEX
 *
 * DO_XYZW:  Emit xyz and maybe w coordinates.
 * DO_RGBA:  Emit color.
 * DO_SPEC:  Emit specular color.
 * DO_FOG:   Emit fog coordinate in specular alpha.
 * DO_TEX0:  Emit tex0 u,v coordinates.
 * DO_TEX1:  Emit tex1 u,v coordinates.
 * DO_TEX2:  Emit tex2 u,v coordinates.
 * DO_TEX3:  Emit tex3 u,v coordinates.
 * DO_PTEX:  Emit tex0,1,2,3 q coordinates where possible.
 *
 * HAVE_RGBA_COLOR: Hardware takes color in rgba order (else bgra).
 *
 * HAVE_HW_VIEWPORT:  Hardware performs viewport transform.
 * HAVE_HW_DIVIDE:  Hardware performs perspective divide.
 *
 * HAVE_TINY_VERTICES:  Hardware understands v.tv format.
 * HAVE_PTEX_VERTICES:  Hardware understands v.pv format.
 * HAVE_NOTEX_VERTICES:  Hardware understands v.v format with texcount 0.
 *
 * Additionally, this template assumes it is emitting *transformed*
 * vertices; the modifications to emit untransformed vertices (ie. to
 * t&l hardware) are probably too great to cooexist with the code
 * already in this file.
 *
 * NOTE: The PTEX vertex format always includes TEX0 and TEX1, even if
 * only TEX0 is enabled, in order to maintain a vertex size which is
 * an exact number of quadwords.
 */


#if (HAVE_HW_VIEWPORT)
#define VIEWPORT_X(dst,x) dst = x
#define VIEWPORT_Y(dst,y) dst = y
#define VIEWPORT_Z(dst,z) dst = z
#else
#define VIEWPORT_X(dst,x) dst = s[0]  * x + s[12]
#define VIEWPORT_Y(dst,y) dst = s[5]  * y + s[13]
#define VIEWPORT_Z(dst,z) dst = s[10] * z + s[14]
#endif

#if (HAVE_HW_DIVIDE && !HAVE_PTEX_VERTICES)
#error "can't cope with this combination"
#endif

#ifndef LOCALVARS
#define LOCALVARS
#endif

#ifndef CHECK_HW_DIVIDE
#define CHECK_HW_DIVIDE 1
#endif

#if (HAVE_HW_DIVIDE || DO_SPEC || DO_TEX0 || DO_FOG || !HAVE_TINY_VERTICES)

static void TAG(emit)( GLcontext *ctx,
                       GLuint start, GLuint end,
                       void *dest,
                       GLuint stride )
{
   LOCALVARS
   struct vertex_buffer *VB = &TNL_CONTEXT(ctx)->vb;
   GLfloat (*tc0)[4], (*tc1)[4], (*fog)[4];
   GLfloat (*tc2)[4], (*tc3)[4];
   GLubyte (*col)[4], (*spec)[4];
   GLuint tc0_stride, tc1_stride, col_stride, spec_stride, fog_stride;
   GLuint tc2_stride, tc3_stride;
   GLuint tc0_size, tc1_size;
   GLuint tc2_size, tc3_size;
   GLfloat (*coord)[4];
   GLuint coord_stride;
   VERTEX *v = (VERTEX *)dest;
   const GLfloat *s = GET_VIEWPORT_MAT();
   const GLubyte *mask = VB->ClipMask;
   int i;

/*     fprintf(stderr, "%s(big) importable %d %d..%d\n",  */
/*         __FUNCTION__, VB->importable_data, start, end); */

   if (HAVE_HW_VIEWPORT && HAVE_HW_DIVIDE && CHECK_HW_DIVIDE) {
      (void) s;
      coord = VB->ClipPtr->data;
      coord_stride = VB->ClipPtr->stride;
   }
   else {
      coord = VB->NdcPtr->data;
      coord_stride = VB->NdcPtr->stride;
   }

   if (DO_TEX3) {
      const GLuint t3 = GET_TEXSOURCE(3);
      tc3 = VB->TexCoordPtr[t3]->data;
      tc3_stride = VB->TexCoordPtr[t3]->stride;
      if (DO_PTEX)
         tc3_size = VB->TexCoordPtr[t3]->size;
   }

   if (DO_TEX2) {
      const GLuint t2 = GET_TEXSOURCE(2);
      tc2 = VB->TexCoordPtr[t2]->data;
      tc2_stride = VB->TexCoordPtr[t2]->stride;
      if (DO_PTEX)
         tc2_size = VB->TexCoordPtr[t2]->size;
   }

   if (DO_TEX1) {
      const GLuint t1 = GET_TEXSOURCE(1);
      tc1 = VB->TexCoordPtr[t1]->data;
      tc1_stride = VB->TexCoordPtr[t1]->stride;
      if (DO_PTEX)
         tc1_size = VB->TexCoordPtr[t1]->size;
   }

   if (DO_TEX0) {
      const GLuint t0 = GET_TEXSOURCE(0);
      tc0_stride = VB->TexCoordPtr[t0]->stride;
      tc0 = VB->TexCoordPtr[t0]->data;
      if (DO_PTEX)
         tc0_size = VB->TexCoordPtr[t0]->size;
   }

   if (DO_RGBA) {
      if (VB->ColorPtr[0]->Type != GL_UNSIGNED_BYTE)
         IMPORT_FLOAT_COLORS( ctx );
      col = (GLubyte (*)[4])VB->ColorPtr[0]->Ptr;
      col_stride = VB->ColorPtr[0]->StrideB;
   }

   if (DO_SPEC) {
      if (VB->SecondaryColorPtr[0]) {
         if (VB->SecondaryColorPtr[0]->Type != GL_UNSIGNED_BYTE)
            IMPORT_FLOAT_SPEC_COLORS( ctx );
         spec = (GLubyte (*)[4])VB->SecondaryColorPtr[0]->Ptr;
         spec_stride = VB->SecondaryColorPtr[0]->StrideB;
      } else {
         GLubyte tmp[4];
         spec = &tmp;
         spec_stride = 0;
      }
   }

   if (DO_FOG) {
      if (VB->FogCoordPtr) {
         fog = VB->FogCoordPtr->data;
         fog_stride = VB->FogCoordPtr->stride;
      }
      else {
         static GLfloat tmp[4] = {0, 0, 0, 0};
         fog = &tmp;
         fog_stride = 0;
      }
   }

   if (VB->importable_data) {
      /* May have nonstandard strides:
       */

      if (start) {
         coord =  (GLfloat (*)[4])((GLubyte *)coord + start * coord_stride);
         if (DO_TEX0)
            tc0 =  (GLfloat (*)[4])((GLubyte *)tc0 + start * tc0_stride);
         if (DO_TEX1)
            tc1 =  (GLfloat (*)[4])((GLubyte *)tc1 + start * tc1_stride);
         if (DO_TEX2)
            tc2 =  (GLfloat (*)[4])((GLubyte *)tc2 + start * tc2_stride);
         if (DO_TEX3)
            tc3 =  (GLfloat (*)[4])((GLubyte *)tc3 + start * tc3_stride);
         if (DO_RGBA)
            STRIDE_4UB(col, start * col_stride);
         if (DO_SPEC)
            STRIDE_4UB(spec, start * spec_stride);
         if (DO_FOG)
            /*STRIDE_F(fog, start * fog_stride);*/
            fog =  (GLfloat (*)[4])((GLfloat *)fog + start * fog_stride);
      }

      for (i=start; i < end; i++, v = (VERTEX *)((GLubyte *)v + stride)) {
         if (DO_XYZW) {
            if (HAVE_HW_VIEWPORT || mask[i] == 0) {
               VIEWPORT_X(v->v.x, coord[0][0]);
               VIEWPORT_Y(v->v.y, coord[0][1]);
               VIEWPORT_Z(v->v.z, coord[0][2]);
               v->v.w = coord[0][3];
            }
/*          fprintf(stderr, "vert %d: %.2f %.2f %.2f %.2f\n",  */
/*                  i, v->v.x, v->v.y, v->v.z, v->v.w); */
            coord =  (GLfloat (*)[4])((GLubyte *)coord +  coord_stride);
         }
         if (DO_RGBA) {
            if (HAVE_RGBA_COLOR) {
               *(GLuint *)&v->v.color = LE32_TO_CPU(*(GLuint *)&col[0]);
               STRIDE_4UB(col, col_stride);
            } else {
               v->v.color.blue  = col[0][2];
               v->v.color.green = col[0][1];
               v->v.color.red   = col[0][0];
               v->v.color.alpha = col[0][3];
               STRIDE_4UB(col, col_stride);
            }
         }
         if (DO_SPEC) {
            v->v.specular.red = spec[0][0];
            v->v.specular.green = spec[0][1];
            v->v.specular.blue = spec[0][2];
            STRIDE_4UB(spec, spec_stride);
         }
         if (DO_FOG) {
            v->v.specular.alpha = fog[0][0] * 255.0;
            /*STRIDE_F(fog, fog_stride);*/
            fog =  (GLfloat (*)[4])((GLfloat *)fog +  fog_stride);
         }
         if (DO_TEX0) {
            v->v.u0 = tc0[0][0];
            v->v.v0 = tc0[0][1];
            if (DO_PTEX) {
               if (HAVE_PTEX_VERTICES) {
                  if (tc0_size == 4)
                     v->pv.q0 = tc0[0][3];
                  else
                     v->pv.q0 = 1.0;
               }
               else if (tc0_size == 4) {
                  float rhw = 1.0 / tc0[0][3];
                  v->v.w *= tc0[0][3];
                  v->v.u0 *= rhw;
                  v->v.v0 *= rhw;
               }
            }
            tc0 =  (GLfloat (*)[4])((GLubyte *)tc0 +  tc0_stride);
         }
         if (DO_TEX1) {
            if (DO_PTEX) {
               v->pv.u1 = tc1[0][0];
               v->pv.v1 = tc1[0][1];
               if (tc1_size == 4)
                  v->pv.q1 = tc1[0][3];
               else
                  v->pv.q1 = 1.0;
            }
            else {
               v->v.u1 = tc1[0][0];
               v->v.v1 = tc1[0][1];
            }
            tc1 =  (GLfloat (*)[4])((GLubyte *)tc1 +  tc1_stride);
         }
         else if (DO_PTEX) {
            *(GLuint *)&v->pv.q1 = 0;   /* avoid culling on radeon */
         }
         if (DO_TEX2) {
            if (DO_PTEX) {
               v->pv.u2 = tc2[0][0];
               v->pv.v2 = tc2[0][1];
               if (tc2_size == 4)
                  v->pv.q2 = tc2[0][3];
               else
                  v->pv.q2 = 1.0;
            }
            else {
               v->v.u2 = tc2[0][0];
               v->v.v2 = tc2[0][1];
            }
            tc2 =  (GLfloat (*)[4])((GLubyte *)tc2 +  tc2_stride);
         }
         if (DO_TEX3) {
            if (DO_PTEX) {
               v->pv.u3 = tc3[0][0];
               v->pv.v3 = tc3[0][1];
               if (tc3_size == 4)
                  v->pv.q3 = tc3[0][3];
               else
                  v->pv.q3 = 1.0;
            }
            else {
               v->v.u3 = tc3[0][0];
               v->v.v3 = tc3[0][1];
            }
            tc3 =  (GLfloat (*)[4])((GLubyte *)tc3 +  tc3_stride);
         }
      }
   }
   else {
      for (i=start; i < end; i++, v = (VERTEX *)((GLubyte *)v + stride)) {
         if (DO_XYZW) {
            if (HAVE_HW_VIEWPORT || mask[i] == 0) {
               VIEWPORT_X(v->v.x, coord[i][0]);
               VIEWPORT_Y(v->v.y, coord[i][1]);
               VIEWPORT_Z(v->v.z, coord[i][2]);
               v->v.w = coord[i][3];
            }
         }
         if (DO_RGBA) {
            if (HAVE_RGBA_COLOR) {
               *(GLuint *)&v->v.color = LE32_TO_CPU(*(GLuint *)&col[i]);
            }
            else {
               v->v.color.blue  = col[i][2];
               v->v.color.green = col[i][1];
               v->v.color.red   = col[i][0];
               v->v.color.alpha = col[i][3];
            }
         }
         if (DO_SPEC) {
            v->v.specular.red   = spec[i][0];
            v->v.specular.green = spec[i][1];
            v->v.specular.blue  = spec[i][2];
         }
         if (DO_FOG) {
            v->v.specular.alpha = fog[i][0] * 255.0;
         }
         if (DO_TEX0) {
            v->v.u0 = tc0[i][0];
            v->v.v0 = tc0[i][1];
            if (DO_PTEX) {
               if (HAVE_PTEX_VERTICES) {
                  if (tc0_size == 4)
                     v->pv.q0 = tc0[i][3];
                  else
                     v->pv.q0 = 1.0;

                  v->pv.q1 = 0; /* radeon */
               }
               else if (tc0_size == 4) {
                  float rhw = 1.0 / tc0[i][3];
                  v->v.w *= tc0[i][3];
                  v->v.u0 *= rhw;
                  v->v.v0 *= rhw;
               }
            }
         }
         if (DO_TEX1) {
            if (DO_PTEX) {
               v->pv.u1 = tc1[i][0];
               v->pv.v1 = tc1[i][1];
               if (tc1_size == 4)
                  v->pv.q1 = tc1[i][3];
               else
                  v->pv.q1 = 1.0;
            }
            else {
               v->v.u1 = tc1[i][0];
               v->v.v1 = tc1[i][1];
            }
         }
      }
   }
}
#else
#if DO_XYZW

#if HAVE_HW_DIVIDE
#error "cannot use tiny vertices with hw perspective divide"
#endif

static void TAG(emit)( GLcontext *ctx, GLuint start, GLuint end,
                       void *dest, GLuint stride )
{
   LOCALVARS
   struct vertex_buffer *VB = &TNL_CONTEXT(ctx)->vb;
   GLubyte (*col)[4];
   GLuint col_stride;
   GLfloat (*coord)[4] = VB->NdcPtr->data;
   GLuint coord_stride = VB->NdcPtr->stride;
   GLfloat *v = (GLfloat *)dest;
   const GLubyte *mask = VB->ClipMask;
   const GLfloat *s = GET_VIEWPORT_MAT();
   int i;

   (void) s;

   ASSERT(stride == 4);

   if (VB->ColorPtr[0]->Type != GL_UNSIGNED_BYTE)
      IMPORT_FLOAT_COLORS( ctx );

   col = (GLubyte (*)[4])VB->ColorPtr[0]->Ptr;
   col_stride = VB->ColorPtr[0]->StrideB;
   ASSERT(VB->ColorPtr[0]->Type == GL_UNSIGNED_BYTE);

/*     fprintf(stderr, "%s(small) importable %x\n",  */
/*         __FUNCTION__, VB->importable_data); */

   /* Pack what's left into a 4-dword vertex.  Color is in a different
    * place, and there is no 'w' coordinate.
    */

   if (VB->importable_data) {
      if (start) {
         coord =  (GLfloat (*)[4])((GLubyte *)coord + start * coord_stride);
         STRIDE_4UB(col, start * col_stride);
      }

      for (i=start; i < end; i++, v+=4) {
         if (HAVE_HW_VIEWPORT || mask[i] == 0) {
            VIEWPORT_X(v[0], coord[0][0]);
            VIEWPORT_Y(v[1], coord[0][1]);
            VIEWPORT_Z(v[2], coord[0][2]);
         }
         coord =  (GLfloat (*)[4])((GLubyte *)coord +  coord_stride);
         if (DO_RGBA) {
            if (HAVE_RGBA_COLOR) {
               *(GLuint *)&v[3] = LE32_TO_CPU(*(GLuint *)col);
            }
            else {
               VERTEX_COLOR *c = (VERTEX_COLOR *)&v[3];
               c->blue  = col[0][2];
               c->green = col[0][1];
               c->red   = col[0][0];
               c->alpha = col[0][3];
            }
            STRIDE_4UB( col, col_stride );
         }
/*       fprintf(stderr, "vert %d: %.2f %.2f %.2f %x\n",  */
/*               i, v[0], v[1], v[2], *(int *)&v[3]); */
      }
   }
   else {
      for (i=start; i < end; i++, v+=4) {
         if (HAVE_HW_VIEWPORT || mask[i] == 0) {
            VIEWPORT_X(v[0], coord[i][0]);
            VIEWPORT_Y(v[1], coord[i][1]);
            VIEWPORT_Z(v[2], coord[i][2]);
         }
         if (DO_RGBA) {
            if (HAVE_RGBA_COLOR) {
               *(GLuint *)&v[3] = LE32_TO_CPU(*(GLuint *)&col[i]);
            }
            else {
               VERTEX_COLOR *c = (VERTEX_COLOR *)&v[3];
               c->blue  = col[i][2];
               c->green = col[i][1];
               c->red   = col[i][0];
               c->alpha = col[i][3];
            }
         }
/*       fprintf(stderr, "vert %d: %.2f %.2f %.2f %x\n",  */
/*               i, v[0], v[1], v[2], *(int *)&v[3]); */

      }
   }
}
#else
static void TAG(emit)( GLcontext *ctx, GLuint start, GLuint end,
                       void *dest, GLuint stride )
{
   LOCALVARS
   struct vertex_buffer *VB = &TNL_CONTEXT(ctx)->vb;
   GLubyte (*col)[4];
   GLuint col_stride;
   GLfloat *v = (GLfloat *)dest;
   int i;

   if (VB->ColorPtr[0]->Type != GL_UNSIGNED_BYTE)
      IMPORT_FLOAT_COLORS( ctx );

   col = VB->ColorPtr[0]->Ptr;
   col_stride = VB->ColorPtr[0]->StrideB;

   if (start)
      STRIDE_4UB(col, col_stride * start);

   /* Need to figure out where color is:
    */

   if (GET_VERTEX_FORMAT() == TINY_VERTEX_FORMAT)
      v += 3;
   else
      v += 4;

   for (i=start; i < end; i++, STRIDE_F(v, stride)) {
      if (HAVE_RGBA_COLOR) {
         *(GLuint *)v = LE32_TO_CPU(*(GLuint *)col[0]);
      }
      else {
         VERTEX_COLOR *c = (VERTEX_COLOR *)v;
         c->blue  = col[0][2];
         c->green = col[0][1];
         c->red   = col[0][0];
         c->alpha = col[0][3];
      }
      STRIDE_4UB( col, col_stride );
   }
}
#endif /* emit */
#endif /* emit */

#if (DO_XYZW) && (DO_RGBA)


#if (HAVE_PTEX_VERTICES)
static GLboolean TAG(check_tex_sizes)( GLcontext *ctx )
{
   LOCALVARS
   struct vertex_buffer *VB = &TNL_CONTEXT(ctx)->vb;

   /* Force 'missing' texcoords to something valid.
    */

   if (DO_TEX3 && VB->TexCoordPtr[2] == 0)
      VB->TexCoordPtr[2] = VB->TexCoordPtr[3];

   if (DO_TEX2 && VB->TexCoordPtr[1] == 0)
      VB->TexCoordPtr[1] = VB->TexCoordPtr[2];

   if (DO_TEX1 && VB->TexCoordPtr[0] == 0)
      VB->TexCoordPtr[0] = VB->TexCoordPtr[1];

   if (DO_PTEX)
      return GL_TRUE;
   
   if ((DO_TEX3 && VB->TexCoordPtr[GET_TEXSOURCE(3)]->size == 4) ||
       (DO_TEX2 && VB->TexCoordPtr[GET_TEXSOURCE(2)]->size == 4) ||
       (DO_TEX1 && VB->TexCoordPtr[GET_TEXSOURCE(1)]->size == 4) ||
       (DO_TEX0 && VB->TexCoordPtr[GET_TEXSOURCE(0)]->size == 4))
      return GL_FALSE;

   return GL_TRUE;
}
#else
static GLboolean TAG(check_tex_sizes)( GLcontext *ctx )
{
   LOCALVARS
   struct vertex_buffer *VB = &TNL_CONTEXT(ctx)->vb;

   /* Force 'missing' texcoords to something valid.
    */

   if (DO_TEX3 && VB->TexCoordPtr[2] == 0)
      VB->TexCoordPtr[2] = VB->TexCoordPtr[3];

   if (DO_TEX2 && VB->TexCoordPtr[1] == 0)
      VB->TexCoordPtr[1] = VB->TexCoordPtr[2];

   if (DO_TEX1 && VB->TexCoordPtr[0] == 0)
      VB->TexCoordPtr[0] = VB->TexCoordPtr[1];

   if (DO_PTEX)
      return GL_TRUE;

   /* No hardware support for projective texture.  Can fake it for
    * TEX0 only.
    */

   if ((DO_TEX3 && VB->TexCoordPtr[GET_TEXSOURCE(3)]->size == 4) ||
       (DO_TEX2 && VB->TexCoordPtr[GET_TEXSOURCE(2)]->size == 4) ||
       (DO_TEX1 && VB->TexCoordPtr[GET_TEXSOURCE(1)]->size == 4)) {
      PTEX_FALLBACK();
      return GL_FALSE;
   }

   if (DO_TEX0 && VB->TexCoordPtr[GET_TEXSOURCE(0)]->size == 4) {
      if (DO_TEX1 || DO_TEX2 || DO_TEX3) {
         PTEX_FALLBACK();
      }
      return GL_FALSE;
   }

   return GL_TRUE;
}
#endif /* ptex */


static void TAG(interp)( GLcontext *ctx,
                         GLfloat t,
                         GLuint edst, GLuint eout, GLuint ein,
                         GLboolean force_boundary )
{
   LOCALVARS
   struct vertex_buffer *VB = &TNL_CONTEXT(ctx)->vb;
   GLubyte *ddverts = GET_VERTEX_STORE();
   GLuint shift = GET_VERTEX_STRIDE_SHIFT();
   const GLfloat *dstclip = VB->ClipPtr->data[edst];
   GLfloat w;
   const GLfloat *s = GET_VIEWPORT_MAT();

   VERTEX *dst = (VERTEX *)(ddverts + (edst << shift));
   VERTEX *in  = (VERTEX *)(ddverts + (ein << shift));
   VERTEX *out = (VERTEX *)(ddverts + (eout << shift));

   (void)s;

   if (HAVE_HW_DIVIDE && CHECK_HW_DIVIDE) {
      VIEWPORT_X( dst->v.x, dstclip[0] );
      VIEWPORT_Y( dst->v.y, dstclip[1] );
      VIEWPORT_Z( dst->v.z, dstclip[2] );
      w = dstclip[3];
   }
   else {
      w = 1.0 / dstclip[3];
      VIEWPORT_X( dst->v.x, dstclip[0] * w );
      VIEWPORT_Y( dst->v.y, dstclip[1] * w );
      VIEWPORT_Z( dst->v.z, dstclip[2] * w );
   }

   if ((HAVE_HW_DIVIDE && CHECK_HW_DIVIDE) ||
       DO_FOG || DO_SPEC || DO_TEX0 || DO_TEX1 ||
       DO_TEX2 || DO_TEX3 || !HAVE_TINY_VERTICES) {

      dst->v.w = w;

      INTERP_UB( t, dst->ub4[4][0], out->ub4[4][0], in->ub4[4][0] );
      INTERP_UB( t, dst->ub4[4][1], out->ub4[4][1], in->ub4[4][1] );
      INTERP_UB( t, dst->ub4[4][2], out->ub4[4][2], in->ub4[4][2] );
      INTERP_UB( t, dst->ub4[4][3], out->ub4[4][3], in->ub4[4][3] );

      if (DO_SPEC) {
         INTERP_UB( t, dst->v.specular.red,   out->v.specular.red,   in->v.specular.red );
         INTERP_UB( t, dst->v.specular.green, out->v.specular.green, in->v.specular.green );
         INTERP_UB( t, dst->v.specular.blue,  out->v.specular.blue,  in->v.specular.blue );
      }
      if (DO_FOG) {
         INTERP_UB( t, dst->v.specular.alpha, out->v.specular.alpha, in->v.specular.alpha );
      }
      if (DO_TEX0) {
         if (DO_PTEX) {
            if (HAVE_PTEX_VERTICES) {
               INTERP_F( t, dst->pv.u0, out->pv.u0, in->pv.u0 );
               INTERP_F( t, dst->pv.v0, out->pv.v0, in->pv.v0 );
               INTERP_F( t, dst->pv.q0, out->pv.q0, in->pv.q0 );
            } else {
               GLfloat wout = VB->NdcPtr->data[eout][3];
               GLfloat win = VB->NdcPtr->data[ein][3];
               GLfloat qout = out->pv.w / wout;
               GLfloat qin = in->pv.w / win;
               GLfloat qdst, rqdst;

               ASSERT( !HAVE_HW_DIVIDE );

               INTERP_F( t, dst->v.u0, out->v.u0 * qout, in->v.u0 * qin );
               INTERP_F( t, dst->v.v0, out->v.v0 * qout, in->v.v0 * qin );
               INTERP_F( t, qdst, qout, qin );

               rqdst = 1.0 / qdst;
               dst->v.u0 *= rqdst;
               dst->v.v0 *= rqdst;
               dst->v.w *= rqdst;
            }
         }
         else {
            INTERP_F( t, dst->v.u0, out->v.u0, in->v.u0 );
            INTERP_F( t, dst->v.v0, out->v.v0, in->v.v0 );
         }
      }
      if (DO_TEX1) {
         if (DO_PTEX) {
            INTERP_F( t, dst->pv.u1, out->pv.u1, in->pv.u1 );
            INTERP_F( t, dst->pv.v1, out->pv.v1, in->pv.v1 );
            INTERP_F( t, dst->pv.q1, out->pv.q1, in->pv.q1 );
         } else {
            INTERP_F( t, dst->v.u1, out->v.u1, in->v.u1 );
            INTERP_F( t, dst->v.v1, out->v.v1, in->v.v1 );
         }
      }
      else if (DO_PTEX) {
         dst->pv.q1 = 0.0;      /* must be a valid float on radeon */
      }
      if (DO_TEX2) {
         if (DO_PTEX) {
            INTERP_F( t, dst->pv.u2, out->pv.u2, in->pv.u2 );
            INTERP_F( t, dst->pv.v2, out->pv.v2, in->pv.v2 );
            INTERP_F( t, dst->pv.q2, out->pv.q2, in->pv.q2 );
         } else {
            INTERP_F( t, dst->v.u2, out->v.u2, in->v.u2 );
            INTERP_F( t, dst->v.v2, out->v.v2, in->v.v2 );
         }
      }
      if (DO_TEX3) {
         if (DO_PTEX) {
            INTERP_F( t, dst->pv.u3, out->pv.u3, in->pv.u3 );
            INTERP_F( t, dst->pv.v3, out->pv.v3, in->pv.v3 );
            INTERP_F( t, dst->pv.q3, out->pv.q3, in->pv.q3 );
         } else {
            INTERP_F( t, dst->v.u3, out->v.u3, in->v.u3 );
            INTERP_F( t, dst->v.v3, out->v.v3, in->v.v3 );
         }
      }
   } else {
      /* 4-dword vertex.  Color is in v[3] and there is no oow coordinate.
       */

      INTERP_UB( t, dst->ub4[3][0], out->ub4[3][0], in->ub4[3][0] );
      INTERP_UB( t, dst->ub4[3][1], out->ub4[3][1], in->ub4[3][1] );
      INTERP_UB( t, dst->ub4[3][2], out->ub4[3][2], in->ub4[3][2] );
      INTERP_UB( t, dst->ub4[3][3], out->ub4[3][3], in->ub4[3][3] );
   }
}

#endif /* rgba && xyzw */


static void TAG(init)( void )
{
   setup_tab[IND].emit = TAG(emit);

#if (DO_XYZW && DO_RGBA)
   setup_tab[IND].check_tex_sizes = TAG(check_tex_sizes);
   setup_tab[IND].interp = TAG(interp);
#endif

   if (DO_SPEC)
      setup_tab[IND].copy_pv = copy_pv_rgba4_spec5;
   else if (HAVE_HW_DIVIDE || DO_SPEC || DO_FOG || DO_TEX0 || DO_TEX1 ||
            DO_TEX2 || DO_TEX3 || !HAVE_TINY_VERTICES)
      setup_tab[IND].copy_pv = copy_pv_rgba4;
   else
      setup_tab[IND].copy_pv = copy_pv_rgba3;

   if (DO_TEX3) {
      if (DO_PTEX) {
         ASSERT(HAVE_PTEX_VERTICES);
         setup_tab[IND].vertex_format = PROJ_TEX3_VERTEX_FORMAT;
         setup_tab[IND].vertex_size = 18;
         setup_tab[IND].vertex_stride_shift = 7;
      }
      else {
         setup_tab[IND].vertex_format = TEX3_VERTEX_FORMAT;
         setup_tab[IND].vertex_size = 14;
         setup_tab[IND].vertex_stride_shift = 6;
      }
   }
   else if (DO_TEX2) {
      if (DO_PTEX) {
         ASSERT(HAVE_PTEX_VERTICES);
         setup_tab[IND].vertex_format = PROJ_TEX3_VERTEX_FORMAT;
         setup_tab[IND].vertex_size = 18;
         setup_tab[IND].vertex_stride_shift = 7;
      }
      else {
         setup_tab[IND].vertex_format = TEX2_VERTEX_FORMAT;
         setup_tab[IND].vertex_size = 12;
         setup_tab[IND].vertex_stride_shift = 6;
      }
   }
   else if (DO_TEX1) {
      if (DO_PTEX) {
         ASSERT(HAVE_PTEX_VERTICES);
         setup_tab[IND].vertex_format = PROJ_TEX1_VERTEX_FORMAT;
         setup_tab[IND].vertex_size = 12;
         setup_tab[IND].vertex_stride_shift = 6;
      }
      else {
         setup_tab[IND].vertex_format = TEX1_VERTEX_FORMAT;
         setup_tab[IND].vertex_size = 10;
         setup_tab[IND].vertex_stride_shift = 6;
      }
   }
   else if (DO_TEX0) {
      if (DO_PTEX && HAVE_PTEX_VERTICES) {
         setup_tab[IND].vertex_format = PROJ_TEX1_VERTEX_FORMAT;
         setup_tab[IND].vertex_size = 12;
         setup_tab[IND].vertex_stride_shift = 6;
      } else {
         setup_tab[IND].vertex_format = TEX0_VERTEX_FORMAT;
         setup_tab[IND].vertex_size = 8;
         setup_tab[IND].vertex_stride_shift = 5;
      }
   }
   else if (!HAVE_HW_DIVIDE && !DO_SPEC && !DO_FOG && HAVE_TINY_VERTICES) {
      setup_tab[IND].vertex_format = TINY_VERTEX_FORMAT;
      setup_tab[IND].vertex_size = 4;
      setup_tab[IND].vertex_stride_shift = 4;
   } else if (HAVE_NOTEX_VERTICES) {
      setup_tab[IND].vertex_format = NOTEX_VERTEX_FORMAT;
      setup_tab[IND].vertex_size = 6;
      setup_tab[IND].vertex_stride_shift = 5;
   } else {
      setup_tab[IND].vertex_format = TEX0_VERTEX_FORMAT;
      setup_tab[IND].vertex_size = 8;
      setup_tab[IND].vertex_stride_shift = 5;
   }

   assert(setup_tab[IND].vertex_size * 4 <=
          1 << setup_tab[IND].vertex_stride_shift);
}


#undef IND
#undef TAG