src/parsec/disk-image/parsec/parsec-benchmark/pkgs/libs/mesa/src/src/mesa/drivers/dri/mach64/mach64_vbtmp.h - public/gem5-resources - Git at Google

 /* $XFree86$ */ /* -*- mode: c; c-basic-offset: 3 -*- */
 /*
  * Mesa 3-D graphics library
  * Version:  3.5
  *
  * Copyright (C) 1999-2001  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 <keithw@valinux.com>
  *
  * Modified for mach64 by:
  *    Leif Delgass <ldelgass@retinalburn.net>
  *    José Fonseca <j_r_fonseca@yahoo.co.uk>
  */


 /* 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];
  * }
  *

  * 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];
    GLfloat (*spec)[4];
    GLfloat (*col)[4];
    GLuint col_stride;
    GLuint tc0_stride, tc1_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) {
       col = VB->ColorPtr[0]->data;
       col_stride = VB->ColorPtr[0]->stride;
    }

    if (DO_SPEC) {
       spec = VB->SecondaryColorPtr[0]->data;
       spec_stride = VB->SecondaryColorPtr[0]->stride;
    } else {
       spec = (GLfloat (*)[4])ctx->Current.Attrib[VERT_ATTRIB_COLOR1];
       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;
       }
    }

    /* 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_4F(col, start * col_stride);
       if (DO_SPEC)
 	 STRIDE_4F(spec, start * spec_stride);
       if (DO_FOG)
 	 STRIDE_4F(fog, start * fog_stride);
       //	 fog =  (GLfloat (*)[4])((GLubyte *)fog + start * fog_stride);
       /*  STRIDE_F(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) {
 	    /* unclipped */
 	    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];
 	 } else {
 	    /* clipped */
 	    v->v.w = 1.0;
 	 }
 	 if (MACH64_DEBUG & DEBUG_VERBOSE_PRIMS) {
 	    fprintf(stderr, "%s: vert (importable) %d: %.2f %.2f %.2f %f\n",
 		    __FUNCTION__, 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 = *(GLuint *)&col[0];
 	    STRIDE_4F(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_4F(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_4F(spec, spec_stride);
       }
       if (DO_FOG) {
 	 v->v.specular.alpha = fog[0][0] * 255.0;
 	 /*  STRIDE_F(fog, fog_stride); */
 	 fog =  (GLfloat (*)[4])((GLubyte *)fog + fog_stride);
       }
       if (DO_TEX0) {
 	 v->v.u0 = tc0[0][0];
 	 v->v.v0 = tc0[0][1];
 	 if (MACH64_DEBUG & DEBUG_VERBOSE_PRIMS) {
 	    fprintf(stderr, "%s: vert (importable) %d: u0: %.2f, v0: %.2f, w: %f\n",
 		    __FUNCTION__, i, v->v.u0, v->v.v0, v->v.w);
 	 }
 #ifdef MACH64_PREMULT_TEXCOORDS
 	 v->v.u0 *= v->v.w;
 	 v->v.v0 *= v->v.w;
 #endif
 	 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) {
 #ifdef MACH64_PREMULT_TEXCOORDS
 	       v->v.w *= tc0[0][3];
 #else
 	       float rhw = 1.0 / tc0[0][3];
 	       v->v.w *= tc0[0][3];
 	       v->v.u0 *= rhw;
 	       v->v.v0 *= rhw;
 #endif
 	    }
 	 }
 	 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];
 	 }
 #ifdef MACH64_PREMULT_TEXCOORDS
 	 v->v.u1 *= v->v.w;
 	 v->v.v1 *= v->v.w;
 #endif
 	 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
 #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;
    GLfloat (*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);

    col = VB->ColorPtr[0]->data;
    col_stride = VB->ColorPtr[0]->stride;

    /* Pack what's left into a 4-dword vertex.  Color is in a different
     * place, and there is no 'w' coordinate.
     */
    if (start) {
       coord =  (GLfloat (*)[4])((GLubyte *)coord + start * coord_stride);
       STRIDE_4F(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] = *(GLuint *)col;
 	 }
 	 else {
 	    GLubyte *b = (GLubyte *)&v[3];
 	    UNCLAMPED_FLOAT_TO_UBYTE(b[0], col[0][2]);
 	    UNCLAMPED_FLOAT_TO_UBYTE(b[1], col[0][1]);
 	    UNCLAMPED_FLOAT_TO_UBYTE(b[2], col[0][0]);
 	    UNCLAMPED_FLOAT_TO_UBYTE(b[3], col[0][3]);
 	 }
 	 STRIDE_4F( col, col_stride );
       }
       if (MACH64_DEBUG & DEBUG_VERBOSE_PRIMS) {
 	 fprintf(stderr, "vert (importable) %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;
    GLfloat (*col)[4];
    GLuint col_stride;
    GLfloat *v = (GLfloat *)dest;
    int i;

    col = VB->ColorPtr[0]->data;
    col_stride = VB->ColorPtr[0]->stride;

    if (start)
       STRIDE_4F(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 = *(GLuint *)col[0];
       }
       else {
 	 GLubyte *b = (GLubyte *)v;
 	 UNCLAMPED_FLOAT_TO_UBYTE(b[0], col[0][2]);
 	 UNCLAMPED_FLOAT_TO_UBYTE(b[1], col[0][1]);
 	 UNCLAMPED_FLOAT_TO_UBYTE(b[2], col[0][0]);
 	 UNCLAMPED_FLOAT_TO_UBYTE(b[3], col[0][3]);
       }
       STRIDE_4F( 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 size = GET_VERTEX_SIZE();
    const GLfloat *dstclip = VB->ClipPtr->data[edst];
    GLfloat w;
    const GLfloat *s = GET_VIEWPORT_MAT();

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

    (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 = (dstclip[3] == 0.0F) ? 1.0 : (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 (MACH64_DEBUG & DEBUG_VERBOSE_PRIMS) {
       fprintf( stderr, "%s: dst vert: %.2f %.2f %.2f %f\n",
 	       __FUNCTION__,
 	       dst->v.x,
 	       dst->v.y,
 	       dst->v.z,
 	       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->ub4[5][0], out->ub4[5][0], in->ub4[5][0] );
 	 INTERP_UB( t, dst->ub4[5][1], out->ub4[5][1], in->ub4[5][1] );
 	 INTERP_UB( t, dst->ub4[5][2], out->ub4[5][2], in->ub4[5][2] );
       }
       if (DO_FOG) {
 	 INTERP_UB( t, dst->ub4[5][3], out->ub4[5][3], in->ub4[5][3] );
       }
       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 {
 #ifdef MACH64_PREMULT_TEXCOORDS
 	    GLfloat qout = 1 / out->v.w;
 	    GLfloat qin = 1 / in->v.w;

 	    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);

 	    dst->v.u0 *= w;
 	    dst->v.v0 *= w;
 #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 );
 #endif
 	 }
       }
       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 {
 #ifdef MACH64_PREMULT_TEXCOORDS
 	    GLfloat qout = 1 / out->v.w;
 	    GLfloat qin = 1 / in->v.w;

 	    INTERP_F( t, dst->v.u1, out->v.u1 * qout, in->v.u1 * qin );
 	    INTERP_F( t, dst->v.v1, out->v.v1 * qout, in->v.v1 * qin );

 	    dst->v.u1 *= w;
 	    dst->v.v1 *= w;
 #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 );
 #endif
 	 }
       }
       else if (DO_PTEX) {
 	 dst->pv.q0 = 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;
       }
       else {
 	 setup_tab[IND].vertex_format = TEX3_VERTEX_FORMAT;
 	 setup_tab[IND].vertex_size = 14;
       }
    }
    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;
       }
       else {
 	 setup_tab[IND].vertex_format = TEX2_VERTEX_FORMAT;
 	 setup_tab[IND].vertex_size = 12;
       }
    }
    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;
       }
       else {
 	 setup_tab[IND].vertex_format = TEX1_VERTEX_FORMAT;
 	 setup_tab[IND].vertex_size = 10;
       }
    }
    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;
       } else {
 	 setup_tab[IND].vertex_format = TEX0_VERTEX_FORMAT;
 	 setup_tab[IND].vertex_size = 8;
       }
    }
    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;
    } else if (HAVE_NOTEX_VERTICES) {
       setup_tab[IND].vertex_format = NOTEX_VERTEX_FORMAT;
       setup_tab[IND].vertex_size = 6;
    } else {
       setup_tab[IND].vertex_format = TEX0_VERTEX_FORMAT;
       setup_tab[IND].vertex_size = 8;
    }

 }


 #undef IND
 #undef TAG
	/* $XFree86$ / / -- mode: c; c-basic-offset: 3 -- */
	/*
	* Mesa 3-D graphics library
	* Version: 3.5
	*
	* Copyright (C) 1999-2001 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 <keithw@valinux.com>
	*
	* Modified for mach64 by:
	* Leif Delgass <ldelgass@retinalburn.net>
	* José Fonseca <j_r_fonseca@yahoo.co.uk>
	*/


	/* 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];
	* }
	*

	* 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];
	GLfloat (*spec)[4];
	GLfloat (*col)[4];
	GLuint col_stride;
	GLuint tc0_stride, tc1_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) {
	col = VB->ColorPtr[0]->data;
	col_stride = VB->ColorPtr[0]->stride;
	}

	if (DO_SPEC) {
	spec = VB->SecondaryColorPtr[0]->data;
	spec_stride = VB->SecondaryColorPtr[0]->stride;
	} else {
	spec = (GLfloat (*)[4])ctx->Current.Attrib[VERT_ATTRIB_COLOR1];
	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;
	}
	}

	/* 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_4F(col, start * col_stride);
	if (DO_SPEC)
	STRIDE_4F(spec, start * spec_stride);
	if (DO_FOG)
	STRIDE_4F(fog, start * fog_stride);
	// fog = (GLfloat ()[4])((GLubyte )fog + start * fog_stride);
	/* STRIDE_F(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) {
	/* unclipped */
	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];
	} else {
	/* clipped */
	v->v.w = 1.0;
	}
	if (MACH64_DEBUG & DEBUG_VERBOSE_PRIMS) {
	fprintf(stderr, "%s: vert (importable) %d: %.2f %.2f %.2f %f\n",
	__FUNCTION__, 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 = (GLuint )&col[0];
	STRIDE_4F(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_4F(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_4F(spec, spec_stride);
	}
	if (DO_FOG) {
	v->v.specular.alpha = fog[0][0] * 255.0;
	/* STRIDE_F(fog, fog_stride); */
	fog = (GLfloat ()[4])((GLubyte )fog + fog_stride);
	}
	if (DO_TEX0) {
	v->v.u0 = tc0[0][0];
	v->v.v0 = tc0[0][1];
	if (MACH64_DEBUG & DEBUG_VERBOSE_PRIMS) {
	fprintf(stderr, "%s: vert (importable) %d: u0: %.2f, v0: %.2f, w: %f\n",
	__FUNCTION__, i, v->v.u0, v->v.v0, v->v.w);
	}
	#ifdef MACH64_PREMULT_TEXCOORDS
	v->v.u0 *= v->v.w;
	v->v.v0 *= v->v.w;
	#endif
	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) {
	#ifdef MACH64_PREMULT_TEXCOORDS
	v->v.w *= tc0[0][3];
	#else
	float rhw = 1.0 / tc0[0][3];
	v->v.w *= tc0[0][3];
	v->v.u0 *= rhw;
	v->v.v0 *= rhw;
	#endif
	}
	}
	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];
	}
	#ifdef MACH64_PREMULT_TEXCOORDS
	v->v.u1 *= v->v.w;
	v->v.v1 *= v->v.w;
	#endif
	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
	#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;
	GLfloat (*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);

	col = VB->ColorPtr[0]->data;
	col_stride = VB->ColorPtr[0]->stride;

	/* Pack what's left into a 4-dword vertex. Color is in a different
	* place, and there is no 'w' coordinate.
	*/
	if (start) {
	coord = (GLfloat ()[4])((GLubyte )coord + start * coord_stride);
	STRIDE_4F(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] = (GLuint )col;
	}
	else {
	GLubyte b = (GLubyte )&v[3];
	UNCLAMPED_FLOAT_TO_UBYTE(b[0], col[0][2]);
	UNCLAMPED_FLOAT_TO_UBYTE(b[1], col[0][1]);
	UNCLAMPED_FLOAT_TO_UBYTE(b[2], col[0][0]);
	UNCLAMPED_FLOAT_TO_UBYTE(b[3], col[0][3]);
	}
	STRIDE_4F( col, col_stride );
	}
	if (MACH64_DEBUG & DEBUG_VERBOSE_PRIMS) {
	fprintf(stderr, "vert (importable) %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;
	GLfloat (*col)[4];
	GLuint col_stride;
	GLfloat v = (GLfloat )dest;
	int i;

	col = VB->ColorPtr[0]->data;
	col_stride = VB->ColorPtr[0]->stride;

	if (start)
	STRIDE_4F(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 = (GLuint )col[0];
	}
	else {
	GLubyte b = (GLubyte )v;
	UNCLAMPED_FLOAT_TO_UBYTE(b[0], col[0][2]);
	UNCLAMPED_FLOAT_TO_UBYTE(b[1], col[0][1]);
	UNCLAMPED_FLOAT_TO_UBYTE(b[2], col[0][0]);
	UNCLAMPED_FLOAT_TO_UBYTE(b[3], col[0][3]);
	}
	STRIDE_4F( 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 size = GET_VERTEX_SIZE();
	const GLfloat *dstclip = VB->ClipPtr->data[edst];
	GLfloat w;
	const GLfloat *s = GET_VIEWPORT_MAT();

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

	(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 = (dstclip[3] == 0.0F) ? 1.0 : (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 (MACH64_DEBUG & DEBUG_VERBOSE_PRIMS) {
	fprintf( stderr, "%s: dst vert: %.2f %.2f %.2f %f\n",
	__FUNCTION__,
	dst->v.x,
	dst->v.y,
	dst->v.z,
	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->ub4[5][0], out->ub4[5][0], in->ub4[5][0] );
	INTERP_UB( t, dst->ub4[5][1], out->ub4[5][1], in->ub4[5][1] );
	INTERP_UB( t, dst->ub4[5][2], out->ub4[5][2], in->ub4[5][2] );
	}
	if (DO_FOG) {
	INTERP_UB( t, dst->ub4[5][3], out->ub4[5][3], in->ub4[5][3] );
	}
	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 {
	#ifdef MACH64_PREMULT_TEXCOORDS
	GLfloat qout = 1 / out->v.w;
	GLfloat qin = 1 / in->v.w;

	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);

	dst->v.u0 *= w;
	dst->v.v0 *= w;
	#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 );
	#endif
	}
	}
	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 {
	#ifdef MACH64_PREMULT_TEXCOORDS
	GLfloat qout = 1 / out->v.w;
	GLfloat qin = 1 / in->v.w;

	INTERP_F( t, dst->v.u1, out->v.u1 * qout, in->v.u1 * qin );
	INTERP_F( t, dst->v.v1, out->v.v1 * qout, in->v.v1 * qin );

	dst->v.u1 *= w;
	dst->v.v1 *= w;
	#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 );
	#endif
	}
	}
	else if (DO_PTEX) {
	dst->pv.q0 = 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;
	}
	else {
	setup_tab[IND].vertex_format = TEX3_VERTEX_FORMAT;
	setup_tab[IND].vertex_size = 14;
	}
	}
	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;
	}
	else {
	setup_tab[IND].vertex_format = TEX2_VERTEX_FORMAT;
	setup_tab[IND].vertex_size = 12;
	}
	}
	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;
	}
	else {
	setup_tab[IND].vertex_format = TEX1_VERTEX_FORMAT;
	setup_tab[IND].vertex_size = 10;
	}
	}
	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;
	} else {
	setup_tab[IND].vertex_format = TEX0_VERTEX_FORMAT;
	setup_tab[IND].vertex_size = 8;
	}
	}
	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;
	} else if (HAVE_NOTEX_VERTICES) {
	setup_tab[IND].vertex_format = NOTEX_VERTEX_FORMAT;
	setup_tab[IND].vertex_size = 6;
	} else {
	setup_tab[IND].vertex_format = TEX0_VERTEX_FORMAT;
	setup_tab[IND].vertex_size = 8;
	}

	}


	#undef IND
	#undef TAG