1 // SwiftShader Software Renderer
\r
3 // Copyright(c) 2005-2013 TransGaming Inc.
\r
5 // All rights reserved. No part of this software may be copied, distributed, transmitted,
\r
6 // transcribed, stored in a retrieval system, translated into any human or computer
\r
7 // language by any means, or disclosed to third parties without the explicit written
\r
8 // agreement of TransGaming Inc. Without such an agreement, no rights or licenses, express
\r
9 // or implied, including but not limited to any patent rights, are granted to you.
\r
12 #include "OutputASM.h"
\r
14 #include "common/debug.h"
\r
15 #include "InfoSink.h"
\r
17 #include "libGLESv2/Shader.h"
\r
20 #include <GLES2/gl2.h>
\r
21 #include <GLES2/gl2ext.h>
\r
25 // Integer to TString conversion
\r
29 sprintf(buffer, "%d", i);
\r
33 class Temporary : public TIntermSymbol
\r
36 Temporary(OutputASM *assembler) : TIntermSymbol(0, "tmp", TType(EbtFloat, EbpHigh, EvqTemporary, 4, false, false)), assembler(assembler)
\r
42 assembler->freeTemporary(this);
\r
46 OutputASM *const assembler;
\r
49 class Constant : public TIntermConstantUnion
\r
52 Constant(float x, float y, float z, float w) : TIntermConstantUnion(constants, TType(EbtFloat, EbpHigh, EvqConst, 4, false, false))
\r
54 constants[0].setFConst(x);
\r
55 constants[1].setFConst(y);
\r
56 constants[2].setFConst(z);
\r
57 constants[3].setFConst(w);
\r
60 Constant(bool b) : TIntermConstantUnion(constants, TType(EbtBool, EbpHigh, EvqConst, 1, false, false))
\r
62 constants[0].setBConst(b);
\r
65 Constant(int i) : TIntermConstantUnion(constants, TType(EbtInt, EbpHigh, EvqConst, 1, false, false))
\r
67 constants[0].setIConst(i);
\r
75 ConstantUnion constants[4];
\r
78 Uniform::Uniform(GLenum type, GLenum precision, const std::string &name, int arraySize, int registerIndex)
\r
81 this->precision = precision;
\r
83 this->arraySize = arraySize;
\r
84 this->registerIndex = registerIndex;
\r
87 Attribute::Attribute()
\r
94 Attribute::Attribute(GLenum type, const std::string &name, int arraySize, int registerIndex)
\r
98 this->arraySize = arraySize;
\r
99 this->registerIndex = registerIndex;
\r
102 sw::PixelShader *Shader::getPixelShader() const
\r
107 sw::VertexShader *Shader::getVertexShader() const
\r
112 OutputASM::OutputASM(TParseContext &context, Shader *shaderObject) : TIntermTraverser(true, true, true), mContext(context), shaderObject(shaderObject)
\r
120 shader = shaderObject->getShader();
\r
121 pixelShader = shaderObject->getPixelShader();
\r
122 vertexShader = shaderObject->getVertexShader();
\r
125 functionArray.push_back(Function(0, "main(", 0, 0));
\r
126 currentFunction = 0;
\r
127 outputQualifier = EvqOutput; // Set outputQualifier to any value other than EvqFragColor or EvqFragData
\r
130 OutputASM::~OutputASM()
\r
134 void OutputASM::output()
\r
138 emitShader(GLOBAL);
\r
140 if(functionArray.size() > 1) // Only call main() when there are other functions
\r
142 Instruction *callMain = emit(sw::Shader::OPCODE_CALL);
\r
143 callMain->dst.type = sw::Shader::PARAMETER_LABEL;
\r
144 callMain->dst.index = 0; // main()
\r
146 emit(sw::Shader::OPCODE_RET);
\r
149 emitShader(FUNCTION);
\r
153 void OutputASM::emitShader(Scope scope)
\r
156 currentScope = GLOBAL;
\r
157 mContext.treeRoot->traverse(this);
\r
160 void OutputASM::freeTemporary(Temporary *temporary)
\r
162 free(temporaries, temporary);
\r
165 void OutputASM::visitSymbol(TIntermSymbol *symbol)
\r
167 // Vertex varyings don't have to be actively used to successfully link
\r
168 // against pixel shaders that use them. So make sure they're declared.
\r
169 if(symbol->getQualifier() == EvqVaryingOut || symbol->getQualifier() == EvqInvariantVaryingOut)
\r
171 if(symbol->getBasicType() != EbtInvariant) // Typeless declarations are not new varyings
\r
173 declareVarying(symbol, -1);
\r
178 bool OutputASM::visitBinary(Visit visit, TIntermBinary *node)
\r
180 if(currentScope != emitScope)
\r
185 TIntermTyped *result = node;
\r
186 TIntermTyped *left = node->getLeft();
\r
187 TIntermTyped *right = node->getRight();
\r
188 const TType &leftType = left->getType();
\r
189 const TType &rightType = right->getType();
\r
190 const TType &resultType = node->getType();
\r
192 switch(node->getOp())
\r
195 if(visit == PostVisit)
\r
197 assignLvalue(left, right);
\r
198 copy(result, right);
\r
201 case EOpInitialize:
\r
202 if(visit == PostVisit)
\r
207 case EOpMatrixTimesScalarAssign:
\r
208 if(visit == PostVisit)
\r
210 for(int i = 0; i < leftType.getNominalSize(); i++)
\r
212 Instruction *mul = emit(sw::Shader::OPCODE_MUL, result, left, right);
\r
213 mul->dst.index += i;
\r
214 argument(mul->src[0], left, i);
\r
217 assignLvalue(left, result);
\r
220 case EOpVectorTimesMatrixAssign:
\r
221 if(visit == PostVisit)
\r
223 int size = leftType.getNominalSize();
\r
225 for(int i = 0; i < size; i++)
\r
227 Instruction *dot = emit(sw::Shader::OPCODE_DP(size), result, left, right);
\r
228 dot->dst.mask = 1 << i;
\r
229 argument(dot->src[1], right, i);
\r
232 assignLvalue(left, result);
\r
235 case EOpMatrixTimesMatrixAssign:
\r
236 if(visit == PostVisit)
\r
238 int dim = leftType.getNominalSize();
\r
240 for(int i = 0; i < dim; i++)
\r
242 Instruction *mul = emit(sw::Shader::OPCODE_MUL, result, left, right);
\r
243 mul->dst.index += i;
\r
244 argument(mul->src[1], right, i);
\r
245 mul->src[1].swizzle = 0x00;
\r
247 for(int j = 1; j < dim; j++)
\r
249 Instruction *mad = emit(sw::Shader::OPCODE_MAD, result, left, right, result);
\r
250 mad->dst.index += i;
\r
251 argument(mad->src[0], left, j);
\r
252 argument(mad->src[1], right, i);
\r
253 mad->src[1].swizzle = j * 0x55;
\r
254 argument(mad->src[2], result, i);
\r
258 assignLvalue(left, result);
\r
261 case EOpIndexDirect:
\r
262 if(visit == PostVisit)
\r
264 int index = right->getAsConstantUnion()->getIConst(0);
\r
266 if(result->isMatrix() || result->isStruct())
\r
268 ASSERT(left->isArray());
\r
269 copy(result, left, index * left->elementRegisterCount());
\r
271 else if(result->isRegister())
\r
273 Instruction *mov = emit(sw::Shader::OPCODE_MOV, result, left);
\r
275 if(left->isRegister())
\r
277 mov->src[0].swizzle = index;
\r
279 else if(left->isArray())
\r
281 argument(mov->src[0], left, index * left->elementRegisterCount());
\r
283 else if(left->isMatrix())
\r
285 ASSERT(index < left->getNominalSize()); // FIXME: Report semantic error
\r
286 argument(mov->src[0], left, index);
\r
288 else UNREACHABLE();
\r
290 else UNREACHABLE();
\r
293 case EOpIndexIndirect:
\r
294 if(visit == PostVisit)
\r
296 if(left->isArray() || left->isMatrix())
\r
298 for(int index = 0; index < result->totalRegisterCount(); index++)
\r
300 Instruction *mov = emit(sw::Shader::OPCODE_MOV, result, left);
\r
301 mov->dst.index += index;
\r
302 mov->dst.mask = writeMask(result, index);
\r
303 argument(mov->src[0], left, index);
\r
305 if(left->totalRegisterCount() > 1)
\r
307 sw::Shader::SourceParameter relativeRegister;
\r
308 argument(relativeRegister, right);
\r
310 mov->src[0].rel.type = relativeRegister.type;
\r
311 mov->src[0].rel.index = relativeRegister.index;
\r
312 mov->src[0].rel.scale = result->totalRegisterCount();
\r
313 mov->src[0].rel.deterministic = !(vertexShader && left->getQualifier() == EvqUniform);
\r
317 else if(left->isRegister())
\r
319 emit(sw::Shader::OPCODE_EXTRACT, result, left, right);
\r
321 else UNREACHABLE();
\r
324 case EOpIndexDirectStruct:
\r
325 if(visit == PostVisit)
\r
327 ASSERT(leftType.isStruct());
\r
329 const TTypeList *structure = leftType.getStruct();
\r
330 const TString &fieldName = rightType.getFieldName();
\r
331 int fieldOffset = 0;
\r
333 for(size_t i = 0; i < structure->size(); i++)
\r
335 const TType &fieldType = *(*structure)[i].type;
\r
337 if(fieldType.getFieldName() == fieldName)
\r
342 fieldOffset += fieldType.totalRegisterCount();
\r
345 copy(result, left, fieldOffset);
\r
348 case EOpVectorSwizzle:
\r
349 if(visit == PostVisit)
\r
352 TIntermAggregate *components = right->getAsAggregate();
\r
356 TIntermSequence &sequence = components->getSequence();
\r
359 for(TIntermSequence::iterator sit = sequence.begin(); sit != sequence.end(); sit++)
\r
361 TIntermConstantUnion *element = (*sit)->getAsConstantUnion();
\r
365 int i = element->getUnionArrayPointer()[0].getIConst();
\r
366 swizzle |= i << (component * 2);
\r
369 else UNREACHABLE();
\r
372 else UNREACHABLE();
\r
374 Instruction *mov = emit(sw::Shader::OPCODE_MOV, result, left);
\r
375 mov->src[0].swizzle = swizzle;
\r
378 case EOpAddAssign: if(visit == PostVisit) emitAssign(sw::Shader::OPCODE_ADD, result, left, left, right); break;
\r
379 case EOpAdd: if(visit == PostVisit) emitBinary(sw::Shader::OPCODE_ADD, result, left, right); break;
\r
380 case EOpSubAssign: if(visit == PostVisit) emitAssign(sw::Shader::OPCODE_SUB, result, left, left, right); break;
\r
381 case EOpSub: if(visit == PostVisit) emitBinary(sw::Shader::OPCODE_SUB, result, left, right); break;
\r
382 case EOpMulAssign: if(visit == PostVisit) emitAssign(sw::Shader::OPCODE_MUL, result, left, left, right); break;
\r
383 case EOpMul: if(visit == PostVisit) emitBinary(sw::Shader::OPCODE_MUL, result, left, right); break;
\r
384 case EOpDivAssign: if(visit == PostVisit) emitAssign(sw::Shader::OPCODE_DIV, result, left, left, right); break;
\r
385 case EOpDiv: if(visit == PostVisit) emitBinary(sw::Shader::OPCODE_DIV, result, left, right); break;
\r
387 if(visit == PostVisit)
\r
389 emitCmp(sw::Shader::CONTROL_EQ, result, left, right);
\r
391 for(int index = 1; index < left->totalRegisterCount(); index++)
\r
393 Temporary equal(this);
\r
394 emitCmp(sw::Shader::CONTROL_EQ, &equal, left, right, index);
\r
395 emit(sw::Shader::OPCODE_AND, result, result, &equal);
\r
400 if(visit == PostVisit)
\r
402 emitCmp(sw::Shader::CONTROL_NE, result, left, right);
\r
404 for(int index = 1; index < left->totalRegisterCount(); index++)
\r
406 Temporary notEqual(this);
\r
407 emitCmp(sw::Shader::CONTROL_NE, ¬Equal, left, right, index);
\r
408 emit(sw::Shader::OPCODE_OR, result, result, ¬Equal);
\r
412 case EOpLessThan: if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_LT, result, left, right); break;
\r
413 case EOpGreaterThan: if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_GT, result, left, right); break;
\r
414 case EOpLessThanEqual: if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_LE, result, left, right); break;
\r
415 case EOpGreaterThanEqual: if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_GE, result, left, right); break;
\r
416 case EOpVectorTimesScalarAssign: if(visit == PostVisit) emitAssign(sw::Shader::OPCODE_MUL, result, left, left, right); break;
\r
417 case EOpVectorTimesScalar: if(visit == PostVisit) emit(sw::Shader::OPCODE_MUL, result, left, right); break;
\r
418 case EOpMatrixTimesScalar:
\r
419 if(visit == PostVisit)
\r
421 for(int i = 0; i < leftType.getNominalSize(); i++)
\r
423 Instruction *mul = emit(sw::Shader::OPCODE_MUL, result, left, right);
\r
424 mul->dst.index += i;
\r
425 argument(mul->src[0], left, i);
\r
429 case EOpVectorTimesMatrix:
\r
430 if(visit == PostVisit)
\r
432 int size = leftType.getNominalSize();
\r
434 for(int i = 0; i < size; i++)
\r
436 Instruction *dot = emit(sw::Shader::OPCODE_DP(size), result, left, right);
\r
437 dot->dst.mask = 1 << i;
\r
438 argument(dot->src[1], right, i);
\r
442 case EOpMatrixTimesVector:
\r
443 if(visit == PostVisit)
\r
445 Instruction *mul = emit(sw::Shader::OPCODE_MUL, result, left, right);
\r
446 mul->src[1].swizzle = 0x00;
\r
448 for(int i = 1; i < leftType.getNominalSize(); i++)
\r
450 Instruction *mad = emit(sw::Shader::OPCODE_MAD, result, left, right, result);
\r
451 argument(mad->src[0], left, i);
\r
452 mad->src[1].swizzle = i * 0x55;
\r
456 case EOpMatrixTimesMatrix:
\r
457 if(visit == PostVisit)
\r
459 int dim = leftType.getNominalSize();
\r
461 for(int i = 0; i < dim; i++)
\r
463 Instruction *mul = emit(sw::Shader::OPCODE_MUL, result, left, right);
\r
464 mul->dst.index += i;
\r
465 argument(mul->src[1], right, i);
\r
466 mul->src[1].swizzle = 0x00;
\r
468 for(int j = 1; j < dim; j++)
\r
470 Instruction *mad = emit(sw::Shader::OPCODE_MAD, result, left, right, result);
\r
471 mad->dst.index += i;
\r
472 argument(mad->src[0], left, j);
\r
473 argument(mad->src[1], right, i);
\r
474 mad->src[1].swizzle = j * 0x55;
\r
475 argument(mad->src[2], result, i);
\r
481 if(trivial(right, 6))
\r
483 if(visit == PostVisit)
\r
485 emit(sw::Shader::OPCODE_OR, result, left, right);
\r
488 else // Short-circuit evaluation
\r
490 if(visit == InVisit)
\r
492 emit(sw::Shader::OPCODE_MOV, result, left);
\r
493 Instruction *ifnot = emit(sw::Shader::OPCODE_IF, 0, result);
\r
494 ifnot->src[0].modifier = sw::Shader::MODIFIER_NOT;
\r
496 else if(visit == PostVisit)
\r
498 emit(sw::Shader::OPCODE_MOV, result, right);
\r
499 emit(sw::Shader::OPCODE_ENDIF);
\r
503 case EOpLogicalXor: if(visit == PostVisit) emit(sw::Shader::OPCODE_XOR, result, left, right); break;
\r
504 case EOpLogicalAnd:
\r
505 if(trivial(right, 6))
\r
507 if(visit == PostVisit)
\r
509 emit(sw::Shader::OPCODE_AND, result, left, right);
\r
512 else // Short-circuit evaluation
\r
514 if(visit == InVisit)
\r
516 emit(sw::Shader::OPCODE_MOV, result, left);
\r
517 emit(sw::Shader::OPCODE_IF, 0, result);
\r
519 else if(visit == PostVisit)
\r
521 emit(sw::Shader::OPCODE_MOV, result, right);
\r
522 emit(sw::Shader::OPCODE_ENDIF);
\r
526 default: UNREACHABLE();
\r
532 bool OutputASM::visitUnary(Visit visit, TIntermUnary *node)
\r
534 if(currentScope != emitScope)
\r
539 Constant one(1.0f, 1.0f, 1.0f, 1.0f);
\r
540 Constant rad(1.74532925e-2f, 1.74532925e-2f, 1.74532925e-2f, 1.74532925e-2f);
\r
541 Constant deg(5.72957795e+1f, 5.72957795e+1f, 5.72957795e+1f, 5.72957795e+1f);
\r
543 TIntermTyped *result = node;
\r
544 TIntermTyped *arg = node->getOperand();
\r
546 switch(node->getOp())
\r
549 if(visit == PostVisit)
\r
551 for(int index = 0; index < arg->totalRegisterCount(); index++)
\r
553 Instruction *neg = emit(sw::Shader::OPCODE_MOV, result, arg);
\r
554 neg->dst.index += index;
\r
555 argument(neg->src[0], arg, index);
\r
556 neg->src[0].modifier = sw::Shader::MODIFIER_NEGATE;
\r
560 case EOpVectorLogicalNot: if(visit == PostVisit) emit(sw::Shader::OPCODE_NOT, result, arg); break;
\r
561 case EOpLogicalNot: if(visit == PostVisit) emit(sw::Shader::OPCODE_NOT, result, arg); break;
\r
562 case EOpPostIncrement:
\r
563 if(visit == PostVisit)
\r
567 for(int index = 0; index < arg->totalRegisterCount(); index++)
\r
569 Instruction *add = emit(sw::Shader::OPCODE_ADD, arg, arg, &one);
\r
570 add->dst.index += index;
\r
571 argument(add->src[0], arg, index);
\r
574 assignLvalue(arg, arg);
\r
577 case EOpPostDecrement:
\r
578 if(visit == PostVisit)
\r
582 for(int index = 0; index < arg->totalRegisterCount(); index++)
\r
584 Instruction *sub = emit(sw::Shader::OPCODE_SUB, arg, arg, &one);
\r
585 sub->dst.index += index;
\r
586 argument(sub->src[0], arg, index);
\r
589 assignLvalue(arg, arg);
\r
592 case EOpPreIncrement:
\r
593 if(visit == PostVisit)
\r
595 for(int index = 0; index < arg->totalRegisterCount(); index++)
\r
597 Instruction *add = emit(sw::Shader::OPCODE_ADD, result, arg, &one);
\r
598 add->dst.index += index;
\r
599 argument(add->src[0], arg, index);
\r
602 assignLvalue(arg, result);
\r
605 case EOpPreDecrement:
\r
606 if(visit == PostVisit)
\r
608 for(int index = 0; index < arg->totalRegisterCount(); index++)
\r
610 Instruction *sub = emit(sw::Shader::OPCODE_SUB, result, arg, &one);
\r
611 sub->dst.index += index;
\r
612 argument(sub->src[0], arg, index);
\r
615 assignLvalue(arg, result);
\r
618 case EOpRadians: if(visit == PostVisit) emit(sw::Shader::OPCODE_MUL, result, arg, &rad); break;
\r
619 case EOpDegrees: if(visit == PostVisit) emit(sw::Shader::OPCODE_MUL, result, arg, °); break;
\r
620 case EOpSin: if(visit == PostVisit) emit(sw::Shader::OPCODE_SIN, result, arg); break;
\r
621 case EOpCos: if(visit == PostVisit) emit(sw::Shader::OPCODE_COS, result, arg); break;
\r
622 case EOpTan: if(visit == PostVisit) emit(sw::Shader::OPCODE_TAN, result, arg); break;
\r
623 case EOpAsin: if(visit == PostVisit) emit(sw::Shader::OPCODE_ASIN, result, arg); break;
\r
624 case EOpAcos: if(visit == PostVisit) emit(sw::Shader::OPCODE_ACOS, result, arg); break;
\r
625 case EOpAtan: if(visit == PostVisit) emit(sw::Shader::OPCODE_ATAN, result, arg); break;
\r
626 case EOpExp: if(visit == PostVisit) emit(sw::Shader::OPCODE_EXP, result, arg); break;
\r
627 case EOpLog: if(visit == PostVisit) emit(sw::Shader::OPCODE_LOG, result, arg); break;
\r
628 case EOpExp2: if(visit == PostVisit) emit(sw::Shader::OPCODE_EXP2, result, arg); break;
\r
629 case EOpLog2: if(visit == PostVisit) emit(sw::Shader::OPCODE_LOG2, result, arg); break;
\r
630 case EOpSqrt: if(visit == PostVisit) emit(sw::Shader::OPCODE_SQRT, result, arg); break;
\r
631 case EOpInverseSqrt: if(visit == PostVisit) emit(sw::Shader::OPCODE_RSQ, result, arg); break;
\r
632 case EOpAbs: if(visit == PostVisit) emit(sw::Shader::OPCODE_ABS, result, arg); break;
\r
633 case EOpSign: if(visit == PostVisit) emit(sw::Shader::OPCODE_SGN, result, arg); break;
\r
634 case EOpFloor: if(visit == PostVisit) emit(sw::Shader::OPCODE_FLOOR, result, arg); break;
\r
635 case EOpCeil: if(visit == PostVisit) emit(sw::Shader::OPCODE_CEIL, result, arg, result); break;
\r
636 case EOpFract: if(visit == PostVisit) emit(sw::Shader::OPCODE_FRC, result, arg); break;
\r
637 case EOpLength: if(visit == PostVisit) emit(sw::Shader::OPCODE_LEN(dim(arg)), result, arg); break;
\r
638 case EOpNormalize: if(visit == PostVisit) emit(sw::Shader::OPCODE_NRM(dim(arg)), result, arg); break;
\r
639 case EOpDFdx: if(visit == PostVisit) emit(sw::Shader::OPCODE_DFDX, result, arg); break;
\r
640 case EOpDFdy: if(visit == PostVisit) emit(sw::Shader::OPCODE_DFDY, result, arg); break;
\r
641 case EOpFwidth: if(visit == PostVisit) emit(sw::Shader::OPCODE_FWIDTH, result, arg); break;
\r
642 case EOpAny: if(visit == PostVisit) emit(sw::Shader::OPCODE_ANY, result, arg); break;
\r
643 case EOpAll: if(visit == PostVisit) emit(sw::Shader::OPCODE_ALL, result, arg); break;
\r
644 default: UNREACHABLE();
\r
650 bool OutputASM::visitAggregate(Visit visit, TIntermAggregate *node)
\r
652 if(currentScope != emitScope && node->getOp() != EOpFunction && node->getOp() != EOpSequence)
\r
657 Constant zero(0.0f, 0.0f, 0.0f, 0.0f);
\r
659 TIntermTyped *result = node;
\r
660 const TType &resultType = node->getType();
\r
661 TIntermSequence &arg = node->getSequence();
\r
662 int argumentCount = arg.size();
\r
664 switch(node->getOp())
\r
666 case EOpSequence: break;
\r
667 case EOpDeclaration: break;
\r
668 case EOpPrototype: break;
\r
670 if(visit == PostVisit)
\r
672 copy(result, arg[1]);
\r
676 if(visit == PreVisit)
\r
678 const TString &name = node->getName();
\r
680 if(emitScope == FUNCTION)
\r
682 if(functionArray.size() > 1) // No need for a label when there's only main()
\r
684 Instruction *label = emit(sw::Shader::OPCODE_LABEL);
\r
685 label->dst.type = sw::Shader::PARAMETER_LABEL;
\r
687 const Function *function = findFunction(name);
\r
688 ASSERT(function); // Should have been added during global pass
\r
689 label->dst.index = function->label;
\r
690 currentFunction = function->label;
\r
693 else if(emitScope == GLOBAL)
\r
695 if(name != "main(")
\r
697 TIntermSequence &arguments = node->getSequence()[0]->getAsAggregate()->getSequence();
\r
698 functionArray.push_back(Function(functionArray.size(), name, &arguments, node));
\r
701 else UNREACHABLE();
\r
703 currentScope = FUNCTION;
\r
705 else if(visit == PostVisit)
\r
707 if(emitScope == FUNCTION)
\r
709 if(functionArray.size() > 1) // No need to return when there's only main()
\r
711 emit(sw::Shader::OPCODE_RET);
\r
715 currentScope = GLOBAL;
\r
718 case EOpFunctionCall:
\r
719 if(visit == PostVisit)
\r
721 if(node->isUserDefined())
\r
723 const TString &name = node->getName();
\r
724 const Function *function = findFunction(name);
\r
728 mContext.error(node->getLine(), "function definition not found", name.c_str());
\r
732 TIntermSequence &arguments = *function->arg;
\r
734 for(int i = 0; i < argumentCount; i++)
\r
736 TIntermTyped *in = arguments[i]->getAsTyped();
\r
738 if(in->getQualifier() == EvqIn ||
\r
739 in->getQualifier() == EvqInOut ||
\r
740 in->getQualifier() == EvqConstReadOnly)
\r
746 Instruction *call = emit(sw::Shader::OPCODE_CALL);
\r
747 call->dst.type = sw::Shader::PARAMETER_LABEL;
\r
748 call->dst.index = function->label;
\r
750 if(function->ret && function->ret->getType().getBasicType() != EbtVoid)
\r
752 copy(result, function->ret);
\r
755 for(int i = 0; i < argumentCount; i++)
\r
757 TIntermTyped *argument = arguments[i]->getAsTyped();
\r
758 TIntermTyped *out = arg[i]->getAsTyped();
\r
760 if(argument->getQualifier() == EvqOut ||
\r
761 argument->getQualifier() == EvqInOut)
\r
763 copy(out, argument);
\r
769 TString name = TFunction::unmangleName(node->getName());
\r
771 if(name == "texture" || name == "texture2D" || name == "textureCube" || name == "texture3D")
\r
773 if(argumentCount == 2)
\r
775 emit(sw::Shader::OPCODE_TEX, result, arg[1], arg[0]);
\r
777 else if(argumentCount == 3) // bias
\r
779 Temporary uvwb(this);
\r
780 emit(sw::Shader::OPCODE_MOV, &uvwb, arg[1]);
\r
781 Instruction *bias = emit(sw::Shader::OPCODE_MOV, &uvwb, arg[2]);
\r
782 bias->dst.mask = 0x8;
\r
784 Instruction *tex = emit(sw::Shader::OPCODE_TEX, result, &uvwb, arg[0]); // FIXME: Implement an efficient TEXLDB instruction
\r
787 else UNREACHABLE();
\r
789 else if(name == "texture2DProj")
\r
791 TIntermTyped *t = arg[1]->getAsTyped();
\r
793 if(argumentCount == 2)
\r
795 Instruction *tex = emit(sw::Shader::OPCODE_TEX, result, arg[1], arg[0]);
\r
796 tex->project = true;
\r
798 if(t->getNominalSize() == 3)
\r
800 tex->src[0].swizzle = 0xA4;
\r
802 else ASSERT(t->getNominalSize() == 4);
\r
804 else if(argumentCount == 3) // bias
\r
806 Temporary proj(this);
\r
808 if(t->getNominalSize() == 3)
\r
810 Instruction *div = emit(sw::Shader::OPCODE_DIV, &proj, arg[1], arg[1]);
\r
811 div->src[1].swizzle = 0xAA;
\r
812 div->dst.mask = 0x3;
\r
814 else if(t->getNominalSize() == 4)
\r
816 Instruction *div = emit(sw::Shader::OPCODE_DIV, &proj, arg[1], arg[1]);
\r
817 div->src[1].swizzle = 0xFF;
\r
818 div->dst.mask = 0x3;
\r
820 else UNREACHABLE();
\r
822 Instruction *bias = emit(sw::Shader::OPCODE_MOV, &proj, arg[2]);
\r
823 bias->dst.mask = 0x8;
\r
825 Instruction *tex = emit(sw::Shader::OPCODE_TEX, result, &proj, arg[0]);
\r
828 else UNREACHABLE();
\r
830 else if(name == "texture2DLod" || name == "textureCubeLod")
\r
832 Temporary uvwb(this);
\r
833 emit(sw::Shader::OPCODE_MOV, &uvwb, arg[1]);
\r
834 Instruction *lod = emit(sw::Shader::OPCODE_MOV, &uvwb, arg[2]);
\r
835 lod->dst.mask = 0x8;
\r
837 emit(sw::Shader::OPCODE_TEXLDL, result, &uvwb, arg[0]);
\r
839 else if(name == "texture2DProjLod")
\r
841 TIntermTyped *t = arg[1]->getAsTyped();
\r
842 Temporary proj(this);
\r
844 if(t->getNominalSize() == 3)
\r
846 Instruction *div = emit(sw::Shader::OPCODE_DIV, &proj, arg[1], arg[1]);
\r
847 div->src[1].swizzle = 0xAA;
\r
848 div->dst.mask = 0x3;
\r
850 else if(t->getNominalSize() == 4)
\r
852 Instruction *div = emit(sw::Shader::OPCODE_DIV, &proj, arg[1], arg[1]);
\r
853 div->src[1].swizzle = 0xFF;
\r
854 div->dst.mask = 0x3;
\r
856 else UNREACHABLE();
\r
858 Instruction *lod = emit(sw::Shader::OPCODE_MOV, &proj, arg[2]);
\r
859 lod->dst.mask = 0x8;
\r
861 emit(sw::Shader::OPCODE_TEXLDL, result, &proj, arg[0]);
\r
863 else UNREACHABLE();
\r
867 case EOpParameters:
\r
869 case EOpConstructFloat:
\r
870 case EOpConstructVec2:
\r
871 case EOpConstructVec3:
\r
872 case EOpConstructVec4:
\r
873 case EOpConstructBool:
\r
874 case EOpConstructBVec2:
\r
875 case EOpConstructBVec3:
\r
876 case EOpConstructBVec4:
\r
877 case EOpConstructInt:
\r
878 case EOpConstructIVec2:
\r
879 case EOpConstructIVec3:
\r
880 case EOpConstructIVec4:
\r
881 if(visit == PostVisit)
\r
885 for(int i = 0; i < argumentCount; i++)
\r
887 TIntermTyped *argi = arg[i]->getAsTyped();
\r
888 int size = argi->getNominalSize();
\r
890 if(!argi->isMatrix())
\r
892 Instruction *mov = emitCast(result, argi);
\r
893 mov->dst.mask = (0xF << component) & 0xF;
\r
894 mov->src[0].swizzle = readSwizzle(argi, size) << (component * 2);
\r
902 while(component < resultType.getNominalSize())
\r
904 Instruction *mov = emitCast(result, argi);
\r
905 mov->dst.mask = (0xF << component) & 0xF;
\r
906 mov->src[0].index += column;
\r
907 mov->src[0].swizzle = readSwizzle(argi, size) << (component * 2);
\r
916 case EOpConstructMat2:
\r
917 case EOpConstructMat3:
\r
918 case EOpConstructMat4:
\r
919 if(visit == PostVisit)
\r
921 TIntermTyped *arg0 = arg[0]->getAsTyped();
\r
922 const int dim = result->getNominalSize();
\r
924 if(arg0->isScalar() && arg.size() == 1) // Construct scale matrix
\r
926 for(int i = 0; i < dim; i++)
\r
928 Instruction *init = emit(sw::Shader::OPCODE_MOV, result, &zero);
\r
929 init->dst.index += i;
\r
930 Instruction *mov = emitCast(result, arg0);
\r
931 mov->dst.index += i;
\r
932 mov->dst.mask = 1 << i;
\r
933 ASSERT(mov->src[0].swizzle == 0x00);
\r
936 else if(arg0->isMatrix())
\r
938 for(int i = 0; i < dim; i++)
\r
940 if(dim > dim2(arg0))
\r
942 // Initialize to identity matrix
\r
943 Constant col((i == 0 ? 1.0f : 0.0f), (i == 1 ? 1.0f : 0.0f), (i == 2 ? 1.0f : 0.0f), (i == 3 ? 1.0f : 0.0f));
\r
944 Instruction *mov = emitCast(result, &col);
\r
945 mov->dst.index += i;
\r
950 Instruction *mov = emitCast(result, arg0);
\r
951 mov->dst.index += i;
\r
952 mov->dst.mask = 0xF >> (4 - dim2(arg0));
\r
953 argument(mov->src[0], arg0, i);
\r
962 for(int i = 0; i < argumentCount; i++)
\r
964 TIntermTyped *argi = arg[i]->getAsTyped();
\r
965 int size = argi->getNominalSize();
\r
968 while(element < size)
\r
970 Instruction *mov = emitCast(result, argi);
\r
971 mov->dst.index += column;
\r
972 mov->dst.mask = (0xF << row) & 0xF;
\r
973 mov->src[0].swizzle = (readSwizzle(argi, size) << (row * 2)) + 0x55 * element;
\r
975 int end = row + size - element;
\r
976 column = end >= dim ? column + 1 : column;
\r
977 element = element + dim - row;
\r
978 row = end >= dim ? 0 : end;
\r
984 case EOpConstructStruct:
\r
985 if(visit == PostVisit)
\r
988 for(int i = 0; i < argumentCount; i++)
\r
990 TIntermTyped *argi = arg[i]->getAsTyped();
\r
991 int size = argi->totalRegisterCount();
\r
993 for(int index = 0; index < size; index++)
\r
995 Instruction *mov = emit(sw::Shader::OPCODE_MOV, result, argi);
\r
996 mov->dst.index += index + offset;
\r
997 mov->dst.mask = writeMask(result, offset + index);
\r
998 argument(mov->src[0], argi, index);
\r
1005 case EOpLessThan: if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_LT, result, arg[0], arg[1]); break;
\r
1006 case EOpGreaterThan: if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_GT, result, arg[0], arg[1]); break;
\r
1007 case EOpLessThanEqual: if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_LE, result, arg[0], arg[1]); break;
\r
1008 case EOpGreaterThanEqual: if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_GE, result, arg[0], arg[1]); break;
\r
1009 case EOpVectorEqual: if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_EQ, result, arg[0], arg[1]); break;
\r
1010 case EOpVectorNotEqual: if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_NE, result, arg[0], arg[1]); break;
\r
1011 case EOpMod: if(visit == PostVisit) emit(sw::Shader::OPCODE_MOD, result, arg[0], arg[1]); break;
\r
1012 case EOpPow: if(visit == PostVisit) emit(sw::Shader::OPCODE_POW, result, arg[0], arg[1]); break;
\r
1013 case EOpAtan: if(visit == PostVisit) emit(sw::Shader::OPCODE_ATAN2, result, arg[0], arg[1]); break;
\r
1014 case EOpMin: if(visit == PostVisit) emit(sw::Shader::OPCODE_MIN, result, arg[0], arg[1]); break;
\r
1015 case EOpMax: if(visit == PostVisit) emit(sw::Shader::OPCODE_MAX, result, arg[0], arg[1]); break;
\r
1017 if(visit == PostVisit)
\r
1019 emit(sw::Shader::OPCODE_MAX, result, arg[0], arg[1]);
\r
1020 emit(sw::Shader::OPCODE_MIN, result, result, arg[2]);
\r
1023 case EOpMix: if(visit == PostVisit) emit(sw::Shader::OPCODE_LRP, result, arg[2], arg[1], arg[0]); break;
\r
1024 case EOpStep: if(visit == PostVisit) emit(sw::Shader::OPCODE_STEP, result, arg[0], arg[1]); break;
\r
1025 case EOpSmoothStep: if(visit == PostVisit) emit(sw::Shader::OPCODE_SMOOTH, result, arg[0], arg[1], arg[2]); break;
\r
1026 case EOpDistance: if(visit == PostVisit) emit(sw::Shader::OPCODE_DIST(dim(arg[0])), result, arg[0], arg[1]); break;
\r
1027 case EOpDot: if(visit == PostVisit) emit(sw::Shader::OPCODE_DP(dim(arg[0])), result, arg[0], arg[1]); break;
\r
1028 case EOpCross: if(visit == PostVisit) emit(sw::Shader::OPCODE_CRS, result, arg[0], arg[1]); break;
\r
1029 case EOpFaceForward: if(visit == PostVisit) emit(sw::Shader::OPCODE_FORWARD(dim(arg[0])), result, arg[0], arg[1], arg[2]); break;
\r
1030 case EOpReflect: if(visit == PostVisit) emit(sw::Shader::OPCODE_REFLECT(dim(arg[0])), result, arg[0], arg[1]); break;
\r
1031 case EOpRefract: if(visit == PostVisit) emit(sw::Shader::OPCODE_REFRACT(dim(arg[0])), result, arg[0], arg[1], arg[2]); break;
\r
1033 if(visit == PostVisit)
\r
1035 ASSERT(dim2(arg[0]) == dim2(arg[1]));
\r
1037 for(int i = 0; i < dim2(arg[0]); i++)
\r
1039 Instruction *mul = emit(sw::Shader::OPCODE_MUL, result, arg[0], arg[1]);
\r
1040 mul->dst.index += i;
\r
1041 argument(mul->src[0], arg[0], i);
\r
1042 argument(mul->src[1], arg[1], i);
\r
1046 default: UNREACHABLE();
\r
1052 bool OutputASM::visitSelection(Visit visit, TIntermSelection *node)
\r
1054 if(currentScope != emitScope)
\r
1059 TIntermTyped *condition = node->getCondition();
\r
1060 TIntermNode *trueBlock = node->getTrueBlock();
\r
1061 TIntermNode *falseBlock = node->getFalseBlock();
\r
1062 TIntermConstantUnion *constantCondition = condition->getAsConstantUnion();
\r
1064 condition->traverse(this);
\r
1066 if(node->usesTernaryOperator())
\r
1068 if(constantCondition)
\r
1070 bool trueCondition = constantCondition->getUnionArrayPointer()->getBConst();
\r
1074 trueBlock->traverse(this);
\r
1075 copy(node, trueBlock);
\r
1079 falseBlock->traverse(this);
\r
1080 copy(node, falseBlock);
\r
1083 else if(trivial(node, 6)) // Fast to compute both potential results and no side effects
\r
1085 trueBlock->traverse(this);
\r
1086 falseBlock->traverse(this);
\r
1087 emit(sw::Shader::OPCODE_SELECT, node, condition, trueBlock, falseBlock);
\r
1091 emit(sw::Shader::OPCODE_IF, 0, condition);
\r
1095 trueBlock->traverse(this);
\r
1096 copy(node, trueBlock);
\r
1101 emit(sw::Shader::OPCODE_ELSE);
\r
1102 falseBlock->traverse(this);
\r
1103 copy(node, falseBlock);
\r
1106 emit(sw::Shader::OPCODE_ENDIF);
\r
1109 else // if/else statement
\r
1111 if(constantCondition)
\r
1113 bool trueCondition = constantCondition->getUnionArrayPointer()->getBConst();
\r
1119 trueBlock->traverse(this);
\r
1126 falseBlock->traverse(this);
\r
1132 emit(sw::Shader::OPCODE_IF, 0, condition);
\r
1136 trueBlock->traverse(this);
\r
1141 emit(sw::Shader::OPCODE_ELSE);
\r
1142 falseBlock->traverse(this);
\r
1145 emit(sw::Shader::OPCODE_ENDIF);
\r
1152 bool OutputASM::visitLoop(Visit visit, TIntermLoop *node)
\r
1154 if(currentScope != emitScope)
\r
1159 unsigned int iterations = loopCount(node);
\r
1161 if(iterations == 0)
\r
1166 bool unroll = (iterations <= 4);
\r
1170 DetectLoopDiscontinuity detectLoopDiscontinuity;
\r
1171 unroll = !detectLoopDiscontinuity.traverse(node);
\r
1174 TIntermNode *init = node->getInit();
\r
1175 TIntermTyped *condition = node->getCondition();
\r
1176 TIntermTyped *expression = node->getExpression();
\r
1177 TIntermNode *body = node->getBody();
\r
1179 if(node->getType() == ELoopDoWhile)
\r
1181 Temporary iterate(this);
\r
1182 Constant True(true);
\r
1183 emit(sw::Shader::OPCODE_MOV, &iterate, &True);
\r
1185 emit(sw::Shader::OPCODE_WHILE, 0, &iterate); // FIXME: Implement real do-while
\r
1189 body->traverse(this);
\r
1192 emit(sw::Shader::OPCODE_TEST);
\r
1194 condition->traverse(this);
\r
1195 emit(sw::Shader::OPCODE_MOV, &iterate, condition);
\r
1197 emit(sw::Shader::OPCODE_ENDWHILE);
\r
1203 init->traverse(this);
\r
1208 for(unsigned int i = 0; i < iterations; i++)
\r
1210 // condition->traverse(this); // Condition could contain statements, but not in an unrollable loop
\r
1214 body->traverse(this);
\r
1219 expression->traverse(this);
\r
1225 condition->traverse(this);
\r
1227 emit(sw::Shader::OPCODE_WHILE, 0, condition);
\r
1231 body->traverse(this);
\r
1234 emit(sw::Shader::OPCODE_TEST);
\r
1238 expression->traverse(this);
\r
1241 condition->traverse(this);
\r
1243 emit(sw::Shader::OPCODE_ENDWHILE);
\r
1250 bool OutputASM::visitBranch(Visit visit, TIntermBranch *node)
\r
1252 if(currentScope != emitScope)
\r
1257 switch(node->getFlowOp())
\r
1259 case EOpKill: if(visit == PostVisit) emit(sw::Shader::OPCODE_DISCARD); break;
\r
1260 case EOpBreak: if(visit == PostVisit) emit(sw::Shader::OPCODE_BREAK); break;
\r
1261 case EOpContinue: if(visit == PostVisit) emit(sw::Shader::OPCODE_CONTINUE); break;
\r
1263 if(visit == PostVisit)
\r
1265 TIntermTyped *value = node->getExpression();
\r
1269 copy(functionArray[currentFunction].ret, value);
\r
1272 emit(sw::Shader::OPCODE_LEAVE);
\r
1275 default: UNREACHABLE();
\r
1281 bool OutputASM::isSamplerRegister(TIntermTyped *operand)
\r
1283 return operand && isSamplerRegister(operand->getType());
\r
1286 bool OutputASM::isSamplerRegister(const TType &type)
\r
1288 // A sampler register's qualifiers can be:
\r
1289 // - EvqUniform: The sampler uniform is used as is in the code (default case).
\r
1290 // - EvqTemporary: The sampler is indexed. It's still a sampler register.
\r
1291 // - EvqIn (and other similar types): The sampler has been passed as a function argument. At this point,
\r
1292 // the sampler has been copied and is no longer a sampler register.
\r
1293 return IsSampler(type.getBasicType()) && (type.getQualifier() == EvqUniform || type.getQualifier() == EvqTemporary);
\r
1296 Instruction *OutputASM::emit(sw::Shader::Opcode op, TIntermTyped *dst, TIntermNode *src0, TIntermNode *src1, TIntermNode *src2, int index)
\r
1298 if(isSamplerRegister(dst))
\r
1300 op = sw::Shader::OPCODE_NULL; // Can't assign to a sampler, but this is hit when indexing sampler arrays
\r
1303 Instruction *instruction = new Instruction(op);
\r
1307 instruction->dst.type = registerType(dst);
\r
1308 instruction->dst.index = registerIndex(dst) + index;
\r
1309 instruction->dst.mask = writeMask(dst);
\r
1310 instruction->dst.integer = (dst->getBasicType() == EbtInt);
\r
1313 argument(instruction->src[0], src0, index);
\r
1314 argument(instruction->src[1], src1, index);
\r
1315 argument(instruction->src[2], src2, index);
\r
1317 shader->append(instruction);
\r
1319 return instruction;
\r
1322 Instruction *OutputASM::emitCast(TIntermTyped *dst, TIntermTyped *src)
\r
1324 // Integers are implemented as float
\r
1325 if((dst->getBasicType() == EbtFloat || dst->getBasicType() == EbtInt) && src->getBasicType() == EbtBool)
\r
1327 return emit(sw::Shader::OPCODE_B2F, dst, src);
\r
1329 if(dst->getBasicType() == EbtBool && (src->getBasicType() == EbtFloat || src->getBasicType() == EbtInt))
\r
1331 return emit(sw::Shader::OPCODE_F2B, dst, src);
\r
1333 if(dst->getBasicType() == EbtInt && src->getBasicType() == EbtFloat)
\r
1335 return emit(sw::Shader::OPCODE_TRUNC, dst, src);
\r
1338 return emit(sw::Shader::OPCODE_MOV, dst, src);
\r
1341 void OutputASM::emitBinary(sw::Shader::Opcode op, TIntermTyped *dst, TIntermNode *src0, TIntermNode *src1, TIntermNode *src2)
\r
1343 for(int index = 0; index < dst->elementRegisterCount(); index++)
\r
1345 emit(op, dst, src0, src1, src2, index);
\r
1349 void OutputASM::emitAssign(sw::Shader::Opcode op, TIntermTyped *result, TIntermTyped *lhs, TIntermTyped *src0, TIntermTyped *src1)
\r
1351 emitBinary(op, result, src0, src1);
\r
1352 assignLvalue(lhs, result);
\r
1355 void OutputASM::emitCmp(sw::Shader::Control cmpOp, TIntermTyped *dst, TIntermNode *left, TIntermNode *right, int index)
\r
1357 bool boolean = (left->getAsTyped()->getBasicType() == EbtBool);
\r
1358 sw::Shader::Opcode opcode = boolean ? sw::Shader::OPCODE_ICMP : sw::Shader::OPCODE_CMP;
\r
1360 Instruction *cmp = emit(opcode, dst, left, right);
\r
1361 cmp->control = cmpOp;
\r
1362 argument(cmp->src[0], left, index);
\r
1363 argument(cmp->src[1], right, index);
\r
1366 int componentCount(const TType &type, int registers)
\r
1368 if(registers == 0)
\r
1373 if(type.isArray() && registers >= type.elementRegisterCount())
\r
1375 int index = registers / type.elementRegisterCount();
\r
1376 registers -= index * type.elementRegisterCount();
\r
1377 return index * type.getElementSize() + componentCount(type, registers);
\r
1380 if(type.isStruct())
\r
1382 TTypeList *structure = type.getStruct();
\r
1385 for(TTypeList::const_iterator field = structure->begin(); field != structure->end(); field++)
\r
1387 const TType &fieldType = *field->type;
\r
1389 if(fieldType.totalRegisterCount() <= registers)
\r
1391 registers -= fieldType.totalRegisterCount();
\r
1392 elements += fieldType.getObjectSize();
\r
1394 else // Register within this field
\r
1396 return elements + componentCount(fieldType, registers);
\r
1400 else if(type.isMatrix())
\r
1402 return registers * type.getNominalSize();
\r
1409 int registerSize(const TType &type, int registers)
\r
1411 if(registers == 0)
\r
1413 if(type.isStruct())
\r
1415 return registerSize(*type.getStruct()->begin()->type, 0);
\r
1418 return type.getNominalSize();
\r
1421 if(type.isArray() && registers >= type.elementRegisterCount())
\r
1423 int index = registers / type.elementRegisterCount();
\r
1424 registers -= index * type.elementRegisterCount();
\r
1425 return registerSize(type, registers);
\r
1428 if(type.isStruct())
\r
1430 TTypeList *structure = type.getStruct();
\r
1433 for(TTypeList::const_iterator field = structure->begin(); field != structure->end(); field++)
\r
1435 const TType &fieldType = *field->type;
\r
1437 if(fieldType.totalRegisterCount() <= registers)
\r
1439 registers -= fieldType.totalRegisterCount();
\r
1440 elements += fieldType.getObjectSize();
\r
1442 else // Register within this field
\r
1444 return registerSize(fieldType, registers);
\r
1448 else if(type.isMatrix())
\r
1450 return registerSize(type, 0);
\r
1457 void OutputASM::argument(sw::Shader::SourceParameter ¶meter, TIntermNode *argument, int index)
\r
1461 TIntermTyped *arg = argument->getAsTyped();
\r
1462 const TType &type = arg->getType();
\r
1463 const TTypeList *structure = type.getStruct();
\r
1464 index = (index >= arg->totalRegisterCount()) ? arg->totalRegisterCount() - 1 : index;
\r
1466 int size = registerSize(type, index);
\r
1468 parameter.type = registerType(arg);
\r
1470 if(arg->getQualifier() == EvqConst)
\r
1472 int component = componentCount(type, index);
\r
1473 ConstantUnion *constants = arg->getAsConstantUnion()->getUnionArrayPointer();
\r
1475 for(int i = 0; i < 4; i++)
\r
1477 if(size == 1) // Replicate
\r
1479 parameter.value[i] = constants[component + 0].getAsFloat();
\r
1483 parameter.value[i] = constants[component + i].getAsFloat();
\r
1487 parameter.value[i] = 0.0f;
\r
1493 parameter.index = registerIndex(arg) + index;
\r
1495 if(isSamplerRegister(arg))
\r
1497 TIntermBinary *binary = argument->getAsBinaryNode();
\r
1501 TIntermTyped *left = binary->getLeft();
\r
1502 TIntermTyped *right = binary->getRight();
\r
1504 if(binary->getOp() == EOpIndexDirect)
\r
1506 parameter.index += right->getAsConstantUnion()->getIConst(0);
\r
1508 else if(binary->getOp() == EOpIndexIndirect)
\r
1510 if(left->getArraySize() > 1)
\r
1512 parameter.rel.type = registerType(binary->getRight());
\r
1513 parameter.rel.index = registerIndex(binary->getRight());
\r
1514 parameter.rel.scale = 1;
\r
1515 parameter.rel.deterministic = true;
\r
1518 else if(binary->getOp() == EOpIndexDirectStruct)
\r
1520 parameter.index += right->getAsConstantUnion()->getIConst(0);
\r
1522 else UNREACHABLE();
\r
1527 if(!IsSampler(arg->getBasicType()))
\r
1529 parameter.swizzle = readSwizzle(arg, size);
\r
1534 void OutputASM::copy(TIntermTyped *dst, TIntermNode *src, int offset)
\r
1536 for(int index = 0; index < dst->totalRegisterCount(); index++)
\r
1538 Instruction *mov = emit(sw::Shader::OPCODE_MOV, dst, src);
\r
1539 mov->dst.index += index;
\r
1540 mov->dst.mask = writeMask(dst, index);
\r
1541 argument(mov->src[0], src, offset + index);
\r
1545 int swizzleElement(int swizzle, int index)
\r
1547 return (swizzle >> (index * 2)) & 0x03;
\r
1550 int swizzleSwizzle(int leftSwizzle, int rightSwizzle)
\r
1552 return (swizzleElement(leftSwizzle, swizzleElement(rightSwizzle, 0)) << 0) |
\r
1553 (swizzleElement(leftSwizzle, swizzleElement(rightSwizzle, 1)) << 2) |
\r
1554 (swizzleElement(leftSwizzle, swizzleElement(rightSwizzle, 2)) << 4) |
\r
1555 (swizzleElement(leftSwizzle, swizzleElement(rightSwizzle, 3)) << 6);
\r
1558 void OutputASM::assignLvalue(TIntermTyped *dst, TIntermTyped *src)
\r
1561 ((src->isVector() && (!dst->isVector() || (dst->getNominalSize() != dst->getNominalSize()))) ||
\r
1562 (src->isMatrix() && (!dst->isMatrix() || (src->getNominalSize() != dst->getNominalSize())))))
\r
1564 return mContext.error(src->getLine(), "Result type should match the l-value type in compound assignment", src->isVector() ? "vector" : "matrix");
\r
1567 TIntermBinary *binary = dst->getAsBinaryNode();
\r
1569 if(binary && binary->getOp() == EOpIndexIndirect && dst->isScalar())
\r
1571 Instruction *insert = new Instruction(sw::Shader::OPCODE_INSERT);
\r
1573 Temporary address(this);
\r
1574 lvalue(insert->dst, address, dst);
\r
1576 insert->src[0].type = insert->dst.type;
\r
1577 insert->src[0].index = insert->dst.index;
\r
1578 insert->src[0].rel = insert->dst.rel;
\r
1579 argument(insert->src[1], src);
\r
1580 argument(insert->src[2], binary->getRight());
\r
1582 shader->append(insert);
\r
1586 for(int offset = 0; offset < dst->totalRegisterCount(); offset++)
\r
1588 Instruction *mov = new Instruction(sw::Shader::OPCODE_MOV);
\r
1590 Temporary address(this);
\r
1591 int swizzle = lvalue(mov->dst, address, dst);
\r
1592 mov->dst.index += offset;
\r
1596 mov->dst.mask = writeMask(dst, offset);
\r
1599 argument(mov->src[0], src, offset);
\r
1600 mov->src[0].swizzle = swizzleSwizzle(mov->src[0].swizzle, swizzle);
\r
1602 shader->append(mov);
\r
1607 int OutputASM::lvalue(sw::Shader::DestinationParameter &dst, Temporary &address, TIntermTyped *node)
\r
1609 TIntermTyped *result = node;
\r
1610 TIntermBinary *binary = node->getAsBinaryNode();
\r
1611 TIntermSymbol *symbol = node->getAsSymbolNode();
\r
1615 TIntermTyped *left = binary->getLeft();
\r
1616 TIntermTyped *right = binary->getRight();
\r
1618 int leftSwizzle = lvalue(dst, address, left); // Resolve the l-value of the left side
\r
1620 switch(binary->getOp())
\r
1622 case EOpIndexDirect:
\r
1624 int rightIndex = right->getAsConstantUnion()->getIConst(0);
\r
1626 if(left->isRegister())
\r
1628 int leftMask = dst.mask;
\r
1631 while((leftMask & dst.mask) == 0)
\r
1633 dst.mask = dst.mask << 1;
\r
1636 int element = swizzleElement(leftSwizzle, rightIndex);
\r
1637 dst.mask = 1 << element;
\r
1641 else if(left->isArray() || left->isMatrix())
\r
1643 dst.index += rightIndex * result->totalRegisterCount();
\r
1646 else UNREACHABLE();
\r
1649 case EOpIndexIndirect:
\r
1651 if(left->isRegister())
\r
1653 // Requires INSERT instruction (handled by calling function)
\r
1655 else if(left->isArray() || left->isMatrix())
\r
1657 int scale = result->totalRegisterCount();
\r
1659 if(dst.rel.type == sw::Shader::PARAMETER_VOID) // Use the index register as the relative address directly
\r
1661 if(left->totalRegisterCount() > 1)
\r
1663 sw::Shader::SourceParameter relativeRegister;
\r
1664 argument(relativeRegister, right);
\r
1666 dst.rel.index = relativeRegister.index;
\r
1667 dst.rel.type = relativeRegister.type;
\r
1668 dst.rel.scale = scale;
\r
1669 dst.rel.deterministic = !(vertexShader && left->getQualifier() == EvqUniform);
\r
1672 else if(dst.rel.index != registerIndex(&address)) // Move the previous index register to the address register
\r
1676 Constant oldScale((int)dst.rel.scale);
\r
1677 Instruction *mad = emit(sw::Shader::OPCODE_MAD, &address, &address, &oldScale, right);
\r
1678 mad->src[0].index = dst.rel.index;
\r
1679 mad->src[0].type = dst.rel.type;
\r
1683 Constant oldScale((int)dst.rel.scale);
\r
1684 Instruction *mul = emit(sw::Shader::OPCODE_MUL, &address, &address, &oldScale);
\r
1685 mul->src[0].index = dst.rel.index;
\r
1686 mul->src[0].type = dst.rel.type;
\r
1688 Constant newScale(scale);
\r
1689 emit(sw::Shader::OPCODE_MAD, &address, right, &newScale, &address);
\r
1692 dst.rel.type = sw::Shader::PARAMETER_TEMP;
\r
1693 dst.rel.index = registerIndex(&address);
\r
1694 dst.rel.scale = 1;
\r
1696 else // Just add the new index to the address register
\r
1700 emit(sw::Shader::OPCODE_ADD, &address, &address, right);
\r
1704 Constant newScale(scale);
\r
1705 emit(sw::Shader::OPCODE_MAD, &address, right, &newScale, &address);
\r
1709 else UNREACHABLE();
\r
1712 case EOpIndexDirectStruct:
\r
1714 const TTypeList *structure = left->getType().getStruct();
\r
1715 const TString &fieldName = right->getType().getFieldName();
\r
1718 for(TTypeList::const_iterator field = structure->begin(); field != structure->end(); field++)
\r
1720 if(field->type->getFieldName() == fieldName)
\r
1722 dst.type = registerType(left);
\r
1723 dst.index += offset;
\r
1724 dst.mask = writeMask(right);
\r
1729 offset += field->type->totalRegisterCount();
\r
1733 case EOpVectorSwizzle:
\r
1735 ASSERT(left->isRegister());
\r
1737 int leftMask = dst.mask;
\r
1740 int rightMask = 0;
\r
1742 TIntermSequence &sequence = right->getAsAggregate()->getSequence();
\r
1744 for(unsigned int i = 0; i < sequence.size(); i++)
\r
1746 int index = sequence[i]->getAsConstantUnion()->getIConst(0);
\r
1748 int element = swizzleElement(leftSwizzle, index);
\r
1749 rightMask = rightMask | (1 << element);
\r
1750 swizzle = swizzle | swizzleElement(leftSwizzle, i) << (element * 2);
\r
1753 dst.mask = leftMask & rightMask;
\r
1759 UNREACHABLE(); // Not an l-value operator
\r
1765 dst.type = registerType(symbol);
\r
1766 dst.index = registerIndex(symbol);
\r
1767 dst.mask = writeMask(symbol);
\r
1774 sw::Shader::ParameterType OutputASM::registerType(TIntermTyped *operand)
\r
1776 if(isSamplerRegister(operand))
\r
1778 return sw::Shader::PARAMETER_SAMPLER;
\r
1781 const TQualifier qualifier = operand->getQualifier();
\r
1782 if((EvqFragColor == qualifier) || (EvqFragData == qualifier))
\r
1784 if(((EvqFragData == qualifier) && (EvqFragColor == outputQualifier)) ||
\r
1785 ((EvqFragColor == qualifier) && (EvqFragData == outputQualifier)))
\r
1787 mContext.error(operand->getLine(), "static assignment to both gl_FragData and gl_FragColor", "");
\r
1789 outputQualifier = qualifier;
\r
1794 case EvqTemporary: return sw::Shader::PARAMETER_TEMP;
\r
1795 case EvqGlobal: return sw::Shader::PARAMETER_TEMP;
\r
1796 case EvqConst: return sw::Shader::PARAMETER_FLOAT4LITERAL; // All converted to float
\r
1797 case EvqAttribute: return sw::Shader::PARAMETER_INPUT;
\r
1798 case EvqVaryingIn: return sw::Shader::PARAMETER_INPUT;
\r
1799 case EvqVaryingOut: return sw::Shader::PARAMETER_OUTPUT;
\r
1800 case EvqInvariantVaryingIn: return sw::Shader::PARAMETER_INPUT; // FIXME: Guarantee invariance at the backend
\r
1801 case EvqInvariantVaryingOut: return sw::Shader::PARAMETER_OUTPUT; // FIXME: Guarantee invariance at the backend
\r
1802 case EvqUniform: return sw::Shader::PARAMETER_CONST;
\r
1803 case EvqIn: return sw::Shader::PARAMETER_TEMP;
\r
1804 case EvqOut: return sw::Shader::PARAMETER_TEMP;
\r
1805 case EvqInOut: return sw::Shader::PARAMETER_TEMP;
\r
1806 case EvqConstReadOnly: return sw::Shader::PARAMETER_TEMP;
\r
1807 case EvqPosition: return sw::Shader::PARAMETER_OUTPUT;
\r
1808 case EvqPointSize: return sw::Shader::PARAMETER_OUTPUT;
\r
1809 case EvqFragCoord: return sw::Shader::PARAMETER_MISCTYPE;
\r
1810 case EvqFrontFacing: return sw::Shader::PARAMETER_MISCTYPE;
\r
1811 case EvqPointCoord: return sw::Shader::PARAMETER_INPUT;
\r
1812 case EvqFragColor: return sw::Shader::PARAMETER_COLOROUT;
\r
1813 case EvqFragData: return sw::Shader::PARAMETER_COLOROUT;
\r
1814 default: UNREACHABLE();
\r
1817 return sw::Shader::PARAMETER_VOID;
\r
1820 int OutputASM::registerIndex(TIntermTyped *operand)
\r
1822 if(isSamplerRegister(operand))
\r
1824 return samplerRegister(operand);
\r
1827 switch(operand->getQualifier())
\r
1829 case EvqTemporary: return temporaryRegister(operand);
\r
1830 case EvqGlobal: return temporaryRegister(operand);
\r
1831 case EvqConst: UNREACHABLE();
\r
1832 case EvqAttribute: return attributeRegister(operand);
\r
1833 case EvqVaryingIn: return varyingRegister(operand);
\r
1834 case EvqVaryingOut: return varyingRegister(operand);
\r
1835 case EvqInvariantVaryingIn: return varyingRegister(operand);
\r
1836 case EvqInvariantVaryingOut: return varyingRegister(operand);
\r
1837 case EvqUniform: return uniformRegister(operand);
\r
1838 case EvqIn: return temporaryRegister(operand);
\r
1839 case EvqOut: return temporaryRegister(operand);
\r
1840 case EvqInOut: return temporaryRegister(operand);
\r
1841 case EvqConstReadOnly: return temporaryRegister(operand);
\r
1842 case EvqPosition: return varyingRegister(operand);
\r
1843 case EvqPointSize: return varyingRegister(operand);
\r
1844 case EvqFragCoord: pixelShader->vPosDeclared = true; return 0;
\r
1845 case EvqFrontFacing: pixelShader->vFaceDeclared = true; return 1;
\r
1846 case EvqPointCoord: return varyingRegister(operand);
\r
1847 case EvqFragColor: return 0;
\r
1848 case EvqFragData: return 0;
\r
1849 default: UNREACHABLE();
\r
1855 int OutputASM::writeMask(TIntermTyped *destination, int index)
\r
1857 if(destination->getQualifier() == EvqPointSize)
\r
1859 return 0x2; // Point size stored in the y component
\r
1862 return 0xF >> (4 - registerSize(destination->getType(), index));
\r
1865 int OutputASM::readSwizzle(TIntermTyped *argument, int size)
\r
1867 if(argument->getQualifier() == EvqPointSize)
\r
1869 return 0x55; // Point size stored in the y component
\r
1872 static const unsigned char swizzleSize[5] = {0x00, 0x00, 0x54, 0xA4, 0xE4}; // (void), xxxx, xyyy, xyzz, xyzw
\r
1874 return swizzleSize[size];
\r
1877 // Conservatively checks whether an expression is fast to compute and has no side effects
\r
1878 bool OutputASM::trivial(TIntermTyped *expression, int budget)
\r
1880 if(!expression->isRegister())
\r
1885 return cost(expression, budget) >= 0;
\r
1888 // Returns the remaining computing budget (if < 0 the expression is too expensive or has side effects)
\r
1889 int OutputASM::cost(TIntermNode *expression, int budget)
\r
1896 if(expression->getAsSymbolNode())
\r
1900 else if(expression->getAsConstantUnion())
\r
1904 else if(expression->getAsBinaryNode())
\r
1906 TIntermBinary *binary = expression->getAsBinaryNode();
\r
1908 switch(binary->getOp())
\r
1910 case EOpVectorSwizzle:
\r
1911 case EOpIndexDirect:
\r
1912 case EOpIndexDirectStruct:
\r
1913 return cost(binary->getLeft(), budget - 0);
\r
1917 return cost(binary->getLeft(), cost(binary->getRight(), budget - 1));
\r
1922 else if(expression->getAsUnaryNode())
\r
1924 TIntermUnary *unary = expression->getAsUnaryNode();
\r
1926 switch(unary->getOp())
\r
1930 return cost(unary->getOperand(), budget - 1);
\r
1935 else if(expression->getAsSelectionNode())
\r
1937 TIntermSelection *selection = expression->getAsSelectionNode();
\r
1939 if(selection->usesTernaryOperator())
\r
1941 TIntermTyped *condition = selection->getCondition();
\r
1942 TIntermNode *trueBlock = selection->getTrueBlock();
\r
1943 TIntermNode *falseBlock = selection->getFalseBlock();
\r
1944 TIntermConstantUnion *constantCondition = condition->getAsConstantUnion();
\r
1946 if(constantCondition)
\r
1948 bool trueCondition = constantCondition->getUnionArrayPointer()->getBConst();
\r
1952 return cost(trueBlock, budget - 0);
\r
1956 return cost(falseBlock, budget - 0);
\r
1961 return cost(trueBlock, cost(falseBlock, budget - 2));
\r
1969 const Function *OutputASM::findFunction(const TString &name)
\r
1971 for(unsigned int f = 0; f < functionArray.size(); f++)
\r
1973 if(functionArray[f].name == name)
\r
1975 return &functionArray[f];
\r
1982 int OutputASM::temporaryRegister(TIntermTyped *temporary)
\r
1984 return allocate(temporaries, temporary);
\r
1987 int OutputASM::varyingRegister(TIntermTyped *varying)
\r
1989 int var = lookup(varyings, varying);
\r
1993 var = allocate(varyings, varying);
\r
1994 int componentCount = varying->getNominalSize();
\r
1995 int registerCount = varying->totalRegisterCount();
\r
1999 if((var + registerCount) > sw::PixelShader::MAX_INPUT_VARYINGS)
\r
2001 mContext.error(varying->getLine(), "Varyings packing failed: Too many varyings", "fragment shader");
\r
2005 if(varying->getQualifier() == EvqPointCoord)
\r
2007 ASSERT(varying->isRegister());
\r
2008 if(componentCount >= 1) pixelShader->semantic[var][0] = sw::Shader::Semantic(sw::Shader::USAGE_TEXCOORD, var);
\r
2009 if(componentCount >= 2) pixelShader->semantic[var][1] = sw::Shader::Semantic(sw::Shader::USAGE_TEXCOORD, var);
\r
2010 if(componentCount >= 3) pixelShader->semantic[var][2] = sw::Shader::Semantic(sw::Shader::USAGE_TEXCOORD, var);
\r
2011 if(componentCount >= 4) pixelShader->semantic[var][3] = sw::Shader::Semantic(sw::Shader::USAGE_TEXCOORD, var);
\r
2015 for(int i = 0; i < varying->totalRegisterCount(); i++)
\r
2017 if(componentCount >= 1) pixelShader->semantic[var + i][0] = sw::Shader::Semantic(sw::Shader::USAGE_COLOR, var + i);
\r
2018 if(componentCount >= 2) pixelShader->semantic[var + i][1] = sw::Shader::Semantic(sw::Shader::USAGE_COLOR, var + i);
\r
2019 if(componentCount >= 3) pixelShader->semantic[var + i][2] = sw::Shader::Semantic(sw::Shader::USAGE_COLOR, var + i);
\r
2020 if(componentCount >= 4) pixelShader->semantic[var + i][3] = sw::Shader::Semantic(sw::Shader::USAGE_COLOR, var + i);
\r
2024 else if(vertexShader)
\r
2026 if((var + registerCount) > sw::VertexShader::MAX_OUTPUT_VARYINGS)
\r
2028 mContext.error(varying->getLine(), "Varyings packing failed: Too many varyings", "vertex shader");
\r
2032 if(varying->getQualifier() == EvqPosition)
\r
2034 ASSERT(varying->isRegister());
\r
2035 vertexShader->output[var][0] = sw::Shader::Semantic(sw::Shader::USAGE_POSITION, 0);
\r
2036 vertexShader->output[var][1] = sw::Shader::Semantic(sw::Shader::USAGE_POSITION, 0);
\r
2037 vertexShader->output[var][2] = sw::Shader::Semantic(sw::Shader::USAGE_POSITION, 0);
\r
2038 vertexShader->output[var][3] = sw::Shader::Semantic(sw::Shader::USAGE_POSITION, 0);
\r
2039 vertexShader->positionRegister = var;
\r
2041 else if(varying->getQualifier() == EvqPointSize)
\r
2043 ASSERT(varying->isRegister());
\r
2044 vertexShader->output[var][0] = sw::Shader::Semantic(sw::Shader::USAGE_PSIZE, 0);
\r
2045 vertexShader->output[var][1] = sw::Shader::Semantic(sw::Shader::USAGE_PSIZE, 0);
\r
2046 vertexShader->output[var][2] = sw::Shader::Semantic(sw::Shader::USAGE_PSIZE, 0);
\r
2047 vertexShader->output[var][3] = sw::Shader::Semantic(sw::Shader::USAGE_PSIZE, 0);
\r
2048 vertexShader->pointSizeRegister = var;
\r
2052 // Semantic indexes for user varyings will be assigned during program link to match the pixel shader
\r
2055 else UNREACHABLE();
\r
2057 declareVarying(varying, var);
\r
2063 void OutputASM::declareVarying(TIntermTyped *varying, int reg)
\r
2065 if(varying->getQualifier() != EvqPointCoord) // gl_PointCoord does not need linking
\r
2067 const TType &type = varying->getType();
\r
2068 const char *name = varying->getAsSymbolNode()->getSymbol().c_str();
\r
2069 VaryingList &activeVaryings = shaderObject->varyings;
\r
2071 // Check if this varying has been declared before without having a register assigned
\r
2072 for(VaryingList::iterator v = activeVaryings.begin(); v != activeVaryings.end(); v++)
\r
2074 if(v->name == name)
\r
2078 ASSERT(v->reg < 0 || v->reg == reg);
\r
2086 activeVaryings.push_back(glsl::Varying(glVariableType(type), name, varying->getArraySize(), reg, 0));
\r
2090 int OutputASM::uniformRegister(TIntermTyped *uniform)
\r
2092 const TType &type = uniform->getType();
\r
2093 ASSERT(!IsSampler(type.getBasicType()));
\r
2094 TIntermSymbol *symbol = uniform->getAsSymbolNode();
\r
2099 int index = lookup(uniforms, uniform);
\r
2103 index = allocate(uniforms, uniform);
\r
2104 const TString &name = symbol->getSymbol().c_str();
\r
2106 declareUniform(type, name, index);
\r
2115 int OutputASM::attributeRegister(TIntermTyped *attribute)
\r
2117 ASSERT(!attribute->isArray());
\r
2118 ASSERT(attribute->getBasicType() == EbtFloat);
\r
2120 int index = lookup(attributes, attribute);
\r
2124 TIntermSymbol *symbol = attribute->getAsSymbolNode();
\r
2129 index = allocate(attributes, attribute);
\r
2130 const TType &type = attribute->getType();
\r
2131 int registerCount = attribute->totalRegisterCount();
\r
2133 if(vertexShader && (index + registerCount) <= sw::VertexShader::MAX_INPUT_ATTRIBUTES)
\r
2135 for(int i = 0; i < registerCount; i++)
\r
2137 vertexShader->input[index + i] = sw::Shader::Semantic(sw::Shader::USAGE_TEXCOORD, index + i);
\r
2141 ActiveAttributes &activeAttributes = shaderObject->activeAttributes;
\r
2143 const char *name = symbol->getSymbol().c_str();
\r
2144 activeAttributes.push_back(Attribute(glVariableType(type), name, 0, index));
\r
2151 int OutputASM::samplerRegister(TIntermTyped *sampler)
\r
2153 ASSERT(IsSampler(sampler->getType().getBasicType()));
\r
2154 TIntermSymbol *symbol = sampler->getAsSymbolNode();
\r
2155 TIntermBinary *binary = sampler->getAsBinaryNode();
\r
2159 return samplerRegister(symbol);
\r
2163 ASSERT(binary->getOp() == EOpIndexDirect || binary->getOp() == EOpIndexIndirect || binary->getOp() == EOpIndexDirectStruct);
\r
2165 return samplerRegister(binary->getLeft()); // Index added later
\r
2167 else UNREACHABLE();
\r
2172 int OutputASM::samplerRegister(TIntermSymbol *sampler)
\r
2174 const TType &type = sampler->getType();
\r
2175 ASSERT(IsSampler(type.getBasicType()) || type.getStruct()); // Structures can contain samplers
\r
2177 int index = lookup(samplers, sampler);
\r
2181 index = allocate(samplers, sampler);
\r
2183 if(sampler->getQualifier() == EvqUniform)
\r
2185 const char *name = sampler->getSymbol().c_str();
\r
2186 declareUniform(type, name, index);
\r
2193 int OutputASM::lookup(VariableArray &list, TIntermTyped *variable)
\r
2195 for(unsigned int i = 0; i < list.size(); i++)
\r
2197 if(list[i] == variable)
\r
2199 return i; // Pointer match
\r
2203 TIntermSymbol *varSymbol = variable->getAsSymbolNode();
\r
2207 for(unsigned int i = 0; i < list.size(); i++)
\r
2211 TIntermSymbol *listSymbol = list[i]->getAsSymbolNode();
\r
2215 if(listSymbol->getId() == varSymbol->getId())
\r
2217 ASSERT(listSymbol->getSymbol() == varSymbol->getSymbol());
\r
2218 ASSERT(listSymbol->getType() == varSymbol->getType());
\r
2219 ASSERT(listSymbol->getQualifier() == varSymbol->getQualifier());
\r
2231 int OutputASM::allocate(VariableArray &list, TIntermTyped *variable)
\r
2233 int index = lookup(list, variable);
\r
2237 unsigned int registerCount = variable->totalRegisterCount();
\r
2239 for(unsigned int i = 0; i < list.size(); i++)
\r
2243 unsigned int j = 1;
\r
2244 for( ; j < registerCount && (i + j) < list.size(); j++)
\r
2246 if(list[i + j] != 0)
\r
2252 if(j == registerCount) // Found free slots
\r
2254 for(unsigned int j = 0; j < registerCount; j++)
\r
2256 list[i + j] = variable;
\r
2264 index = list.size();
\r
2266 for(unsigned int i = 0; i < registerCount; i++)
\r
2268 list.push_back(variable);
\r
2275 void OutputASM::free(VariableArray &list, TIntermTyped *variable)
\r
2277 int index = lookup(list, variable);
\r
2285 void OutputASM::declareUniform(const TType &type, const TString &name, int index)
\r
2287 const TTypeList *structure = type.getStruct();
\r
2288 ActiveUniforms &activeUniforms = shaderObject->activeUniforms;
\r
2292 activeUniforms.push_back(Uniform(glVariableType(type), glVariablePrecision(type), name.c_str(), type.getArraySize(), index));
\r
2294 if(isSamplerRegister(type))
\r
2296 for(int i = 0; i < type.totalRegisterCount(); i++)
\r
2298 shader->declareSampler(index + i);
\r
2304 if(type.isArray())
\r
2306 int elementIndex = index;
\r
2308 for(int i = 0; i < type.getArraySize(); i++)
\r
2310 for(size_t j = 0; j < structure->size(); j++)
\r
2312 const TType &fieldType = *(*structure)[j].type;
\r
2313 const TString &fieldName = fieldType.getFieldName();
\r
2315 const TString uniformName = name + "[" + str(i) + "]." + fieldName;
\r
2316 declareUniform(fieldType, uniformName, elementIndex);
\r
2317 elementIndex += fieldType.totalRegisterCount();
\r
2323 int fieldIndex = index;
\r
2325 for(size_t i = 0; i < structure->size(); i++)
\r
2327 const TType &fieldType = *(*structure)[i].type;
\r
2328 const TString &fieldName = fieldType.getFieldName();
\r
2330 const TString uniformName = name + "." + fieldName;
\r
2331 declareUniform(fieldType, uniformName, fieldIndex);
\r
2332 fieldIndex += fieldType.totalRegisterCount();
\r
2338 GLenum OutputASM::glVariableType(const TType &type)
\r
2340 if(type.getBasicType() == EbtFloat)
\r
2342 if(type.isScalar())
\r
2346 else if(type.isVector())
\r
2348 switch(type.getNominalSize())
\r
2350 case 2: return GL_FLOAT_VEC2;
\r
2351 case 3: return GL_FLOAT_VEC3;
\r
2352 case 4: return GL_FLOAT_VEC4;
\r
2353 default: UNREACHABLE();
\r
2356 else if(type.isMatrix())
\r
2358 switch(type.getNominalSize())
\r
2360 case 2: return GL_FLOAT_MAT2;
\r
2361 case 3: return GL_FLOAT_MAT3;
\r
2362 case 4: return GL_FLOAT_MAT4;
\r
2363 default: UNREACHABLE();
\r
2366 else UNREACHABLE();
\r
2368 else if(type.getBasicType() == EbtInt)
\r
2370 if(type.isScalar())
\r
2374 else if(type.isVector())
\r
2376 switch(type.getNominalSize())
\r
2378 case 2: return GL_INT_VEC2;
\r
2379 case 3: return GL_INT_VEC3;
\r
2380 case 4: return GL_INT_VEC4;
\r
2381 default: UNREACHABLE();
\r
2384 else UNREACHABLE();
\r
2386 else if(type.getBasicType() == EbtBool)
\r
2388 if(type.isScalar())
\r
2392 else if(type.isVector())
\r
2394 switch(type.getNominalSize())
\r
2396 case 2: return GL_BOOL_VEC2;
\r
2397 case 3: return GL_BOOL_VEC3;
\r
2398 case 4: return GL_BOOL_VEC4;
\r
2399 default: UNREACHABLE();
\r
2402 else UNREACHABLE();
\r
2404 else if(type.getBasicType() == EbtSampler2D)
\r
2406 return GL_SAMPLER_2D;
\r
2408 else if(type.getBasicType() == EbtSamplerCube)
\r
2410 return GL_SAMPLER_CUBE;
\r
2412 else if(type.getBasicType() == EbtSamplerExternalOES)
\r
2414 return GL_SAMPLER_EXTERNAL_OES;
\r
2416 else if(type.getBasicType() == EbtSampler3D)
\r
2418 return GL_SAMPLER_3D_OES;
\r
2420 else UNREACHABLE();
\r
2425 GLenum OutputASM::glVariablePrecision(const TType &type)
\r
2427 if(type.getBasicType() == EbtFloat)
\r
2429 switch(type.getPrecision())
\r
2431 case EbpHigh: return GL_HIGH_FLOAT;
\r
2432 case EbpMedium: return GL_MEDIUM_FLOAT;
\r
2433 case EbpLow: return GL_LOW_FLOAT;
\r
2434 case EbpUndefined:
\r
2435 // Should be defined as the default precision by the parser
\r
2436 default: UNREACHABLE();
\r
2439 else if(type.getBasicType() == EbtInt)
\r
2441 switch (type.getPrecision())
\r
2443 case EbpHigh: return GL_HIGH_INT;
\r
2444 case EbpMedium: return GL_MEDIUM_INT;
\r
2445 case EbpLow: return GL_LOW_INT;
\r
2446 case EbpUndefined:
\r
2447 // Should be defined as the default precision by the parser
\r
2448 default: UNREACHABLE();
\r
2452 // Other types (boolean, sampler) don't have a precision
\r
2456 int OutputASM::dim(TIntermNode *v)
\r
2458 TIntermTyped *vector = v->getAsTyped();
\r
2459 ASSERT(vector && vector->isRegister());
\r
2460 return vector->getNominalSize();
\r
2463 int OutputASM::dim2(TIntermNode *m)
\r
2465 TIntermTyped *matrix = m->getAsTyped();
\r
2466 ASSERT(matrix && matrix->isMatrix() && !matrix->isArray());
\r
2467 return matrix->getNominalSize();
\r
2470 // Returns ~0 if no loop count could be determined
\r
2471 unsigned int OutputASM::loopCount(TIntermLoop *node)
\r
2473 // Parse loops of the form:
\r
2474 // for(int index = initial; index [comparator] limit; index += increment)
\r
2475 TIntermSymbol *index = 0;
\r
2476 TOperator comparator = EOpNull;
\r
2479 int increment = 0;
\r
2481 // Parse index name and intial value
\r
2482 if(node->getInit())
\r
2484 TIntermAggregate *init = node->getInit()->getAsAggregate();
\r
2488 TIntermSequence &sequence = init->getSequence();
\r
2489 TIntermTyped *variable = sequence[0]->getAsTyped();
\r
2491 if(variable && variable->getQualifier() == EvqTemporary)
\r
2493 TIntermBinary *assign = variable->getAsBinaryNode();
\r
2495 if(assign->getOp() == EOpInitialize)
\r
2497 TIntermSymbol *symbol = assign->getLeft()->getAsSymbolNode();
\r
2498 TIntermConstantUnion *constant = assign->getRight()->getAsConstantUnion();
\r
2500 if(symbol && constant)
\r
2502 if(constant->getBasicType() == EbtInt && constant->getNominalSize() == 1)
\r
2505 initial = constant->getUnionArrayPointer()[0].getIConst();
\r
2513 // Parse comparator and limit value
\r
2514 if(index && node->getCondition())
\r
2516 TIntermBinary *test = node->getCondition()->getAsBinaryNode();
\r
2518 if(test && test->getLeft()->getAsSymbolNode()->getId() == index->getId())
\r
2520 TIntermConstantUnion *constant = test->getRight()->getAsConstantUnion();
\r
2524 if(constant->getBasicType() == EbtInt && constant->getNominalSize() == 1)
\r
2526 comparator = test->getOp();
\r
2527 limit = constant->getUnionArrayPointer()[0].getIConst();
\r
2533 // Parse increment
\r
2534 if(index && comparator != EOpNull && node->getExpression())
\r
2536 TIntermBinary *binaryTerminal = node->getExpression()->getAsBinaryNode();
\r
2537 TIntermUnary *unaryTerminal = node->getExpression()->getAsUnaryNode();
\r
2539 if(binaryTerminal)
\r
2541 TOperator op = binaryTerminal->getOp();
\r
2542 TIntermConstantUnion *constant = binaryTerminal->getRight()->getAsConstantUnion();
\r
2546 if(constant->getBasicType() == EbtInt && constant->getNominalSize() == 1)
\r
2548 int value = constant->getUnionArrayPointer()[0].getIConst();
\r
2552 case EOpAddAssign: increment = value; break;
\r
2553 case EOpSubAssign: increment = -value; break;
\r
2554 default: UNIMPLEMENTED();
\r
2559 else if(unaryTerminal)
\r
2561 TOperator op = unaryTerminal->getOp();
\r
2565 case EOpPostIncrement: increment = 1; break;
\r
2566 case EOpPostDecrement: increment = -1; break;
\r
2567 case EOpPreIncrement: increment = 1; break;
\r
2568 case EOpPreDecrement: increment = -1; break;
\r
2569 default: UNIMPLEMENTED();
\r
2574 if(index && comparator != EOpNull && increment != 0)
\r
2576 if(comparator == EOpLessThanEqual)
\r
2578 comparator = EOpLessThan;
\r
2582 if(comparator == EOpLessThan)
\r
2584 int iterations = (limit - initial) / increment;
\r
2586 if(iterations <= 0)
\r
2591 return iterations;
\r
2593 else UNIMPLEMENTED(); // Falls through
\r
2599 bool DetectLoopDiscontinuity::traverse(TIntermNode *node)
\r
2602 loopDiscontinuity = false;
\r
2604 node->traverse(this);
\r
2606 return loopDiscontinuity;
\r
2609 bool DetectLoopDiscontinuity::visitLoop(Visit visit, TIntermLoop *loop)
\r
2611 if(visit == PreVisit)
\r
2615 else if(visit == PostVisit)
\r
2623 bool DetectLoopDiscontinuity::visitBranch(Visit visit, TIntermBranch *node)
\r
2625 if(loopDiscontinuity)
\r
2635 switch(node->getFlowOp())
\r
2642 loopDiscontinuity = true;
\r
2644 default: UNREACHABLE();
\r
2647 return !loopDiscontinuity;
\r
2650 bool DetectLoopDiscontinuity::visitAggregate(Visit visit, TIntermAggregate *node)
\r
2652 return !loopDiscontinuity;
\r