Home | History | Annotate | Download | only in radeon
      1 /**************************************************************************
      2 
      3 Copyright 2000, 2001 ATI Technologies Inc., Ontario, Canada, and
      4                      Tungsten Graphics Inc., Austin, Texas.
      5 
      6 All Rights Reserved.
      7 
      8 Permission is hereby granted, free of charge, to any person obtaining
      9 a copy of this software and associated documentation files (the
     10 "Software"), to deal in the Software without restriction, including
     11 without limitation the rights to use, copy, modify, merge, publish,
     12 distribute, sublicense, and/or sell copies of the Software, and to
     13 permit persons to whom the Software is furnished to do so, subject to
     14 the following conditions:
     15 
     16 The above copyright notice and this permission notice (including the
     17 next paragraph) shall be included in all copies or substantial
     18 portions of the Software.
     19 
     20 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
     21 EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
     22 MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
     23 IN NO EVENT SHALL THE COPYRIGHT OWNER(S) AND/OR ITS SUPPLIERS BE
     24 LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
     25 OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
     26 WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
     27 
     28 **************************************************************************/
     29 
     30 /*
     31  * Authors:
     32  *   Keith Whitwell <keith (at) tungstengraphics.com>
     33  */
     34 
     35 #include "main/glheader.h"
     36 #include "main/imports.h"
     37 #include "main/mtypes.h"
     38 #include "main/light.h"
     39 #include "main/enums.h"
     40 
     41 #include "vbo/vbo.h"
     42 #include "tnl/tnl.h"
     43 #include "tnl/t_pipeline.h"
     44 
     45 #include "radeon_common.h"
     46 #include "radeon_context.h"
     47 #include "radeon_state.h"
     48 #include "radeon_ioctl.h"
     49 #include "radeon_tcl.h"
     50 #include "radeon_swtcl.h"
     51 #include "radeon_maos.h"
     52 #include "radeon_common_context.h"
     53 
     54 
     55 
     56 /*
     57  * Render unclipped vertex buffers by emitting vertices directly to
     58  * dma buffers.  Use strip/fan hardware primitives where possible.
     59  * Try to simulate missing primitives with indexed vertices.
     60  */
     61 #define HAVE_POINTS      1
     62 #define HAVE_LINES       1
     63 #define HAVE_LINE_LOOP   0
     64 #define HAVE_LINE_STRIPS 1
     65 #define HAVE_TRIANGLES   1
     66 #define HAVE_TRI_STRIPS  1
     67 #define HAVE_TRI_STRIP_1 0
     68 #define HAVE_TRI_FANS    1
     69 #define HAVE_QUADS       0
     70 #define HAVE_QUAD_STRIPS 0
     71 #define HAVE_POLYGONS    1
     72 #define HAVE_ELTS        1
     73 
     74 
     75 #define HW_POINTS           RADEON_CP_VC_CNTL_PRIM_TYPE_POINT
     76 #define HW_LINES            RADEON_CP_VC_CNTL_PRIM_TYPE_LINE
     77 #define HW_LINE_LOOP        0
     78 #define HW_LINE_STRIP       RADEON_CP_VC_CNTL_PRIM_TYPE_LINE_STRIP
     79 #define HW_TRIANGLES        RADEON_CP_VC_CNTL_PRIM_TYPE_TRI_LIST
     80 #define HW_TRIANGLE_STRIP_0 RADEON_CP_VC_CNTL_PRIM_TYPE_TRI_STRIP
     81 #define HW_TRIANGLE_STRIP_1 0
     82 #define HW_TRIANGLE_FAN     RADEON_CP_VC_CNTL_PRIM_TYPE_TRI_FAN
     83 #define HW_QUADS            0
     84 #define HW_QUAD_STRIP       0
     85 #define HW_POLYGON          RADEON_CP_VC_CNTL_PRIM_TYPE_TRI_FAN
     86 
     87 
     88 static GLboolean discrete_prim[0x10] = {
     89    0,				/* 0 none */
     90    1,				/* 1 points */
     91    1,				/* 2 lines */
     92    0,				/* 3 line_strip */
     93    1,				/* 4 tri_list */
     94    0,				/* 5 tri_fan */
     95    0,				/* 6 tri_type2 */
     96    1,				/* 7 rect list (unused) */
     97    1,				/* 8 3vert point */
     98    1,				/* 9 3vert line */
     99    0,
    100    0,
    101    0,
    102    0,
    103    0,
    104    0,
    105 };
    106 
    107 
    108 #define LOCAL_VARS r100ContextPtr rmesa = R100_CONTEXT(ctx)
    109 #define ELT_TYPE  GLushort
    110 
    111 #define ELT_INIT(prim, hw_prim) \
    112    radeonTclPrimitive( ctx, prim, hw_prim | RADEON_CP_VC_CNTL_PRIM_WALK_IND )
    113 
    114 #define GET_MESA_ELTS() rmesa->tcl.Elts
    115 
    116 
    117 /* Don't really know how many elts will fit in what's left of cmdbuf,
    118  * as there is state to emit, etc:
    119  */
    120 
    121 /* Testing on isosurf shows a maximum around here.  Don't know if it's
    122  * the card or driver or kernel module that is causing the behaviour.
    123  */
    124 #define GET_MAX_HW_ELTS() 300
    125 
    126 
    127 #define RESET_STIPPLE() do {			\
    128    RADEON_STATECHANGE( rmesa, lin );		\
    129    radeonEmitState(&rmesa->radeon);			\
    130 } while (0)
    131 
    132 #define AUTO_STIPPLE( mode )  do {		\
    133    RADEON_STATECHANGE( rmesa, lin );		\
    134    if (mode)					\
    135       rmesa->hw.lin.cmd[LIN_RE_LINE_PATTERN] |=	\
    136 	 RADEON_LINE_PATTERN_AUTO_RESET;	\
    137    else						\
    138       rmesa->hw.lin.cmd[LIN_RE_LINE_PATTERN] &=	\
    139 	 ~RADEON_LINE_PATTERN_AUTO_RESET;	\
    140    radeonEmitState(&rmesa->radeon);		\
    141 } while (0)
    142 
    143 
    144 
    145 #define ALLOC_ELTS(nr)	radeonAllocElts( rmesa, nr )
    146 
    147 static GLushort *radeonAllocElts( r100ContextPtr rmesa, GLuint nr )
    148 {
    149       if (rmesa->radeon.dma.flush)
    150 	 rmesa->radeon.dma.flush( rmesa->radeon.glCtx );
    151 
    152       radeonEmitAOS( rmesa,
    153 		     rmesa->radeon.tcl.aos_count, 0 );
    154 
    155       return radeonAllocEltsOpenEnded( rmesa, rmesa->tcl.vertex_format,
    156 				       rmesa->tcl.hw_primitive, nr );
    157 }
    158 
    159 #define CLOSE_ELTS() if (0)  RADEON_NEWPRIM( rmesa )
    160 
    161 
    162 
    163 /* TODO: Try to extend existing primitive if both are identical,
    164  * discrete and there are no intervening state changes.  (Somewhat
    165  * duplicates changes to DrawArrays code)
    166  */
    167 static void radeonEmitPrim( struct gl_context *ctx,
    168 		       GLenum prim,
    169 		       GLuint hwprim,
    170 		       GLuint start,
    171 		       GLuint count)
    172 {
    173    r100ContextPtr rmesa = R100_CONTEXT( ctx );
    174    radeonTclPrimitive( ctx, prim, hwprim );
    175 
    176    radeonEmitAOS( rmesa,
    177 		  rmesa->radeon.tcl.aos_count,
    178 		  start );
    179 
    180    /* Why couldn't this packet have taken an offset param?
    181     */
    182    radeonEmitVbufPrim( rmesa,
    183 		       rmesa->tcl.vertex_format,
    184 		       rmesa->tcl.hw_primitive,
    185 		       count - start );
    186 }
    187 
    188 #define EMIT_PRIM( ctx, prim, hwprim, start, count ) do {       \
    189    radeonEmitPrim( ctx, prim, hwprim, start, count );           \
    190    (void) rmesa; } while (0)
    191 
    192 #define MAX_CONVERSION_SIZE 40
    193 
    194 /* Try & join small primitives
    195  */
    196 #if 0
    197 #define PREFER_DISCRETE_ELT_PRIM( NR, PRIM ) 0
    198 #else
    199 #define PREFER_DISCRETE_ELT_PRIM( NR, PRIM )			\
    200   ((NR) < 20 ||							\
    201    ((NR) < 40 &&						\
    202     rmesa->tcl.hw_primitive == (PRIM|				\
    203 			    RADEON_CP_VC_CNTL_PRIM_WALK_IND|	\
    204 			    RADEON_CP_VC_CNTL_TCL_ENABLE)))
    205 #endif
    206 
    207 #ifdef MESA_BIG_ENDIAN
    208 /* We could do without (most of) this ugliness if dest was always 32 bit word aligned... */
    209 #define EMIT_ELT(dest, offset, x) do {				\
    210 	int off = offset + ( ( (uintptr_t)dest & 0x2 ) >> 1 );	\
    211 	GLushort *des = (GLushort *)( (uintptr_t)dest & ~0x2 );	\
    212 	(des)[ off + 1 - 2 * ( off & 1 ) ] = (GLushort)(x); 	\
    213 	(void)rmesa; } while (0)
    214 #else
    215 #define EMIT_ELT(dest, offset, x) do {				\
    216 	(dest)[offset] = (GLushort) (x);			\
    217 	(void)rmesa; } while (0)
    218 #endif
    219 
    220 #define EMIT_TWO_ELTS(dest, offset, x, y)  *(GLuint *)(dest+offset) = ((y)<<16)|(x);
    221 
    222 
    223 
    224 #define TAG(x) tcl_##x
    225 #include "tnl_dd/t_dd_dmatmp2.h"
    226 
    227 /**********************************************************************/
    228 /*                          External entrypoints                     */
    229 /**********************************************************************/
    230 
    231 void radeonEmitPrimitive( struct gl_context *ctx,
    232 			  GLuint first,
    233 			  GLuint last,
    234 			  GLuint flags )
    235 {
    236    tcl_render_tab_verts[flags&PRIM_MODE_MASK]( ctx, first, last, flags );
    237 }
    238 
    239 void radeonEmitEltPrimitive( struct gl_context *ctx,
    240 			     GLuint first,
    241 			     GLuint last,
    242 			     GLuint flags )
    243 {
    244    tcl_render_tab_elts[flags&PRIM_MODE_MASK]( ctx, first, last, flags );
    245 }
    246 
    247 void radeonTclPrimitive( struct gl_context *ctx,
    248 			 GLenum prim,
    249 			 int hw_prim )
    250 {
    251    r100ContextPtr rmesa = R100_CONTEXT(ctx);
    252    GLuint se_cntl;
    253    GLuint newprim = hw_prim | RADEON_CP_VC_CNTL_TCL_ENABLE;
    254 
    255    radeon_prepare_render(&rmesa->radeon);
    256    if (rmesa->radeon.NewGLState)
    257       radeonValidateState( ctx );
    258 
    259    if (newprim != rmesa->tcl.hw_primitive ||
    260        !discrete_prim[hw_prim&0xf]) {
    261       RADEON_NEWPRIM( rmesa );
    262       rmesa->tcl.hw_primitive = newprim;
    263    }
    264 
    265    se_cntl = rmesa->hw.set.cmd[SET_SE_CNTL];
    266    se_cntl &= ~RADEON_FLAT_SHADE_VTX_LAST;
    267 
    268    if (prim == GL_POLYGON && ctx->Light.ShadeModel == GL_FLAT)
    269       se_cntl |= RADEON_FLAT_SHADE_VTX_0;
    270    else
    271       se_cntl |= RADEON_FLAT_SHADE_VTX_LAST;
    272 
    273    if (se_cntl != rmesa->hw.set.cmd[SET_SE_CNTL]) {
    274       RADEON_STATECHANGE( rmesa, set );
    275       rmesa->hw.set.cmd[SET_SE_CNTL] = se_cntl;
    276    }
    277 }
    278 
    279 /**
    280  * Predict total emit size for next rendering operation so there is no flush in middle of rendering
    281  * Prediction has to aim towards the best possible value that is worse than worst case scenario
    282  */
    283 static GLuint radeonEnsureEmitSize( struct gl_context * ctx , GLuint inputs )
    284 {
    285   r100ContextPtr rmesa = R100_CONTEXT(ctx);
    286   TNLcontext *tnl = TNL_CONTEXT(ctx);
    287   struct vertex_buffer *VB = &tnl->vb;
    288   GLuint space_required;
    289   GLuint state_size;
    290   GLuint nr_aos = 1; /* radeonEmitArrays does always emit one */
    291   int i;
    292   /* list of flags that are allocating aos object */
    293   const GLuint flags_to_check[] = {
    294     VERT_BIT_NORMAL,
    295     VERT_BIT_COLOR0,
    296     VERT_BIT_COLOR1,
    297     VERT_BIT_FOG
    298   };
    299   /* predict number of aos to emit */
    300   for (i=0; i < sizeof(flags_to_check)/sizeof(flags_to_check[0]); ++i)
    301   {
    302     if (inputs & flags_to_check[i])
    303       ++nr_aos;
    304   }
    305   for (i = 0; i < ctx->Const.MaxTextureUnits; ++i)
    306   {
    307     if (inputs & VERT_BIT_TEX(i))
    308       ++nr_aos;
    309   }
    310 
    311   {
    312     /* count the prediction for state size */
    313     space_required = 0;
    314     state_size = radeonCountStateEmitSize( &rmesa->radeon );
    315     /* tcl may be changed in radeonEmitArrays so account for it if not dirty */
    316     if (!rmesa->hw.tcl.dirty)
    317       state_size += rmesa->hw.tcl.check( rmesa->radeon.glCtx, &rmesa->hw.tcl );
    318     /* predict size for elements */
    319     for (i = 0; i < VB->PrimitiveCount; ++i)
    320     {
    321       /* If primitive.count is less than MAX_CONVERSION_SIZE
    322 	 rendering code may decide convert to elts.
    323 	 In that case we have to make pessimistic prediction.
    324 	 and use larger of 2 paths. */
    325       const GLuint elts = ELTS_BUFSZ(nr_aos);
    326       const GLuint index = INDEX_BUFSZ;
    327       const GLuint vbuf = VBUF_BUFSZ;
    328       if (!VB->Primitive[i].count)
    329 	continue;
    330       if ( (!VB->Elts && VB->Primitive[i].count >= MAX_CONVERSION_SIZE)
    331 	  || vbuf > index + elts)
    332 	space_required += vbuf;
    333       else
    334 	space_required += index + elts;
    335       space_required += VB->Primitive[i].count * 3;
    336       space_required += AOS_BUFSZ(nr_aos);
    337     }
    338     space_required += SCISSOR_BUFSZ;
    339   }
    340   /* flush the buffer in case we need more than is left. */
    341   if (rcommonEnsureCmdBufSpace(&rmesa->radeon, space_required, __FUNCTION__))
    342     return space_required + radeonCountStateEmitSize( &rmesa->radeon );
    343   else
    344     return space_required + state_size;
    345 }
    346 
    347 /**********************************************************************/
    348 /*                          Render pipeline stage                     */
    349 /**********************************************************************/
    350 
    351 
    352 /* TCL render.
    353  */
    354 static GLboolean radeon_run_tcl_render( struct gl_context *ctx,
    355 					struct tnl_pipeline_stage *stage )
    356 {
    357    r100ContextPtr rmesa = R100_CONTEXT(ctx);
    358    TNLcontext *tnl = TNL_CONTEXT(ctx);
    359    struct vertex_buffer *VB = &tnl->vb;
    360    GLuint inputs = VERT_BIT_POS | VERT_BIT_COLOR0;
    361    GLuint i;
    362    GLuint emit_end;
    363 
    364    /* TODO: separate this from the swtnl pipeline
    365     */
    366    if (rmesa->radeon.TclFallback)
    367       return GL_TRUE;	/* fallback to software t&l */
    368 
    369    if (VB->Count == 0)
    370       return GL_FALSE;
    371 
    372    /* NOTE: inputs != tnl->render_inputs - these are the untransformed
    373     * inputs.
    374     */
    375    if (ctx->Light.Enabled) {
    376       inputs |= VERT_BIT_NORMAL;
    377    }
    378 
    379    if (ctx->_TriangleCaps & DD_SEPARATE_SPECULAR) {
    380       inputs |= VERT_BIT_COLOR1;
    381    }
    382 
    383    if ( (ctx->Fog.FogCoordinateSource == GL_FOG_COORD) && ctx->Fog.Enabled ) {
    384       inputs |= VERT_BIT_FOG;
    385    }
    386 
    387    for (i = 0 ; i < ctx->Const.MaxTextureUnits; i++) {
    388       if (ctx->Texture.Unit[i]._ReallyEnabled) {
    389       /* TODO: probably should not emit texture coords when texgen is enabled */
    390 	 if (rmesa->TexGenNeedNormals[i]) {
    391 	    inputs |= VERT_BIT_NORMAL;
    392 	 }
    393 	 inputs |= VERT_BIT_TEX(i);
    394       }
    395    }
    396 
    397    radeonReleaseArrays( ctx, ~0 );
    398    emit_end = radeonEnsureEmitSize( ctx, inputs )
    399      + rmesa->radeon.cmdbuf.cs->cdw;
    400    radeonEmitArrays( ctx, inputs );
    401 
    402    rmesa->tcl.Elts = VB->Elts;
    403 
    404    for (i = 0 ; i < VB->PrimitiveCount ; i++)
    405    {
    406       GLuint prim = _tnl_translate_prim(&VB->Primitive[i]);
    407       GLuint start = VB->Primitive[i].start;
    408       GLuint length = VB->Primitive[i].count;
    409 
    410       if (!length)
    411 	 continue;
    412 
    413       if (rmesa->tcl.Elts)
    414 	 radeonEmitEltPrimitive( ctx, start, start+length, prim );
    415       else
    416 	 radeonEmitPrimitive( ctx, start, start+length, prim );
    417    }
    418 
    419    if (emit_end < rmesa->radeon.cmdbuf.cs->cdw)
    420       WARN_ONCE("Rendering was %d commands larger than predicted size."
    421 	  " We might overflow  command buffer.\n", rmesa->radeon.cmdbuf.cs->cdw - emit_end);
    422 
    423    return GL_FALSE;		/* finished the pipe */
    424 }
    425 
    426 
    427 
    428 /* Initial state for tcl stage.
    429  */
    430 const struct tnl_pipeline_stage _radeon_tcl_stage =
    431 {
    432    "radeon render",
    433    NULL,
    434    NULL,
    435    NULL,
    436    NULL,
    437    radeon_run_tcl_render	/* run */
    438 };
    439 
    440 
    441 
    442 /**********************************************************************/
    443 /*                 Validate state at pipeline start                   */
    444 /**********************************************************************/
    445 
    446 
    447 /*-----------------------------------------------------------------------
    448  * Manage TCL fallbacks
    449  */
    450 
    451 
    452 static void transition_to_swtnl( struct gl_context *ctx )
    453 {
    454    r100ContextPtr rmesa = R100_CONTEXT(ctx);
    455    TNLcontext *tnl = TNL_CONTEXT(ctx);
    456    GLuint se_cntl;
    457 
    458    RADEON_NEWPRIM( rmesa );
    459    rmesa->swtcl.vertex_format = 0;
    460 
    461    radeonChooseVertexState( ctx );
    462    radeonChooseRenderState( ctx );
    463 
    464    _tnl_validate_shine_tables( ctx );
    465 
    466    tnl->Driver.NotifyMaterialChange =
    467       _tnl_validate_shine_tables;
    468 
    469    radeonReleaseArrays( ctx, ~0 );
    470 
    471    se_cntl = rmesa->hw.set.cmd[SET_SE_CNTL];
    472    se_cntl |= RADEON_FLAT_SHADE_VTX_LAST;
    473 
    474    if (se_cntl != rmesa->hw.set.cmd[SET_SE_CNTL]) {
    475       RADEON_STATECHANGE( rmesa, set );
    476       rmesa->hw.set.cmd[SET_SE_CNTL] = se_cntl;
    477    }
    478 }
    479 
    480 
    481 static void transition_to_hwtnl( struct gl_context *ctx )
    482 {
    483    r100ContextPtr rmesa = R100_CONTEXT(ctx);
    484    TNLcontext *tnl = TNL_CONTEXT(ctx);
    485    GLuint se_coord_fmt = rmesa->hw.set.cmd[SET_SE_COORDFMT];
    486 
    487    se_coord_fmt &= ~(RADEON_VTX_XY_PRE_MULT_1_OVER_W0 |
    488 		     RADEON_VTX_Z_PRE_MULT_1_OVER_W0 |
    489 		     RADEON_VTX_W0_IS_NOT_1_OVER_W0);
    490    se_coord_fmt |= RADEON_VTX_W0_IS_NOT_1_OVER_W0;
    491 
    492    if ( se_coord_fmt != rmesa->hw.set.cmd[SET_SE_COORDFMT] ) {
    493       RADEON_STATECHANGE( rmesa, set );
    494       rmesa->hw.set.cmd[SET_SE_COORDFMT] = se_coord_fmt;
    495       _tnl_need_projected_coords( ctx, GL_FALSE );
    496    }
    497 
    498    radeonUpdateMaterial( ctx );
    499 
    500    tnl->Driver.NotifyMaterialChange = radeonUpdateMaterial;
    501 
    502    if ( rmesa->radeon.dma.flush )
    503       rmesa->radeon.dma.flush( rmesa->radeon.glCtx );
    504 
    505    rmesa->radeon.dma.flush = NULL;
    506    rmesa->swtcl.vertex_format = 0;
    507 
    508    //   if (rmesa->swtcl.indexed_verts.buf)
    509    //      radeonReleaseDmaRegion( rmesa, &rmesa->swtcl.indexed_verts,
    510    //			      __FUNCTION__ );
    511 
    512    if (RADEON_DEBUG & RADEON_FALLBACKS)
    513       fprintf(stderr, "Radeon end tcl fallback\n");
    514 }
    515 
    516 static char *fallbackStrings[] = {
    517    "Rasterization fallback",
    518    "Unfilled triangles",
    519    "Twosided lighting, differing materials",
    520    "Materials in VB (maybe between begin/end)",
    521    "Texgen unit 0",
    522    "Texgen unit 1",
    523    "Texgen unit 2",
    524    "User disable",
    525    "Fogcoord with separate specular lighting"
    526 };
    527 
    528 
    529 static char *getFallbackString(GLuint bit)
    530 {
    531    int i = 0;
    532    while (bit > 1) {
    533       i++;
    534       bit >>= 1;
    535    }
    536    return fallbackStrings[i];
    537 }
    538 
    539 
    540 
    541 void radeonTclFallback( struct gl_context *ctx, GLuint bit, GLboolean mode )
    542 {
    543    r100ContextPtr rmesa = R100_CONTEXT(ctx);
    544    GLuint oldfallback = rmesa->radeon.TclFallback;
    545 
    546    if (mode) {
    547       rmesa->radeon.TclFallback |= bit;
    548       if (oldfallback == 0) {
    549 	 if (RADEON_DEBUG & RADEON_FALLBACKS)
    550 	    fprintf(stderr, "Radeon begin tcl fallback %s\n",
    551 		    getFallbackString( bit ));
    552 	 transition_to_swtnl( ctx );
    553       }
    554    }
    555    else {
    556       rmesa->radeon.TclFallback &= ~bit;
    557       if (oldfallback == bit) {
    558 	 if (RADEON_DEBUG & RADEON_FALLBACKS)
    559 	    fprintf(stderr, "Radeon end tcl fallback %s\n",
    560 		    getFallbackString( bit ));
    561 	 transition_to_hwtnl( ctx );
    562       }
    563    }
    564 }
    565