OSDN Git Service

Fixed Temporary issues
[android-x86/external-swiftshader.git] / src / OpenGL / compiler / OutputASM.cpp
1 // SwiftShader Software Renderer\r
2 //\r
3 // Copyright(c) 2005-2013 TransGaming Inc.\r
4 //\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
10 //\r
11 \r
12 #include "OutputASM.h"\r
13 \r
14 #include "common/debug.h"\r
15 #include "InfoSink.h"\r
16 \r
17 #include "libGLESv2/Shader.h"\r
18 \r
19 #include <GLES2/gl2.h>\r
20 #include <GLES2/gl2ext.h>\r
21 #include <GLES3/gl3.h>\r
22 \r
23 namespace glsl\r
24 {\r
25         // Integer to TString conversion\r
26         TString str(int i)\r
27         {\r
28                 char buffer[20];\r
29                 sprintf(buffer, "%d", i);\r
30                 return buffer;\r
31         }\r
32 \r
33         class Temporary : public TIntermSymbol\r
34         {\r
35         public:\r
36                 Temporary(OutputASM *assembler) : TIntermSymbol(TSymbolTableLevel::nextUniqueId(), "tmp", TType(EbtFloat, EbpHigh, EvqTemporary, 4, 1, false)), assembler(assembler)\r
37                 {\r
38                 }\r
39 \r
40                 ~Temporary()\r
41                 {\r
42                         assembler->freeTemporary(this);\r
43                 }\r
44 \r
45         private:\r
46                 OutputASM *const assembler;\r
47         };\r
48 \r
49         class Constant : public TIntermConstantUnion\r
50         {\r
51         public:\r
52                 Constant(float x, float y, float z, float w) : TIntermConstantUnion(constants, TType(EbtFloat, EbpHigh, EvqConstExpr, 4, 1, false))\r
53                 {\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
58                 }\r
59 \r
60                 Constant(bool b) : TIntermConstantUnion(constants, TType(EbtBool, EbpHigh, EvqConstExpr, 1, 1, false))\r
61                 {\r
62                         constants[0].setBConst(b);\r
63                 }\r
64 \r
65                 Constant(int i) : TIntermConstantUnion(constants, TType(EbtInt, EbpHigh, EvqConstExpr, 1, 1, false))\r
66                 {\r
67                         constants[0].setIConst(i);\r
68                 }\r
69 \r
70                 ~Constant()\r
71                 {\r
72                 }\r
73 \r
74         private:\r
75                 ConstantUnion constants[4];\r
76         };\r
77 \r
78         Uniform::Uniform(GLenum type, GLenum precision, const std::string &name, int arraySize, int registerIndex, int offset, int blockId) :\r
79                 type(type), precision(precision), name(name), arraySize(arraySize), registerIndex(registerIndex), offset(offset), blockId(blockId)\r
80         {\r
81         }\r
82 \r
83         UniformBlock::UniformBlock(const std::string& name, const std::string& instanceName, unsigned int dataSize, unsigned int arraySize,\r
84                                    TLayoutBlockStorage layout, bool isRowMajorLayout, int registerIndex, int blockId) :\r
85                 name(name), instanceName(instanceName), dataSize(dataSize), arraySize(arraySize), layout(layout),\r
86                 isRowMajorLayout(isRowMajorLayout), registerIndex(registerIndex), blockId(blockId)\r
87         {\r
88         }\r
89 \r
90         Attribute::Attribute()\r
91         {\r
92                 type = GL_NONE;\r
93                 arraySize = 0;\r
94                 registerIndex = 0;\r
95         }\r
96 \r
97         Attribute::Attribute(GLenum type, const std::string &name, int arraySize, int location, int registerIndex)\r
98         {\r
99                 this->type = type;\r
100                 this->name = name;\r
101                 this->arraySize = arraySize;\r
102                 this->location = location;\r
103                 this->registerIndex = registerIndex;\r
104         }\r
105 \r
106         sw::PixelShader *Shader::getPixelShader() const\r
107         {\r
108                 return 0;\r
109         }\r
110 \r
111         sw::VertexShader *Shader::getVertexShader() const\r
112         {\r
113                 return 0;\r
114         }\r
115 \r
116         OutputASM::OutputASM(TParseContext &context, Shader *shaderObject) : TIntermTraverser(true, true, true), mContext(context), shaderObject(shaderObject)\r
117         {\r
118                 shader = 0;\r
119                 pixelShader = 0;\r
120                 vertexShader = 0;\r
121 \r
122                 if(shaderObject)\r
123                 {\r
124                         shader = shaderObject->getShader();\r
125                         pixelShader = shaderObject->getPixelShader();\r
126                         vertexShader = shaderObject->getVertexShader();\r
127                 }\r
128 \r
129                 functionArray.push_back(Function(0, "main(", 0, 0));\r
130                 currentFunction = 0;\r
131                 outputQualifier = EvqOutput; // Set outputQualifier to any value other than EvqFragColor or EvqFragData\r
132         }\r
133 \r
134         OutputASM::~OutputASM()\r
135         {\r
136         }\r
137 \r
138         void OutputASM::output()\r
139         {\r
140                 if(shader)\r
141                 {\r
142                         emitShader(GLOBAL);\r
143 \r
144                         if(functionArray.size() > 1)   // Only call main() when there are other functions\r
145                         {\r
146                                 Instruction *callMain = emit(sw::Shader::OPCODE_CALL);\r
147                                 callMain->dst.type = sw::Shader::PARAMETER_LABEL;\r
148                                 callMain->dst.index = 0;   // main()\r
149 \r
150                                 emit(sw::Shader::OPCODE_RET);\r
151                         }\r
152 \r
153                         emitShader(FUNCTION);\r
154                 }\r
155         }\r
156 \r
157         void OutputASM::emitShader(Scope scope)\r
158         {\r
159                 emitScope = scope;\r
160                 currentScope = GLOBAL;\r
161                 mContext.getTreeRoot()->traverse(this);\r
162         }\r
163 \r
164         void OutputASM::freeTemporary(Temporary *temporary)\r
165         {\r
166                 free(temporaries, temporary);\r
167         }\r
168 \r
169         sw::Shader::Opcode OutputASM::getOpcode(sw::Shader::Opcode op, TIntermTyped *in) const\r
170         {\r
171                 TBasicType baseType = in->getType().getBasicType();\r
172 \r
173                 switch(op)\r
174                 {\r
175                 case sw::Shader::OPCODE_NEG:\r
176                         switch(baseType)\r
177                         {\r
178                         case EbtInt:\r
179                         case EbtUInt:\r
180                                 return sw::Shader::OPCODE_INEG;\r
181                         case EbtFloat:\r
182                         default:\r
183                                 return op;\r
184                         }\r
185                 case sw::Shader::OPCODE_ADD:\r
186                         switch(baseType)\r
187                         {\r
188                         case EbtInt:\r
189                         case EbtUInt:\r
190                                 return sw::Shader::OPCODE_IADD;\r
191                         case EbtFloat:\r
192                         default:\r
193                                 return op;\r
194                         }\r
195                 case sw::Shader::OPCODE_SUB:\r
196                         switch(baseType)\r
197                         {\r
198                         case EbtInt:\r
199                         case EbtUInt:\r
200                                 return sw::Shader::OPCODE_ISUB;\r
201                         case EbtFloat:\r
202                         default:\r
203                                 return op;\r
204                         }\r
205                 case sw::Shader::OPCODE_MUL:\r
206                         switch(baseType)\r
207                         {\r
208                         case EbtInt:\r
209                         case EbtUInt:\r
210                                 return sw::Shader::OPCODE_IMUL;\r
211                         case EbtFloat:\r
212                         default:\r
213                                 return op;\r
214                         }\r
215                 case sw::Shader::OPCODE_DIV:\r
216                         switch(baseType)\r
217                         {\r
218                         case EbtInt:\r
219                                 return sw::Shader::OPCODE_IDIV;\r
220                         case EbtUInt:\r
221                                 return sw::Shader::OPCODE_UDIV;\r
222                         case EbtFloat:\r
223                         default:\r
224                                 return op;\r
225                         }\r
226                 case sw::Shader::OPCODE_IMOD:\r
227                         return baseType == EbtUInt ? sw::Shader::OPCODE_UMOD : op;\r
228                 case sw::Shader::OPCODE_ISHR:\r
229                         return baseType == EbtUInt ? sw::Shader::OPCODE_USHR : op;\r
230                 case sw::Shader::OPCODE_MIN:\r
231                         switch(baseType)\r
232                         {\r
233                         case EbtInt:\r
234                                 return sw::Shader::OPCODE_IMIN;\r
235                         case EbtUInt:\r
236                                 return sw::Shader::OPCODE_UMIN;\r
237                         case EbtFloat:\r
238                         default:\r
239                                 return op;\r
240                         }\r
241                 case sw::Shader::OPCODE_MAX:\r
242                         switch(baseType)\r
243                         {\r
244                         case EbtInt:\r
245                                 return sw::Shader::OPCODE_IMAX;\r
246                         case EbtUInt:\r
247                                 return sw::Shader::OPCODE_UMAX;\r
248                         case EbtFloat:\r
249                         default:\r
250                                 return op;\r
251                         }\r
252                 default:\r
253                         return op;\r
254                 }\r
255         }\r
256 \r
257         void OutputASM::visitSymbol(TIntermSymbol *symbol)\r
258         {\r
259                 // Vertex varyings don't have to be actively used to successfully link\r
260                 // against pixel shaders that use them. So make sure they're declared.\r
261                 if(symbol->getQualifier() == EvqVaryingOut || symbol->getQualifier() == EvqInvariantVaryingOut || symbol->getQualifier() == EvqVertexOut)\r
262                 {\r
263                         if(symbol->getBasicType() != EbtInvariant)   // Typeless declarations are not new varyings\r
264                         {\r
265                                 declareVarying(symbol, -1);\r
266                         }\r
267                 }\r
268         }\r
269 \r
270         bool OutputASM::visitBinary(Visit visit, TIntermBinary *node)\r
271         {\r
272                 if(currentScope != emitScope)\r
273                 {\r
274                         return false;\r
275                 }\r
276 \r
277                 TIntermTyped *result = node;\r
278                 TIntermTyped *left = node->getLeft();\r
279                 TIntermTyped *right = node->getRight();\r
280                 const TType &leftType = left->getType();\r
281                 const TType &rightType = right->getType();\r
282                 const TType &resultType = node->getType();\r
283                 \r
284                 switch(node->getOp())\r
285                 {\r
286                 case EOpAssign:\r
287                         if(visit == PostVisit)\r
288                         {\r
289                                 assignLvalue(left, right);\r
290                                 copy(result, right);\r
291                         }\r
292                         break;\r
293                 case EOpInitialize:\r
294                         if(visit == PostVisit)\r
295                         {\r
296                                 copy(left, right);\r
297                         }\r
298                         break;\r
299                 case EOpMatrixTimesScalarAssign:\r
300                         if(visit == PostVisit)\r
301                         {\r
302                                 for(int i = 0; i < leftType.getNominalSize(); i++)\r
303                                 {\r
304                                         Instruction *mul = emit(sw::Shader::OPCODE_MUL, result, left, right);\r
305                                         mul->dst.index += i;\r
306                                         argument(mul->src[0], left, i);\r
307                                 }\r
308 \r
309                                 assignLvalue(left, result);\r
310                         }\r
311                         break;\r
312                 case EOpVectorTimesMatrixAssign:\r
313                         if(visit == PostVisit)\r
314                         {\r
315                                 int size = leftType.getNominalSize();\r
316 \r
317                                 for(int i = 0; i < size; i++)\r
318                                 {\r
319                                         Instruction *dot = emit(sw::Shader::OPCODE_DP(size), result, left, right);\r
320                                         dot->dst.mask = 1 << i;\r
321                                         argument(dot->src[1], right, i);\r
322                                 }\r
323 \r
324                                 assignLvalue(left, result);\r
325                         }\r
326                         break;\r
327                 case EOpMatrixTimesMatrixAssign:\r
328                         if(visit == PostVisit)\r
329                         {\r
330                                 int dim = leftType.getNominalSize();\r
331 \r
332                                 for(int i = 0; i < dim; i++)\r
333                                 {\r
334                                         Instruction *mul = emit(sw::Shader::OPCODE_MUL, result, left, right);\r
335                                         mul->dst.index += i;\r
336                                         argument(mul->src[1], right, i);\r
337                                         mul->src[1].swizzle = 0x00;\r
338 \r
339                                         for(int j = 1; j < dim; j++)\r
340                                         {\r
341                                                 Instruction *mad = emit(sw::Shader::OPCODE_MAD, result, left, right, result);\r
342                                                 mad->dst.index += i;\r
343                                                 argument(mad->src[0], left, j);\r
344                                                 argument(mad->src[1], right, i);\r
345                                                 mad->src[1].swizzle = j * 0x55;\r
346                                                 argument(mad->src[2], result, i);\r
347                                         }\r
348                                 }\r
349 \r
350                                 assignLvalue(left, result);\r
351                         }\r
352                         break;\r
353                 case EOpIndexDirect:\r
354                         if(visit == PostVisit)\r
355                         {\r
356                                 int index = right->getAsConstantUnion()->getIConst(0);\r
357 \r
358                                 if(result->isMatrix() || result->isStruct())\r
359                                 {\r
360                                         ASSERT(left->isArray());\r
361                                         copy(result, left, index * left->elementRegisterCount());\r
362                                 }\r
363                                 else if(result->isRegister())\r
364                                 {\r
365                                         Instruction *mov = emit(sw::Shader::OPCODE_MOV, result, left);\r
366 \r
367                                         if(left->isRegister())\r
368                                         {\r
369                                                 mov->src[0].swizzle = index;\r
370                                         }\r
371                                         else if(left->isArray())\r
372                                         {\r
373                                                 argument(mov->src[0], left, index * left->elementRegisterCount());\r
374                                         }\r
375                                         else if(left->isMatrix())\r
376                                         {\r
377                                                 ASSERT(index < left->getNominalSize());   // FIXME: Report semantic error\r
378                                                 argument(mov->src[0], left, index);\r
379                                         }\r
380                                         else UNREACHABLE(0);\r
381                                 }\r
382                                 else UNREACHABLE(0);\r
383                         }\r
384                         break;\r
385                 case EOpIndexIndirect:\r
386                         if(visit == PostVisit)\r
387                         {\r
388                                 if(left->isArray() || left->isMatrix())\r
389                                 {\r
390                                         for(int index = 0; index < result->totalRegisterCount(); index++)\r
391                                         {\r
392                                                 Instruction *mov = emit(sw::Shader::OPCODE_MOV, result, left);\r
393                                                 mov->dst.index += index;\r
394                                                 mov->dst.mask = writeMask(result, index);\r
395                                                 argument(mov->src[0], left, index);\r
396 \r
397                                                 if(left->totalRegisterCount() > 1)\r
398                                                 {\r
399                                                         sw::Shader::SourceParameter relativeRegister;\r
400                                                         argument(relativeRegister, right);\r
401 \r
402                                                         mov->src[0].rel.type = relativeRegister.type;\r
403                                                         mov->src[0].rel.index = relativeRegister.index;\r
404                                                         mov->src[0].rel.scale = result->totalRegisterCount();\r
405                                                         mov->src[0].rel.deterministic = !(vertexShader && left->getQualifier() == EvqUniform);\r
406                                                 }\r
407                                         }\r
408                                 }\r
409                                 else if(left->isRegister())\r
410                                 {\r
411                                         emit(sw::Shader::OPCODE_EXTRACT, result, left, right);\r
412                                 }\r
413                                 else UNREACHABLE(0);\r
414                         }\r
415                         break;\r
416                 case EOpIndexDirectStruct:\r
417                 case EOpIndexDirectInterfaceBlock:\r
418                         if(visit == PostVisit)\r
419                         {\r
420                                 ASSERT(leftType.isStruct() || (leftType.isInterfaceBlock()));\r
421 \r
422                                 const TFieldList& fields = (node->getOp() == EOpIndexDirectStruct) ?\r
423                                                            leftType.getStruct()->fields() :\r
424                                                            leftType.getInterfaceBlock()->fields();\r
425                                 int index = right->getAsConstantUnion()->getIConst(0);\r
426                                 int fieldOffset = 0;\r
427 \r
428                                 for(int i = 0; i < index; i++)\r
429                                 {\r
430                                         fieldOffset += fields[i]->type()->totalRegisterCount();\r
431                                 }\r
432 \r
433                                 copy(result, left, fieldOffset);\r
434                         }\r
435                         break;\r
436                 case EOpVectorSwizzle:\r
437                         if(visit == PostVisit)\r
438                         {\r
439                                 int swizzle = 0;\r
440                                 TIntermAggregate *components = right->getAsAggregate();\r
441 \r
442                                 if(components)\r
443                                 {\r
444                                         TIntermSequence &sequence = components->getSequence();\r
445                                         int component = 0;\r
446 \r
447                                         for(TIntermSequence::iterator sit = sequence.begin(); sit != sequence.end(); sit++)\r
448                                         {\r
449                                                 TIntermConstantUnion *element = (*sit)->getAsConstantUnion();\r
450 \r
451                                                 if(element)\r
452                                                 {\r
453                                                         int i = element->getUnionArrayPointer()[0].getIConst();\r
454                                                         swizzle |= i << (component * 2);\r
455                                                         component++;\r
456                                                 }\r
457                                                 else UNREACHABLE(0);\r
458                                         }\r
459                                 }\r
460                                 else UNREACHABLE(0);\r
461 \r
462                                 Instruction *mov = emit(sw::Shader::OPCODE_MOV, result, left);\r
463                                 mov->src[0].swizzle = swizzle;\r
464                         }\r
465                         break;\r
466                 case EOpAddAssign: if(visit == PostVisit) emitAssign(getOpcode(sw::Shader::OPCODE_ADD, result), result, left, left, right); break;\r
467                 case EOpAdd:       if(visit == PostVisit) emitBinary(getOpcode(sw::Shader::OPCODE_ADD, result), result, left, right);       break;\r
468                 case EOpSubAssign: if(visit == PostVisit) emitAssign(getOpcode(sw::Shader::OPCODE_SUB, result), result, left, left, right); break;\r
469                 case EOpSub:       if(visit == PostVisit) emitBinary(getOpcode(sw::Shader::OPCODE_SUB, result), result, left, right);       break;\r
470                 case EOpMulAssign: if(visit == PostVisit) emitAssign(getOpcode(sw::Shader::OPCODE_MUL, result), result, left, left, right); break;\r
471                 case EOpMul:       if(visit == PostVisit) emitBinary(getOpcode(sw::Shader::OPCODE_MUL, result), result, left, right);       break;\r
472                 case EOpDivAssign: if(visit == PostVisit) emitAssign(getOpcode(sw::Shader::OPCODE_DIV, result), result, left, left, right); break;\r
473                 case EOpDiv:       if(visit == PostVisit) emitBinary(getOpcode(sw::Shader::OPCODE_DIV, result), result, left, right);       break;\r
474                 case EOpIModAssign:          if(visit == PostVisit) emitAssign(getOpcode(sw::Shader::OPCODE_IMOD, result), result, left, left, right); break;\r
475                 case EOpIMod:                if(visit == PostVisit) emitBinary(getOpcode(sw::Shader::OPCODE_IMOD, result), result, left, right);       break;\r
476                 case EOpBitShiftLeftAssign:  if(visit == PostVisit) emitAssign(sw::Shader::OPCODE_SHL, result, left, left, right); break;\r
477                 case EOpBitShiftLeft:        if(visit == PostVisit) emitBinary(sw::Shader::OPCODE_SHL, result, left, right);       break;\r
478                 case EOpBitShiftRightAssign: if(visit == PostVisit) emitAssign(getOpcode(sw::Shader::OPCODE_ISHR, result), result, left, left, right); break;\r
479                 case EOpBitShiftRight:       if(visit == PostVisit) emitBinary(getOpcode(sw::Shader::OPCODE_ISHR, result), result, left, right);       break;\r
480                 case EOpBitwiseAndAssign:    if(visit == PostVisit) emitAssign(sw::Shader::OPCODE_AND, result, left, left, right); break;\r
481                 case EOpBitwiseAnd:          if(visit == PostVisit) emitBinary(sw::Shader::OPCODE_AND, result, left, right);       break;\r
482                 case EOpBitwiseXorAssign:    if(visit == PostVisit) emitAssign(sw::Shader::OPCODE_XOR, result, left, left, right); break;\r
483                 case EOpBitwiseXor:          if(visit == PostVisit) emitBinary(sw::Shader::OPCODE_XOR, result, left, right);       break;\r
484                 case EOpBitwiseOrAssign:     if(visit == PostVisit) emitAssign(sw::Shader::OPCODE_OR, result, left, left, right);  break;\r
485                 case EOpBitwiseOr:           if(visit == PostVisit) emitBinary(sw::Shader::OPCODE_OR, result, left, right);        break;\r
486                 case EOpEqual:\r
487                         if(visit == PostVisit)\r
488                         {\r
489                                 emitBinary(sw::Shader::OPCODE_EQ, result, left, right);\r
490 \r
491                                 for(int index = 1; index < left->totalRegisterCount(); index++)\r
492                                 {\r
493                                         Temporary equal(this);\r
494                                         Instruction *eq = emit(sw::Shader::OPCODE_EQ, &equal, left, right);\r
495                                         argument(eq->src[0], left, index);\r
496                                         argument(eq->src[1], right, index);\r
497                                         emit(sw::Shader::OPCODE_AND, result, result, &equal);\r
498                                 }\r
499                         }\r
500                         break;\r
501                 case EOpNotEqual:\r
502                         if(visit == PostVisit)\r
503                         {\r
504                                 emitBinary(sw::Shader::OPCODE_NE, result, left, right);\r
505 \r
506                                 for(int index = 1; index < left->totalRegisterCount(); index++)\r
507                                 {\r
508                                         Temporary notEqual(this);\r
509                                         Instruction *eq = emit(sw::Shader::OPCODE_NE, &notEqual, left, right);\r
510                                         argument(eq->src[0], left, index);\r
511                                         argument(eq->src[1], right, index);\r
512                                         emit(sw::Shader::OPCODE_OR, result, result, &notEqual);\r
513                                 }\r
514                         }\r
515                         break;\r
516                 case EOpLessThan:                if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_LT, result, left, right); break;\r
517                 case EOpGreaterThan:             if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_GT, result, left, right); break;\r
518                 case EOpLessThanEqual:           if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_LE, result, left, right); break;\r
519                 case EOpGreaterThanEqual:        if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_GE, result, left, right); break;\r
520                 case EOpVectorTimesScalarAssign: if(visit == PostVisit) emitAssign(getOpcode(sw::Shader::OPCODE_MUL, left), result, left, left, right); break;\r
521                 case EOpVectorTimesScalar:       if(visit == PostVisit) emit(getOpcode(sw::Shader::OPCODE_MUL, left), result, left, right); break;\r
522                 case EOpMatrixTimesScalar:\r
523                         if(visit == PostVisit)\r
524                         {\r
525                                 for(int i = 0; i < leftType.getNominalSize(); i++)\r
526                                 {\r
527                                         Instruction *mul = emit(sw::Shader::OPCODE_MUL, result, left, right);\r
528                                         mul->dst.index += i;\r
529                                         argument(mul->src[0], left, i);\r
530                                 }\r
531                         }\r
532                         break;\r
533                 case EOpVectorTimesMatrix:\r
534                         if(visit == PostVisit)\r
535                         {\r
536                                 int size = leftType.getNominalSize();\r
537 \r
538                                 for(int i = 0; i < size; i++)\r
539                                 {\r
540                                         Instruction *dot = emit(sw::Shader::OPCODE_DP(size), result, left, right);\r
541                                         dot->dst.mask = 1 << i;\r
542                                         argument(dot->src[1], right, i);\r
543                                 }\r
544                         }\r
545                         break;\r
546                 case EOpMatrixTimesVector:\r
547                         if(visit == PostVisit)\r
548                         {\r
549                                 Instruction *mul = emit(sw::Shader::OPCODE_MUL, result, left, right);\r
550                                 mul->src[1].swizzle = 0x00;\r
551 \r
552                                 for(int i = 1; i < leftType.getNominalSize(); i++)\r
553                                 {\r
554                                         Instruction *mad = emit(sw::Shader::OPCODE_MAD, result, left, right, result);\r
555                                         argument(mad->src[0], left, i);\r
556                                         mad->src[1].swizzle = i * 0x55;\r
557                                 }\r
558                         }\r
559                         break;\r
560                 case EOpMatrixTimesMatrix:\r
561                         if(visit == PostVisit)\r
562                         {\r
563                                 int dim = leftType.getNominalSize();\r
564 \r
565                                 for(int i = 0; i < dim; i++)\r
566                                 {\r
567                                         Instruction *mul = emit(sw::Shader::OPCODE_MUL, result, left, right);\r
568                                         mul->dst.index += i;\r
569                                         argument(mul->src[1], right, i);\r
570                                         mul->src[1].swizzle = 0x00;\r
571 \r
572                                         for(int j = 1; j < dim; j++)\r
573                                         {\r
574                                                 Instruction *mad = emit(sw::Shader::OPCODE_MAD, result, left, right, result);\r
575                                                 mad->dst.index += i;\r
576                                                 argument(mad->src[0], left, j);\r
577                                                 argument(mad->src[1], right, i);\r
578                                                 mad->src[1].swizzle = j * 0x55;\r
579                                                 argument(mad->src[2], result, i);\r
580                                         }\r
581                                 }\r
582                         }\r
583                         break;\r
584                 case EOpLogicalOr:\r
585                         if(trivial(right, 6))\r
586                         {\r
587                                 if(visit == PostVisit)\r
588                                 {\r
589                                         emit(sw::Shader::OPCODE_OR, result, left, right);\r
590                                 }\r
591                         }\r
592                         else   // Short-circuit evaluation\r
593                         {\r
594                                 if(visit == InVisit)\r
595                                 {\r
596                                         emit(sw::Shader::OPCODE_MOV, result, left);\r
597                                         Instruction *ifnot = emit(sw::Shader::OPCODE_IF, 0, result);\r
598                                         ifnot->src[0].modifier = sw::Shader::MODIFIER_NOT;\r
599                                 }\r
600                                 else if(visit == PostVisit)\r
601                                 {\r
602                                         emit(sw::Shader::OPCODE_MOV, result, right);\r
603                                         emit(sw::Shader::OPCODE_ENDIF);\r
604                                 }\r
605                         }\r
606                         break;\r
607                 case EOpLogicalXor:        if(visit == PostVisit) emit(sw::Shader::OPCODE_XOR, result, left, right); break;\r
608                 case EOpLogicalAnd:\r
609                         if(trivial(right, 6))\r
610                         {\r
611                                 if(visit == PostVisit)\r
612                                 {\r
613                                         emit(sw::Shader::OPCODE_AND, result, left, right);\r
614                                 }\r
615                         }\r
616                         else   // Short-circuit evaluation\r
617                         {\r
618                                 if(visit == InVisit)\r
619                                 {\r
620                                         emit(sw::Shader::OPCODE_MOV, result, left);\r
621                                         emit(sw::Shader::OPCODE_IF, 0, result);\r
622                                 }\r
623                                 else if(visit == PostVisit)\r
624                                 {\r
625                                         emit(sw::Shader::OPCODE_MOV, result, right);\r
626                                         emit(sw::Shader::OPCODE_ENDIF);\r
627                                 }\r
628                         }\r
629                         break;\r
630                 default: UNREACHABLE(node->getOp());\r
631                 }\r
632 \r
633                 return true;\r
634         }\r
635 \r
636         bool OutputASM::visitUnary(Visit visit, TIntermUnary *node)\r
637         {\r
638                 if(currentScope != emitScope)\r
639                 {\r
640                         return false;\r
641                 }\r
642 \r
643                 TIntermTyped *result = node;\r
644                 TIntermTyped *arg = node->getOperand();\r
645                 TBasicType basicType = arg->getType().getBasicType();\r
646 \r
647                 union\r
648                 {\r
649                         float f;\r
650                         int i;\r
651                 } one_value;\r
652 \r
653                 if(basicType == EbtInt || basicType == EbtUInt)\r
654                 {\r
655                         one_value.i = 1;\r
656                 }\r
657                 else\r
658                 {\r
659                         one_value.f = 1.0f;\r
660                 }\r
661 \r
662                 Constant one(one_value.f, one_value.f, one_value.f, one_value.f);\r
663                 Constant rad(1.74532925e-2f, 1.74532925e-2f, 1.74532925e-2f, 1.74532925e-2f);\r
664                 Constant deg(5.72957795e+1f, 5.72957795e+1f, 5.72957795e+1f, 5.72957795e+1f);\r
665 \r
666                 switch(node->getOp())\r
667                 {\r
668                 case EOpNegative:\r
669                         if(visit == PostVisit)\r
670                         {\r
671                                 sw::Shader::Opcode negOpcode = getOpcode(sw::Shader::OPCODE_NEG, arg);\r
672                                 for(int index = 0; index < arg->totalRegisterCount(); index++)\r
673                                 {\r
674                                         Instruction *neg = emit(negOpcode, result, arg);\r
675                                         neg->dst.index += index;\r
676                                         argument(neg->src[0], arg, index);\r
677                                 }\r
678                         }\r
679                         break;\r
680                 case EOpVectorLogicalNot: if(visit == PostVisit) emit(sw::Shader::OPCODE_NOT, result, arg); break;\r
681                 case EOpLogicalNot:       if(visit == PostVisit) emit(sw::Shader::OPCODE_NOT, result, arg); break;\r
682                 case EOpPostIncrement:\r
683                         if(visit == PostVisit)\r
684                         {\r
685                                 copy(result, arg);\r
686 \r
687                                 sw::Shader::Opcode addOpcode = getOpcode(sw::Shader::OPCODE_ADD, arg);\r
688                                 for(int index = 0; index < arg->totalRegisterCount(); index++)\r
689                                 {\r
690                                         Instruction *add = emit(addOpcode, arg, arg, &one);\r
691                                         add->dst.index += index;\r
692                                         argument(add->src[0], arg, index);\r
693                                 }\r
694 \r
695                                 assignLvalue(arg, arg);\r
696                         }\r
697                         break;\r
698                 case EOpPostDecrement:\r
699                         if(visit == PostVisit)\r
700                         {\r
701                                 copy(result, arg);\r
702 \r
703                                 sw::Shader::Opcode subOpcode = getOpcode(sw::Shader::OPCODE_SUB, arg);\r
704                                 for(int index = 0; index < arg->totalRegisterCount(); index++)\r
705                                 {\r
706                                         Instruction *sub = emit(subOpcode, arg, arg, &one);\r
707                                         sub->dst.index += index;\r
708                                         argument(sub->src[0], arg, index);\r
709                                 }\r
710 \r
711                                 assignLvalue(arg, arg);\r
712                         }\r
713                         break;\r
714                 case EOpPreIncrement:\r
715                         if(visit == PostVisit)\r
716                         {\r
717                                 sw::Shader::Opcode addOpcode = getOpcode(sw::Shader::OPCODE_ADD, arg);\r
718                                 for(int index = 0; index < arg->totalRegisterCount(); index++)\r
719                                 {\r
720                                         Instruction *add = emit(addOpcode, result, arg, &one);\r
721                                         add->dst.index += index;\r
722                                         argument(add->src[0], arg, index);\r
723                                 }\r
724 \r
725                                 assignLvalue(arg, result);\r
726                         }\r
727                         break;\r
728                 case EOpPreDecrement:\r
729                         if(visit == PostVisit)\r
730                         {\r
731                                 sw::Shader::Opcode subOpcode = getOpcode(sw::Shader::OPCODE_SUB, arg);\r
732                                 for(int index = 0; index < arg->totalRegisterCount(); index++)\r
733                                 {\r
734                                         Instruction *sub = emit(subOpcode, result, arg, &one);\r
735                                         sub->dst.index += index;\r
736                                         argument(sub->src[0], arg, index);\r
737                                 }\r
738 \r
739                                 assignLvalue(arg, result);\r
740                         }\r
741                         break;\r
742                 case EOpRadians:          if(visit == PostVisit) emit(sw::Shader::OPCODE_MUL, result, arg, &rad); break;\r
743                 case EOpDegrees:          if(visit == PostVisit) emit(sw::Shader::OPCODE_MUL, result, arg, &deg); break;\r
744                 case EOpSin:              if(visit == PostVisit) emit(sw::Shader::OPCODE_SIN, result, arg); break;\r
745                 case EOpCos:              if(visit == PostVisit) emit(sw::Shader::OPCODE_COS, result, arg); break;\r
746                 case EOpTan:              if(visit == PostVisit) emit(sw::Shader::OPCODE_TAN, result, arg); break;\r
747                 case EOpAsin:             if(visit == PostVisit) emit(sw::Shader::OPCODE_ASIN, result, arg); break;\r
748                 case EOpAcos:             if(visit == PostVisit) emit(sw::Shader::OPCODE_ACOS, result, arg); break;\r
749                 case EOpAtan:             if(visit == PostVisit) emit(sw::Shader::OPCODE_ATAN, result, arg); break;\r
750                 case EOpSinh:             if(visit == PostVisit) emit(sw::Shader::OPCODE_SINH, result, arg); break;\r
751                 case EOpCosh:             if(visit == PostVisit) emit(sw::Shader::OPCODE_COSH, result, arg); break;\r
752                 case EOpTanh:             if(visit == PostVisit) emit(sw::Shader::OPCODE_TANH, result, arg); break;\r
753                 case EOpAsinh:            if(visit == PostVisit) emit(sw::Shader::OPCODE_ASINH, result, arg); break;\r
754                 case EOpAcosh:            if(visit == PostVisit) emit(sw::Shader::OPCODE_ACOSH, result, arg); break;\r
755                 case EOpAtanh:            if(visit == PostVisit) emit(sw::Shader::OPCODE_ATANH, result, arg); break;\r
756                 case EOpExp:              if(visit == PostVisit) emit(sw::Shader::OPCODE_EXP, result, arg); break;\r
757                 case EOpLog:              if(visit == PostVisit) emit(sw::Shader::OPCODE_LOG, result, arg); break;\r
758                 case EOpExp2:             if(visit == PostVisit) emit(sw::Shader::OPCODE_EXP2, result, arg); break;\r
759                 case EOpLog2:             if(visit == PostVisit) emit(sw::Shader::OPCODE_LOG2, result, arg); break;\r
760                 case EOpSqrt:             if(visit == PostVisit) emit(sw::Shader::OPCODE_SQRT, result, arg); break;\r
761                 case EOpInverseSqrt:      if(visit == PostVisit) emit(sw::Shader::OPCODE_RSQ, result, arg); break;\r
762                 case EOpAbs:              if(visit == PostVisit) emit(sw::Shader::OPCODE_ABS, result, arg); break;\r
763                 case EOpSign:             if(visit == PostVisit) emit(sw::Shader::OPCODE_SGN, result, arg); break;\r
764                 case EOpFloor:            if(visit == PostVisit) emit(sw::Shader::OPCODE_FLOOR, result, arg); break;\r
765                 case EOpTrunc:            if(visit == PostVisit) emit(sw::Shader::OPCODE_TRUNC, result, arg); break;\r
766                 case EOpRound:            if(visit == PostVisit) emit(sw::Shader::OPCODE_ROUND, result, arg); break;\r
767                 case EOpRoundEven:        if(visit == PostVisit) emit(sw::Shader::OPCODE_ROUNDEVEN, result, arg); break;\r
768                 case EOpCeil:             if(visit == PostVisit) emit(sw::Shader::OPCODE_CEIL, result, arg, result); break;\r
769                 case EOpFract:            if(visit == PostVisit) emit(sw::Shader::OPCODE_FRC, result, arg); break;\r
770                 case EOpIsNan:            if(visit == PostVisit) emit(sw::Shader::OPCODE_ISNAN, result, arg); break;\r
771                 case EOpIsInf:            if(visit == PostVisit) emit(sw::Shader::OPCODE_ISINF, result, arg); break;\r
772                 case EOpLength:           if(visit == PostVisit) emit(sw::Shader::OPCODE_LEN(dim(arg)), result, arg); break;\r
773                 case EOpNormalize:        if(visit == PostVisit) emit(sw::Shader::OPCODE_NRM(dim(arg)), result, arg); break;\r
774                 case EOpDFdx:             if(visit == PostVisit) emit(sw::Shader::OPCODE_DFDX, result, arg); break;\r
775                 case EOpDFdy:             if(visit == PostVisit) emit(sw::Shader::OPCODE_DFDY, result, arg); break;\r
776                 case EOpFwidth:           if(visit == PostVisit) emit(sw::Shader::OPCODE_FWIDTH, result, arg); break;\r
777                 case EOpAny:              if(visit == PostVisit) emit(sw::Shader::OPCODE_ANY, result, arg); break;\r
778                 case EOpAll:              if(visit == PostVisit) emit(sw::Shader::OPCODE_ALL, result, arg); break;\r
779                 case EOpFloatBitsToInt:   if(visit == PostVisit) emit(sw::Shader::OPCODE_FLOATBITSTOINT, result, arg); break;\r
780                 case EOpFloatBitsToUint:  if(visit == PostVisit) emit(sw::Shader::OPCODE_FLOATBITSTOUINT, result, arg); break;\r
781                 case EOpIntBitsToFloat:   if(visit == PostVisit) emit(sw::Shader::OPCODE_INTBITSTOFLOAT, result, arg); break;\r
782                 case EOpUintBitsToFloat:  if(visit == PostVisit) emit(sw::Shader::OPCODE_UINTBITSTOFLOAT, result, arg); break;\r
783                 case EOpPackSnorm2x16:    if(visit == PostVisit) emit(sw::Shader::OPCODE_PACKSNORM2x16, result, arg); break;\r
784                 case EOpPackUnorm2x16:    if(visit == PostVisit) emit(sw::Shader::OPCODE_PACKUNORM2x16, result, arg); break;\r
785                 case EOpPackHalf2x16:     if(visit == PostVisit) emit(sw::Shader::OPCODE_PACKHALF2x16, result, arg); break;\r
786                 case EOpUnpackSnorm2x16:  if(visit == PostVisit) emit(sw::Shader::OPCODE_UNPACKSNORM2x16, result, arg); break;\r
787                 case EOpUnpackUnorm2x16:  if(visit == PostVisit) emit(sw::Shader::OPCODE_UNPACKUNORM2x16, result, arg); break;\r
788                 case EOpUnpackHalf2x16:   if(visit == PostVisit) emit(sw::Shader::OPCODE_UNPACKHALF2x16, result, arg); break;\r
789                 case EOpTranspose:\r
790                         if(visit == PostVisit)\r
791                         {\r
792                                 int numCols = arg->getNominalSize();\r
793                                 int numRows = arg->getSecondarySize();\r
794                                 for(int i = 0; i < numCols; ++i)\r
795                                 {\r
796                                         for(int j = 0; j < numRows; ++j)\r
797                                         {\r
798                                                 Instruction *mov = emit(sw::Shader::OPCODE_MOV, result, arg);\r
799                                                 mov->src[0].index += i;\r
800                                                 mov->src[0].swizzle = 0x55 * j;\r
801                                                 mov->dst.index += j;\r
802                                                 mov->dst.mask = 1 << i;\r
803                                         }\r
804                                 }\r
805                         }\r
806                         break;\r
807                 default: UNREACHABLE(node->getOp());\r
808                 }\r
809 \r
810                 return true;\r
811         }\r
812 \r
813         bool OutputASM::visitAggregate(Visit visit, TIntermAggregate *node)\r
814         {\r
815                 if(currentScope != emitScope && node->getOp() != EOpFunction && node->getOp() != EOpSequence)\r
816                 {\r
817                         return false;\r
818                 }\r
819 \r
820                 Constant zero(0.0f, 0.0f, 0.0f, 0.0f);\r
821 \r
822                 TIntermTyped *result = node;\r
823                 const TType &resultType = node->getType();\r
824                 TIntermSequence &arg = node->getSequence();\r
825                 int argumentCount = arg.size();\r
826 \r
827                 switch(node->getOp())\r
828                 {\r
829                 case EOpSequence:           break;\r
830                 case EOpDeclaration:        break;\r
831                 case EOpPrototype:          break;\r
832                 case EOpComma:\r
833                         if(visit == PostVisit)\r
834                         {\r
835                                 copy(result, arg[1]);\r
836                         }\r
837                         break;\r
838                 case EOpFunction:\r
839                         if(visit == PreVisit)\r
840                         {\r
841                                 const TString &name = node->getName();\r
842 \r
843                                 if(emitScope == FUNCTION)\r
844                                 {\r
845                                         if(functionArray.size() > 1)   // No need for a label when there's only main()\r
846                                         {\r
847                                                 Instruction *label = emit(sw::Shader::OPCODE_LABEL);\r
848                                                 label->dst.type = sw::Shader::PARAMETER_LABEL;\r
849 \r
850                                                 const Function *function = findFunction(name);\r
851                                                 ASSERT(function);   // Should have been added during global pass\r
852                                                 label->dst.index = function->label;\r
853                                                 currentFunction = function->label;\r
854                                         }\r
855                                 }\r
856                                 else if(emitScope == GLOBAL)\r
857                                 {\r
858                                         if(name != "main(")\r
859                                         {\r
860                                                 TIntermSequence &arguments = node->getSequence()[0]->getAsAggregate()->getSequence();\r
861                                                 functionArray.push_back(Function(functionArray.size(), name, &arguments, node));\r
862                                         }\r
863                                 }\r
864                                 else UNREACHABLE(emitScope);\r
865 \r
866                                 currentScope = FUNCTION;\r
867                         }\r
868                         else if(visit == PostVisit)\r
869                         {\r
870                                 if(emitScope == FUNCTION)\r
871                                 {\r
872                                         if(functionArray.size() > 1)   // No need to return when there's only main()\r
873                                         {\r
874                                                 emit(sw::Shader::OPCODE_RET);\r
875                                         }\r
876                                 }\r
877 \r
878                                 currentScope = GLOBAL;\r
879                         }\r
880                         break;\r
881                 case EOpFunctionCall:\r
882                         if(visit == PostVisit)\r
883                         {\r
884                                 if(node->isUserDefined())\r
885                                 {\r
886                                         const TString &name = node->getName();\r
887                                         const Function *function = findFunction(name);\r
888 \r
889                                         if(!function)\r
890                                         {\r
891                                                 mContext.error(node->getLine(), "function definition not found", name.c_str());\r
892                                                 return false;\r
893                                         }\r
894 \r
895                                         TIntermSequence &arguments = *function->arg;\r
896 \r
897                                         for(int i = 0; i < argumentCount; i++)\r
898                                         {\r
899                                                 TIntermTyped *in = arguments[i]->getAsTyped();\r
900 \r
901                                                 if(in->getQualifier() == EvqIn ||\r
902                                                    in->getQualifier() == EvqInOut ||\r
903                                                    in->getQualifier() == EvqConstReadOnly)\r
904                                                 {\r
905                                                         copy(in, arg[i]);\r
906                                                 }\r
907                                         }\r
908 \r
909                                         Instruction *call = emit(sw::Shader::OPCODE_CALL);\r
910                                         call->dst.type = sw::Shader::PARAMETER_LABEL;\r
911                                         call->dst.index = function->label;\r
912 \r
913                                         if(function->ret && function->ret->getType().getBasicType() != EbtVoid)\r
914                                         {\r
915                                                 copy(result, function->ret);\r
916                                         }\r
917 \r
918                                         for(int i = 0; i < argumentCount; i++)\r
919                                         {\r
920                                                 TIntermTyped *argument = arguments[i]->getAsTyped();\r
921                                                 TIntermTyped *out = arg[i]->getAsTyped();\r
922                                                                 \r
923                                                 if(argument->getQualifier() == EvqOut ||\r
924                                                    argument->getQualifier() == EvqInOut)\r
925                                                 {\r
926                                                         copy(out, argument);\r
927                                                 }\r
928                                         }\r
929                                 }\r
930                                 else\r
931                                 {\r
932                                         TString name = TFunction::unmangleName(node->getName());\r
933 \r
934                                         if(name == "texture" || name == "texture2D" || name == "textureCube" || name == "texture3D")\r
935                                         {\r
936                                                 if(argumentCount == 2)\r
937                                                 {\r
938                                                         emit(sw::Shader::OPCODE_TEX, result, arg[1], arg[0]);\r
939                                                 }\r
940                                                 else if(argumentCount == 3)   // bias\r
941                                                 {\r
942                                                         Temporary uvwb(this);\r
943                                                         emit(sw::Shader::OPCODE_MOV, &uvwb, arg[1]);\r
944                                                         Instruction *bias = emit(sw::Shader::OPCODE_MOV, &uvwb, arg[2]);\r
945                                                         bias->dst.mask = 0x8;\r
946 \r
947                                                         Instruction *tex = emit(sw::Shader::OPCODE_TEX, result, &uvwb, arg[0]);   // FIXME: Implement an efficient TEXLDB instruction\r
948                                                         tex->bias = true;\r
949                                                 }\r
950                                                 else UNREACHABLE(argumentCount);\r
951                                         }\r
952                                         else if(name == "texture2DProj" || name == "textureProj")\r
953                                         {\r
954                                                 TIntermTyped *t = arg[1]->getAsTyped();\r
955 \r
956                                                 if(argumentCount == 2)\r
957                                                 {\r
958                                                         Instruction *tex = emit(sw::Shader::OPCODE_TEX, result, arg[1], arg[0]);\r
959                                                         tex->project = true;\r
960 \r
961                                                         if(t->getNominalSize() == 3)\r
962                                                         {\r
963                                                                 tex->src[0].swizzle = 0xA4;\r
964                                                         }\r
965                                                         else ASSERT(t->getNominalSize() == 4);\r
966                                                 }\r
967                                                 else if(argumentCount == 3)   // bias\r
968                                                 {\r
969                                                         Temporary proj(this);\r
970 \r
971                                                         if(t->getNominalSize() == 3)\r
972                                                         {\r
973                                                                 Instruction *div = emit(sw::Shader::OPCODE_DIV, &proj, arg[1], arg[1]);\r
974                                                                 div->src[1].swizzle = 0xAA;\r
975                                                                 div->dst.mask = 0x3;\r
976                                                         }\r
977                                                         else if(t->getNominalSize() == 4)\r
978                                                         {\r
979                                                                 Instruction *div = emit(sw::Shader::OPCODE_DIV, &proj, arg[1], arg[1]);\r
980                                                                 div->src[1].swizzle = 0xFF;\r
981                                                                 div->dst.mask = 0x3;\r
982                                                         }\r
983                                                         else UNREACHABLE(t->getNominalSize());\r
984 \r
985                                                         Instruction *bias = emit(sw::Shader::OPCODE_MOV, &proj, arg[2]);\r
986                                                         bias->dst.mask = 0x8;\r
987 \r
988                                                         Instruction *tex = emit(sw::Shader::OPCODE_TEX, result, &proj, arg[0]);\r
989                                                         tex->bias = true;\r
990                                                 }\r
991                                                 else UNREACHABLE(argumentCount);\r
992                                         }\r
993                                         else if(name == "texture2DLod" || name == "textureCubeLod" || name == "textureLod")\r
994                                         {\r
995                                                 Temporary uvwb(this);\r
996                                                 emit(sw::Shader::OPCODE_MOV, &uvwb, arg[1]);\r
997                                                 Instruction *lod = emit(sw::Shader::OPCODE_MOV, &uvwb, arg[2]);\r
998                                                 lod->dst.mask = 0x8;\r
999 \r
1000                                                 emit(sw::Shader::OPCODE_TEXLDL, result, &uvwb, arg[0]);\r
1001                                         }\r
1002                                         else if(name == "texture2DProjLod" || name == "textureProjLod")\r
1003                                         {\r
1004                                                 TIntermTyped *t = arg[1]->getAsTyped();\r
1005                                                 Temporary proj(this);\r
1006 \r
1007                                                 if(t->getNominalSize() == 3)\r
1008                                                 {\r
1009                                                         Instruction *div = emit(sw::Shader::OPCODE_DIV, &proj, arg[1], arg[1]);\r
1010                                                         div->src[1].swizzle = 0xAA;\r
1011                                                         div->dst.mask = 0x3;\r
1012                                                 }\r
1013                                                 else if(t->getNominalSize() == 4)\r
1014                                                 {\r
1015                                                         Instruction *div = emit(sw::Shader::OPCODE_DIV, &proj, arg[1], arg[1]);\r
1016                                                         div->src[1].swizzle = 0xFF;\r
1017                                                         div->dst.mask = 0x3;\r
1018                                                 }\r
1019                                                 else UNREACHABLE(t->getNominalSize());\r
1020 \r
1021                                                 Instruction *lod = emit(sw::Shader::OPCODE_MOV, &proj, arg[2]);\r
1022                                                 lod->dst.mask = 0x8;\r
1023 \r
1024                                                 emit(sw::Shader::OPCODE_TEXLDL, result, &proj, arg[0]);\r
1025                                         }\r
1026                                         else UNREACHABLE(0);\r
1027                                 }\r
1028                         }\r
1029                         break;\r
1030                 case EOpParameters:\r
1031                         break;\r
1032                 case EOpConstructFloat:\r
1033                 case EOpConstructVec2:\r
1034                 case EOpConstructVec3:\r
1035                 case EOpConstructVec4:\r
1036                 case EOpConstructBool:\r
1037                 case EOpConstructBVec2:\r
1038                 case EOpConstructBVec3:\r
1039                 case EOpConstructBVec4:\r
1040                 case EOpConstructInt:\r
1041                 case EOpConstructIVec2:\r
1042                 case EOpConstructIVec3:\r
1043                 case EOpConstructIVec4:\r
1044                 case EOpConstructUInt:\r
1045                 case EOpConstructUVec2:\r
1046                 case EOpConstructUVec3:\r
1047                 case EOpConstructUVec4:\r
1048                         if(visit == PostVisit)\r
1049                         {\r
1050                                 int component = 0;\r
1051 \r
1052                                 for(int i = 0; i < argumentCount; i++)\r
1053                                 {\r
1054                                         TIntermTyped *argi = arg[i]->getAsTyped();\r
1055                                         int size = argi->getNominalSize();\r
1056 \r
1057                                         if(!argi->isMatrix())\r
1058                                         {\r
1059                                                 Instruction *mov = emitCast(result, argi);\r
1060                                                 mov->dst.mask = (0xF << component) & 0xF;\r
1061                                                 mov->src[0].swizzle = readSwizzle(argi, size) << (component * 2);\r
1062 \r
1063                                                 component += size;\r
1064                                         }\r
1065                                         else   // Matrix\r
1066                                         {\r
1067                                                 int column = 0;\r
1068 \r
1069                                                 while(component < resultType.getNominalSize())\r
1070                                                 {\r
1071                                                         Instruction *mov = emitCast(result, argi);\r
1072                                                         mov->dst.mask = (0xF << component) & 0xF;\r
1073                                                         mov->src[0].index += column;\r
1074                                                         mov->src[0].swizzle = readSwizzle(argi, size) << (component * 2);\r
1075 \r
1076                                                         column++;\r
1077                                                         component += size;\r
1078                                                 }\r
1079                                         }\r
1080                                 }\r
1081                         }\r
1082                         break;\r
1083                 case EOpConstructMat2:\r
1084                 case EOpConstructMat2x3:\r
1085                 case EOpConstructMat2x4:\r
1086                 case EOpConstructMat3x2:\r
1087                 case EOpConstructMat3:\r
1088                 case EOpConstructMat3x4:\r
1089                 case EOpConstructMat4x2:\r
1090                 case EOpConstructMat4x3:\r
1091                 case EOpConstructMat4:\r
1092                         if(visit == PostVisit)\r
1093                         {\r
1094                                 TIntermTyped *arg0 = arg[0]->getAsTyped();\r
1095                                 const int outCols = result->getNominalSize();\r
1096                                 const int outRows = result->getSecondarySize();\r
1097 \r
1098                                 if(arg0->isScalar() && arg.size() == 1)   // Construct scale matrix\r
1099                                 {\r
1100                                         for(int i = 0; i < outCols; i++)\r
1101                                         {\r
1102                                                 Instruction *init = emit(sw::Shader::OPCODE_MOV, result, &zero);\r
1103                                                 init->dst.index += i;\r
1104                                                 Instruction *mov = emitCast(result, arg0);\r
1105                                                 mov->dst.index += i;\r
1106                                                 mov->dst.mask = 1 << i;\r
1107                                                 ASSERT(mov->src[0].swizzle == 0x00);\r
1108                                         }\r
1109                                 }\r
1110                                 else if(arg0->isMatrix())\r
1111                                 {\r
1112                                         const int inCols = arg0->getNominalSize();\r
1113                                         const int inRows = arg0->getSecondarySize();\r
1114 \r
1115                                         for(int i = 0; i < outCols; i++)\r
1116                                         {\r
1117                                                 if(i >= inCols || outRows > inRows)\r
1118                                                 {\r
1119                                                         // Initialize to identity matrix\r
1120                                                         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
1121                                                         Instruction *mov = emitCast(result, &col);\r
1122                                                         mov->dst.index += i;\r
1123                                                 }\r
1124 \r
1125                                                 if(i < inCols)\r
1126                                                 {\r
1127                                                         Instruction *mov = emitCast(result, arg0);\r
1128                                                         mov->dst.index += i;\r
1129                                                         mov->dst.mask = 0xF >> (4 - inRows);\r
1130                                                         argument(mov->src[0], arg0, i);\r
1131                                                 }\r
1132                                         }\r
1133                                 }\r
1134                                 else\r
1135                                 {\r
1136                                         int column = 0;\r
1137                                         int row = 0;\r
1138 \r
1139                                         for(int i = 0; i < argumentCount; i++)\r
1140                                         {\r
1141                                                 TIntermTyped *argi = arg[i]->getAsTyped();\r
1142                                                 int size = argi->getNominalSize();\r
1143                                                 int element = 0;\r
1144 \r
1145                                                 while(element < size)\r
1146                                                 {\r
1147                                                         Instruction *mov = emitCast(result, argi);\r
1148                                                         mov->dst.index += column;\r
1149                                                         mov->dst.mask = (0xF << row) & 0xF;\r
1150                                                         mov->src[0].swizzle = (readSwizzle(argi, size) << (row * 2)) + 0x55 * element;\r
1151 \r
1152                                                         int end = row + size - element;\r
1153                                                         column = end >= outRows ? column + 1 : column;\r
1154                                                         element = element + outRows - row;\r
1155                                                         row = end >= outRows ? 0 : end;\r
1156                                                 }\r
1157                                         }\r
1158                                 }\r
1159                         }\r
1160                         break;\r
1161                 case EOpConstructStruct:\r
1162                         if(visit == PostVisit)\r
1163                         {\r
1164                                 int offset = 0;\r
1165                                 for(int i = 0; i < argumentCount; i++)\r
1166                                 {\r
1167                                         TIntermTyped *argi = arg[i]->getAsTyped();\r
1168                                         int size = argi->totalRegisterCount();\r
1169 \r
1170                                         for(int index = 0; index < size; index++)\r
1171                                         {\r
1172                                                 Instruction *mov = emit(sw::Shader::OPCODE_MOV, result, argi);\r
1173                                                 mov->dst.index += index + offset;\r
1174                                                 mov->dst.mask = writeMask(result, offset + index);\r
1175                                                 argument(mov->src[0], argi, index);\r
1176                                         }\r
1177 \r
1178                                         offset += size;\r
1179                                 }\r
1180                         }\r
1181                         break;\r
1182                 case EOpLessThan:         if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_LT, result, arg[0], arg[1]); break;\r
1183                 case EOpGreaterThan:      if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_GT, result, arg[0], arg[1]); break;\r
1184                 case EOpLessThanEqual:    if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_LE, result, arg[0], arg[1]); break;\r
1185                 case EOpGreaterThanEqual: if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_GE, result, arg[0], arg[1]); break;\r
1186                 case EOpVectorEqual:      if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_EQ, result, arg[0], arg[1]); break;\r
1187                 case EOpVectorNotEqual:   if(visit == PostVisit) emitCmp(sw::Shader::CONTROL_NE, result, arg[0], arg[1]); break;\r
1188                 case EOpMod:              if(visit == PostVisit) emit(sw::Shader::OPCODE_MOD, result, arg[0], arg[1]); break;\r
1189                 case EOpPow:              if(visit == PostVisit) emit(sw::Shader::OPCODE_POW, result, arg[0], arg[1]); break;\r
1190                 case EOpAtan:             if(visit == PostVisit) emit(sw::Shader::OPCODE_ATAN2, result, arg[0], arg[1]); break;\r
1191                 case EOpMin:              if(visit == PostVisit) emit(getOpcode(sw::Shader::OPCODE_MIN, result), result, arg[0], arg[1]); break;\r
1192                 case EOpMax:              if(visit == PostVisit) emit(getOpcode(sw::Shader::OPCODE_MAX, result), result, arg[0], arg[1]); break;\r
1193                 case EOpClamp:\r
1194                         if(visit == PostVisit)\r
1195                         {\r
1196                                 emit(getOpcode(sw::Shader::OPCODE_MAX, result), result, arg[0], arg[1]);\r
1197                                 emit(getOpcode(sw::Shader::OPCODE_MIN, result), result, result, arg[2]);\r
1198                         }\r
1199                         break;\r
1200                 case EOpMix:         if(visit == PostVisit) emit(sw::Shader::OPCODE_LRP, result, arg[2], arg[1], arg[0]); break;\r
1201                 case EOpStep:        if(visit == PostVisit) emit(sw::Shader::OPCODE_STEP, result, arg[0], arg[1]); break;\r
1202                 case EOpSmoothStep:  if(visit == PostVisit) emit(sw::Shader::OPCODE_SMOOTH, result, arg[0], arg[1], arg[2]); break;\r
1203                 case EOpDistance:    if(visit == PostVisit) emit(sw::Shader::OPCODE_DIST(dim(arg[0])), result, arg[0], arg[1]); break;\r
1204                 case EOpDot:         if(visit == PostVisit) emit(sw::Shader::OPCODE_DP(dim(arg[0])), result, arg[0], arg[1]); break;\r
1205                 case EOpCross:       if(visit == PostVisit) emit(sw::Shader::OPCODE_CRS, result, arg[0], arg[1]); break;\r
1206                 case EOpFaceForward: if(visit == PostVisit) emit(sw::Shader::OPCODE_FORWARD(dim(arg[0])), result, arg[0], arg[1], arg[2]); break;\r
1207                 case EOpReflect:     if(visit == PostVisit) emit(sw::Shader::OPCODE_REFLECT(dim(arg[0])), result, arg[0], arg[1]); break;\r
1208                 case EOpRefract:     if(visit == PostVisit) emit(sw::Shader::OPCODE_REFRACT(dim(arg[0])), result, arg[0], arg[1], arg[2]); break;\r
1209                 case EOpMul:\r
1210                         if(visit == PostVisit)\r
1211                         {\r
1212                                 ASSERT(dim2(arg[0]) == dim2(arg[1]));\r
1213 \r
1214                                 for(int i = 0; i < dim2(arg[0]); i++)\r
1215                                 {\r
1216                                         Instruction *mul = emit(sw::Shader::OPCODE_MUL, result, arg[0], arg[1]);\r
1217                                         mul->dst.index += i;\r
1218                                         argument(mul->src[0], arg[0], i);\r
1219                                         argument(mul->src[1], arg[1], i);\r
1220                                 }\r
1221                         }\r
1222                         break;\r
1223                 case EOpOuterProduct:\r
1224                         if(visit == PostVisit)\r
1225                         {\r
1226                                 for(int i = 0; i < dim(arg[1]); i++)\r
1227                                 {\r
1228                                         Instruction *mul = emit(sw::Shader::OPCODE_MUL, result, arg[0], arg[1]);\r
1229                                         mul->dst.index += i;\r
1230                                         mul->src[1].swizzle = 0x55 * i;\r
1231                                 }\r
1232                         }\r
1233                         break;\r
1234                 default: UNREACHABLE(node->getOp());\r
1235                 }\r
1236 \r
1237                 return true;\r
1238         }\r
1239 \r
1240         bool OutputASM::visitSelection(Visit visit, TIntermSelection *node)\r
1241         {\r
1242                 if(currentScope != emitScope)\r
1243                 {\r
1244                         return false;\r
1245                 }\r
1246 \r
1247                 TIntermTyped *condition = node->getCondition();\r
1248                 TIntermNode *trueBlock = node->getTrueBlock();\r
1249                 TIntermNode *falseBlock = node->getFalseBlock();\r
1250                 TIntermConstantUnion *constantCondition = condition->getAsConstantUnion();\r
1251 \r
1252                 condition->traverse(this);\r
1253 \r
1254                 if(node->usesTernaryOperator())\r
1255                 {\r
1256                         if(constantCondition)\r
1257                         {\r
1258                                 bool trueCondition = constantCondition->getUnionArrayPointer()->getBConst();\r
1259 \r
1260                                 if(trueCondition)\r
1261                                 {\r
1262                                         trueBlock->traverse(this);\r
1263                                         copy(node, trueBlock);\r
1264                                 }\r
1265                                 else\r
1266                                 {\r
1267                                         falseBlock->traverse(this);\r
1268                                         copy(node, falseBlock);\r
1269                                 }\r
1270                         }\r
1271                         else if(trivial(node, 6))   // Fast to compute both potential results and no side effects\r
1272                         {\r
1273                                 trueBlock->traverse(this);\r
1274                                 falseBlock->traverse(this);\r
1275                                 emit(sw::Shader::OPCODE_SELECT, node, condition, trueBlock, falseBlock);\r
1276                         }\r
1277                         else\r
1278                         {\r
1279                                 emit(sw::Shader::OPCODE_IF, 0, condition);\r
1280 \r
1281                                 if(trueBlock)\r
1282                                 {\r
1283                                         trueBlock->traverse(this);\r
1284                                         copy(node, trueBlock);\r
1285                                 }\r
1286 \r
1287                                 if(falseBlock)\r
1288                                 {\r
1289                                         emit(sw::Shader::OPCODE_ELSE);\r
1290                                         falseBlock->traverse(this);\r
1291                                         copy(node, falseBlock);\r
1292                                 }\r
1293 \r
1294                                 emit(sw::Shader::OPCODE_ENDIF);\r
1295                         }\r
1296                 }\r
1297                 else  // if/else statement\r
1298                 {\r
1299                         if(constantCondition)\r
1300                         {\r
1301                                 bool trueCondition = constantCondition->getUnionArrayPointer()->getBConst();\r
1302 \r
1303                                 if(trueCondition)\r
1304                                 {\r
1305                                         if(trueBlock)\r
1306                                         {\r
1307                                                 trueBlock->traverse(this);\r
1308                                         }\r
1309                                 }\r
1310                                 else\r
1311                                 {\r
1312                                         if(falseBlock)\r
1313                                         {\r
1314                                                 falseBlock->traverse(this);\r
1315                                         }\r
1316                                 }\r
1317                         }\r
1318                         else\r
1319                         {\r
1320                                 emit(sw::Shader::OPCODE_IF, 0, condition);\r
1321 \r
1322                                 if(trueBlock)\r
1323                                 {\r
1324                                         trueBlock->traverse(this);\r
1325                                 }\r
1326 \r
1327                                 if(falseBlock)\r
1328                                 {\r
1329                                         emit(sw::Shader::OPCODE_ELSE);\r
1330                                         falseBlock->traverse(this);\r
1331                                 }\r
1332 \r
1333                                 emit(sw::Shader::OPCODE_ENDIF);\r
1334                         }\r
1335                 }\r
1336 \r
1337                 return false;\r
1338         }\r
1339 \r
1340         bool OutputASM::visitLoop(Visit visit, TIntermLoop *node)\r
1341         {\r
1342                 if(currentScope != emitScope)\r
1343                 {\r
1344                         return false;\r
1345                 }\r
1346 \r
1347                 unsigned int iterations = loopCount(node);\r
1348 \r
1349                 if(iterations == 0)\r
1350                 {\r
1351                         return false;\r
1352                 }\r
1353 \r
1354                 bool unroll = (iterations <= 4);\r
1355 \r
1356                 if(unroll)\r
1357                 {\r
1358                         DetectLoopDiscontinuity detectLoopDiscontinuity;\r
1359                         unroll = !detectLoopDiscontinuity.traverse(node);\r
1360                 }\r
1361 \r
1362                 TIntermNode *init = node->getInit();\r
1363                 TIntermTyped *condition = node->getCondition();\r
1364                 TIntermTyped *expression = node->getExpression();\r
1365                 TIntermNode *body = node->getBody();\r
1366 \r
1367                 if(node->getType() == ELoopDoWhile)\r
1368                 {\r
1369                         Temporary iterate(this);\r
1370                         Constant True(true);\r
1371                         emit(sw::Shader::OPCODE_MOV, &iterate, &True);\r
1372 \r
1373                         emit(sw::Shader::OPCODE_WHILE, 0, &iterate);   // FIXME: Implement real do-while\r
1374 \r
1375                         if(body)\r
1376                         {\r
1377                                 body->traverse(this);\r
1378                         }\r
1379 \r
1380                         emit(sw::Shader::OPCODE_TEST);\r
1381 \r
1382                         condition->traverse(this);\r
1383                         emit(sw::Shader::OPCODE_MOV, &iterate, condition);\r
1384 \r
1385                         emit(sw::Shader::OPCODE_ENDWHILE);\r
1386                 }\r
1387                 else\r
1388                 {\r
1389                         if(init)\r
1390                         {\r
1391                                 init->traverse(this);\r
1392                         }\r
1393 \r
1394                         if(unroll)\r
1395                         {\r
1396                                 for(unsigned int i = 0; i < iterations; i++)\r
1397                                 {\r
1398                                 //      condition->traverse(this);   // Condition could contain statements, but not in an unrollable loop\r
1399 \r
1400                                         if(body)\r
1401                                         {\r
1402                                                 body->traverse(this);\r
1403                                         }\r
1404 \r
1405                                         if(expression)\r
1406                                         {\r
1407                                                 expression->traverse(this);\r
1408                                         }\r
1409                                 }\r
1410                         }\r
1411                         else\r
1412                         {\r
1413                                 if(condition)\r
1414                                 {\r
1415                                         condition->traverse(this);\r
1416                                 }\r
1417 \r
1418                                 emit(sw::Shader::OPCODE_WHILE, 0, condition);\r
1419 \r
1420                                 if(body)\r
1421                                 {\r
1422                                         body->traverse(this);\r
1423                                 }\r
1424 \r
1425                                 emit(sw::Shader::OPCODE_TEST);\r
1426 \r
1427                                 if(expression)\r
1428                                 {\r
1429                                         expression->traverse(this);\r
1430                                 }\r
1431 \r
1432                                 if(condition)\r
1433                                 {\r
1434                                         condition->traverse(this);\r
1435                                 }\r
1436 \r
1437                                 emit(sw::Shader::OPCODE_ENDWHILE);\r
1438                         }\r
1439                 }\r
1440 \r
1441                 return false;\r
1442         }\r
1443 \r
1444         bool OutputASM::visitBranch(Visit visit, TIntermBranch *node)\r
1445         {\r
1446                 if(currentScope != emitScope)\r
1447                 {\r
1448                         return false;\r
1449                 }\r
1450 \r
1451                 switch(node->getFlowOp())\r
1452                 {\r
1453                 case EOpKill:      if(visit == PostVisit) emit(sw::Shader::OPCODE_DISCARD);  break;\r
1454                 case EOpBreak:     if(visit == PostVisit) emit(sw::Shader::OPCODE_BREAK);    break;\r
1455                 case EOpContinue:  if(visit == PostVisit) emit(sw::Shader::OPCODE_CONTINUE); break;\r
1456                 case EOpReturn:\r
1457                         if(visit == PostVisit)\r
1458                         {\r
1459                                 TIntermTyped *value = node->getExpression();\r
1460 \r
1461                                 if(value)\r
1462                                 {\r
1463                                         copy(functionArray[currentFunction].ret, value);\r
1464                                 }\r
1465 \r
1466                                 emit(sw::Shader::OPCODE_LEAVE);\r
1467                         }\r
1468                         break;\r
1469                 default: UNREACHABLE(node->getFlowOp());\r
1470                 }\r
1471 \r
1472                 return true;\r
1473         }\r
1474 \r
1475         bool OutputASM::isSamplerRegister(TIntermTyped *operand)\r
1476         {\r
1477                 return operand && isSamplerRegister(operand->getType());\r
1478         }\r
1479 \r
1480         bool OutputASM::isSamplerRegister(const TType &type)\r
1481         {\r
1482                 // A sampler register's qualifiers can be:\r
1483                 // - EvqUniform: The sampler uniform is used as is in the code (default case).\r
1484                 // - EvqTemporary: The sampler is indexed. It's still a sampler register.\r
1485                 // - EvqIn (and other similar types): The sampler has been passed as a function argument. At this point,\r
1486                 //                                    the sampler has been copied and is no longer a sampler register.\r
1487                 return IsSampler(type.getBasicType()) && (type.getQualifier() == EvqUniform || type.getQualifier() == EvqTemporary);\r
1488         }\r
1489 \r
1490         Instruction *OutputASM::emit(sw::Shader::Opcode op, TIntermTyped *dst, TIntermNode *src0, TIntermNode *src1, TIntermNode *src2, int index)\r
1491         {\r
1492                 if(isSamplerRegister(dst))\r
1493                 {\r
1494                         op = sw::Shader::OPCODE_NULL;   // Can't assign to a sampler, but this is hit when indexing sampler arrays\r
1495                 }\r
1496 \r
1497                 Instruction *instruction = new Instruction(op);\r
1498 \r
1499                 if(dst)\r
1500                 {\r
1501                         instruction->dst.type = registerType(dst);\r
1502                         instruction->dst.index = registerIndex(dst) + index;\r
1503                         instruction->dst.mask = writeMask(dst);\r
1504                         instruction->dst.integer = (dst->getBasicType() == EbtInt);\r
1505                 }\r
1506 \r
1507                 argument(instruction->src[0], src0, index);\r
1508                 argument(instruction->src[1], src1, index);\r
1509                 argument(instruction->src[2], src2, index);\r
1510 \r
1511                 shader->append(instruction);\r
1512 \r
1513                 return instruction;\r
1514         }\r
1515 \r
1516         Instruction *OutputASM::emitCast(TIntermTyped *dst, TIntermTyped *src)\r
1517         {\r
1518                 switch(src->getBasicType())\r
1519                 {\r
1520                 case EbtBool:\r
1521                         switch(dst->getBasicType())\r
1522                         {\r
1523                         case EbtInt:   return emit(sw::Shader::OPCODE_B2I, dst, src);\r
1524                         case EbtUInt:  return emit(sw::Shader::OPCODE_B2U, dst, src);\r
1525                         case EbtFloat: return emit(sw::Shader::OPCODE_B2F, dst, src);\r
1526                         default:       break;\r
1527                         }\r
1528                         break;\r
1529                 case EbtInt:\r
1530                         switch(dst->getBasicType())\r
1531                         {\r
1532                         case EbtBool:  return emit(sw::Shader::OPCODE_I2B, dst, src);\r
1533                         case EbtFloat: return emit(sw::Shader::OPCODE_I2F, dst, src);\r
1534                         default:       break;\r
1535                         }\r
1536                         break;\r
1537                 case EbtUInt:\r
1538                         switch(dst->getBasicType())\r
1539                         {\r
1540                         case EbtBool:  return emit(sw::Shader::OPCODE_U2B, dst, src);\r
1541                         case EbtFloat: return emit(sw::Shader::OPCODE_U2F, dst, src);\r
1542                         default:       break;\r
1543                         }\r
1544                         break;\r
1545                 case EbtFloat:\r
1546                         switch(dst->getBasicType())\r
1547                         {\r
1548                         case EbtBool: return emit(sw::Shader::OPCODE_F2B, dst, src);\r
1549                         case EbtInt:  return emit(sw::Shader::OPCODE_F2I, dst, src);\r
1550                         case EbtUInt: return emit(sw::Shader::OPCODE_F2U, dst, src);\r
1551                         default:      break;\r
1552                         }\r
1553                         break;\r
1554                 default:\r
1555                         break;\r
1556                 }\r
1557 \r
1558                 return emit(sw::Shader::OPCODE_MOV, dst, src);\r
1559         }\r
1560 \r
1561         void OutputASM::emitBinary(sw::Shader::Opcode op, TIntermTyped *dst, TIntermNode *src0, TIntermNode *src1, TIntermNode *src2)\r
1562         {\r
1563                 for(int index = 0; index < dst->elementRegisterCount(); index++)\r
1564                 {\r
1565                         emit(op, dst, src0, src1, src2, index);\r
1566                 }\r
1567         }\r
1568 \r
1569         void OutputASM::emitAssign(sw::Shader::Opcode op, TIntermTyped *result, TIntermTyped *lhs, TIntermTyped *src0, TIntermTyped *src1)\r
1570         {\r
1571                 emitBinary(op, result, src0, src1);\r
1572                 assignLvalue(lhs, result);\r
1573         }\r
1574 \r
1575         void OutputASM::emitCmp(sw::Shader::Control cmpOp, TIntermTyped *dst, TIntermNode *left, TIntermNode *right, int index)\r
1576         {\r
1577                 sw::Shader::Opcode opcode;\r
1578                 switch(left->getAsTyped()->getBasicType())\r
1579                 {\r
1580                 case EbtBool:\r
1581                 case EbtInt:\r
1582                         opcode = sw::Shader::OPCODE_ICMP;\r
1583                         break;\r
1584                 case EbtUInt:\r
1585                         opcode = sw::Shader::OPCODE_UCMP;\r
1586                         break;\r
1587                 default:\r
1588                         opcode = sw::Shader::OPCODE_CMP;\r
1589                         break;\r
1590                 }\r
1591 \r
1592                 Instruction *cmp = emit(opcode, dst, left, right);\r
1593                 cmp->control = cmpOp;\r
1594                 argument(cmp->src[0], left, index);\r
1595                 argument(cmp->src[1], right, index);\r
1596         }\r
1597 \r
1598         int componentCount(const TType &type, int registers)\r
1599         {\r
1600                 if(registers == 0)\r
1601                 {\r
1602                         return 0;\r
1603                 }\r
1604 \r
1605                 if(type.isArray() && registers >= type.elementRegisterCount())\r
1606                 {\r
1607                         int index = registers / type.elementRegisterCount();\r
1608                         registers -= index * type.elementRegisterCount();\r
1609                         return index * type.getElementSize() + componentCount(type, registers);\r
1610                 }\r
1611 \r
1612                 if(type.isStruct() || type.isInterfaceBlock())\r
1613                 {\r
1614                         const TFieldList& fields = type.getStruct() ? type.getStruct()->fields() : type.getInterfaceBlock()->fields();\r
1615                         int elements = 0;\r
1616 \r
1617                         for(TFieldList::const_iterator field = fields.begin(); field != fields.end(); field++)\r
1618                         {\r
1619                                 const TType &fieldType = *((*field)->type());\r
1620 \r
1621                                 if(fieldType.totalRegisterCount() <= registers)\r
1622                                 {\r
1623                                         registers -= fieldType.totalRegisterCount();\r
1624                                         elements += fieldType.getObjectSize();\r
1625                                 }\r
1626                                 else   // Register within this field\r
1627                                 {\r
1628                                         return elements + componentCount(fieldType, registers);\r
1629                                 }\r
1630                         }\r
1631                 }\r
1632                 else if(type.isMatrix())\r
1633                 {\r
1634                         return registers * type.registerSize();\r
1635                 }\r
1636                 \r
1637                 UNREACHABLE(0);\r
1638                 return 0;\r
1639         }\r
1640 \r
1641         int registerSize(const TType &type, int registers)\r
1642         {\r
1643                 if(registers == 0)\r
1644                 {\r
1645                         if(type.isStruct())\r
1646                         {\r
1647                                 return registerSize(*((*(type.getStruct()->fields().begin()))->type()), 0);\r
1648                         }\r
1649 \r
1650                         return type.registerSize();\r
1651                 }\r
1652 \r
1653                 if(type.isArray() && registers >= type.elementRegisterCount())\r
1654                 {\r
1655                         int index = registers / type.elementRegisterCount();\r
1656                         registers -= index * type.elementRegisterCount();\r
1657                         return registerSize(type, registers);\r
1658                 }\r
1659 \r
1660                 if(type.isStruct() || type.isInterfaceBlock())\r
1661                 {\r
1662                         const TFieldList& fields = type.getStruct() ? type.getStruct()->fields() : type.getInterfaceBlock()->fields();\r
1663                         int elements = 0;\r
1664 \r
1665                         for(TFieldList::const_iterator field = fields.begin(); field != fields.end(); field++)\r
1666                         {\r
1667                                 const TType &fieldType = *((*field)->type());\r
1668                                 \r
1669                                 if(fieldType.totalRegisterCount() <= registers)\r
1670                                 {\r
1671                                         registers -= fieldType.totalRegisterCount();\r
1672                                         elements += fieldType.getObjectSize();\r
1673                                 }\r
1674                                 else   // Register within this field\r
1675                                 {\r
1676                                         return registerSize(fieldType, registers);\r
1677                                 }\r
1678                         }\r
1679                 }\r
1680                 else if(type.isMatrix())\r
1681                 {\r
1682                         return registerSize(type, 0);\r
1683                 }\r
1684                 \r
1685                 UNREACHABLE(0);\r
1686                 return 0;\r
1687         }\r
1688 \r
1689         void OutputASM::argument(sw::Shader::SourceParameter &parameter, TIntermNode *argument, int index)\r
1690         {\r
1691                 if(argument)\r
1692                 {\r
1693                         TIntermTyped *arg = argument->getAsTyped();\r
1694                         const TType &type = arg->getType();\r
1695                         index = (index >= arg->totalRegisterCount()) ? arg->totalRegisterCount() - 1 : index;\r
1696 \r
1697                         int size = registerSize(type, index);\r
1698 \r
1699                         parameter.type = registerType(arg);\r
1700 \r
1701                         if(arg->getQualifier() == EvqConstExpr)\r
1702                         {\r
1703                                 int component = componentCount(type, index);\r
1704                                 ConstantUnion *constants = arg->getAsConstantUnion()->getUnionArrayPointer();\r
1705 \r
1706                                 for(int i = 0; i < 4; i++)\r
1707                                 {\r
1708                                         if(size == 1)   // Replicate\r
1709                                         {\r
1710                                                 parameter.value[i] = constants[component + 0].getAsFloat();\r
1711                                         }\r
1712                                         else if(i < size)\r
1713                                         {\r
1714                                                 parameter.value[i] = constants[component + i].getAsFloat();\r
1715                                         }\r
1716                                         else\r
1717                                         {\r
1718                                                 parameter.value[i] = 0.0f;\r
1719                                         }\r
1720                                 }\r
1721                         }\r
1722                         else\r
1723                         {\r
1724                                 parameter.index = registerIndex(arg) + index;\r
1725 \r
1726                                 if(isSamplerRegister(arg))\r
1727                                 {\r
1728                                         TIntermBinary *binary = argument->getAsBinaryNode();\r
1729 \r
1730                                         if(binary)\r
1731                                         {\r
1732                                                 TIntermTyped *left = binary->getLeft();\r
1733                                                 TIntermTyped *right = binary->getRight();\r
1734 \r
1735                                                 switch(binary->getOp())\r
1736                                                 {\r
1737                                                 case EOpIndexDirect:\r
1738                                                         parameter.index += right->getAsConstantUnion()->getIConst(0);\r
1739                                                         break;\r
1740                                                 case EOpIndexIndirect:\r
1741                                                         if(left->getArraySize() > 1)\r
1742                                                         {\r
1743                                                                 parameter.rel.type = registerType(binary->getRight());\r
1744                                                                 parameter.rel.index = registerIndex(binary->getRight());\r
1745                                                                 parameter.rel.scale = 1;\r
1746                                                                 parameter.rel.deterministic = true;\r
1747                                                         }\r
1748                                                         break;\r
1749                                                 case EOpIndexDirectStruct:\r
1750                                                 case EOpIndexDirectInterfaceBlock:\r
1751                                                         parameter.index += right->getAsConstantUnion()->getIConst(0);\r
1752                                                         break;\r
1753                                                 default:\r
1754                                                         UNREACHABLE(binary->getOp());\r
1755                                                 }\r
1756                                         }\r
1757                                 }\r
1758                         }\r
1759 \r
1760                         if(!IsSampler(arg->getBasicType()))\r
1761                         {\r
1762                                 parameter.swizzle = readSwizzle(arg, size);\r
1763                         }\r
1764                 }\r
1765         }\r
1766 \r
1767         void OutputASM::copy(TIntermTyped *dst, TIntermNode *src, int offset)\r
1768         {\r
1769                 for(int index = 0; index < dst->totalRegisterCount(); index++)\r
1770                 {\r
1771                         Instruction *mov = emit(sw::Shader::OPCODE_MOV, dst, src);\r
1772                         mov->dst.index += index;\r
1773                         mov->dst.mask = writeMask(dst, index);\r
1774                         argument(mov->src[0], src, offset + index);\r
1775                 }\r
1776         }\r
1777 \r
1778         int swizzleElement(int swizzle, int index)\r
1779         {\r
1780                 return (swizzle >> (index * 2)) & 0x03;\r
1781         }\r
1782 \r
1783         int swizzleSwizzle(int leftSwizzle, int rightSwizzle)\r
1784         {\r
1785                 return (swizzleElement(leftSwizzle, swizzleElement(rightSwizzle, 0)) << 0) |\r
1786                        (swizzleElement(leftSwizzle, swizzleElement(rightSwizzle, 1)) << 2) |\r
1787                        (swizzleElement(leftSwizzle, swizzleElement(rightSwizzle, 2)) << 4) |\r
1788                        (swizzleElement(leftSwizzle, swizzleElement(rightSwizzle, 3)) << 6);\r
1789         }\r
1790 \r
1791         void OutputASM::assignLvalue(TIntermTyped *dst, TIntermTyped *src)\r
1792         {\r
1793                 if(src &&\r
1794                         ((src->isVector() && (!dst->isVector() || (dst->getNominalSize() != dst->getNominalSize()))) ||\r
1795                          (src->isMatrix() && (!dst->isMatrix() || (src->getNominalSize() != dst->getNominalSize()) || (src->getSecondarySize() != dst->getSecondarySize())))))\r
1796                 {\r
1797                         return mContext.error(src->getLine(), "Result type should match the l-value type in compound assignment", src->isVector() ? "vector" : "matrix");\r
1798                 }\r
1799 \r
1800                 TIntermBinary *binary = dst->getAsBinaryNode();\r
1801 \r
1802                 if(binary && binary->getOp() == EOpIndexIndirect && dst->isScalar())\r
1803                 {\r
1804                         Instruction *insert = new Instruction(sw::Shader::OPCODE_INSERT);\r
1805                         \r
1806                         Temporary address(this);\r
1807                         lvalue(insert->dst, address, dst);\r
1808 \r
1809                         insert->src[0].type = insert->dst.type;\r
1810                         insert->src[0].index = insert->dst.index;\r
1811                         insert->src[0].rel = insert->dst.rel;\r
1812                         argument(insert->src[1], src);\r
1813                         argument(insert->src[2], binary->getRight());\r
1814 \r
1815                         shader->append(insert);\r
1816                 }\r
1817                 else\r
1818                 {\r
1819                         for(int offset = 0; offset < dst->totalRegisterCount(); offset++)\r
1820                         {\r
1821                                 Instruction *mov = new Instruction(sw::Shader::OPCODE_MOV);\r
1822                         \r
1823                                 Temporary address(this);\r
1824                                 int swizzle = lvalue(mov->dst, address, dst);\r
1825                                 mov->dst.index += offset;\r
1826 \r
1827                                 if(offset > 0)\r
1828                                 {\r
1829                                         mov->dst.mask = writeMask(dst, offset);\r
1830                                 }\r
1831 \r
1832                                 argument(mov->src[0], src, offset);\r
1833                                 mov->src[0].swizzle = swizzleSwizzle(mov->src[0].swizzle, swizzle);\r
1834 \r
1835                                 shader->append(mov);\r
1836                         }\r
1837                 }\r
1838         }\r
1839 \r
1840         int OutputASM::lvalue(sw::Shader::DestinationParameter &dst, Temporary &address, TIntermTyped *node)\r
1841         {\r
1842                 TIntermTyped *result = node;\r
1843                 TIntermBinary *binary = node->getAsBinaryNode();\r
1844                 TIntermSymbol *symbol = node->getAsSymbolNode();\r
1845 \r
1846                 if(binary)\r
1847                 {\r
1848                         TIntermTyped *left = binary->getLeft();\r
1849                         TIntermTyped *right = binary->getRight();\r
1850 \r
1851                         int leftSwizzle = lvalue(dst, address, left);   // Resolve the l-value of the left side\r
1852 \r
1853                         switch(binary->getOp())\r
1854                         {\r
1855                         case EOpIndexDirect:\r
1856                                 {\r
1857                                         int rightIndex = right->getAsConstantUnion()->getIConst(0);\r
1858 \r
1859                                         if(left->isRegister())\r
1860                                         {\r
1861                                                 int leftMask = dst.mask;\r
1862                                                 \r
1863                                                 dst.mask = 1;\r
1864                                                 while((leftMask & dst.mask) == 0)\r
1865                                                 {\r
1866                                                         dst.mask = dst.mask << 1;\r
1867                                                 }\r
1868 \r
1869                                                 int element = swizzleElement(leftSwizzle, rightIndex);\r
1870                                                 dst.mask = 1 << element;\r
1871                                                 \r
1872                                                 return element;\r
1873                                         }\r
1874                                         else if(left->isArray() || left->isMatrix())\r
1875                                         {\r
1876                                                 dst.index += rightIndex * result->totalRegisterCount();\r
1877                                                 return 0xE4;\r
1878                                         }\r
1879                                         else UNREACHABLE(0);\r
1880                                 }\r
1881                                 break;\r
1882                         case EOpIndexIndirect:\r
1883                                 {\r
1884                                         if(left->isRegister())\r
1885                                         {\r
1886                                                 // Requires INSERT instruction (handled by calling function)\r
1887                                         }\r
1888                                         else if(left->isArray() || left->isMatrix())\r
1889                                         {\r
1890                                                 int scale = result->totalRegisterCount();\r
1891 \r
1892                                                 if(dst.rel.type == sw::Shader::PARAMETER_VOID)   // Use the index register as the relative address directly\r
1893                                                 {\r
1894                                                         if(left->totalRegisterCount() > 1)\r
1895                                                         {\r
1896                                                                 sw::Shader::SourceParameter relativeRegister;\r
1897                                                                 argument(relativeRegister, right);\r
1898 \r
1899                                                                 dst.rel.index = relativeRegister.index;\r
1900                                                                 dst.rel.type = relativeRegister.type;\r
1901                                                                 dst.rel.scale = scale;\r
1902                                                                 dst.rel.deterministic = !(vertexShader && left->getQualifier() == EvqUniform);\r
1903                                                         }\r
1904                                                 }\r
1905                                                 else if(dst.rel.index != registerIndex(&address))   // Move the previous index register to the address register\r
1906                                                 {\r
1907                                                         if(scale == 1)\r
1908                                                         {\r
1909                                                                 Constant oldScale((int)dst.rel.scale);\r
1910                                                                 Instruction *mad = emit(sw::Shader::OPCODE_IMAD, &address, &address, &oldScale, right);\r
1911                                                                 mad->src[0].index = dst.rel.index;\r
1912                                                                 mad->src[0].type = dst.rel.type;\r
1913                                                         }\r
1914                                                         else\r
1915                                                         {\r
1916                                                                 Constant oldScale((int)dst.rel.scale);\r
1917                                                                 Instruction *mul = emit(sw::Shader::OPCODE_IMUL, &address, &address, &oldScale);\r
1918                                                                 mul->src[0].index = dst.rel.index;\r
1919                                                                 mul->src[0].type = dst.rel.type;\r
1920 \r
1921                                                                 Constant newScale(scale);\r
1922                                                                 emit(sw::Shader::OPCODE_IMAD, &address, right, &newScale, &address);\r
1923                                                         }\r
1924 \r
1925                                                         dst.rel.type = sw::Shader::PARAMETER_TEMP;\r
1926                                                         dst.rel.index = registerIndex(&address);\r
1927                                                         dst.rel.scale = 1;\r
1928                                                 }\r
1929                                                 else   // Just add the new index to the address register\r
1930                                                 {\r
1931                                                         if(scale == 1)\r
1932                                                         {\r
1933                                                                 emit(sw::Shader::OPCODE_IADD, &address, &address, right);\r
1934                                                         }\r
1935                                                         else\r
1936                                                         {\r
1937                                                                 Constant newScale(scale);\r
1938                                                                 emit(sw::Shader::OPCODE_IMAD, &address, right, &newScale, &address);\r
1939                                                         }\r
1940                                                 }\r
1941                                         }\r
1942                                         else UNREACHABLE(0);\r
1943                                 }\r
1944                                 break;\r
1945                         case EOpIndexDirectStruct:\r
1946                         case EOpIndexDirectInterfaceBlock:\r
1947                                 {\r
1948                                         const TFieldList& fields = (binary->getOp() == EOpIndexDirectStruct) ?\r
1949                                                                left->getType().getStruct()->fields() :\r
1950                                                                left->getType().getInterfaceBlock()->fields();\r
1951                                         int index = right->getAsConstantUnion()->getIConst(0);\r
1952                                         int fieldOffset = 0;\r
1953 \r
1954                                         for(int i = 0; i < index; i++)\r
1955                                         {\r
1956                                                 fieldOffset += fields[i]->type()->totalRegisterCount();\r
1957                                         }\r
1958 \r
1959                                         dst.type = registerType(left);\r
1960                                         dst.index += fieldOffset;\r
1961                                         dst.mask = writeMask(right);\r
1962 \r
1963                                         return 0xE4;\r
1964                                 }\r
1965                                 break;\r
1966                         case EOpVectorSwizzle:\r
1967                                 {\r
1968                                         ASSERT(left->isRegister());\r
1969 \r
1970                                         int leftMask = dst.mask;\r
1971 \r
1972                                         int swizzle = 0;\r
1973                                         int rightMask = 0;\r
1974 \r
1975                                         TIntermSequence &sequence = right->getAsAggregate()->getSequence();\r
1976 \r
1977                                         for(unsigned int i = 0; i < sequence.size(); i++)\r
1978                                         {\r
1979                                                 int index = sequence[i]->getAsConstantUnion()->getIConst(0);\r
1980 \r
1981                                                 int element = swizzleElement(leftSwizzle, index);\r
1982                                                 rightMask = rightMask | (1 << element);\r
1983                                                 swizzle = swizzle | swizzleElement(leftSwizzle, i) << (element * 2);\r
1984                                         }\r
1985                                         \r
1986                                         dst.mask = leftMask & rightMask;\r
1987 \r
1988                                         return swizzle;\r
1989                                 }\r
1990                                 break;\r
1991                         default:\r
1992                                 UNREACHABLE(binary->getOp());   // Not an l-value operator\r
1993                                 break;\r
1994                         }\r
1995                 }\r
1996                 else if(symbol)\r
1997                 {\r
1998                         dst.type = registerType(symbol);\r
1999                         dst.index = registerIndex(symbol);\r
2000                         dst.mask = writeMask(symbol);\r
2001                         return 0xE4;\r
2002                 }\r
2003 \r
2004                 return 0xE4;\r
2005         }\r
2006 \r
2007         sw::Shader::ParameterType OutputASM::registerType(TIntermTyped *operand)\r
2008         {\r
2009                 if(isSamplerRegister(operand))\r
2010                 {\r
2011                         return sw::Shader::PARAMETER_SAMPLER;\r
2012                 }\r
2013 \r
2014                 const TQualifier qualifier = operand->getQualifier();\r
2015                 if((EvqFragColor == qualifier) || (EvqFragData == qualifier))\r
2016                 {\r
2017                         if(((EvqFragData == qualifier) && (EvqFragColor == outputQualifier)) ||\r
2018                            ((EvqFragColor == qualifier) && (EvqFragData == outputQualifier)))\r
2019                         {\r
2020                                 mContext.error(operand->getLine(), "static assignment to both gl_FragData and gl_FragColor", "");\r
2021                         }\r
2022                         outputQualifier = qualifier;\r
2023                 }\r
2024 \r
2025                 switch(qualifier)\r
2026                 {\r
2027                 case EvqTemporary:           return sw::Shader::PARAMETER_TEMP;\r
2028                 case EvqGlobal:              return sw::Shader::PARAMETER_TEMP;\r
2029                 case EvqConstExpr:           return sw::Shader::PARAMETER_FLOAT4LITERAL;   // All converted to float\r
2030                 case EvqAttribute:           return sw::Shader::PARAMETER_INPUT;\r
2031                 case EvqVaryingIn:           return sw::Shader::PARAMETER_INPUT;\r
2032                 case EvqVaryingOut:          return sw::Shader::PARAMETER_OUTPUT;\r
2033                 case EvqVertexIn:            return sw::Shader::PARAMETER_INPUT;\r
2034                 case EvqFragmentOut:         return sw::Shader::PARAMETER_COLOROUT;\r
2035                 case EvqVertexOut:           return sw::Shader::PARAMETER_OUTPUT;\r
2036                 case EvqFragmentIn:          return sw::Shader::PARAMETER_INPUT;\r
2037                 case EvqInvariantVaryingIn:  return sw::Shader::PARAMETER_INPUT;    // FIXME: Guarantee invariance at the backend\r
2038                 case EvqInvariantVaryingOut: return sw::Shader::PARAMETER_OUTPUT;   // FIXME: Guarantee invariance at the backend \r
2039                 case EvqSmooth:              return sw::Shader::PARAMETER_OUTPUT;\r
2040                 case EvqFlat:                return sw::Shader::PARAMETER_OUTPUT;\r
2041                 case EvqCentroidOut:         return sw::Shader::PARAMETER_OUTPUT;\r
2042                 case EvqSmoothIn:            return sw::Shader::PARAMETER_INPUT;\r
2043                 case EvqFlatIn:              return sw::Shader::PARAMETER_INPUT;\r
2044                 case EvqCentroidIn:          return sw::Shader::PARAMETER_INPUT;\r
2045                 case EvqUniform:             return sw::Shader::PARAMETER_CONST;\r
2046                 case EvqIn:                  return sw::Shader::PARAMETER_TEMP;\r
2047                 case EvqOut:                 return sw::Shader::PARAMETER_TEMP;\r
2048                 case EvqInOut:               return sw::Shader::PARAMETER_TEMP;\r
2049                 case EvqConstReadOnly:       return sw::Shader::PARAMETER_TEMP;\r
2050                 case EvqPosition:            return sw::Shader::PARAMETER_OUTPUT;\r
2051                 case EvqPointSize:           return sw::Shader::PARAMETER_OUTPUT;\r
2052                 case EvqInstanceID:          return sw::Shader::PARAMETER_MISCTYPE;\r
2053                 case EvqFragCoord:           return sw::Shader::PARAMETER_MISCTYPE;\r
2054                 case EvqFrontFacing:         return sw::Shader::PARAMETER_MISCTYPE;\r
2055                 case EvqPointCoord:          return sw::Shader::PARAMETER_INPUT;\r
2056                 case EvqFragColor:           return sw::Shader::PARAMETER_COLOROUT;\r
2057                 case EvqFragData:            return sw::Shader::PARAMETER_COLOROUT;\r
2058                 case EvqFragDepth:           return sw::Shader::PARAMETER_DEPTHOUT;\r
2059                 default: UNREACHABLE(qualifier);\r
2060                 }\r
2061 \r
2062                 return sw::Shader::PARAMETER_VOID;\r
2063         }\r
2064 \r
2065         int OutputASM::registerIndex(TIntermTyped *operand)\r
2066         {\r
2067                 if(isSamplerRegister(operand))\r
2068                 {\r
2069                         return samplerRegister(operand);\r
2070                 }\r
2071 \r
2072                 switch(operand->getQualifier())\r
2073                 {\r
2074                 case EvqTemporary:           return temporaryRegister(operand);\r
2075                 case EvqGlobal:              return temporaryRegister(operand);\r
2076                 case EvqConstExpr:           UNREACHABLE(EvqConstExpr);\r
2077                 case EvqAttribute:           return attributeRegister(operand);\r
2078                 case EvqVaryingIn:           return varyingRegister(operand);\r
2079                 case EvqVaryingOut:          return varyingRegister(operand);\r
2080                 case EvqVertexIn:            return attributeRegister(operand);\r
2081                 case EvqFragmentOut:         return 0;\r
2082                 case EvqVertexOut:           return varyingRegister(operand);\r
2083                 case EvqFragmentIn:          return varyingRegister(operand);\r
2084                 case EvqInvariantVaryingIn:  return varyingRegister(operand);\r
2085                 case EvqInvariantVaryingOut: return varyingRegister(operand);\r
2086                 case EvqSmooth:              return varyingRegister(operand);\r
2087                 case EvqFlat:                return varyingRegister(operand);\r
2088                 case EvqCentroidOut:         return varyingRegister(operand);\r
2089                 case EvqSmoothIn:            return varyingRegister(operand);\r
2090                 case EvqFlatIn:              return varyingRegister(operand);\r
2091                 case EvqCentroidIn:          return varyingRegister(operand);\r
2092                 case EvqUniform:             return uniformRegister(operand);\r
2093                 case EvqIn:                  return temporaryRegister(operand);\r
2094                 case EvqOut:                 return temporaryRegister(operand);\r
2095                 case EvqInOut:               return temporaryRegister(operand);\r
2096                 case EvqConstReadOnly:       return temporaryRegister(operand);\r
2097                 case EvqPosition:            return varyingRegister(operand);\r
2098                 case EvqPointSize:           return varyingRegister(operand);\r
2099                 case EvqInstanceID:          vertexShader->instanceIdDeclared = true; return 0;\r
2100                 case EvqFragCoord:           pixelShader->vPosDeclared = true;  return 0;\r
2101                 case EvqFrontFacing:         pixelShader->vFaceDeclared = true; return 1;\r
2102                 case EvqPointCoord:          return varyingRegister(operand);\r
2103                 case EvqFragColor:           return 0;\r
2104                 case EvqFragData:            return 0;\r
2105                 case EvqFragDepth:           return 0;\r
2106                 default: UNREACHABLE(operand->getQualifier());\r
2107                 }\r
2108 \r
2109                 return 0;\r
2110         }\r
2111 \r
2112         int OutputASM::writeMask(TIntermTyped *destination, int index)\r
2113         {\r
2114                 if(destination->getQualifier() == EvqPointSize)\r
2115                 {\r
2116                         return 0x2;   // Point size stored in the y component\r
2117                 }\r
2118 \r
2119                 return 0xF >> (4 - registerSize(destination->getType(), index));\r
2120         }\r
2121 \r
2122         int OutputASM::readSwizzle(TIntermTyped *argument, int size)\r
2123         {\r
2124                 if(argument->getQualifier() == EvqPointSize)\r
2125                 {\r
2126                         return 0x55;   // Point size stored in the y component\r
2127                 }\r
2128 \r
2129                 static const unsigned char swizzleSize[5] = {0x00, 0x00, 0x54, 0xA4, 0xE4};   // (void), xxxx, xyyy, xyzz, xyzw\r
2130 \r
2131                 return swizzleSize[size];\r
2132         }\r
2133 \r
2134         // Conservatively checks whether an expression is fast to compute and has no side effects\r
2135         bool OutputASM::trivial(TIntermTyped *expression, int budget)\r
2136         {\r
2137                 if(!expression->isRegister())\r
2138                 {\r
2139                         return false;\r
2140                 }\r
2141 \r
2142                 return cost(expression, budget) >= 0;\r
2143         }\r
2144 \r
2145         // Returns the remaining computing budget (if < 0 the expression is too expensive or has side effects)\r
2146         int OutputASM::cost(TIntermNode *expression, int budget)\r
2147         {\r
2148                 if(budget < 0)\r
2149                 {\r
2150                         return budget;\r
2151                 }\r
2152 \r
2153                 if(expression->getAsSymbolNode())\r
2154                 {\r
2155                         return budget;\r
2156                 }\r
2157                 else if(expression->getAsConstantUnion())\r
2158                 {\r
2159                         return budget;\r
2160                 }\r
2161                 else if(expression->getAsBinaryNode())\r
2162                 {\r
2163                         TIntermBinary *binary = expression->getAsBinaryNode();\r
2164 \r
2165                         switch(binary->getOp())\r
2166                         {\r
2167                         case EOpVectorSwizzle:\r
2168                         case EOpIndexDirect:\r
2169                         case EOpIndexDirectStruct:\r
2170                         case EOpIndexDirectInterfaceBlock:\r
2171                                 return cost(binary->getLeft(), budget - 0);\r
2172                         case EOpAdd:\r
2173                         case EOpSub:\r
2174                         case EOpMul:\r
2175                                 return cost(binary->getLeft(), cost(binary->getRight(), budget - 1));\r
2176                         default:\r
2177                                 return -1;\r
2178                         }\r
2179                 }\r
2180                 else if(expression->getAsUnaryNode())\r
2181                 {\r
2182                         TIntermUnary *unary = expression->getAsUnaryNode();\r
2183 \r
2184                         switch(unary->getOp())\r
2185                         {\r
2186                         case EOpAbs:\r
2187                         case EOpNegative:\r
2188                                 return cost(unary->getOperand(), budget - 1);\r
2189                         default:\r
2190                                 return -1;\r
2191                         }\r
2192                 }\r
2193                 else if(expression->getAsSelectionNode())\r
2194                 {\r
2195                         TIntermSelection *selection = expression->getAsSelectionNode();\r
2196 \r
2197                         if(selection->usesTernaryOperator())\r
2198                         {\r
2199                                 TIntermTyped *condition = selection->getCondition();\r
2200                                 TIntermNode *trueBlock = selection->getTrueBlock();\r
2201                                 TIntermNode *falseBlock = selection->getFalseBlock();\r
2202                                 TIntermConstantUnion *constantCondition = condition->getAsConstantUnion();\r
2203 \r
2204                                 if(constantCondition)\r
2205                                 {\r
2206                                         bool trueCondition = constantCondition->getUnionArrayPointer()->getBConst();\r
2207 \r
2208                                         if(trueCondition)\r
2209                                         {\r
2210                                                 return cost(trueBlock, budget - 0);\r
2211                                         }\r
2212                                         else\r
2213                                         {\r
2214                                                 return cost(falseBlock, budget - 0);\r
2215                                         }\r
2216                                 }\r
2217                                 else\r
2218                                 {\r
2219                                         return cost(trueBlock, cost(falseBlock, budget - 2));\r
2220                                 }\r
2221                         }\r
2222                 }\r
2223 \r
2224                 return -1;\r
2225         }\r
2226 \r
2227         const Function *OutputASM::findFunction(const TString &name)\r
2228         {\r
2229                 for(unsigned int f = 0; f < functionArray.size(); f++)\r
2230                 {\r
2231                         if(functionArray[f].name == name)\r
2232                         {\r
2233                                 return &functionArray[f];\r
2234                         }\r
2235                 }\r
2236 \r
2237                 return 0;\r
2238         }\r
2239         \r
2240         int OutputASM::temporaryRegister(TIntermTyped *temporary)\r
2241         {\r
2242                 return allocate(temporaries, temporary);\r
2243         }\r
2244 \r
2245         int OutputASM::varyingRegister(TIntermTyped *varying)\r
2246         {\r
2247                 int var = lookup(varyings, varying);\r
2248 \r
2249                 if(var == -1)\r
2250                 {\r
2251                         var = allocate(varyings, varying);\r
2252                         int componentCount = varying->registerSize();\r
2253                         int registerCount = varying->totalRegisterCount();\r
2254 \r
2255                         if(pixelShader)\r
2256                         {\r
2257                                 if((var + registerCount) > sw::PixelShader::MAX_INPUT_VARYINGS)\r
2258                                 {\r
2259                                         mContext.error(varying->getLine(), "Varyings packing failed: Too many varyings", "fragment shader");\r
2260                                         return 0;\r
2261                                 }\r
2262 \r
2263                                 if(varying->getQualifier() == EvqPointCoord)\r
2264                                 {\r
2265                                         ASSERT(varying->isRegister());\r
2266                                         if(componentCount >= 1) pixelShader->semantic[var][0] = sw::Shader::Semantic(sw::Shader::USAGE_TEXCOORD, var);\r
2267                                         if(componentCount >= 2) pixelShader->semantic[var][1] = sw::Shader::Semantic(sw::Shader::USAGE_TEXCOORD, var);\r
2268                                         if(componentCount >= 3) pixelShader->semantic[var][2] = sw::Shader::Semantic(sw::Shader::USAGE_TEXCOORD, var);\r
2269                                         if(componentCount >= 4) pixelShader->semantic[var][3] = sw::Shader::Semantic(sw::Shader::USAGE_TEXCOORD, var);\r
2270                                 }\r
2271                                 else\r
2272                                 {\r
2273                                         for(int i = 0; i < varying->totalRegisterCount(); i++)\r
2274                                         {\r
2275                                                 if(componentCount >= 1) pixelShader->semantic[var + i][0] = sw::Shader::Semantic(sw::Shader::USAGE_COLOR, var + i);\r
2276                                                 if(componentCount >= 2) pixelShader->semantic[var + i][1] = sw::Shader::Semantic(sw::Shader::USAGE_COLOR, var + i);\r
2277                                                 if(componentCount >= 3) pixelShader->semantic[var + i][2] = sw::Shader::Semantic(sw::Shader::USAGE_COLOR, var + i);\r
2278                                                 if(componentCount >= 4) pixelShader->semantic[var + i][3] = sw::Shader::Semantic(sw::Shader::USAGE_COLOR, var + i);\r
2279                                         }\r
2280                                 }\r
2281                         }\r
2282                         else if(vertexShader)\r
2283                         {\r
2284                                 if((var + registerCount) > sw::VertexShader::MAX_OUTPUT_VARYINGS)\r
2285                                 {\r
2286                                         mContext.error(varying->getLine(), "Varyings packing failed: Too many varyings", "vertex shader");\r
2287                                         return 0;\r
2288                                 }\r
2289 \r
2290                                 if(varying->getQualifier() == EvqPosition)\r
2291                                 {\r
2292                                         ASSERT(varying->isRegister());\r
2293                                         vertexShader->output[var][0] = sw::Shader::Semantic(sw::Shader::USAGE_POSITION, 0);\r
2294                                         vertexShader->output[var][1] = sw::Shader::Semantic(sw::Shader::USAGE_POSITION, 0);\r
2295                                         vertexShader->output[var][2] = sw::Shader::Semantic(sw::Shader::USAGE_POSITION, 0);\r
2296                                         vertexShader->output[var][3] = sw::Shader::Semantic(sw::Shader::USAGE_POSITION, 0);\r
2297                                         vertexShader->positionRegister = var;\r
2298                                 }\r
2299                                 else if(varying->getQualifier() == EvqPointSize)\r
2300                                 {\r
2301                                         ASSERT(varying->isRegister());\r
2302                                         vertexShader->output[var][0] = sw::Shader::Semantic(sw::Shader::USAGE_PSIZE, 0);\r
2303                                         vertexShader->output[var][1] = sw::Shader::Semantic(sw::Shader::USAGE_PSIZE, 0);\r
2304                                         vertexShader->output[var][2] = sw::Shader::Semantic(sw::Shader::USAGE_PSIZE, 0);\r
2305                                         vertexShader->output[var][3] = sw::Shader::Semantic(sw::Shader::USAGE_PSIZE, 0);\r
2306                                         vertexShader->pointSizeRegister = var;\r
2307                                 }\r
2308                                 else\r
2309                                 {\r
2310                                         // Semantic indexes for user varyings will be assigned during program link to match the pixel shader\r
2311                                 }\r
2312                         }\r
2313                         else UNREACHABLE(0);\r
2314 \r
2315                         declareVarying(varying, var);\r
2316                 }\r
2317 \r
2318                 return var;\r
2319         }\r
2320 \r
2321         void OutputASM::declareVarying(TIntermTyped *varying, int reg)\r
2322         {\r
2323                 if(varying->getQualifier() != EvqPointCoord)   // gl_PointCoord does not need linking\r
2324                 {\r
2325                         const TType &type = varying->getType();\r
2326                         const char *name = varying->getAsSymbolNode()->getSymbol().c_str();\r
2327                         VaryingList &activeVaryings = shaderObject->varyings;\r
2328                         \r
2329                         // Check if this varying has been declared before without having a register assigned\r
2330                         for(VaryingList::iterator v = activeVaryings.begin(); v != activeVaryings.end(); v++)\r
2331                         {\r
2332                                 if(v->name == name)\r
2333                                 {\r
2334                                         if(reg >= 0)\r
2335                                         {\r
2336                                                 ASSERT(v->reg < 0 || v->reg == reg);\r
2337                                                 v->reg = reg;\r
2338                                         }\r
2339 \r
2340                                         return;\r
2341                                 }\r
2342                         }\r
2343                         \r
2344                         activeVaryings.push_back(glsl::Varying(glVariableType(type), name, varying->getArraySize(), reg, 0));\r
2345                 }\r
2346         }\r
2347 \r
2348         int OutputASM::uniformRegister(TIntermTyped *uniform)\r
2349         {\r
2350                 const TType &type = uniform->getType();\r
2351                 ASSERT(!IsSampler(type.getBasicType()));\r
2352                 TInterfaceBlock *block = type.getAsInterfaceBlock();\r
2353                 TIntermSymbol *symbol = uniform->getAsSymbolNode();\r
2354                 ASSERT(symbol || block);\r
2355 \r
2356                 if(symbol || block)\r
2357                 {\r
2358                         int index = lookup(uniforms, uniform);\r
2359 \r
2360                         if(index == -1)\r
2361                         {\r
2362                                 index = allocate(uniforms, uniform);\r
2363                                 const TString &name = symbol ? symbol->getSymbol() : block->name();\r
2364 \r
2365                                 declareUniform(type, name, index);\r
2366                         }\r
2367 \r
2368                         return index;\r
2369                 }\r
2370 \r
2371                 return 0;\r
2372         }\r
2373 \r
2374         int OutputASM::attributeRegister(TIntermTyped *attribute)\r
2375         {\r
2376                 ASSERT(!attribute->isArray());\r
2377 \r
2378                 int index = lookup(attributes, attribute);\r
2379 \r
2380                 if(index == -1)\r
2381                 {\r
2382                         TIntermSymbol *symbol = attribute->getAsSymbolNode();\r
2383                         ASSERT(symbol);\r
2384 \r
2385                         if(symbol)\r
2386                         {\r
2387                                 index = allocate(attributes, attribute);\r
2388                                 const TType &type = attribute->getType();\r
2389                                 int registerCount = attribute->totalRegisterCount();\r
2390 \r
2391                                 if(vertexShader && (index + registerCount) <= sw::VertexShader::MAX_INPUT_ATTRIBUTES)\r
2392                                 {\r
2393                                         for(int i = 0; i < registerCount; i++)\r
2394                                         {\r
2395                                                 vertexShader->input[index + i] = sw::Shader::Semantic(sw::Shader::USAGE_TEXCOORD, index + i);\r
2396                                         }\r
2397                                 }\r
2398 \r
2399                                 ActiveAttributes &activeAttributes = shaderObject->activeAttributes;\r
2400 \r
2401                                 const char *name = symbol->getSymbol().c_str();\r
2402                                 activeAttributes.push_back(Attribute(glVariableType(type), name, type.getArraySize(), type.getLayoutQualifier().location, index));\r
2403                         }\r
2404                 }\r
2405 \r
2406                 return index;\r
2407         }\r
2408 \r
2409         int OutputASM::samplerRegister(TIntermTyped *sampler)\r
2410         {\r
2411                 ASSERT(IsSampler(sampler->getType().getBasicType()));\r
2412                 TIntermSymbol *symbol = sampler->getAsSymbolNode();\r
2413                 TIntermBinary *binary = sampler->getAsBinaryNode();\r
2414 \r
2415                 if(symbol)\r
2416                 {\r
2417                         return samplerRegister(symbol);\r
2418                 }\r
2419                 else if(binary)\r
2420                 {\r
2421                         ASSERT(binary->getOp() == EOpIndexDirect || binary->getOp() == EOpIndexIndirect ||\r
2422                                    binary->getOp() == EOpIndexDirectStruct || binary->getOp() == EOpIndexDirectInterfaceBlock);\r
2423 \r
2424                         return samplerRegister(binary->getLeft());   // Index added later\r
2425                 }\r
2426                 else UNREACHABLE(0);\r
2427 \r
2428                 return 0;\r
2429         }\r
2430 \r
2431         int OutputASM::samplerRegister(TIntermSymbol *sampler)\r
2432         {\r
2433                 const TType &type = sampler->getType();\r
2434                 ASSERT(IsSampler(type.getBasicType()) || type.getStruct());   // Structures can contain samplers\r
2435 \r
2436                 int index = lookup(samplers, sampler);\r
2437 \r
2438                 if(index == -1)\r
2439                 {\r
2440                         index = allocate(samplers, sampler);\r
2441 \r
2442                         if(sampler->getQualifier() == EvqUniform)\r
2443                         {\r
2444                                 const char *name = sampler->getSymbol().c_str();\r
2445                                 declareUniform(type, name, index);\r
2446                         }\r
2447                 }\r
2448 \r
2449                 return index;\r
2450         }\r
2451 \r
2452         int OutputASM::lookup(VariableArray &list, TIntermTyped *variable)\r
2453         {\r
2454                 for(unsigned int i = 0; i < list.size(); i++)\r
2455                 {\r
2456                         if(list[i] == variable)\r
2457                         {\r
2458                                 return i;   // Pointer match\r
2459                         }\r
2460                 }\r
2461 \r
2462                 TIntermSymbol *varSymbol = variable->getAsSymbolNode();\r
2463                 TInterfaceBlock *varBlock = variable->getType().getAsInterfaceBlock();\r
2464 \r
2465                 if(varSymbol)\r
2466                 {\r
2467                         for(unsigned int i = 0; i < list.size(); i++)\r
2468                         {\r
2469                                 if(list[i])\r
2470                                 {\r
2471                                         TIntermSymbol *listSymbol = list[i]->getAsSymbolNode();\r
2472 \r
2473                                         if(listSymbol)\r
2474                                         {\r
2475                                                 if(listSymbol->getId() == varSymbol->getId())\r
2476                                                 {\r
2477                                                         ASSERT(listSymbol->getSymbol() == varSymbol->getSymbol());\r
2478                                                         ASSERT(listSymbol->getType() == varSymbol->getType());\r
2479                                                         ASSERT(listSymbol->getQualifier() == varSymbol->getQualifier());\r
2480 \r
2481                                                         return i;\r
2482                                                 }\r
2483                                         }\r
2484                                 }\r
2485                         }\r
2486                 }\r
2487                 else if(varBlock)\r
2488                 {\r
2489                         for(unsigned int i = 0; i < list.size(); i++)\r
2490                         {\r
2491                                 if(list[i])\r
2492                                 {\r
2493                                         TInterfaceBlock *listBlock = list[i]->getType().getAsInterfaceBlock();\r
2494 \r
2495                                         if(listBlock)\r
2496                                         {\r
2497                                                 if(listBlock->name() == varBlock->name())\r
2498                                                 {\r
2499                                                         ASSERT(listBlock->arraySize() == varBlock->arraySize());\r
2500                                                         ASSERT(listBlock->fields() == varBlock->fields());\r
2501                                                         ASSERT(listBlock->blockStorage() == varBlock->blockStorage());\r
2502                                                         ASSERT(listBlock->matrixPacking() == varBlock->matrixPacking());\r
2503 \r
2504                                                         return i;\r
2505                                                 }\r
2506                                         }\r
2507                                 }\r
2508                         }\r
2509                 }\r
2510 \r
2511                 return -1;\r
2512         }\r
2513 \r
2514         int OutputASM::allocate(VariableArray &list, TIntermTyped *variable)\r
2515         {\r
2516                 int index = lookup(list, variable);\r
2517 \r
2518                 if(index == -1)\r
2519                 {\r
2520                         unsigned int registerCount = variable->totalRegisterCount();\r
2521 \r
2522                         for(unsigned int i = 0; i < list.size(); i++)\r
2523                         {\r
2524                                 if(list[i] == 0)\r
2525                                 {\r
2526                                         unsigned int j = 1;\r
2527                                         for( ; j < registerCount && (i + j) < list.size(); j++)\r
2528                                         {\r
2529                                                 if(list[i + j] != 0)\r
2530                                                 {\r
2531                                                         break;\r
2532                                                 }\r
2533                                         }\r
2534 \r
2535                                         if(j == registerCount)   // Found free slots\r
2536                                         {\r
2537                                                 for(unsigned int j = 0; j < registerCount; j++)\r
2538                                                 {\r
2539                                                         list[i + j] = variable;\r
2540                                                 }\r
2541 \r
2542                                                 return i;\r
2543                                         }\r
2544                                 }\r
2545                         }\r
2546 \r
2547                         index = list.size();\r
2548 \r
2549                         for(unsigned int i = 0; i < registerCount; i++)\r
2550                         {\r
2551                                 list.push_back(variable);\r
2552                         }\r
2553                 }\r
2554 \r
2555                 return index;\r
2556         }\r
2557 \r
2558         void OutputASM::free(VariableArray &list, TIntermTyped *variable)\r
2559         {\r
2560                 int index = lookup(list, variable);\r
2561 \r
2562                 if(index >= 0)\r
2563                 {\r
2564                         list[index] = 0;\r
2565                 }\r
2566         }\r
2567 \r
2568         void OutputASM::declareUniform(const TType &type, const TString &name, int registerIndex, int offset, int blockId)\r
2569         {\r
2570                 const TStructure *structure = type.getStruct();\r
2571                 const TInterfaceBlock *block = (type.isInterfaceBlock() || (blockId == -1)) ? type.getInterfaceBlock() : nullptr;\r
2572                 ActiveUniforms &activeUniforms = shaderObject->activeUniforms;\r
2573 \r
2574                 if(block)\r
2575                 {\r
2576                         ActiveUniformBlocks &activeUniformBlocks = shaderObject->activeUniformBlocks;\r
2577                         blockId = activeUniformBlocks.size();\r
2578                         unsigned int dataSize = block->objectSize() * 4; // FIXME: assuming 4 bytes per element\r
2579                         activeUniformBlocks.push_back(UniformBlock(block->name().c_str(), block->hasInstanceName() ? block->instanceName().c_str() : std::string(), dataSize,\r
2580                                                                    block->arraySize(), block->blockStorage(), block->matrixPacking() == EmpRowMajor, registerIndex, blockId));\r
2581                 }\r
2582 \r
2583                 if(!structure && !block)\r
2584                 {\r
2585                         if(blockId >= 0)\r
2586                         {\r
2587                                 shaderObject->activeUniformBlocks[blockId].fields.push_back(activeUniforms.size());\r
2588                         }\r
2589                         activeUniforms.push_back(Uniform(glVariableType(type), glVariablePrecision(type), name.c_str(), type.getArraySize(), registerIndex, offset, blockId));\r
2590 \r
2591                         if(isSamplerRegister(type))\r
2592                         {\r
2593                                 for(int i = 0; i < type.totalRegisterCount(); i++)\r
2594                                 {\r
2595                                         shader->declareSampler(registerIndex + i);\r
2596                                 }\r
2597                         }\r
2598                 }\r
2599                 else\r
2600                 {\r
2601                         const TFieldList& fields = structure ? structure->fields() : block->fields();\r
2602                         const bool containerHasName = structure || block->hasInstanceName();\r
2603                         const TString &containerName = structure ? name : (containerHasName ? block->instanceName() : TString());\r
2604                         if(type.isArray() && (structure || type.isInterfaceBlock()))\r
2605                         {\r
2606                                 int fieldRegisterIndex = (blockId == -1) ? registerIndex : 0;\r
2607                                 int fieldOffset = 0;\r
2608 \r
2609                                 for(int i = 0; i < type.getArraySize(); i++)\r
2610                                 {\r
2611                                         for(size_t j = 0; j < fields.size(); j++)\r
2612                                         {\r
2613                                                 const TType &fieldType = *(fields[j]->type());\r
2614                                                 const TString &fieldName = fields[j]->name();\r
2615 \r
2616                                                 const TString uniformName = containerHasName ? containerName + "[" + str(i) + "]." + fieldName : fieldName;\r
2617                                                 declareUniform(fieldType, uniformName, fieldRegisterIndex, fieldOffset, blockId);\r
2618                                                 int registerCount = fieldType.totalRegisterCount();\r
2619                                                 fieldRegisterIndex += registerCount;\r
2620                                                 fieldOffset += registerCount * fieldType.registerSize();\r
2621                                         }\r
2622                                 }\r
2623                         }\r
2624                         else\r
2625                         {\r
2626                                 int fieldRegisterIndex = (blockId == -1) ? registerIndex : 0;\r
2627                                 int fieldOffset = 0;\r
2628 \r
2629                                 for(size_t i = 0; i < fields.size(); i++)\r
2630                                 {\r
2631                                         const TType &fieldType = *(fields[i]->type());\r
2632                                         const TString &fieldName = fields[i]->name();\r
2633 \r
2634                                         const TString uniformName = containerHasName ? containerName + "." + fieldName : fieldName;\r
2635                                         declareUniform(fieldType, uniformName, fieldRegisterIndex, fieldOffset, blockId);\r
2636                                         int registerCount = fieldType.totalRegisterCount();\r
2637                                         fieldRegisterIndex += registerCount;\r
2638                                         fieldOffset += registerCount * fieldType.registerSize();\r
2639                                 }\r
2640                         }\r
2641                 }\r
2642         }\r
2643 \r
2644         GLenum OutputASM::glVariableType(const TType &type)\r
2645         {\r
2646                 switch(type.getBasicType())\r
2647                 {\r
2648                 case EbtFloat:\r
2649                         if(type.isScalar())\r
2650                         {\r
2651                                 return GL_FLOAT;\r
2652                         }\r
2653                         else if(type.isVector())\r
2654                         {\r
2655                                 switch(type.getNominalSize())\r
2656                                 {\r
2657                                 case 2: return GL_FLOAT_VEC2;\r
2658                                 case 3: return GL_FLOAT_VEC3;\r
2659                                 case 4: return GL_FLOAT_VEC4;\r
2660                                 default: UNREACHABLE(type.getNominalSize());\r
2661                                 }\r
2662                         }\r
2663                         else if(type.isMatrix())\r
2664                         {\r
2665                                 switch(type.getNominalSize())\r
2666                                 {\r
2667                                 case 2:\r
2668                                         switch(type.getSecondarySize())\r
2669                                         {\r
2670                                         case 2: return GL_FLOAT_MAT2;\r
2671                                         case 3: return GL_FLOAT_MAT2x3;\r
2672                                         case 4: return GL_FLOAT_MAT2x4;\r
2673                                         default: UNREACHABLE(type.getSecondarySize());\r
2674                                         }\r
2675                                 case 3:\r
2676                                         switch(type.getSecondarySize())\r
2677                                         {\r
2678                                         case 2: return GL_FLOAT_MAT3x2;\r
2679                                         case 3: return GL_FLOAT_MAT3;\r
2680                                         case 4: return GL_FLOAT_MAT3x4;\r
2681                                         default: UNREACHABLE(type.getSecondarySize());\r
2682                                         }\r
2683                                 case 4:\r
2684                                         switch(type.getSecondarySize())\r
2685                                         {\r
2686                                         case 2: return GL_FLOAT_MAT4x2;\r
2687                                         case 3: return GL_FLOAT_MAT4x3;\r
2688                                         case 4: return GL_FLOAT_MAT4;\r
2689                                         default: UNREACHABLE(type.getSecondarySize());\r
2690                                         }\r
2691                                 default: UNREACHABLE(type.getNominalSize());\r
2692                                 }\r
2693                         }\r
2694                         else UNREACHABLE(0);\r
2695                         break;\r
2696                 case EbtInt:\r
2697                         if(type.isScalar())\r
2698                         {\r
2699                                 return GL_INT;\r
2700                         }\r
2701                         else if(type.isVector())\r
2702                         {\r
2703                                 switch(type.getNominalSize())\r
2704                                 {\r
2705                                 case 2: return GL_INT_VEC2;\r
2706                                 case 3: return GL_INT_VEC3;\r
2707                                 case 4: return GL_INT_VEC4;\r
2708                                 default: UNREACHABLE(type.getNominalSize());\r
2709                                 }\r
2710                         }\r
2711                         else UNREACHABLE(0);\r
2712                         break;\r
2713                 case EbtUInt:\r
2714                         if(type.isScalar())\r
2715                         {\r
2716                                 return GL_UNSIGNED_INT;\r
2717                         }\r
2718                         else if(type.isVector())\r
2719                         {\r
2720                                 switch(type.getNominalSize())\r
2721                                 {\r
2722                                 case 2: return GL_UNSIGNED_INT_VEC2;\r
2723                                 case 3: return GL_UNSIGNED_INT_VEC3;\r
2724                                 case 4: return GL_UNSIGNED_INT_VEC4;\r
2725                                 default: UNREACHABLE(type.getNominalSize());\r
2726                                 }\r
2727                         }\r
2728                         else UNREACHABLE(0);\r
2729                         break;\r
2730                 case EbtBool:\r
2731                         if(type.isScalar())\r
2732                         {\r
2733                                 return GL_BOOL;\r
2734                         }\r
2735                         else if(type.isVector())\r
2736                         {\r
2737                                 switch(type.getNominalSize())\r
2738                                 {\r
2739                                 case 2: return GL_BOOL_VEC2;\r
2740                                 case 3: return GL_BOOL_VEC3;\r
2741                                 case 4: return GL_BOOL_VEC4;\r
2742                                 default: UNREACHABLE(type.getNominalSize());\r
2743                                 }\r
2744                         }\r
2745                         else UNREACHABLE(0);\r
2746                         break;\r
2747                 case EbtSampler2D:\r
2748                         return GL_SAMPLER_2D;\r
2749                 case EbtISampler2D:\r
2750                         return GL_INT_SAMPLER_2D;\r
2751                 case EbtUSampler2D:\r
2752                         return GL_UNSIGNED_INT_SAMPLER_2D;\r
2753                 case EbtSamplerCube:\r
2754                         return GL_SAMPLER_CUBE;\r
2755                 case EbtISamplerCube:\r
2756                         return GL_INT_SAMPLER_CUBE;\r
2757                 case EbtUSamplerCube:\r
2758                         return GL_UNSIGNED_INT_SAMPLER_CUBE;\r
2759                 case EbtSamplerExternalOES:\r
2760                         return GL_SAMPLER_EXTERNAL_OES;\r
2761                 case EbtSampler3D:\r
2762                         return GL_SAMPLER_3D_OES;\r
2763                 case EbtISampler3D:\r
2764                         return GL_INT_SAMPLER_3D;\r
2765                 case EbtUSampler3D:\r
2766                         return GL_UNSIGNED_INT_SAMPLER_3D;\r
2767                 case EbtSampler2DArray:\r
2768                         return GL_SAMPLER_2D_ARRAY;\r
2769                 case EbtISampler2DArray:\r
2770                         return GL_INT_SAMPLER_2D_ARRAY;\r
2771                 case EbtUSampler2DArray:\r
2772                         return GL_UNSIGNED_INT_SAMPLER_2D_ARRAY;\r
2773                 case EbtSampler2DShadow:\r
2774                         return GL_SAMPLER_2D_SHADOW;\r
2775                 case EbtSamplerCubeShadow:\r
2776                         return GL_SAMPLER_CUBE_SHADOW;\r
2777                 case EbtSampler2DArrayShadow:\r
2778                         return GL_SAMPLER_2D_ARRAY_SHADOW;\r
2779                 default:\r
2780                         UNREACHABLE(type.getBasicType());\r
2781                         break;\r
2782                 }\r
2783 \r
2784                 return GL_NONE;\r
2785         }\r
2786 \r
2787         GLenum OutputASM::glVariablePrecision(const TType &type)\r
2788         {\r
2789                 if(type.getBasicType() == EbtFloat)\r
2790                 {\r
2791                         switch(type.getPrecision())\r
2792                         {\r
2793                         case EbpHigh:   return GL_HIGH_FLOAT;\r
2794                         case EbpMedium: return GL_MEDIUM_FLOAT;\r
2795                         case EbpLow:    return GL_LOW_FLOAT;\r
2796                         case EbpUndefined:\r
2797                                 // Should be defined as the default precision by the parser\r
2798                         default: UNREACHABLE(type.getPrecision());\r
2799                         }\r
2800                 }\r
2801                 else if(type.getBasicType() == EbtInt)\r
2802                 {\r
2803                         switch(type.getPrecision())\r
2804                         {\r
2805                         case EbpHigh:   return GL_HIGH_INT;\r
2806                         case EbpMedium: return GL_MEDIUM_INT;\r
2807                         case EbpLow:    return GL_LOW_INT;\r
2808                         case EbpUndefined:\r
2809                                 // Should be defined as the default precision by the parser\r
2810                         default: UNREACHABLE(type.getPrecision());\r
2811                         }\r
2812                 }\r
2813 \r
2814                 // Other types (boolean, sampler) don't have a precision\r
2815                 return GL_NONE;\r
2816         }\r
2817 \r
2818         int OutputASM::dim(TIntermNode *v)\r
2819         {\r
2820                 TIntermTyped *vector = v->getAsTyped();\r
2821                 ASSERT(vector && vector->isRegister());\r
2822                 return vector->getNominalSize();\r
2823         }\r
2824 \r
2825         int OutputASM::dim2(TIntermNode *m)\r
2826         {\r
2827                 TIntermTyped *matrix = m->getAsTyped();\r
2828                 ASSERT(matrix && matrix->isMatrix() && !matrix->isArray());\r
2829                 return matrix->getSecondarySize();\r
2830         }\r
2831 \r
2832         // Returns ~0 if no loop count could be determined\r
2833         unsigned int OutputASM::loopCount(TIntermLoop *node)\r
2834         {\r
2835                 // Parse loops of the form:\r
2836                 // for(int index = initial; index [comparator] limit; index += increment)\r
2837                 TIntermSymbol *index = 0;\r
2838                 TOperator comparator = EOpNull;\r
2839                 int initial = 0;\r
2840                 int limit = 0;\r
2841                 int increment = 0;\r
2842 \r
2843                 // Parse index name and intial value\r
2844                 if(node->getInit())\r
2845                 {\r
2846                         TIntermAggregate *init = node->getInit()->getAsAggregate();\r
2847 \r
2848                         if(init)\r
2849                         {\r
2850                                 TIntermSequence &sequence = init->getSequence();\r
2851                                 TIntermTyped *variable = sequence[0]->getAsTyped();\r
2852 \r
2853                                 if(variable && variable->getQualifier() == EvqTemporary)\r
2854                                 {\r
2855                                         TIntermBinary *assign = variable->getAsBinaryNode();\r
2856 \r
2857                                         if(assign->getOp() == EOpInitialize)\r
2858                                         {\r
2859                                                 TIntermSymbol *symbol = assign->getLeft()->getAsSymbolNode();\r
2860                                                 TIntermConstantUnion *constant = assign->getRight()->getAsConstantUnion();\r
2861 \r
2862                                                 if(symbol && constant)\r
2863                                                 {\r
2864                                                         if(constant->getBasicType() == EbtInt && constant->getNominalSize() == 1)\r
2865                                                         {\r
2866                                                                 index = symbol;\r
2867                                                                 initial = constant->getUnionArrayPointer()[0].getIConst();\r
2868                                                         }\r
2869                                                 }\r
2870                                         }\r
2871                                 }\r
2872                         }\r
2873                 }\r
2874 \r
2875                 // Parse comparator and limit value\r
2876                 if(index && node->getCondition())\r
2877                 {\r
2878                         TIntermBinary *test = node->getCondition()->getAsBinaryNode();\r
2879 \r
2880                         if(test && test->getLeft()->getAsSymbolNode()->getId() == index->getId())\r
2881                         {\r
2882                                 TIntermConstantUnion *constant = test->getRight()->getAsConstantUnion();\r
2883 \r
2884                                 if(constant)\r
2885                                 {\r
2886                                         if(constant->getBasicType() == EbtInt && constant->getNominalSize() == 1)\r
2887                                         {\r
2888                                                 comparator = test->getOp();\r
2889                                                 limit = constant->getUnionArrayPointer()[0].getIConst();\r
2890                                         }\r
2891                                 }\r
2892                         }\r
2893                 }\r
2894 \r
2895                 // Parse increment\r
2896                 if(index && comparator != EOpNull && node->getExpression())\r
2897                 {\r
2898                         TIntermBinary *binaryTerminal = node->getExpression()->getAsBinaryNode();\r
2899                         TIntermUnary *unaryTerminal = node->getExpression()->getAsUnaryNode();\r
2900 \r
2901                         if(binaryTerminal)\r
2902                         {\r
2903                                 TOperator op = binaryTerminal->getOp();\r
2904                                 TIntermConstantUnion *constant = binaryTerminal->getRight()->getAsConstantUnion();\r
2905 \r
2906                                 if(constant)\r
2907                                 {\r
2908                                         if(constant->getBasicType() == EbtInt && constant->getNominalSize() == 1)\r
2909                                         {\r
2910                                                 int value = constant->getUnionArrayPointer()[0].getIConst();\r
2911 \r
2912                                                 switch(op)\r
2913                                                 {\r
2914                                                 case EOpAddAssign: increment = value;  break;\r
2915                                                 case EOpSubAssign: increment = -value; break;\r
2916                                                 default: UNIMPLEMENTED();\r
2917                                                 }\r
2918                                         }\r
2919                                 }\r
2920                         }\r
2921                         else if(unaryTerminal)\r
2922                         {\r
2923                                 TOperator op = unaryTerminal->getOp();\r
2924 \r
2925                                 switch(op)\r
2926                                 {\r
2927                                 case EOpPostIncrement: increment = 1;  break;\r
2928                                 case EOpPostDecrement: increment = -1; break;\r
2929                                 case EOpPreIncrement:  increment = 1;  break;\r
2930                                 case EOpPreDecrement:  increment = -1; break;\r
2931                                 default: UNIMPLEMENTED();\r
2932                                 }\r
2933                         }\r
2934                 }\r
2935 \r
2936                 if(index && comparator != EOpNull && increment != 0)\r
2937                 {\r
2938                         if(comparator == EOpLessThanEqual)\r
2939                         {\r
2940                                 comparator = EOpLessThan;\r
2941                                 limit += 1;\r
2942                         }\r
2943 \r
2944                         if(comparator == EOpLessThan)\r
2945                         {\r
2946                                 int iterations = (limit - initial) / increment;\r
2947 \r
2948                                 if(iterations <= 0)\r
2949                                 {\r
2950                                         iterations = 0;\r
2951                                 }\r
2952 \r
2953                                 return iterations;\r
2954                         }\r
2955                         else UNIMPLEMENTED();   // Falls through\r
2956                 }\r
2957 \r
2958                 return ~0;\r
2959         }\r
2960 \r
2961         bool DetectLoopDiscontinuity::traverse(TIntermNode *node)\r
2962         {\r
2963                 loopDepth = 0;\r
2964                 loopDiscontinuity = false;\r
2965                 \r
2966                 node->traverse(this);\r
2967                 \r
2968                 return loopDiscontinuity;\r
2969         }\r
2970 \r
2971         bool DetectLoopDiscontinuity::visitLoop(Visit visit, TIntermLoop *loop)\r
2972         {\r
2973                 if(visit == PreVisit)\r
2974                 {\r
2975                         loopDepth++;\r
2976                 }\r
2977                 else if(visit == PostVisit)\r
2978                 {\r
2979                         loopDepth++;\r
2980                 }\r
2981 \r
2982                 return true;\r
2983         }\r
2984 \r
2985         bool DetectLoopDiscontinuity::visitBranch(Visit visit, TIntermBranch *node)\r
2986         {\r
2987                 if(loopDiscontinuity)\r
2988                 {\r
2989                         return false;\r
2990                 }\r
2991 \r
2992                 if(!loopDepth)\r
2993                 {\r
2994                         return true;\r
2995                 }\r
2996         \r
2997                 switch(node->getFlowOp())\r
2998                 {\r
2999                 case EOpKill:\r
3000                         break;\r
3001                 case EOpBreak:\r
3002                 case EOpContinue:\r
3003                 case EOpReturn:\r
3004                         loopDiscontinuity = true;\r
3005                         break;\r
3006                 default: UNREACHABLE(node->getFlowOp());\r
3007                 }\r
3008 \r
3009                 return !loopDiscontinuity;\r
3010         }\r
3011 \r
3012         bool DetectLoopDiscontinuity::visitAggregate(Visit visit, TIntermAggregate *node)\r
3013         {\r
3014                 return !loopDiscontinuity;\r
3015         }\r
3016 }\r