All pastes #1825125 Raw Edit

Untitled

public text v1 · immutable
#1825125 ·published 2010-03-06 12:57 UTC
rendered paste body
/*
 * Copyright (C) 2009 Francisco Jerez.
 * 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 (including the
 * next paragraph) 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 THE COPYRIGHT OWNER(S) AND/OR ITS SUPPLIERS 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.
 *
 */
 
#define WARN_ONCE(a, ...) do {\
 static int warn##__LINE__=1;\
 if(warn##__LINE__){\
 fprintf(stderr, "*********************************WARN_ONCE*********************************\n");\
 fprintf(stderr, "File %s function %s line %d\n", __FILE__, __FUNCTION__, __LINE__);\
 fprintf(stderr, a, ## __VA_ARGS__);\
 fprintf(stderr, "***************************************************************************\n");\
 warn##__LINE__=0;\
 } \
 }while(0)

// #include "tnl_dd/t_dd_tritmp.h"

#include "nouveau_driver.h"
#include "nouveau_context.h"
#include "nouveau_util.h"
#include "nouveau_class.h"
#include "nv04_driver.h"

#include "tnl/tnl.h"
#include "tnl/t_pipeline.h"
#include "tnl/t_vertex.h"

#define NUM_VERTEX_ATTRS 6

static void
swtnl_update_viewport(GLcontext *ctx)
{
	float *viewport = to_nv04_context(ctx)->viewport;
	struct gl_framebuffer *fb = ctx->DrawBuffer;

	get_viewport_scale(ctx, viewport);
	get_viewport_translate(ctx, &viewport[MAT_TX]);

	/* It wants normalized Z coordinates. */
	viewport[MAT_SZ] /= fb->_DepthMaxF;
	viewport[MAT_TZ] /= fb->_DepthMaxF;
}

static void
swtnl_emit_attr(GLcontext *ctx, struct tnl_attr_map *m, int attr, int emit)
{
	TNLcontext *tnl = TNL_CONTEXT(ctx);

	if (RENDERINPUTS_TEST(tnl->render_inputs_bitset, attr))
		*m = (struct tnl_attr_map) {
			.attrib = attr,
			.format = emit,
		};
	else
		*m = (struct tnl_attr_map) {
			.format = EMIT_PAD,
			.offset = _tnl_format_info[emit].attrsize,
		};
}

static void
swtnl_choose_attrs(GLcontext *ctx)
{
	TNLcontext *tnl = TNL_CONTEXT(ctx);
	struct nouveau_grobj *fahrenheit = nv04_context_engine(ctx);
	struct nv04_context *nctx = to_nv04_context(ctx);
	static struct tnl_attr_map map[NUM_VERTEX_ATTRS];
	int n = 0;

	tnl->vb.AttribPtr[VERT_ATTRIB_POS] = tnl->vb.NdcPtr;

	swtnl_emit_attr(ctx, &map[n++], _TNL_ATTRIB_POS, EMIT_4F_VIEWPORT);
	swtnl_emit_attr(ctx, &map[n++], _TNL_ATTRIB_COLOR0, EMIT_4UB_4F_BGRA);
	swtnl_emit_attr(ctx, &map[n++], _TNL_ATTRIB_COLOR1, EMIT_3UB_3F_BGR);
	swtnl_emit_attr(ctx, &map[n++], _TNL_ATTRIB_FOG, EMIT_1UB_1F);
	swtnl_emit_attr(ctx, &map[n++], _TNL_ATTRIB_TEX0, EMIT_2F);
	if (nv04_mtex_engine(fahrenheit))
		swtnl_emit_attr(ctx, &map[n++], _TNL_ATTRIB_TEX1, EMIT_2F);

	swtnl_update_viewport(ctx);

	_tnl_install_attrs(ctx, map, n, nctx->viewport, 0);
}

/* TnL renderer entry points */

static void
swtnl_start(GLcontext *ctx)
{
	swtnl_choose_attrs(ctx);
}

static void
swtnl_finish(GLcontext *ctx)
{
	FIRE_RING(context_chan(ctx));
}

static void
swtnl_primitive(GLcontext *ctx, GLenum mode)
{
}

static void
swtnl_reset_stipple(GLcontext *ctx)
{
}

#define NONINC_METHOD 0x40000000
/* Primitive rendering */

