Add a virtual clone() method to ir_instruction.
[mesa.git] / 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 for (unsigned i = 0; i < state->num_user_structures; i++) {
44 const glsl_type *const s = state->user_structures[i];
45
46 printf("(structure (%s) (%s@%p) (%u) (\n",
47 s->name, s->name, s, s->length);
48
49 for (unsigned j = 0; j < s->length; j++) {
50 printf("\t((");
51 print_type(s->fields.structure[j].type);
52 printf(")(%s))\n", s->fields.structure[j].name);
53 }
54
55 printf(")\n");
56 }
57
58 printf("(\n");
59 foreach_iter(exec_list_iterator, iter, *instructions) {
60 ((ir_instruction *)iter.get())->print();
61 printf("\n");
62 }
63 printf("\n)");
64 }
65
66 static void
67 print_type(const glsl_type *t)
68 {
69 if (t->base_type == GLSL_TYPE_ARRAY) {
70 printf("(array ");
71 print_type(t->fields.array);
72 printf(" %u)", t->length);
73 } else if ((t->base_type == GLSL_TYPE_STRUCT)
74 && (strncmp("gl_", t->name, 3) != 0)) {
75 printf("%s@%p", t->name, t);
76 } else {
77 printf("%s", t->name);
78 }
79 }
80
81
82 void ir_print_visitor::visit(ir_variable *ir)
83 {
84 printf("(declare ");
85
86 const char *const cent = (ir->centroid) ? "centroid " : "";
87 const char *const inv = (ir->invariant) ? "invariant " : "";
88 const char *const mode[] = { "", "uniform ", "in ", "out ", "inout " };
89 const char *const interp[] = { "", "flat", "noperspective" };
90
91 printf("(%s%s%s%s) ",
92 cent, inv, mode[ir->mode], interp[ir->interpolation]);
93
94 print_type(ir->type);
95 printf(" %s)", ir->name);
96 }
97
98
99 void ir_print_visitor::visit(ir_function_signature *ir)
100 {
101 printf("(signature ");
102 print_type(ir->return_type);
103 printf("\n (parameters\n");
104 foreach_iter(exec_list_iterator, iter, ir->parameters) {
105 ir_variable *const inst = (ir_variable *) iter.get();
106
107 inst->accept(this);
108 printf("\n");
109 }
110 printf(" )\n(");
111
112 foreach_iter(exec_list_iterator, iter, ir->body) {
113 ir_instruction *const inst = (ir_instruction *) iter.get();
114
115 inst->accept(this);
116 printf("\n");
117 }
118 printf("))\n");
119 }
120
121
122 void ir_print_visitor::visit(ir_function *ir)
123 {
124 printf("(function %s\n", ir->name);
125 foreach_iter(exec_list_iterator, iter, *ir) {
126 ir_function_signature *const sig = (ir_function_signature *) iter.get();
127
128 sig->accept(this);
129 printf("\n");
130 }
131
132 printf(")\n");
133 }
134
135
136 void ir_print_visitor::visit(ir_expression *ir)
137 {
138 printf("(expression ");
139
140 print_type(ir->type);
141
142 printf(" %s ", ir->operator_string());
143
144 if (ir->operands[0])
145 ir->operands[0]->accept(this);
146
147 if (ir->operands[1])
148 ir->operands[1]->accept(this);
149 printf(") ");
150 }
151
152
153 void ir_print_visitor::visit(ir_texture *ir)
154 {
155 printf("(%s ", ir->opcode_string());
156
157 ir->sampler->accept(this);
158 printf(" ");
159
160 ir->coordinate->accept(this);
161
162 printf(" (%d %d %d) ", ir->offsets[0], ir->offsets[1], ir->offsets[2]);
163
164 if (ir->op != ir_txf) {
165 if (ir->projector)
166 ir->projector->accept(this);
167 else
168 printf("1");
169
170 if (ir->shadow_comparitor) {
171 printf(" ");
172 ir->shadow_comparitor->accept(this);
173 } else {
174 printf(" ()");
175 }
176 }
177
178 printf(" ");
179 switch (ir->op)
180 {
181 case ir_tex:
182 break;
183 case ir_txb:
184 ir->lod_info.bias->accept(this);
185 break;
186 case ir_txl:
187 case ir_txf:
188 ir->lod_info.lod->accept(this);
189 break;
190 case ir_txd:
191 printf("(");
192 ir->lod_info.grad.dPdx->accept(this);
193 printf(" ");
194 ir->lod_info.grad.dPdy->accept(this);
195 printf(")");
196 break;
197 };
198 printf(")");
199 }
200
201
202 void ir_print_visitor::visit(ir_swizzle *ir)
203 {
204 const unsigned swiz[4] = {
205 ir->mask.x,
206 ir->mask.y,
207 ir->mask.z,
208 ir->mask.w,
209 };
210
211 printf("(swiz ");
212 for (unsigned i = 0; i < ir->mask.num_components; i++) {
213 printf("%c", "xyzw"[swiz[i]]);
214 }
215 printf(" ");
216 ir->val->accept(this);
217 printf(")");
218 }
219
220
221 void ir_print_visitor::visit(ir_dereference_variable *ir)
222 {
223 printf("(var_ref %s) ", ir->variable_referenced()->name);
224 }
225
226
227 void ir_print_visitor::visit(ir_dereference_array *ir)
228 {
229 printf("(array_ref ");
230 ir->array->accept(this);
231 ir->array_index->accept(this);
232 printf(") ");
233 }
234
235
236 void ir_print_visitor::visit(ir_dereference_record *ir)
237 {
238 printf("(record_ref ");
239 ir->record->accept(this);
240 printf(" %s) ", ir->field);
241 }
242
243
244 void ir_print_visitor::visit(ir_assignment *ir)
245 {
246 printf("(assign ");
247
248 if (ir->condition)
249 ir->condition->accept(this);
250 else
251 printf("(constant bool (1))");
252
253 printf(" ");
254
255 ir->lhs->accept(this);
256
257 printf(" ");
258
259 ir->rhs->accept(this);
260 printf(") ");
261 }
262
263
264 void ir_print_visitor::visit(ir_constant *ir)
265 {
266 const glsl_type *const base_type = ir->type->get_base_type();
267
268 printf("(constant ");
269 print_type(ir->type);
270 printf(" (");
271
272 for (unsigned i = 0; i < ir->type->components(); i++) {
273 if (i != 0)
274 printf(", ");
275
276 switch (base_type->base_type) {
277 case GLSL_TYPE_UINT: printf("%u", ir->value.u[i]); break;
278 case GLSL_TYPE_INT: printf("%d", ir->value.i[i]); break;
279 case GLSL_TYPE_FLOAT: printf("%f", ir->value.f[i]); break;
280 case GLSL_TYPE_BOOL: printf("%d", ir->value.b[i]); break;
281 default: assert(0);
282 }
283 }
284 printf(")) ");
285 }
286
287
288 void
289 ir_print_visitor::visit(ir_call *ir)
290 {
291 printf("(call %s (", ir->callee_name());
292 foreach_iter(exec_list_iterator, iter, *ir) {
293 ir_instruction *const inst = (ir_instruction *) iter.get();
294
295 inst->accept(this);
296 }
297 printf("))\n");
298 }
299
300
301 void
302 ir_print_visitor::visit(ir_return *ir)
303 {
304 printf("(return");
305
306 ir_rvalue *const value = ir->get_value();
307 if (value) {
308 printf(" ");
309 value->accept(this);
310 }
311
312 printf(")");
313 }
314
315
316 void
317 ir_print_visitor::visit(ir_if *ir)
318 {
319 printf("(if ");
320 ir->condition->accept(this);
321
322 printf("(\n");
323 foreach_iter(exec_list_iterator, iter, ir->then_instructions) {
324 ir_instruction *const inst = (ir_instruction *) iter.get();
325
326 inst->accept(this);
327 printf("\n");
328 }
329 printf(")\n");
330
331 printf("(\n");
332 foreach_iter(exec_list_iterator, iter, ir->else_instructions) {
333 ir_instruction *const inst = (ir_instruction *) iter.get();
334
335 inst->accept(this);
336 printf("\n");
337 }
338 printf("))\n");
339 }
340
341
342 void
343 ir_print_visitor::visit(ir_loop *ir)
344 {
345 printf("(loop (");
346 if (ir->counter != NULL)
347 ir->counter->accept(this);
348 printf(") (");
349 if (ir->from != NULL)
350 ir->from->accept(this);
351 printf(") (");
352 if (ir->to != NULL)
353 ir->to->accept(this);
354 printf(") (");
355 if (ir->increment != NULL)
356 ir->increment->accept(this);
357 printf(") (\n");
358 foreach_iter(exec_list_iterator, iter, ir->body_instructions) {
359 ir_instruction *const inst = (ir_instruction *) iter.get();
360
361 inst->accept(this);
362 printf("\n");
363 }
364 printf("))\n");
365 }
366
367
368 void
369 ir_print_visitor::visit(ir_loop_jump *ir)
370 {
371 printf("%s", ir->is_break() ? "break" : "continue");
372 }