glsl: Convert piles of foreach_iter to foreach_list_safe.
[mesa.git] / src / glsl / ir_rvalue_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 /**
25 * \file ir_rvalue_visitor.cpp
26 *
27 * Generic class to implement the common pattern we have of wanting to
28 * visit each ir_rvalue * and possibly change that node to a different
29 * class.
30 */
31
32 #include "ir.h"
33 #include "ir_visitor.h"
34 #include "ir_rvalue_visitor.h"
35 #include "glsl_types.h"
36
37 ir_visitor_status
38 ir_rvalue_base_visitor::rvalue_visit(ir_expression *ir)
39 {
40 unsigned int operand;
41
42 for (operand = 0; operand < ir->get_num_operands(); operand++) {
43 handle_rvalue(&ir->operands[operand]);
44 }
45
46 return visit_continue;
47 }
48
49 ir_visitor_status
50 ir_rvalue_base_visitor::rvalue_visit(ir_texture *ir)
51 {
52 handle_rvalue(&ir->coordinate);
53 handle_rvalue(&ir->projector);
54 handle_rvalue(&ir->shadow_comparitor);
55 handle_rvalue(&ir->offset);
56
57 switch (ir->op) {
58 case ir_tex:
59 case ir_lod:
60 case ir_query_levels:
61 break;
62 case ir_txb:
63 handle_rvalue(&ir->lod_info.bias);
64 break;
65 case ir_txf:
66 case ir_txl:
67 case ir_txs:
68 handle_rvalue(&ir->lod_info.lod);
69 break;
70 case ir_txf_ms:
71 handle_rvalue(&ir->lod_info.sample_index);
72 break;
73 case ir_txd:
74 handle_rvalue(&ir->lod_info.grad.dPdx);
75 handle_rvalue(&ir->lod_info.grad.dPdy);
76 break;
77 case ir_tg4:
78 handle_rvalue(&ir->lod_info.component);
79 break;
80 }
81
82 return visit_continue;
83 }
84
85 ir_visitor_status
86 ir_rvalue_base_visitor::rvalue_visit(ir_swizzle *ir)
87 {
88 handle_rvalue(&ir->val);
89 return visit_continue;
90 }
91
92 ir_visitor_status
93 ir_rvalue_base_visitor::rvalue_visit(ir_dereference_array *ir)
94 {
95 /* The array index is not the target of the assignment, so clear the
96 * 'in_assignee' flag. Restore it after returning from the array index.
97 */
98 const bool was_in_assignee = this->in_assignee;
99 this->in_assignee = false;
100 handle_rvalue(&ir->array_index);
101 this->in_assignee = was_in_assignee;
102
103 handle_rvalue(&ir->array);
104 return visit_continue;
105 }
106
107 ir_visitor_status
108 ir_rvalue_base_visitor::rvalue_visit(ir_dereference_record *ir)
109 {
110 handle_rvalue(&ir->record);
111 return visit_continue;
112 }
113
114 ir_visitor_status
115 ir_rvalue_base_visitor::rvalue_visit(ir_assignment *ir)
116 {
117 handle_rvalue(&ir->rhs);
118 handle_rvalue(&ir->condition);
119
120 return visit_continue;
121 }
122
123 ir_visitor_status
124 ir_rvalue_base_visitor::rvalue_visit(ir_call *ir)
125 {
126 foreach_list_safe(n, &ir->actual_parameters) {
127 ir_rvalue *param = (ir_rvalue *) n;
128 ir_rvalue *new_param = param;
129 handle_rvalue(&new_param);
130
131 if (new_param != param) {
132 param->replace_with(new_param);
133 }
134 }
135 return visit_continue;
136 }
137
138 ir_visitor_status
139 ir_rvalue_base_visitor::rvalue_visit(ir_return *ir)
140 {
141 handle_rvalue(&ir->value);;
142 return visit_continue;
143 }
144
145 ir_visitor_status
146 ir_rvalue_base_visitor::rvalue_visit(ir_if *ir)
147 {
148 handle_rvalue(&ir->condition);
149 return visit_continue;
150 }
151
152
153 ir_visitor_status
154 ir_rvalue_visitor::visit_leave(ir_expression *ir)
155 {
156 return rvalue_visit(ir);
157 }
158
159 ir_visitor_status
160 ir_rvalue_visitor::visit_leave(ir_texture *ir)
161 {
162 return rvalue_visit(ir);
163 }
164
165 ir_visitor_status
166 ir_rvalue_visitor::visit_leave(ir_swizzle *ir)
167 {
168 return rvalue_visit(ir);
169 }
170
171 ir_visitor_status
172 ir_rvalue_visitor::visit_leave(ir_dereference_array *ir)
173 {
174 return rvalue_visit(ir);
175 }
176
177 ir_visitor_status
178 ir_rvalue_visitor::visit_leave(ir_dereference_record *ir)
179 {
180 return rvalue_visit(ir);
181 }
182
183 ir_visitor_status
184 ir_rvalue_visitor::visit_leave(ir_assignment *ir)
185 {
186 return rvalue_visit(ir);
187 }
188
189 ir_visitor_status
190 ir_rvalue_visitor::visit_leave(ir_call *ir)
191 {
192 return rvalue_visit(ir);
193 }
194
195 ir_visitor_status
196 ir_rvalue_visitor::visit_leave(ir_return *ir)
197 {
198 return rvalue_visit(ir);
199 }
200
201 ir_visitor_status
202 ir_rvalue_visitor::visit_leave(ir_if *ir)
203 {
204 return rvalue_visit(ir);
205 }
206
207 ir_visitor_status
208 ir_rvalue_enter_visitor::visit_enter(ir_expression *ir)
209 {
210 return rvalue_visit(ir);
211 }
212
213 ir_visitor_status
214 ir_rvalue_enter_visitor::visit_enter(ir_texture *ir)
215 {
216 return rvalue_visit(ir);
217 }
218
219 ir_visitor_status
220 ir_rvalue_enter_visitor::visit_enter(ir_swizzle *ir)
221 {
222 return rvalue_visit(ir);
223 }
224
225 ir_visitor_status
226 ir_rvalue_enter_visitor::visit_enter(ir_dereference_array *ir)
227 {
228 return rvalue_visit(ir);
229 }
230
231 ir_visitor_status
232 ir_rvalue_enter_visitor::visit_enter(ir_dereference_record *ir)
233 {
234 return rvalue_visit(ir);
235 }
236
237 ir_visitor_status
238 ir_rvalue_enter_visitor::visit_enter(ir_assignment *ir)
239 {
240 return rvalue_visit(ir);
241 }
242
243 ir_visitor_status
244 ir_rvalue_enter_visitor::visit_enter(ir_call *ir)
245 {
246 return rvalue_visit(ir);
247 }
248
249 ir_visitor_status
250 ir_rvalue_enter_visitor::visit_enter(ir_return *ir)
251 {
252 return rvalue_visit(ir);
253 }
254
255 ir_visitor_status
256 ir_rvalue_enter_visitor::visit_enter(ir_if *ir)
257 {
258 return rvalue_visit(ir);
259 }