OSDN Git Service

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