OSDN Git Service

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