s_fragprog.c revision 1c09bcfdda4083636a3ac27d804a34ef87875ce7
1865f88afc0d59d886fb2ad50429e584ecf17fa81Brian/* 2865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * Mesa 3-D graphics library 3865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * Version: 6.5.2 4865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * 5865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * Copyright (C) 1999-2006 Brian Paul All Rights Reserved. 6865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * 7865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * Permission is hereby granted, free of charge, to any person obtaining a 8865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * copy of this software and associated documentation files (the "Software"), 9865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * to deal in the Software without restriction, including without limitation 10865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * the rights to use, copy, modify, merge, publish, distribute, sublicense, 11865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * and/or sell copies of the Software, and to permit persons to whom the 12865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * Software is furnished to do so, subject to the following conditions: 13865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * 14865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * The above copyright notice and this permission notice shall be included 15865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * in all copies or substantial portions of the Software. 16865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * 17865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS 18865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 19865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL 20865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN 21865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN 22865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. 23865f88afc0d59d886fb2ad50429e584ecf17fa81Brian */ 24865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 25865f88afc0d59d886fb2ad50429e584ecf17fa81Brian#include "glheader.h" 26865f88afc0d59d886fb2ad50429e584ecf17fa81Brian#include "colormac.h" 27865f88afc0d59d886fb2ad50429e584ecf17fa81Brian#include "context.h" 28f6803de7396edda2223adf7ff7445579dbe475c9Brian#include "prog_execute.h" 29865f88afc0d59d886fb2ad50429e584ecf17fa81Brian#include "prog_instruction.h" 30865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 31c968d3d410a1897ecbb41d3557adaef69a4c627aBrian#include "s_fragprog.h" 32865f88afc0d59d886fb2ad50429e584ecf17fa81Brian#include "s_span.h" 33865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 34865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 35865f88afc0d59d886fb2ad50429e584ecf17fa81Brian/** 36865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * Fetch a texel. 37865f88afc0d59d886fb2ad50429e584ecf17fa81Brian */ 38865f88afc0d59d886fb2ad50429e584ecf17fa81Brianstatic void 39865f88afc0d59d886fb2ad50429e584ecf17fa81Brianfetch_texel( GLcontext *ctx, const GLfloat texcoord[4], GLfloat lambda, 40865f88afc0d59d886fb2ad50429e584ecf17fa81Brian GLuint unit, GLfloat color[4] ) 41865f88afc0d59d886fb2ad50429e584ecf17fa81Brian{ 42865f88afc0d59d886fb2ad50429e584ecf17fa81Brian GLchan rgba[4]; 43865f88afc0d59d886fb2ad50429e584ecf17fa81Brian SWcontext *swrast = SWRAST_CONTEXT(ctx); 44865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 45865f88afc0d59d886fb2ad50429e584ecf17fa81Brian /* XXX use a float-valued TextureSample routine here!!! */ 46865f88afc0d59d886fb2ad50429e584ecf17fa81Brian swrast->TextureSample[unit](ctx, ctx->Texture.Unit[unit]._Current, 47865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 1, (const GLfloat (*)[4]) texcoord, 48865f88afc0d59d886fb2ad50429e584ecf17fa81Brian &lambda, &rgba); 49865f88afc0d59d886fb2ad50429e584ecf17fa81Brian color[0] = CHAN_TO_FLOAT(rgba[0]); 50865f88afc0d59d886fb2ad50429e584ecf17fa81Brian color[1] = CHAN_TO_FLOAT(rgba[1]); 51865f88afc0d59d886fb2ad50429e584ecf17fa81Brian color[2] = CHAN_TO_FLOAT(rgba[2]); 52865f88afc0d59d886fb2ad50429e584ecf17fa81Brian color[3] = CHAN_TO_FLOAT(rgba[3]); 53865f88afc0d59d886fb2ad50429e584ecf17fa81Brian} 54865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 55865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 56865f88afc0d59d886fb2ad50429e584ecf17fa81Brian/** 57865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * Fetch a texel with the given partial derivatives to compute a level 58865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * of detail in the mipmap. 59865f88afc0d59d886fb2ad50429e584ecf17fa81Brian */ 60865f88afc0d59d886fb2ad50429e584ecf17fa81Brianstatic void 61865f88afc0d59d886fb2ad50429e584ecf17fa81Brianfetch_texel_deriv( GLcontext *ctx, const GLfloat texcoord[4], 62865f88afc0d59d886fb2ad50429e584ecf17fa81Brian const GLfloat texdx[4], const GLfloat texdy[4], 63865f88afc0d59d886fb2ad50429e584ecf17fa81Brian GLuint unit, GLfloat color[4] ) 64865f88afc0d59d886fb2ad50429e584ecf17fa81Brian{ 65865f88afc0d59d886fb2ad50429e584ecf17fa81Brian SWcontext *swrast = SWRAST_CONTEXT(ctx); 66865f88afc0d59d886fb2ad50429e584ecf17fa81Brian const struct gl_texture_object *texObj = ctx->Texture.Unit[unit]._Current; 67865f88afc0d59d886fb2ad50429e584ecf17fa81Brian const struct gl_texture_image *texImg = texObj->Image[0][texObj->BaseLevel]; 68865f88afc0d59d886fb2ad50429e584ecf17fa81Brian const GLfloat texW = (GLfloat) texImg->WidthScale; 69865f88afc0d59d886fb2ad50429e584ecf17fa81Brian const GLfloat texH = (GLfloat) texImg->HeightScale; 70865f88afc0d59d886fb2ad50429e584ecf17fa81Brian GLchan rgba[4]; 71865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 72865f88afc0d59d886fb2ad50429e584ecf17fa81Brian GLfloat lambda = _swrast_compute_lambda(texdx[0], texdy[0], /* ds/dx, ds/dy */ 73865f88afc0d59d886fb2ad50429e584ecf17fa81Brian texdx[1], texdy[1], /* dt/dx, dt/dy */ 74865f88afc0d59d886fb2ad50429e584ecf17fa81Brian texdx[3], texdy[2], /* dq/dx, dq/dy */ 75865f88afc0d59d886fb2ad50429e584ecf17fa81Brian texW, texH, 76865f88afc0d59d886fb2ad50429e584ecf17fa81Brian texcoord[0], texcoord[1], texcoord[3], 77865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 1.0F / texcoord[3]); 78865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 79865f88afc0d59d886fb2ad50429e584ecf17fa81Brian swrast->TextureSample[unit](ctx, ctx->Texture.Unit[unit]._Current, 80865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 1, (const GLfloat (*)[4]) texcoord, 81865f88afc0d59d886fb2ad50429e584ecf17fa81Brian &lambda, &rgba); 82865f88afc0d59d886fb2ad50429e584ecf17fa81Brian color[0] = CHAN_TO_FLOAT(rgba[0]); 83865f88afc0d59d886fb2ad50429e584ecf17fa81Brian color[1] = CHAN_TO_FLOAT(rgba[1]); 84865f88afc0d59d886fb2ad50429e584ecf17fa81Brian color[2] = CHAN_TO_FLOAT(rgba[2]); 85865f88afc0d59d886fb2ad50429e584ecf17fa81Brian color[3] = CHAN_TO_FLOAT(rgba[3]); 86865f88afc0d59d886fb2ad50429e584ecf17fa81Brian} 87865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 88865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 89865f88afc0d59d886fb2ad50429e584ecf17fa81Brian/** 90865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * Initialize the virtual fragment program machine state prior to running 91865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * fragment program on a fragment. This involves initializing the input 92865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * registers, condition codes, etc. 93865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * \param machine the virtual machine state to init 94865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * \param program the fragment program we're about to run 95865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * \param span the span of pixels we'll operate on 96865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * \param col which element (column) of the span we'll operate on 97865f88afc0d59d886fb2ad50429e584ecf17fa81Brian */ 98865f88afc0d59d886fb2ad50429e584ecf17fa81Brianstatic void 99f6803de7396edda2223adf7ff7445579dbe475c9Brianinit_machine(GLcontext *ctx, struct gl_program_machine *machine, 100f6803de7396edda2223adf7ff7445579dbe475c9Brian const struct gl_fragment_program *program, 101f6803de7396edda2223adf7ff7445579dbe475c9Brian const SWspan *span, GLuint col) 102865f88afc0d59d886fb2ad50429e584ecf17fa81Brian{ 103865f88afc0d59d886fb2ad50429e584ecf17fa81Brian GLuint inputsRead = program->Base.InputsRead; 104865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 105865f88afc0d59d886fb2ad50429e584ecf17fa81Brian if (ctx->FragmentProgram.CallbackEnabled) 106865f88afc0d59d886fb2ad50429e584ecf17fa81Brian inputsRead = ~0; 107865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 108865f88afc0d59d886fb2ad50429e584ecf17fa81Brian if (program->Base.Target == GL_FRAGMENT_PROGRAM_NV) { 109865f88afc0d59d886fb2ad50429e584ecf17fa81Brian /* Clear temporary registers (undefined for ARB_f_p) */ 110865f88afc0d59d886fb2ad50429e584ecf17fa81Brian _mesa_bzero(machine->Temporaries, 1113ed1acd13c7876288a5d1ab6d288b1654f0c2e6dBrian MAX_PROGRAM_TEMPS * 4 * sizeof(GLfloat)); 112865f88afc0d59d886fb2ad50429e584ecf17fa81Brian } 113865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 114f3e507ef9f75dbfc58ccd07b5fe8cfca10d9a9e3Brian /* Setup pointer to input attributes */ 115f3e507ef9f75dbfc58ccd07b5fe8cfca10d9a9e3Brian machine->Attribs = span->array->attribs; 11610b5895597d5e069183cb647d17eb412effceb4fBrian 11710b5895597d5e069183cb647d17eb412effceb4fBrian /* Store front/back facing value in register FOGC.Y */ 11810b5895597d5e069183cb647d17eb412effceb4fBrian machine->Attribs[FRAG_ATTRIB_FOGC][col][1] = (GLfloat) ctx->_Facing; 11910b5895597d5e069183cb647d17eb412effceb4fBrian 120f6803de7396edda2223adf7ff7445579dbe475c9Brian machine->CurElement = col; 121865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 122865f88afc0d59d886fb2ad50429e584ecf17fa81Brian /* init condition codes */ 123865f88afc0d59d886fb2ad50429e584ecf17fa81Brian machine->CondCodes[0] = COND_EQ; 124865f88afc0d59d886fb2ad50429e584ecf17fa81Brian machine->CondCodes[1] = COND_EQ; 125865f88afc0d59d886fb2ad50429e584ecf17fa81Brian machine->CondCodes[2] = COND_EQ; 126865f88afc0d59d886fb2ad50429e584ecf17fa81Brian machine->CondCodes[3] = COND_EQ; 127865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 128865f88afc0d59d886fb2ad50429e584ecf17fa81Brian /* init call stack */ 129865f88afc0d59d886fb2ad50429e584ecf17fa81Brian machine->StackDepth = 0; 130f6803de7396edda2223adf7ff7445579dbe475c9Brian 131f6803de7396edda2223adf7ff7445579dbe475c9Brian machine->FetchTexelLod = fetch_texel; 132f6803de7396edda2223adf7ff7445579dbe475c9Brian machine->FetchTexelDeriv = fetch_texel_deriv; 133865f88afc0d59d886fb2ad50429e584ecf17fa81Brian} 134865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 135865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 136865f88afc0d59d886fb2ad50429e584ecf17fa81Brian/** 137865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * Run fragment program on the pixels in span from 'start' to 'end' - 1. 138865f88afc0d59d886fb2ad50429e584ecf17fa81Brian */ 139865f88afc0d59d886fb2ad50429e584ecf17fa81Brianstatic void 140865f88afc0d59d886fb2ad50429e584ecf17fa81Brianrun_program(GLcontext *ctx, SWspan *span, GLuint start, GLuint end) 141865f88afc0d59d886fb2ad50429e584ecf17fa81Brian{ 1421c09bcfdda4083636a3ac27d804a34ef87875ce7Brian SWcontext *swrast = SWRAST_CONTEXT(ctx); 143865f88afc0d59d886fb2ad50429e584ecf17fa81Brian const struct gl_fragment_program *program = ctx->FragmentProgram._Current; 1441c09bcfdda4083636a3ac27d804a34ef87875ce7Brian const GLbitfield outputsWritten = program->Base.OutputsWritten; 145f6803de7396edda2223adf7ff7445579dbe475c9Brian struct gl_program_machine machine; 146865f88afc0d59d886fb2ad50429e584ecf17fa81Brian GLuint i; 147865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 148865f88afc0d59d886fb2ad50429e584ecf17fa81Brian for (i = start; i < end; i++) { 149865f88afc0d59d886fb2ad50429e584ecf17fa81Brian if (span->array->mask[i]) { 150865f88afc0d59d886fb2ad50429e584ecf17fa81Brian init_machine(ctx, &machine, program, span, i); 151865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 1528b34b7da4131d2b07037ce062c522fddd614f127Brian if (_mesa_execute_program(ctx, &program->Base, &machine)) { 1531c09bcfdda4083636a3ac27d804a34ef87875ce7Brian 154865f88afc0d59d886fb2ad50429e584ecf17fa81Brian /* Store result color */ 1551c09bcfdda4083636a3ac27d804a34ef87875ce7Brian if (outputsWritten & (1 << FRAG_RESULT_COLR)) { 1561c09bcfdda4083636a3ac27d804a34ef87875ce7Brian COPY_4V(span->array->attribs[FRAG_ATTRIB_COL0][i], 1571c09bcfdda4083636a3ac27d804a34ef87875ce7Brian machine.Outputs[FRAG_RESULT_COLR]); 1581c09bcfdda4083636a3ac27d804a34ef87875ce7Brian } 1591c09bcfdda4083636a3ac27d804a34ef87875ce7Brian else { 1601c09bcfdda4083636a3ac27d804a34ef87875ce7Brian /* Multiple drawbuffers / render targets 1611c09bcfdda4083636a3ac27d804a34ef87875ce7Brian * Note that colors beyond 0 and 1 will overwrite other 1621c09bcfdda4083636a3ac27d804a34ef87875ce7Brian * attributes, such as FOGC, TEX0, TEX1, etc. That's OK. 1631c09bcfdda4083636a3ac27d804a34ef87875ce7Brian */ 1641c09bcfdda4083636a3ac27d804a34ef87875ce7Brian GLuint output; 1651c09bcfdda4083636a3ac27d804a34ef87875ce7Brian for (output = 0; output < swrast->_NumColorOutputs; output++) { 1661c09bcfdda4083636a3ac27d804a34ef87875ce7Brian if (outputsWritten & (1 << (FRAG_RESULT_DATA0 + output))) { 1671c09bcfdda4083636a3ac27d804a34ef87875ce7Brian COPY_4V(span->array->attribs[FRAG_ATTRIB_COL0+output][i], 1681c09bcfdda4083636a3ac27d804a34ef87875ce7Brian machine.Outputs[FRAG_RESULT_DATA0 + output]); 1691c09bcfdda4083636a3ac27d804a34ef87875ce7Brian } 1701c09bcfdda4083636a3ac27d804a34ef87875ce7Brian } 1711c09bcfdda4083636a3ac27d804a34ef87875ce7Brian } 172865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 173865f88afc0d59d886fb2ad50429e584ecf17fa81Brian /* Store result depth/z */ 1741c09bcfdda4083636a3ac27d804a34ef87875ce7Brian if (outputsWritten & (1 << FRAG_RESULT_DEPR)) { 175865f88afc0d59d886fb2ad50429e584ecf17fa81Brian const GLfloat depth = machine.Outputs[FRAG_RESULT_DEPR][2]; 176865f88afc0d59d886fb2ad50429e584ecf17fa81Brian if (depth <= 0.0) 177865f88afc0d59d886fb2ad50429e584ecf17fa81Brian span->array->z[i] = 0; 178865f88afc0d59d886fb2ad50429e584ecf17fa81Brian else if (depth >= 1.0) 179865f88afc0d59d886fb2ad50429e584ecf17fa81Brian span->array->z[i] = ctx->DrawBuffer->_DepthMax; 180865f88afc0d59d886fb2ad50429e584ecf17fa81Brian else 181865f88afc0d59d886fb2ad50429e584ecf17fa81Brian span->array->z[i] = IROUND(depth * ctx->DrawBuffer->_DepthMaxF); 182865f88afc0d59d886fb2ad50429e584ecf17fa81Brian } 183865f88afc0d59d886fb2ad50429e584ecf17fa81Brian } 184865f88afc0d59d886fb2ad50429e584ecf17fa81Brian else { 185865f88afc0d59d886fb2ad50429e584ecf17fa81Brian /* killed fragment */ 186865f88afc0d59d886fb2ad50429e584ecf17fa81Brian span->array->mask[i] = GL_FALSE; 187865f88afc0d59d886fb2ad50429e584ecf17fa81Brian span->writeAll = GL_FALSE; 188865f88afc0d59d886fb2ad50429e584ecf17fa81Brian } 189865f88afc0d59d886fb2ad50429e584ecf17fa81Brian } 190865f88afc0d59d886fb2ad50429e584ecf17fa81Brian } 191865f88afc0d59d886fb2ad50429e584ecf17fa81Brian} 192865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 193865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 194865f88afc0d59d886fb2ad50429e584ecf17fa81Brian/** 195865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * Execute the current fragment program for all the fragments 196865f88afc0d59d886fb2ad50429e584ecf17fa81Brian * in the given span. 197865f88afc0d59d886fb2ad50429e584ecf17fa81Brian */ 198865f88afc0d59d886fb2ad50429e584ecf17fa81Brianvoid 199865f88afc0d59d886fb2ad50429e584ecf17fa81Brian_swrast_exec_fragment_program( GLcontext *ctx, SWspan *span ) 200865f88afc0d59d886fb2ad50429e584ecf17fa81Brian{ 201865f88afc0d59d886fb2ad50429e584ecf17fa81Brian const struct gl_fragment_program *program = ctx->FragmentProgram._Current; 202865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 203865f88afc0d59d886fb2ad50429e584ecf17fa81Brian /* incoming colors should be floats */ 204865f88afc0d59d886fb2ad50429e584ecf17fa81Brian ASSERT(span->array->ChanType == GL_FLOAT); 205865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 206865f88afc0d59d886fb2ad50429e584ecf17fa81Brian ctx->_CurrentProgram = GL_FRAGMENT_PROGRAM_ARB; /* or NV, doesn't matter */ 207865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 208865f88afc0d59d886fb2ad50429e584ecf17fa81Brian run_program(ctx, span, 0, span->end); 209865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 210865f88afc0d59d886fb2ad50429e584ecf17fa81Brian if (program->Base.OutputsWritten & (1 << FRAG_RESULT_DEPR)) { 211865f88afc0d59d886fb2ad50429e584ecf17fa81Brian span->interpMask &= ~SPAN_Z; 212865f88afc0d59d886fb2ad50429e584ecf17fa81Brian span->arrayMask |= SPAN_Z; 213865f88afc0d59d886fb2ad50429e584ecf17fa81Brian } 214865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 215865f88afc0d59d886fb2ad50429e584ecf17fa81Brian ctx->_CurrentProgram = 0; 216865f88afc0d59d886fb2ad50429e584ecf17fa81Brian} 217865f88afc0d59d886fb2ad50429e584ecf17fa81Brian 218