glsl: add several EmitNo* options, and MaxUnrollIterations
[mesa.git] / src / glsl / ir_print_visitor.cpp
1 /*
2 * Copyright © 2010 Intel Corporation
3 *
4 * Permission is hereby granted, free of charge, to any person obtaining a
5 * copy of this software and associated documentation files (the "Software"),
6 * to deal in the Software without restriction, including without limitation
7 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
8 * and/or sell copies of the Software, and to permit persons to whom the
9 * Software is furnished to do so, subject to the following conditions:
10 *
11 * The above copyright notice and this permission notice (including the next
12 * paragraph) shall be included in all copies or substantial portions of the
13 * Software.
14 *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
18 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
21 * DEALINGS IN THE SOFTWARE.
22 */
23
24 #include "ir_print_visitor.h"
25 #include "glsl_types.h"
26 #include "glsl_parser_extras.h"
27
28 static void print_type(const glsl_type *t);
29
30 void
31 ir_instruction::print(void) const
32 {
33 ir_instruction *deconsted = const_cast<ir_instruction *>(this);
34
35 ir_print_visitor v;
36 deconsted->accept(&v);
37 }
38
39 void
40 _mesa_print_ir(exec_list *instructions,
41 struct _mesa_glsl_parse_state *state)
42 {
43 if (state) {
44 for (unsigned i = 0; i < state->num_user_structures; i++) {
45 const glsl_type *const s = state->user_structures[i];
46
47 printf("(structure (%s) (%s@%p) (%u) (\n",
48 s->name, s->name, (void *) s, s->length);
49
50 for (unsigned j = 0; j < s->length; j++) {
51 printf("\t((");
52 print_type(s->fields.structure[j].type);
53 printf(")(%s))\n", s->fields.structure[j].name);
54 }
55
56 printf(")\n");
57 }
58 }
59
60 printf("(\n");
61 foreach_iter(exec_list_iterator, iter, *instructions) {
62 ir_instruction *ir = (ir_instruction *)iter.get();
63 ir->print();
64 if (ir->ir_type != ir_type_function)
65 printf("\n");
66 }
67 printf("\n)");
68 }
69
70
71 void ir_print_visitor::indent(void)
72 {
73 for (int i = 0; i < indentation; i++)
74 printf(" ");
75 }
76
77 static void
78 print_type(const glsl_type *t)
79 {
80 if (t->base_type == GLSL_TYPE_ARRAY) {
81 printf("(array ");
82 print_type(t->fields.array);
83 printf(" %u)", t->length);
84 } else if ((t->base_type == GLSL_TYPE_STRUCT)
85 && (strncmp("gl_", t->name, 3) != 0)) {
86 printf("%s@%p", t->name, (void *) t);
87 } else {
88 printf("%s", t->name);
89 }
90 }
91
92
93 void ir_print_visitor::visit(ir_variable *ir)
94 {
95 printf("(declare ");
96
97 const char *const cent = (ir->centroid) ? "centroid " : "";
98 const char *const inv = (ir->invariant) ? "invariant " : "";
99 const char *const mode[] = { "", "uniform ", "in ", "out ", "inout ",
100 "temporary " };
101 const char *const interp[] = { "", "flat", "noperspective" };
102
103 printf("(%s%s%s%s) ",
104 cent, inv, mode[ir->mode], interp[ir->interpolation]);
105
106 print_type(ir->type);
107 printf(" %s@%p)", ir->name, (void *) ir);
108 }
109
110
111 void ir_print_visitor::visit(ir_function_signature *ir)
112 {
113 printf("(signature ");
114 indentation++;
115
116 print_type(ir->return_type);
117 printf("\n");
118 indent();
119
120 printf("(parameters\n");
121 indentation++;
122
123 foreach_iter(exec_list_iterator, iter, ir->parameters) {
124 ir_variable *const inst = (ir_variable *) iter.get();
125
126 indent();
127 inst->accept(this);
128 printf("\n");
129 }
130 indentation--;
131
132 indent();
133 printf(")\n");
134
135 indent();
136
137 printf("(\n");
138 indentation++;
139
140 foreach_iter(exec_list_iterator, iter, ir->body) {
141 ir_instruction *const inst = (ir_instruction *) iter.get();
142
143 indent();
144 inst->accept(this);
145 printf("\n");
146 }
147 indentation--;
148 indent();
149 printf("))\n");
150 indentation--;
151 }
152
153
154 void ir_print_visitor::visit(ir_function *ir)
155 {
156 printf("(function %s\n", ir->name);
157 indentation++;
158 foreach_iter(exec_list_iterator, iter, *ir) {
159 ir_function_signature *const sig = (ir_function_signature *) iter.get();
160
161 if (sig->is_builtin)
162 continue;
163
164 indent();
165 sig->accept(this);
166 printf("\n");
167 }
168 indentation--;
169 indent();
170 printf(")\n\n");
171 }
172
173
174 void ir_print_visitor::visit(ir_expression *ir)
175 {
176 printf("(expression ");
177
178 print_type(ir->type);
179
180 printf(" %s ", ir->operator_string());
181
182 if (ir->operands[0])
183 ir->operands[0]->accept(this);
184
185 if (ir->operands[1])
186 ir->operands[1]->accept(this);
187 printf(") ");
188 }
189
190
191 void ir_print_visitor::visit(ir_texture *ir)
192 {
193 printf("(%s ", ir->opcode_string());
194
195 ir->sampler->accept(this);
196 printf(" ");
197
198 ir->coordinate->accept(this);
199
200 printf(" (%d %d %d) ", ir->offsets[0], ir->offsets[1], ir->offsets[2]);
201
202 if (ir->op != ir_txf) {
203 if (ir->projector)
204 ir->projector->accept(this);
205 else
206 printf("1");
207
208 if (ir->shadow_comparitor) {
209 printf(" ");
210 ir->shadow_comparitor->accept(this);
211 } else {
212 printf(" ()");
213 }
214 }
215
216 printf(" ");
217 switch (ir->op)
218 {
219 case ir_tex:
220 break;
221 case ir_txb:
222 ir->lod_info.bias->accept(this);
223 break;
224 case ir_txl:
225 case ir_txf:
226 ir->lod_info.lod->accept(this);
227 break;
228 case ir_txd:
229 printf("(");
230 ir->lod_info.grad.dPdx->accept(this);
231 printf(" ");
232 ir->lod_info.grad.dPdy->accept(this);
233 printf(")");
234 break;
235 };
236 printf(")");
237 }
238
239
240 void ir_print_visitor::visit(ir_swizzle *ir)
241 {
242 const unsigned swiz[4] = {
243 ir->mask.x,
244 ir->mask.y,
245 ir->mask.z,
246 ir->mask.w,
247 };
248
249 printf("(swiz ");
250 for (unsigned i = 0; i < ir->mask.num_components; i++) {
251 printf("%c", "xyzw"[swiz[i]]);
252 }
253 printf(" ");
254 ir->val->accept(this);
255 printf(")");
256 }
257
258
259 void ir_print_visitor::visit(ir_dereference_variable *ir)
260 {
261 ir_variable *var = ir->variable_referenced();
262 printf("(var_ref %s@%p) ", var->name, (void *) var);
263 }
264
265
266 void ir_print_visitor::visit(ir_dereference_array *ir)
267 {
268 printf("(array_ref ");
269 ir->array->accept(this);
270 ir->array_index->accept(this);
271 printf(") ");
272 }
273
274
275 void ir_print_visitor::visit(ir_dereference_record *ir)
276 {
277 printf("(record_ref ");
278 ir->record->accept(this);
279 printf(" %s) ", ir->field);
280 }
281
282
283 void ir_print_visitor::visit(ir_assignment *ir)
284 {
285 printf("(assign ");
286
287 if (ir->condition)
288 ir->condition->accept(this);
289 else
290 printf("(constant bool (1))");
291
292
293 char mask[5];
294 unsigned j = 0;
295
296 for (unsigned i = 0; i < 4; i++) {
297 if ((ir->write_mask & (1 << i)) != 0) {
298 mask[j] = "xyzw"[i];
299 j++;
300 }
301 }
302 mask[j] = '\0';
303
304 printf(" (%s) ", mask);
305
306 ir->lhs->accept(this);
307
308 printf(" ");
309
310 ir->rhs->accept(this);
311 printf(") ");
312 }
313
314
315 void ir_print_visitor::visit(ir_constant *ir)
316 {
317 const glsl_type *const base_type = ir->type->get_base_type();
318
319 printf("(constant ");
320 print_type(ir->type);
321 printf(" (");
322
323 if (ir->type->is_array()) {
324 for (unsigned i = 0; i < ir->type->length; i++)
325 ir->get_array_element(i)->accept(this);
326 } else {
327 for (unsigned i = 0; i < ir->type->components(); i++) {
328 if (i != 0)
329 printf(" ");
330 switch (base_type->base_type) {
331 case GLSL_TYPE_UINT: printf("%u", ir->value.u[i]); break;
332 case GLSL_TYPE_INT: printf("%d", ir->value.i[i]); break;
333 case GLSL_TYPE_FLOAT: printf("%f", ir->value.f[i]); break;
334 case GLSL_TYPE_BOOL: printf("%d", ir->value.b[i]); break;
335 default: assert(0);
336 }
337 }
338 }
339 printf(")) ");
340 }
341
342
343 void
344 ir_print_visitor::visit(ir_call *ir)
345 {
346 printf("(call %s (", ir->callee_name());
347 foreach_iter(exec_list_iterator, iter, *ir) {
348 ir_instruction *const inst = (ir_instruction *) iter.get();
349
350 inst->accept(this);
351 }
352 printf("))\n");
353 }
354
355
356 void
357 ir_print_visitor::visit(ir_return *ir)
358 {
359 printf("(return");
360
361 ir_rvalue *const value = ir->get_value();
362 if (value) {
363 printf(" ");
364 value->accept(this);
365 }
366
367 printf(")");
368 }
369
370
371 void
372 ir_print_visitor::visit(ir_discard *ir)
373 {
374 printf("(discard ");
375
376 if (ir->condition != NULL) {
377 printf(" ");
378 ir->condition->accept(this);
379 }
380
381 printf(")");
382 }
383
384
385 void
386 ir_print_visitor::visit(ir_if *ir)
387 {
388 printf("(if ");
389 ir->condition->accept(this);
390
391 printf("(\n");
392 indentation++;
393
394 foreach_iter(exec_list_iterator, iter, ir->then_instructions) {
395 ir_instruction *const inst = (ir_instruction *) iter.get();
396
397 indent();
398 inst->accept(this);
399 printf("\n");
400 }
401
402 indentation--;
403 indent();
404 printf(")\n");
405
406 indent();
407 if (!ir->else_instructions.is_empty()) {
408 printf("(\n");
409 indentation++;
410
411 foreach_iter(exec_list_iterator, iter, ir->else_instructions) {
412 ir_instruction *const inst = (ir_instruction *) iter.get();
413
414 indent();
415 inst->accept(this);
416 printf("\n");
417 }
418 indentation--;
419 indent();
420 printf("))\n");
421 } else {
422 printf("())\n");
423 }
424 }
425
426
427 void
428 ir_print_visitor::visit(ir_loop *ir)
429 {
430 printf("(loop (");
431 if (ir->counter != NULL)
432 ir->counter->accept(this);
433 printf(") (");
434 if (ir->from != NULL)
435 ir->from->accept(this);
436 printf(") (");
437 if (ir->to != NULL)
438 ir->to->accept(this);
439 printf(") (");
440 if (ir->increment != NULL)
441 ir->increment->accept(this);
442 printf(") (\n");
443 indentation++;
444
445 foreach_iter(exec_list_iterator, iter, ir->body_instructions) {
446 ir_instruction *const inst = (ir_instruction *) iter.get();
447
448 indent();
449 inst->accept(this);
450 printf("\n");
451 }
452 indentation--;
453 indent();
454 printf("))\n");
455 }
456
457
458 void
459 ir_print_visitor::visit(ir_loop_jump *ir)
460 {
461 printf("%s", ir->is_break() ? "break" : "continue");
462 }