| // | |
| // Copyright (c) 2002-2013 The ANGLE Project Authors. All rights reserved. | |
| // Use of this source code is governed by a BSD-style license that can be | |
| // found in the LICENSE file. | |
| // | |
| #include "compiler/OutputGLSLBase.h" | |
| #include "compiler/debug.h" | |
| #include <cfloat> | |
| namespace | |
| { | |
| TString arrayBrackets(const TType& type) | |
| { | |
| ASSERT(type.isArray()); | |
| TInfoSinkBase out; | |
| out << "[" << type.getArraySize() << "]"; | |
| return TString(out.c_str()); | |
| } | |
| bool isSingleStatement(TIntermNode* node) { | |
| if (const TIntermAggregate* aggregate = node->getAsAggregate()) | |
| { | |
| return (aggregate->getOp() != EOpFunction) && | |
| (aggregate->getOp() != EOpSequence); | |
| } | |
| else if (const TIntermSelection* selection = node->getAsSelectionNode()) | |
| { | |
| // Ternary operators are usually part of an assignment operator. | |
| // This handles those rare cases in which they are all by themselves. | |
| return selection->usesTernaryOperator(); | |
| } | |
| else if (node->getAsLoopNode()) | |
| { | |
| return false; | |
| } | |
| return true; | |
| } | |
| } // namespace | |
| TOutputGLSLBase::TOutputGLSLBase(TInfoSinkBase& objSink, | |
| ShArrayIndexClampingStrategy clampingStrategy, | |
| ShHashFunction64 hashFunction, | |
| NameMap& nameMap, | |
| TSymbolTable& symbolTable, | |
| int shaderVersion) | |
| : TIntermTraverser(true, true, true), | |
| mObjSink(objSink), | |
| mDeclaringVariables(false), | |
| mClampingStrategy(clampingStrategy), | |
| mHashFunction(hashFunction), | |
| mNameMap(nameMap), | |
| mSymbolTable(symbolTable), | |
| mShaderVersion(shaderVersion) | |
| { | |
| } | |
| void TOutputGLSLBase::writeTriplet(Visit visit, const char* preStr, const char* inStr, const char* postStr) | |
| { | |
| TInfoSinkBase& out = objSink(); | |
| if (visit == PreVisit && preStr) | |
| { | |
| out << preStr; | |
| } | |
| else if (visit == InVisit && inStr) | |
| { | |
| out << inStr; | |
| } | |
| else if (visit == PostVisit && postStr) | |
| { | |
| out << postStr; | |
| } | |
| } | |
| void TOutputGLSLBase::writeVariableType(const TType& type) | |
| { | |
| TInfoSinkBase& out = objSink(); | |
| TQualifier qualifier = type.getQualifier(); | |
| // TODO(alokp): Validate qualifier for variable declarations. | |
| if ((qualifier != EvqTemporary) && (qualifier != EvqGlobal)) | |
| out << type.getQualifierString() << " "; | |
| // Declare the struct if we have not done so already. | |
| if ((type.getBasicType() == EbtStruct) && !structDeclared(type.getStruct())) | |
| { | |
| declareStruct(type.getStruct()); | |
| } | |
| else | |
| { | |
| if (writeVariablePrecision(type.getPrecision())) | |
| out << " "; | |
| out << getTypeName(type); | |
| } | |
| } | |
| void TOutputGLSLBase::writeFunctionParameters(const TIntermSequence& args) | |
| { | |
| TInfoSinkBase& out = objSink(); | |
| for (TIntermSequence::const_iterator iter = args.begin(); | |
| iter != args.end(); ++iter) | |
| { | |
| const TIntermSymbol* arg = (*iter)->getAsSymbolNode(); | |
| ASSERT(arg != NULL); | |
| const TType& type = arg->getType(); | |
| writeVariableType(type); | |
| const TString& name = arg->getSymbol(); | |
| if (!name.empty()) | |
| out << " " << hashName(name); | |
| if (type.isArray()) | |
| out << arrayBrackets(type); | |
| // Put a comma if this is not the last argument. | |
| if (iter != args.end() - 1) | |
| out << ", "; | |
| } | |
| } | |
| const ConstantUnion* TOutputGLSLBase::writeConstantUnion(const TType& type, | |
| const ConstantUnion* pConstUnion) | |
| { | |
| TInfoSinkBase& out = objSink(); | |
| if (type.getBasicType() == EbtStruct) | |
| { | |
| const TStructure* structure = type.getStruct(); | |
| out << hashName(structure->name()) << "("; | |
| const TFieldList& fields = structure->fields(); | |
| for (size_t i = 0; i < fields.size(); ++i) | |
| { | |
| const TType* fieldType = fields[i]->type(); | |
| ASSERT(fieldType != NULL); | |
| pConstUnion = writeConstantUnion(*fieldType, pConstUnion); | |
| if (i != fields.size() - 1) out << ", "; | |
| } | |
| out << ")"; | |
| } | |
| else | |
| { | |
| size_t size = type.getObjectSize(); | |
| bool writeType = size > 1; | |
| if (writeType) out << getTypeName(type) << "("; | |
| for (size_t i = 0; i < size; ++i, ++pConstUnion) | |
| { | |
| switch (pConstUnion->getType()) | |
| { | |
| case EbtFloat: out << std::min(FLT_MAX, std::max(-FLT_MAX, pConstUnion->getFConst())); break; | |
| case EbtInt: out << pConstUnion->getIConst(); break; | |
| case EbtBool: out << pConstUnion->getBConst(); break; | |
| default: UNREACHABLE(); | |
| } | |
| if (i != size - 1) out << ", "; | |
| } | |
| if (writeType) out << ")"; | |
| } | |
| return pConstUnion; | |
| } | |
| void TOutputGLSLBase::visitSymbol(TIntermSymbol* node) | |
| { | |
| TInfoSinkBase& out = objSink(); | |
| if (mLoopUnroll.NeedsToReplaceSymbolWithValue(node)) | |
| out << mLoopUnroll.GetLoopIndexValue(node); | |
| else | |
| out << hashVariableName(node->getSymbol()); | |
| if (mDeclaringVariables && node->getType().isArray()) | |
| out << arrayBrackets(node->getType()); | |
| } | |
| void TOutputGLSLBase::visitConstantUnion(TIntermConstantUnion* node) | |
| { | |
| writeConstantUnion(node->getType(), node->getUnionArrayPointer()); | |
| } | |
| bool TOutputGLSLBase::visitBinary(Visit visit, TIntermBinary* node) | |
| { | |
| bool visitChildren = true; | |
| TInfoSinkBase& out = objSink(); | |
| switch (node->getOp()) | |
| { | |
| case EOpInitialize: | |
| if (visit == InVisit) | |
| { | |
| out << " = "; | |
| // RHS of initialize is not being declared. | |
| mDeclaringVariables = false; | |
| } | |
| break; | |
| case EOpAssign: writeTriplet(visit, "(", " = ", ")"); break; | |
| case EOpAddAssign: writeTriplet(visit, "(", " += ", ")"); break; | |
| case EOpSubAssign: writeTriplet(visit, "(", " -= ", ")"); break; | |
| case EOpDivAssign: writeTriplet(visit, "(", " /= ", ")"); break; | |
| // Notice the fall-through. | |
| case EOpMulAssign: | |
| case EOpVectorTimesMatrixAssign: | |
| case EOpVectorTimesScalarAssign: | |
| case EOpMatrixTimesScalarAssign: | |
| case EOpMatrixTimesMatrixAssign: | |
| writeTriplet(visit, "(", " *= ", ")"); | |
| break; | |
| case EOpIndexDirect: | |
| writeTriplet(visit, NULL, "[", "]"); | |
| break; | |
| case EOpIndexIndirect: | |
| if (node->getAddIndexClamp()) | |
| { | |
| if (visit == InVisit) | |
| { | |
| if (mClampingStrategy == SH_CLAMP_WITH_CLAMP_INTRINSIC) { | |
| out << "[int(clamp(float("; | |
| } else { | |
| out << "[webgl_int_clamp("; | |
| } | |
| } | |
| else if (visit == PostVisit) | |
| { | |
| int maxSize; | |
| TIntermTyped *left = node->getLeft(); | |
| TType leftType = left->getType(); | |
| if (left->isArray()) | |
| { | |
| // The shader will fail validation if the array length is not > 0. | |
| maxSize = leftType.getArraySize() - 1; | |
| } | |
| else | |
| { | |
| maxSize = leftType.getNominalSize() - 1; | |
| } | |
| if (mClampingStrategy == SH_CLAMP_WITH_CLAMP_INTRINSIC) { | |
| out << "), 0.0, float(" << maxSize << ")))]"; | |
| } else { | |
| out << ", 0, " << maxSize << ")]"; | |
| } | |
| } | |
| } | |
| else | |
| { | |
| writeTriplet(visit, NULL, "[", "]"); | |
| } | |
| break; | |
| case EOpIndexDirectStruct: | |
| if (visit == InVisit) | |
| { | |
| // Here we are writing out "foo.bar", where "foo" is struct | |
| // and "bar" is field. In AST, it is represented as a binary | |
| // node, where left child represents "foo" and right child "bar". | |
| // The node itself represents ".". The struct field "bar" is | |
| // actually stored as an index into TStructure::fields. | |
| out << "."; | |
| const TStructure* structure = node->getLeft()->getType().getStruct(); | |
| const TIntermConstantUnion* index = node->getRight()->getAsConstantUnion(); | |
| const TField* field = structure->fields()[index->getIConst(0)]; | |
| TString fieldName = field->name(); | |
| if (!mSymbolTable.findBuiltIn(structure->name(), mShaderVersion)) | |
| fieldName = hashName(fieldName); | |
| out << fieldName; | |
| visitChildren = false; | |
| } | |
| break; | |
| case EOpVectorSwizzle: | |
| if (visit == InVisit) | |
| { | |
| out << "."; | |
| TIntermAggregate* rightChild = node->getRight()->getAsAggregate(); | |
| TIntermSequence& sequence = rightChild->getSequence(); | |
| for (TIntermSequence::iterator sit = sequence.begin(); sit != sequence.end(); ++sit) | |
| { | |
| TIntermConstantUnion* element = (*sit)->getAsConstantUnion(); | |
| ASSERT(element->getBasicType() == EbtInt); | |
| ASSERT(element->getNominalSize() == 1); | |
| const ConstantUnion& data = element->getUnionArrayPointer()[0]; | |
| ASSERT(data.getType() == EbtInt); | |
| switch (data.getIConst()) | |
| { | |
| case 0: out << "x"; break; | |
| case 1: out << "y"; break; | |
| case 2: out << "z"; break; | |
| case 3: out << "w"; break; | |
| default: UNREACHABLE(); break; | |
| } | |
| } | |
| visitChildren = false; | |
| } | |
| break; | |
| case EOpAdd: writeTriplet(visit, "(", " + ", ")"); break; | |
| case EOpSub: writeTriplet(visit, "(", " - ", ")"); break; | |
| case EOpMul: writeTriplet(visit, "(", " * ", ")"); break; | |
| case EOpDiv: writeTriplet(visit, "(", " / ", ")"); break; | |
| case EOpMod: UNIMPLEMENTED(); break; | |
| case EOpEqual: writeTriplet(visit, "(", " == ", ")"); break; | |
| case EOpNotEqual: writeTriplet(visit, "(", " != ", ")"); break; | |
| case EOpLessThan: writeTriplet(visit, "(", " < ", ")"); break; | |
| case EOpGreaterThan: writeTriplet(visit, "(", " > ", ")"); break; | |
| case EOpLessThanEqual: writeTriplet(visit, "(", " <= ", ")"); break; | |
| case EOpGreaterThanEqual: writeTriplet(visit, "(", " >= ", ")"); break; | |
| // Notice the fall-through. | |
| case EOpVectorTimesScalar: | |
| case EOpVectorTimesMatrix: | |
| case EOpMatrixTimesVector: | |
| case EOpMatrixTimesScalar: | |
| case EOpMatrixTimesMatrix: | |
| writeTriplet(visit, "(", " * ", ")"); | |
| break; | |
| case EOpLogicalOr: writeTriplet(visit, "(", " || ", ")"); break; | |
| case EOpLogicalXor: writeTriplet(visit, "(", " ^^ ", ")"); break; | |
| case EOpLogicalAnd: writeTriplet(visit, "(", " && ", ")"); break; | |
| default: UNREACHABLE(); break; | |
| } | |
| return visitChildren; | |
| } | |
| bool TOutputGLSLBase::visitUnary(Visit visit, TIntermUnary* node) | |
| { | |
| TString preString; | |
| TString postString = ")"; | |
| switch (node->getOp()) | |
| { | |
| case EOpNegative: preString = "(-"; break; | |
| case EOpVectorLogicalNot: preString = "not("; break; | |
| case EOpLogicalNot: preString = "(!"; break; | |
| case EOpPostIncrement: preString = "("; postString = "++)"; break; | |
| case EOpPostDecrement: preString = "("; postString = "--)"; break; | |
| case EOpPreIncrement: preString = "(++"; break; | |
| case EOpPreDecrement: preString = "(--"; break; | |
| case EOpConvIntToBool: | |
| case EOpConvFloatToBool: | |
| switch (node->getOperand()->getType().getNominalSize()) | |
| { | |
| case 1: preString = "bool("; break; | |
| case 2: preString = "bvec2("; break; | |
| case 3: preString = "bvec3("; break; | |
| case 4: preString = "bvec4("; break; | |
| default: UNREACHABLE(); | |
| } | |
| break; | |
| case EOpConvBoolToFloat: | |
| case EOpConvIntToFloat: | |
| switch (node->getOperand()->getType().getNominalSize()) | |
| { | |
| case 1: preString = "float("; break; | |
| case 2: preString = "vec2("; break; | |
| case 3: preString = "vec3("; break; | |
| case 4: preString = "vec4("; break; | |
| default: UNREACHABLE(); | |
| } | |
| break; | |
| case EOpConvFloatToInt: | |
| case EOpConvBoolToInt: | |
| switch (node->getOperand()->getType().getNominalSize()) | |
| { | |
| case 1: preString = "int("; break; | |
| case 2: preString = "ivec2("; break; | |
| case 3: preString = "ivec3("; break; | |
| case 4: preString = "ivec4("; break; | |
| default: UNREACHABLE(); | |
| } | |
| break; | |
| case EOpRadians: preString = "radians("; break; | |
| case EOpDegrees: preString = "degrees("; break; | |
| case EOpSin: preString = "sin("; break; | |
| case EOpCos: preString = "cos("; break; | |
| case EOpTan: preString = "tan("; break; | |
| case EOpAsin: preString = "asin("; break; | |
| case EOpAcos: preString = "acos("; break; | |
| case EOpAtan: preString = "atan("; break; | |
| case EOpExp: preString = "exp("; break; | |
| case EOpLog: preString = "log("; break; | |
| case EOpExp2: preString = "exp2("; break; | |
| case EOpLog2: preString = "log2("; break; | |
| case EOpSqrt: preString = "sqrt("; break; | |
| case EOpInverseSqrt: preString = "inversesqrt("; break; | |
| case EOpAbs: preString = "abs("; break; | |
| case EOpSign: preString = "sign("; break; | |
| case EOpFloor: preString = "floor("; break; | |
| case EOpCeil: preString = "ceil("; break; | |
| case EOpFract: preString = "fract("; break; | |
| case EOpLength: preString = "length("; break; | |
| case EOpNormalize: preString = "normalize("; break; | |
| case EOpDFdx: preString = "dFdx("; break; | |
| case EOpDFdy: preString = "dFdy("; break; | |
| case EOpFwidth: preString = "fwidth("; break; | |
| case EOpAny: preString = "any("; break; | |
| case EOpAll: preString = "all("; break; | |
| default: UNREACHABLE(); break; | |
| } | |
| if (visit == PreVisit && node->getUseEmulatedFunction()) | |
| preString = BuiltInFunctionEmulator::GetEmulatedFunctionName(preString); | |
| writeTriplet(visit, preString.c_str(), NULL, postString.c_str()); | |
| return true; | |
| } | |
| bool TOutputGLSLBase::visitSelection(Visit visit, TIntermSelection* node) | |
| { | |
| TInfoSinkBase& out = objSink(); | |
| if (node->usesTernaryOperator()) | |
| { | |
| // Notice two brackets at the beginning and end. The outer ones | |
| // encapsulate the whole ternary expression. This preserves the | |
| // order of precedence when ternary expressions are used in a | |
| // compound expression, i.e., c = 2 * (a < b ? 1 : 2). | |
| out << "(("; | |
| node->getCondition()->traverse(this); | |
| out << ") ? ("; | |
| node->getTrueBlock()->traverse(this); | |
| out << ") : ("; | |
| node->getFalseBlock()->traverse(this); | |
| out << "))"; | |
| } | |
| else | |
| { | |
| out << "if ("; | |
| node->getCondition()->traverse(this); | |
| out << ")\n"; | |
| incrementDepth(); | |
| visitCodeBlock(node->getTrueBlock()); | |
| if (node->getFalseBlock()) | |
| { | |
| out << "else\n"; | |
| visitCodeBlock(node->getFalseBlock()); | |
| } | |
| decrementDepth(); | |
| } | |
| return false; | |
| } | |
| bool TOutputGLSLBase::visitAggregate(Visit visit, TIntermAggregate* node) | |
| { | |
| bool visitChildren = true; | |
| TInfoSinkBase& out = objSink(); | |
| TString preString; | |
| bool delayedWrite = false; | |
| switch (node->getOp()) | |
| { | |
| case EOpSequence: { | |
| // Scope the sequences except when at the global scope. | |
| if (depth > 0) out << "{\n"; | |
| incrementDepth(); | |
| const TIntermSequence& sequence = node->getSequence(); | |
| for (TIntermSequence::const_iterator iter = sequence.begin(); | |
| iter != sequence.end(); ++iter) | |
| { | |
| TIntermNode* node = *iter; | |
| ASSERT(node != NULL); | |
| node->traverse(this); | |
| if (isSingleStatement(node)) | |
| out << ";\n"; | |
| } | |
| decrementDepth(); | |
| // Scope the sequences except when at the global scope. | |
| if (depth > 0) out << "}\n"; | |
| visitChildren = false; | |
| break; | |
| } | |
| case EOpPrototype: { | |
| // Function declaration. | |
| ASSERT(visit == PreVisit); | |
| writeVariableType(node->getType()); | |
| out << " " << hashName(node->getName()); | |
| out << "("; | |
| writeFunctionParameters(node->getSequence()); | |
| out << ")"; | |
| visitChildren = false; | |
| break; | |
| } | |
| case EOpFunction: { | |
| // Function definition. | |
| ASSERT(visit == PreVisit); | |
| writeVariableType(node->getType()); | |
| out << " " << hashFunctionName(node->getName()); | |
| incrementDepth(); | |
| // Function definition node contains one or two children nodes | |
| // representing function parameters and function body. The latter | |
| // is not present in case of empty function bodies. | |
| const TIntermSequence& sequence = node->getSequence(); | |
| ASSERT((sequence.size() == 1) || (sequence.size() == 2)); | |
| TIntermSequence::const_iterator seqIter = sequence.begin(); | |
| // Traverse function parameters. | |
| TIntermAggregate* params = (*seqIter)->getAsAggregate(); | |
| ASSERT(params != NULL); | |
| ASSERT(params->getOp() == EOpParameters); | |
| params->traverse(this); | |
| // Traverse function body. | |
| TIntermAggregate* body = ++seqIter != sequence.end() ? | |
| (*seqIter)->getAsAggregate() : NULL; | |
| visitCodeBlock(body); | |
| decrementDepth(); | |
| // Fully processed; no need to visit children. | |
| visitChildren = false; | |
| break; | |
| } | |
| case EOpFunctionCall: | |
| // Function call. | |
| if (visit == PreVisit) | |
| { | |
| out << hashFunctionName(node->getName()) << "("; | |
| } | |
| else if (visit == InVisit) | |
| { | |
| out << ", "; | |
| } | |
| else | |
| { | |
| out << ")"; | |
| } | |
| break; | |
| case EOpParameters: { | |
| // Function parameters. | |
| ASSERT(visit == PreVisit); | |
| out << "("; | |
| writeFunctionParameters(node->getSequence()); | |
| out << ")"; | |
| visitChildren = false; | |
| break; | |
| } | |
| case EOpDeclaration: { | |
| // Variable declaration. | |
| if (visit == PreVisit) | |
| { | |
| const TIntermSequence& sequence = node->getSequence(); | |
| const TIntermTyped* variable = sequence.front()->getAsTyped(); | |
| writeVariableType(variable->getType()); | |
| out << " "; | |
| mDeclaringVariables = true; | |
| } | |
| else if (visit == InVisit) | |
| { | |
| out << ", "; | |
| mDeclaringVariables = true; | |
| } | |
| else | |
| { | |
| mDeclaringVariables = false; | |
| } | |
| break; | |
| } | |
| case EOpConstructFloat: writeTriplet(visit, "float(", NULL, ")"); break; | |
| case EOpConstructVec2: writeTriplet(visit, "vec2(", ", ", ")"); break; | |
| case EOpConstructVec3: writeTriplet(visit, "vec3(", ", ", ")"); break; | |
| case EOpConstructVec4: writeTriplet(visit, "vec4(", ", ", ")"); break; | |
| case EOpConstructBool: writeTriplet(visit, "bool(", NULL, ")"); break; | |
| case EOpConstructBVec2: writeTriplet(visit, "bvec2(", ", ", ")"); break; | |
| case EOpConstructBVec3: writeTriplet(visit, "bvec3(", ", ", ")"); break; | |
| case EOpConstructBVec4: writeTriplet(visit, "bvec4(", ", ", ")"); break; | |
| case EOpConstructInt: writeTriplet(visit, "int(", NULL, ")"); break; | |
| case EOpConstructIVec2: writeTriplet(visit, "ivec2(", ", ", ")"); break; | |
| case EOpConstructIVec3: writeTriplet(visit, "ivec3(", ", ", ")"); break; | |
| case EOpConstructIVec4: writeTriplet(visit, "ivec4(", ", ", ")"); break; | |
| case EOpConstructMat2: writeTriplet(visit, "mat2(", ", ", ")"); break; | |
| case EOpConstructMat3: writeTriplet(visit, "mat3(", ", ", ")"); break; | |
| case EOpConstructMat4: writeTriplet(visit, "mat4(", ", ", ")"); break; | |
| case EOpConstructStruct: | |
| if (visit == PreVisit) | |
| { | |
| const TType& type = node->getType(); | |
| ASSERT(type.getBasicType() == EbtStruct); | |
| out << hashName(type.getStruct()->name()) << "("; | |
| } | |
| else if (visit == InVisit) | |
| { | |
| out << ", "; | |
| } | |
| else | |
| { | |
| out << ")"; | |
| } | |
| break; | |
| case EOpLessThan: preString = "lessThan("; delayedWrite = true; break; | |
| case EOpGreaterThan: preString = "greaterThan("; delayedWrite = true; break; | |
| case EOpLessThanEqual: preString = "lessThanEqual("; delayedWrite = true; break; | |
| case EOpGreaterThanEqual: preString = "greaterThanEqual("; delayedWrite = true; break; | |
| case EOpVectorEqual: preString = "equal("; delayedWrite = true; break; | |
| case EOpVectorNotEqual: preString = "notEqual("; delayedWrite = true; break; | |
| case EOpComma: writeTriplet(visit, NULL, ", ", NULL); break; | |
| case EOpMod: preString = "mod("; delayedWrite = true; break; | |
| case EOpPow: preString = "pow("; delayedWrite = true; break; | |
| case EOpAtan: preString = "atan("; delayedWrite = true; break; | |
| case EOpMin: preString = "min("; delayedWrite = true; break; | |
| case EOpMax: preString = "max("; delayedWrite = true; break; | |
| case EOpClamp: preString = "clamp("; delayedWrite = true; break; | |
| case EOpMix: preString = "mix("; delayedWrite = true; break; | |
| case EOpStep: preString = "step("; delayedWrite = true; break; | |
| case EOpSmoothStep: preString = "smoothstep("; delayedWrite = true; break; | |
| case EOpDistance: preString = "distance("; delayedWrite = true; break; | |
| case EOpDot: preString = "dot("; delayedWrite = true; break; | |
| case EOpCross: preString = "cross("; delayedWrite = true; break; | |
| case EOpFaceForward: preString = "faceforward("; delayedWrite = true; break; | |
| case EOpReflect: preString = "reflect("; delayedWrite = true; break; | |
| case EOpRefract: preString = "refract("; delayedWrite = true; break; | |
| case EOpMul: preString = "matrixCompMult("; delayedWrite = true; break; | |
| default: UNREACHABLE(); break; | |
| } | |
| if (delayedWrite && visit == PreVisit && node->getUseEmulatedFunction()) | |
| preString = BuiltInFunctionEmulator::GetEmulatedFunctionName(preString); | |
| if (delayedWrite) | |
| writeTriplet(visit, preString.c_str(), ", ", ")"); | |
| return visitChildren; | |
| } | |
| bool TOutputGLSLBase::visitLoop(Visit visit, TIntermLoop* node) | |
| { | |
| TInfoSinkBase& out = objSink(); | |
| incrementDepth(); | |
| // Loop header. | |
| TLoopType loopType = node->getType(); | |
| if (loopType == ELoopFor) // for loop | |
| { | |
| if (!node->getUnrollFlag()) { | |
| out << "for ("; | |
| if (node->getInit()) | |
| node->getInit()->traverse(this); | |
| out << "; "; | |
| if (node->getCondition()) | |
| node->getCondition()->traverse(this); | |
| out << "; "; | |
| if (node->getExpression()) | |
| node->getExpression()->traverse(this); | |
| out << ")\n"; | |
| } | |
| } | |
| else if (loopType == ELoopWhile) // while loop | |
| { | |
| out << "while ("; | |
| ASSERT(node->getCondition() != NULL); | |
| node->getCondition()->traverse(this); | |
| out << ")\n"; | |
| } | |
| else // do-while loop | |
| { | |
| ASSERT(loopType == ELoopDoWhile); | |
| out << "do\n"; | |
| } | |
| // Loop body. | |
| if (node->getUnrollFlag()) | |
| { | |
| TLoopIndexInfo indexInfo; | |
| mLoopUnroll.FillLoopIndexInfo(node, indexInfo); | |
| mLoopUnroll.Push(indexInfo); | |
| while (mLoopUnroll.SatisfiesLoopCondition()) | |
| { | |
| visitCodeBlock(node->getBody()); | |
| mLoopUnroll.Step(); | |
| } | |
| mLoopUnroll.Pop(); | |
| } | |
| else | |
| { | |
| visitCodeBlock(node->getBody()); | |
| } | |
| // Loop footer. | |
| if (loopType == ELoopDoWhile) // do-while loop | |
| { | |
| out << "while ("; | |
| ASSERT(node->getCondition() != NULL); | |
| node->getCondition()->traverse(this); | |
| out << ");\n"; | |
| } | |
| decrementDepth(); | |
| // No need to visit children. They have been already processed in | |
| // this function. | |
| return false; | |
| } | |
| bool TOutputGLSLBase::visitBranch(Visit visit, TIntermBranch* node) | |
| { | |
| switch (node->getFlowOp()) | |
| { | |
| case EOpKill: writeTriplet(visit, "discard", NULL, NULL); break; | |
| case EOpBreak: writeTriplet(visit, "break", NULL, NULL); break; | |
| case EOpContinue: writeTriplet(visit, "continue", NULL, NULL); break; | |
| case EOpReturn: writeTriplet(visit, "return ", NULL, NULL); break; | |
| default: UNREACHABLE(); break; | |
| } | |
| return true; | |
| } | |
| void TOutputGLSLBase::visitCodeBlock(TIntermNode* node) { | |
| TInfoSinkBase &out = objSink(); | |
| if (node != NULL) | |
| { | |
| node->traverse(this); | |
| // Single statements not part of a sequence need to be terminated | |
| // with semi-colon. | |
| if (isSingleStatement(node)) | |
| out << ";\n"; | |
| } | |
| else | |
| { | |
| out << "{\n}\n"; // Empty code block. | |
| } | |
| } | |
| TString TOutputGLSLBase::getTypeName(const TType& type) | |
| { | |
| TInfoSinkBase out; | |
| if (type.isMatrix()) | |
| { | |
| out << "mat"; | |
| out << type.getNominalSize(); | |
| } | |
| else if (type.isVector()) | |
| { | |
| switch (type.getBasicType()) | |
| { | |
| case EbtFloat: out << "vec"; break; | |
| case EbtInt: out << "ivec"; break; | |
| case EbtBool: out << "bvec"; break; | |
| default: UNREACHABLE(); break; | |
| } | |
| out << type.getNominalSize(); | |
| } | |
| else | |
| { | |
| if (type.getBasicType() == EbtStruct) | |
| out << hashName(type.getStruct()->name()); | |
| else | |
| out << type.getBasicString(); | |
| } | |
| return TString(out.c_str()); | |
| } | |
| TString TOutputGLSLBase::hashName(const TString& name) | |
| { | |
| if (mHashFunction == NULL || name.empty()) | |
| return name; | |
| NameMap::const_iterator it = mNameMap.find(name.c_str()); | |
| if (it != mNameMap.end()) | |
| return it->second.c_str(); | |
| TString hashedName = TIntermTraverser::hash(name, mHashFunction); | |
| mNameMap[name.c_str()] = hashedName.c_str(); | |
| return hashedName; | |
| } | |
| TString TOutputGLSLBase::hashVariableName(const TString& name) | |
| { | |
| if (mSymbolTable.findBuiltIn(name, mShaderVersion) != NULL) | |
| return name; | |
| return hashName(name); | |
| } | |
| TString TOutputGLSLBase::hashFunctionName(const TString& mangled_name) | |
| { | |
| TString name = TFunction::unmangleName(mangled_name); | |
| if (mSymbolTable.findBuiltIn(mangled_name, mShaderVersion) != NULL || name == "main") | |
| return name; | |
| return hashName(name); | |
| } | |
| bool TOutputGLSLBase::structDeclared(const TStructure* structure) const | |
| { | |
| return mDeclaredStructs.find(structure->name()) != mDeclaredStructs.end(); | |
| } | |
| void TOutputGLSLBase::declareStruct(const TStructure* structure) | |
| { | |
| TInfoSinkBase& out = objSink(); | |
| out << "struct " << hashName(structure->name()) << "{\n"; | |
| const TFieldList& fields = structure->fields(); | |
| for (size_t i = 0; i < fields.size(); ++i) | |
| { | |
| const TField* field = fields[i]; | |
| if (writeVariablePrecision(field->type()->getPrecision())) | |
| out << " "; | |
| out << getTypeName(*field->type()) << " " << hashName(field->name()); | |
| if (field->type()->isArray()) | |
| out << arrayBrackets(*field->type()); | |
| out << ";\n"; | |
| } | |
| out << "}"; | |
| mDeclaredStructs.insert(structure->name()); | |
| } |