#define BEGIN_PRIMITIVE_F(n,s)						\
	struct nouveau_channel *chan = context_chan(ctx);		\
	struct nouveau_grobj *fahrenheit = nv04_context_engine(ctx);	\
	int vertex_len = TNL_CONTEXT(ctx)->clipspace.vertex_size / 4;	\
									\
	if (nv04_mtex_engine(fahrenheit))				\
		BEGIN_RING(chan, fahrenheit,				\
			   NV04_MULTITEX_TRIANGLE_TLMTVERTEX_SX(s),	\
			   n * vertex_len + 1);				\
	else								\
		BEGIN_RING(chan, fahrenheit,				\
			   NV04_TEXTURED_TRIANGLE_TLVERTEX_SX(s),	\
			   n * vertex_len + 1);				\
			
			
#define BEGIN_PRIMITIVE(n)						\
	struct nouveau_channel *chan = context_chan(ctx);		\
	struct nouveau_grobj *fahrenheit = nv04_context_engine(ctx);	\
	int vertex_len = TNL_CONTEXT(ctx)->clipspace.vertex_size / 4;	\
									\
	if (nv04_mtex_engine(fahrenheit))				\
		BEGIN_RING(chan, fahrenheit,				\
			   NV04_MULTITEX_TRIANGLE_TLMTVERTEX_SX(0),	\
			   n * vertex_len);				\
	else								\
		BEGIN_RING(chan, fahrenheit,				\
			   NV04_TEXTURED_TRIANGLE_TLVERTEX_SX(0),	\
			   n * vertex_len);				\

#define OUT_VERTEX(i)						\
	OUT_RINGp(chan, _tnl_get_vertex(ctx, i), vertex_len);

#define END_PRIMITIVE(draw)						\
	if (nv04_mtex_engine(fahrenheit)) {				\
		BEGIN_RING(chan, fahrenheit,				\
			   NV04_MULTITEX_TRIANGLE_DRAWPRIMITIVE(0), 1); \
		OUT_RING(chan, draw);					\
	} else {							\
		BEGIN_RING(chan, fahrenheit,				\
			   NV04_TEXTURED_TRIANGLE_DRAWPRIMITIVE(0), 1); \
		OUT_RING(chan, draw);					\
	}
	

#define END_PRIMITIVE_F(draw,s)						\
	if (nv04_mtex_engine(fahrenheit)) {				\
		BEGIN_RING(chan, fahrenheit,				\
			   NV04_MULTITEX_TRIANGLE_DRAWPRIMITIVE(s), 1); \
		OUT_RING(chan, draw);					\
	} else {							\
		BEGIN_RING(chan, fahrenheit,				\
			   NV04_TEXTURED_TRIANGLE_DRAWPRIMITIVE(s), 1); \
		OUT_RING(chan, draw);					\
	}


#define END_PRIMITIVE_N(draw)						\
	if (nv04_mtex_engine(fahrenheit)) {				\
		BEGIN_RING(chan, fahrenheit,				\
			   NV04_MULTITEX_TRIANGLE_DRAWPRIMITIVE(0) |NONINC_METHOD, 1); \
		OUT_RING(chan, draw);					\
	} else {							\
		BEGIN_RING(chan, fahrenheit,				\
			   NV04_TEXTURED_TRIANGLE_DRAWPRIMITIVE(0) |NONINC_METHOD , 1); \
		OUT_RING(chan, draw);					\
	}



static void
swtnl_points(GLcontext *ctx, GLuint first, GLuint last)
{
WARN_ONCE("points rendering - Unimplemented\n");
}

static void
swtnl_line(GLcontext *ctx, GLuint v1, GLuint v2)
{
WARN_ONCE("line rendering - Unimplemented\n");
}

static void
swtnl_2triangles(GLcontext *ctx, GLuint v1, GLuint v2, GLuint v3, GLuint v4, GLuint v5, GLuint v6)
{
	BEGIN_PRIMITIVE_F(7,10);
	OUT_VERTEX(v1);
	OUT_VERTEX(v2);
	OUT_VERTEX(v3);
	OUT_VERTEX(v4);
	OUT_VERTEX(v5);
	OUT_VERTEX(v6);
	END_PRIMITIVE_F(0xFEDCBA,10); /* emit verts in order: 15,14,13,12,11 and 10 */
}



static void
swtnl_triangle(GLcontext *ctx, GLuint v1, GLuint v2, GLuint v3)
{
	BEGIN_PRIMITIVE_F(4,0);
	OUT_VERTEX(v1);
	OUT_VERTEX(v2);
	OUT_VERTEX(v3);
	END_PRIMITIVE_F(0x210,0);
}

static void
swtnl_quad(GLcontext *ctx, GLuint v1, GLuint v2, GLuint v3, GLuint v4)
{
	BEGIN_PRIMITIVE(4);
	OUT_VERTEX(v1);
	OUT_VERTEX(v2);
	OUT_VERTEX(v3);
	OUT_VERTEX(v4);
	END_PRIMITIVE(0x320210);
}

static void swtnl_render_triangle(GLcontext *ctx,GLuint v1,GLuint v2,GLuint v3)
{
 
 swtnl_triangle( ctx , v1, v2, v3);
 
}

static void swtnl_render_quad(GLcontext *ctx,GLuint v1,GLuint v2,GLuint v3,GLuint v4)
{
 

 swtnl_quad( ctx, v1,v2,v3,v4);
}

static void swtnl_render_points_verts(GLcontext *ctx,GLuint start,GLuint count,GLuint flags)
{
 // erm - said Stephane Marchesin
}

static void swtnl_render_lines_verts(GLcontext *ctx,GLuint start,GLuint count,GLuint flags)
{
 // umm - said Stephane Marchesin
}

static void swtnl_render_line_strip_verts(GLcontext *ctx,GLuint start,GLuint count,GLuint flags)
{
 // yeah - said Stephane Marchesin
}

static void swtnl_render_line_loop_verts(GLcontext *ctx,GLuint start,GLuint count,GLuint flags)
{
 // right - finally said Stephane Marchesin
}

static void
swtnl_render_triangles_verts(GLcontext *ctx,GLuint start,GLuint count,GLuint flags)
{
	int i;
	for(i=start;i<count-5;i+=6)
		 swtnl_2triangles(ctx, i+0, i+1, i+2, i+3, i+4, i+5);
	if (i!=count)
	{
		swtnl_triangle(ctx, i+0,i+1,i+2);
		i+=3;
	}
	
	if (i!=count)
		printf("oops\n");
}

static void 
swtnl_render_tri_strip_verts(GLcontext *ctx, GLuint start, GLuint count, GLuint flags)
{
	struct nouveau_channel *chan = context_chan(ctx);
	uint32_t striptbl[]={0x321210,0x543432,0x765654,0x987876,0xBA9A98,0xDCBCBA,0xFEDEDC};
	int i,j;
	
	for(i=start;i<count;i+=14)
		{
		int numvert=MIN2(16,count-i);
		int numtri=numvert-2;
			if (numvert<3)
			break;

		BEGIN_PRIMITIVE(numvert);
		 for(j=0;j<numvert;j++)
		 OUT_VERTEX(i+j);
		 END_PRIMITIVE_N((numtri+1)/2);

		 for(j=0;j<numtri/2;j++)
		 OUT_RING(chan, striptbl[j]);
		 if (numtri%2)
		 OUT_RING(chan, striptbl[numtri/2]&0xFFF);
		}
}

static void
swtnl_render_tri_fan_verts(GLcontext *ctx, GLuint start, GLuint count, GLuint flags)
{
	uint32_t fantbl[]={0x320210,0x540430,0x760650,0x980870,0xBA0A90,0xDC0CB0,0xFE0ED0};
	int i,j;
	
	BEGIN_PRIMITIVE(start);
	OUT_VERTEX(start);
	
	for(i=start+1;i<count;i+=14)
	{
		int numvert=MIN2(15,count-i);
		int numtri=numvert-1;
			if (numvert<3)
			break;

		BEGIN_PRIMITIVE_F(numvert,1);

		for(j=0;j<numvert;j++)
		OUT_VERTEX(i+j);
		END_PRIMITIVE_N((numtri+1)/2);
		
		for(j=0;j<numtri/2;j++)
		OUT_RING(chan, fantbl[j]);
		if (numtri%2)
		OUT_RING(chan, fantbl[numtri/2]&0xFFF);
	}

}

static void swtnl_render_quads_verts(GLcontext *ctx,GLuint start,GLuint count,GLuint flags)
{

	int i;

	for(i=start;i<count;i+=4)
	swtnl_quad(ctx, i+0, i+1, i+2, i+3);

}

static void swtnl_render_noop_verts(GLcontext *ctx,GLuint start,GLuint count,GLuint flags)
{
}

static void (*swtnl_render_tab_verts[GL_POLYGON+2])(GLcontext *,  GLuint,  GLuint,  GLuint) =
{
 swtnl_render_points_verts,
 swtnl_render_lines_verts,
 swtnl_render_line_loop_verts,
 swtnl_render_line_strip_verts,
 swtnl_render_triangles_verts,
 swtnl_render_tri_strip_verts,
 swtnl_render_tri_fan_verts,
 swtnl_render_quads_verts,
 swtnl_render_tri_strip_verts, //nv04_render_quad_strip_verts
 swtnl_render_tri_fan_verts, //nv04_render_poly_verts
 swtnl_render_noop_verts,
};


static void swtnl_render_points_elts(GLcontext *ctx,GLuint start,GLuint count,GLuint flags)
{
 // erm
}

static void swtnl_render_lines_elts(GLcontext *ctx,GLuint start,GLuint count,GLuint flags)
{
 // umm
}

static void swtnl_render_line_strip_elts(GLcontext *ctx,GLuint start,GLuint count,GLuint flags)
{
 // yeah
}

static void swtnl_render_line_loop_elts(GLcontext *ctx,GLuint start,GLuint count,GLuint flags)
{
 // right
}


static void swtnl_render_noop_elts(GLcontext *ctx,GLuint start,GLuint count,GLuint flags)
{
}

static void
swtnl_render_triangles_elts(GLcontext *ctx,GLuint start,GLuint count,GLuint flags)
{
	int i;
	const GLuint * const elt = TNL_CONTEXT(ctx)->vb.Elts;
	
	for(i=start;i<count-5;i+=6)
		 swtnl_2triangles(ctx, elt[i+0], elt[i+1], elt[i+2], elt[i+3], elt[i+4], elt[i+5]);
	if (i!=count)
	{
		swtnl_triangle(ctx, elt[i+0], elt[i+1], elt[i+2]);
		i+=3;
	}
	
	if (i!=count)
		printf("oops\n");
}

static void 
swtnl_render_tri_strip_elts(GLcontext *ctx, GLuint start, GLuint count, GLuint flags)
{
	struct nouveau_channel *chan = context_chan(ctx);
	uint32_t striptbl[]={0x321210,0x543432,0x765654,0x987876,0xBA9A98,0xDCBCBA,0xFEDEDC};
	int i,j;
	const GLuint * const elt = TNL_CONTEXT(ctx)->vb.Elts;
	
	for(i=start;i<count;i+=14)
		{
		int numvert=MIN2(16,count-i);
		int numtri=numvert-2;
			if (numvert<3)
			break;

		BEGIN_PRIMITIVE(numvert);
		 for(j=0;j<numvert;j++)
		 OUT_VERTEX(elt[i+j]);
		 END_PRIMITIVE_N((numtri+1)/2);

		 for(j=0;j<numtri/2;j++)
		 OUT_RING(chan, striptbl[j]);
		 if (numtri%2)
		 OUT_RING(chan, striptbl[numtri/2]&0xFFF);
		}
}

static void
swtnl_render_tri_fan_elts(GLcontext *ctx, GLuint start, GLuint count, GLuint flags)
{
	uint32_t fantbl[]={0x320210,0x540430,0x760650,0x980870,0xBA0A90,0xDC0CB0,0xFE0ED0};
	int i,j;
	const GLuint * const elt = TNL_CONTEXT(ctx)->vb.Elts;
	
	BEGIN_PRIMITIVE(start);
	OUT_VERTEX(start);
	
	for(i=start+1;i<count;i+=14)
	{
		int numvert=MIN2(15,count-i);
		int numtri=numvert-1;
			if (numvert<3)
			break;

		BEGIN_PRIMITIVE_F(numvert,1);

		for(j=0;j<numvert;j++)
		OUT_VERTEX(elt[i+j]);
		END_PRIMITIVE_N((numtri+1)/2);
		
		for(j=0;j<numtri/2;j++)
		OUT_RING(chan, fantbl[j]);
		if (numtri%2)
		OUT_RING(chan, fantbl[numtri/2]&0xFFF);
	}

}

static void swtnl_render_quads_elts(GLcontext *ctx,GLuint start,GLuint count,GLuint flags)
{

	int i;
	const GLuint * const elt = TNL_CONTEXT(ctx)->vb.Elts;

	for(i=start;i<count;i+=4)
	swtnl_quad(ctx, elt[i+0], elt[i+1], elt[i+2], elt[i+3]);

}

static void (*swtnl_render_tab_elts[GL_POLYGON+2])(GLcontext *, GLuint, GLuint, GLuint) =
{
 swtnl_render_points_elts,
 swtnl_render_lines_elts,
 swtnl_render_line_loop_elts,
 swtnl_render_line_strip_elts,
 swtnl_render_triangles_elts,
 swtnl_render_tri_strip_elts,
 swtnl_render_tri_fan_elts,
 swtnl_render_quads_elts,
 swtnl_render_tri_strip_elts, // nv04_render_quad_strip_elts,
 swtnl_render_tri_fan_elts, // nv04_render_poly_elts,
 swtnl_render_noop_elts,
};

static const GLuint hw_prim[GL_POLYGON+1] = {
 GL_POINTS+1,
 GL_LINES+1,
 GL_LINE_STRIP+1,
 GL_LINE_LOOP+1,
 GL_TRIANGLES+1,
 GL_TRIANGLE_STRIP+1,
 GL_TRIANGLE_FAN+1,
 GL_QUADS+1,
 GL_QUAD_STRIP+1,
 GL_POLYGON+1
};

static void swtnlChooseRenderState(GLcontext *ctx)
{
 TNLcontext *tnl = TNL_CONTEXT(ctx);

 tnl->Driver.Render.PrimTabVerts = swtnl_render_tab_verts;
 tnl->Driver.Render.PrimTabElts = swtnl_render_tab_elts;
/* tnl->Driver.Render.ClippedLine = swtnl_render_clipped_line;
 tnl->Driver.Render.ClippedPolygon = swtnl_render_clipped_poly; */
 tnl->Driver.Render.ClippedPolygon = _tnl_RenderClippedPolygon;
 tnl->Driver.Render.ClippedLine = _tnl_RenderClippedLine;
 tnl->Driver.Render.Points = swtnl_points;
 tnl->Driver.Render.Line = swtnl_line;
 tnl->Driver.Render.Triangle = swtnl_render_triangle;
 tnl->Driver.Render.Quad = swtnl_render_quad;
}

static void swtnlRenderStart(GLcontext *ctx)
{
 struct nv04_context *nctx = to_nv04_context(ctx);

 if (nctx->new_state) {
 nctx->new_render_state |= nctx->new_state;
 }

 if (nctx->new_render_state) {
// swtnlChooseVertexState(ctx); 
 swtnl_choose_attrs(ctx);
 swtnlChooseRenderState(ctx);
 nctx->new_render_state = 0;
 } 
}

static void swtnlRenderFinish(GLcontext *ctx)
{
	FIRE_RING(context_chan(ctx));
}

void swtnlRasterPrimitive(GLcontext *ctx,
 GLenum glprim,
 GLuint hwprim)
{

#if 1
 // struct nouveau_context *nmesa = NOUVEAU_CONTEXT(ctx);
 struct nv04_context *nctx = to_nv04_context(ctx);

 assert (!nctx->new_state);

 if (hwprim != nctx->current_primitive)
 {
 nctx->current_primitive=hwprim;
 }
 
#endif
}

static void swtnlRenderPrimitive( GLcontext *ctx, GLuint prim )
{
 swtnlRasterPrimitive( ctx, prim, hw_prim[prim] );
}

/* TnL initialization. */
void
nv04_render_init(GLcontext *ctx)
{
	TNLcontext *tnl = TNL_CONTEXT(ctx);

	tnl->Driver.RunPipeline = _tnl_run_pipeline;
	tnl->Driver.Render.Interp = _tnl_interp;
	tnl->Driver.Render.CopyPV = _tnl_copy_pv;
	tnl->Driver.Render.ClippedPolygon = _tnl_RenderClippedPolygon;
	tnl->Driver.Render.ClippedLine = _tnl_RenderClippedLine;
	tnl->Driver.Render.BuildVertices = _tnl_build_vertices;

	tnl->Driver.Render.Start = swtnlRenderStart; // was swtnl_start
	tnl->Driver.Render.Finish = swtnlRenderFinish; // was swtnl_finish
	tnl->Driver.Render.PrimitiveNotify = swtnlRenderPrimitive; /* swtnl_primitive  */
	tnl->Driver.Render.ResetLineStipple = swtnl_reset_stipple;

	tnl->Driver.Render.Points = swtnl_points;
	tnl->Driver.Render.Line = swtnl_line; 
	tnl->Driver.Render.Triangle = swtnl_triangle;
	tnl->Driver.Render.Quad = swtnl_quad;

	_tnl_need_projected_coords(ctx, GL_TRUE);
	_tnl_init_vertices(ctx, tnl->vb.Size,
			   NUM_VERTEX_ATTRS * 4 * sizeof(GLfloat));
	_tnl_allow_pixel_fog(ctx, GL_FALSE);
	_tnl_wakeup(ctx);
}

void
nv04_render_destroy(GLcontext *ctx)
{
}