nir: Use nir_src_is_const and nir_src_as_* in core code
[mesa.git] / src / compiler / nir / nir_opt_dead_cf.c
1 /*
2 * Copyright © 2014 Connor Abbott
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 DEALINGS
21 * IN THE SOFTWARE.
22 *
23 * Authors:
24 * Connor Abbott (cwabbott0@gmail.com)
25 *
26 */
27
28 #include "nir.h"
29 #include "nir_control_flow.h"
30
31 /*
32 * This file implements an optimization that deletes statically
33 * unreachable/dead code. In NIR, one way this can happen is when an if
34 * statement has a constant condition:
35 *
36 * if (true) {
37 * ...
38 * }
39 *
40 * We delete the if statement and paste the contents of the always-executed
41 * branch into the surrounding control flow, possibly removing more code if
42 * the branch had a jump at the end.
43 *
44 * Another way is that control flow can end in a jump so that code after it
45 * never gets executed. In particular, this can happen after optimizing
46 * something like:
47 *
48 * if (true) {
49 * ...
50 * break;
51 * }
52 * ...
53 *
54 * We also consider the case where both branches of an if end in a jump, e.g.:
55 *
56 * if (...) {
57 * break;
58 * } else {
59 * continue;
60 * }
61 * ...
62 *
63 * Finally, we also handle removing useless loops and ifs, i.e. loops and ifs
64 * with no side effects and without any definitions that are used
65 * elsewhere. This case is a little different from the first two in that the
66 * code is actually run (it just never does anything), but there are similar
67 * issues with needing to be careful with restarting after deleting the
68 * cf_node (see dead_cf_list()) so this is a convenient place to remove them.
69 */
70
71 static void
72 remove_after_cf_node(nir_cf_node *node)
73 {
74 nir_cf_node *end = node;
75 while (!nir_cf_node_is_last(end))
76 end = nir_cf_node_next(end);
77
78 nir_cf_list list;
79 nir_cf_extract(&list, nir_after_cf_node(node), nir_after_cf_node(end));
80 nir_cf_delete(&list);
81 }
82
83 static void
84 opt_constant_if(nir_if *if_stmt, bool condition)
85 {
86 /* First, we need to remove any phi nodes after the if by rewriting uses to
87 * point to the correct source.
88 */
89 nir_block *after = nir_cf_node_as_block(nir_cf_node_next(&if_stmt->cf_node));
90 nir_block *last_block = condition ? nir_if_last_then_block(if_stmt)
91 : nir_if_last_else_block(if_stmt);
92
93 nir_foreach_instr_safe(instr, after) {
94 if (instr->type != nir_instr_type_phi)
95 break;
96
97 nir_phi_instr *phi = nir_instr_as_phi(instr);
98 nir_ssa_def *def = NULL;
99 nir_foreach_phi_src(phi_src, phi) {
100 if (phi_src->pred != last_block)
101 continue;
102
103 assert(phi_src->src.is_ssa);
104 def = phi_src->src.ssa;
105 }
106
107 assert(def);
108 assert(phi->dest.is_ssa);
109 nir_ssa_def_rewrite_uses(&phi->dest.ssa, nir_src_for_ssa(def));
110 nir_instr_remove(instr);
111 }
112
113 /* The control flow list we're about to paste in may include a jump at the
114 * end, and in that case we have to delete the rest of the control flow
115 * list after the if since it's unreachable and the validator will balk if
116 * we don't.
117 */
118
119 if (!exec_list_is_empty(&last_block->instr_list)) {
120 nir_instr *last_instr = nir_block_last_instr(last_block);
121 if (last_instr->type == nir_instr_type_jump)
122 remove_after_cf_node(&if_stmt->cf_node);
123 }
124
125 /* Finally, actually paste in the then or else branch and delete the if. */
126 struct exec_list *cf_list = condition ? &if_stmt->then_list
127 : &if_stmt->else_list;
128
129 nir_cf_list list;
130 nir_cf_list_extract(&list, cf_list);
131 nir_cf_reinsert(&list, nir_after_cf_node(&if_stmt->cf_node));
132 nir_cf_node_remove(&if_stmt->cf_node);
133 }
134
135 static bool
136 cf_node_has_side_effects(nir_cf_node *node)
137 {
138 nir_foreach_block_in_cf_node(block, node) {
139 bool inside_loop = node->type == nir_cf_node_loop;
140 for (nir_cf_node *n = &block->cf_node; !inside_loop && n != node; n = n->parent) {
141 if (n->type == nir_cf_node_loop)
142 inside_loop = true;
143 }
144
145 nir_foreach_instr(instr, block) {
146 if (instr->type == nir_instr_type_call)
147 return true;
148
149 /* Return instructions can cause us to skip over other side-effecting
150 * instructions after the loop, so consider them to have side effects
151 * here.
152 *
153 * When the block is not inside a loop, break and continue might also
154 * cause a skip.
155 */
156
157 if (instr->type == nir_instr_type_jump &&
158 (!inside_loop || nir_instr_as_jump(instr)->type == nir_jump_return))
159 return true;
160
161 if (instr->type != nir_instr_type_intrinsic)
162 continue;
163
164 nir_intrinsic_instr *intrin = nir_instr_as_intrinsic(instr);
165 if (!(nir_intrinsic_infos[intrin->intrinsic].flags &
166 NIR_INTRINSIC_CAN_ELIMINATE))
167 return true;
168 }
169 }
170
171 return false;
172 }
173
174 static bool
175 def_not_live_out(nir_ssa_def *def, void *state)
176 {
177 nir_block *after = state;
178
179 return !BITSET_TEST(after->live_in, def->live_index);
180 }
181
182 /*
183 * Test if a loop node or if node is dead. Such nodes are dead if:
184 *
185 * 1) It has no side effects (i.e. intrinsics which could possibly affect the
186 * state of the program aside from producing an SSA value, indicated by a lack
187 * of NIR_INTRINSIC_CAN_ELIMINATE).
188 *
189 * 2) It has no phi instructions after it, since those indicate values inside
190 * the node being used after the node.
191 *
192 * 3) None of the values defined inside the node is used outside the node,
193 * i.e. none of the definitions that dominate the node exit are used outside.
194 *
195 * If those conditions hold, then the node is dead and can be deleted.
196 */
197
198 static bool
199 node_is_dead(nir_cf_node *node)
200 {
201 assert(node->type == nir_cf_node_loop || node->type == nir_cf_node_if);
202
203 nir_block *before = nir_cf_node_as_block(nir_cf_node_prev(node));
204 nir_block *after = nir_cf_node_as_block(nir_cf_node_next(node));
205
206 if (!exec_list_is_empty(&after->instr_list) &&
207 nir_block_first_instr(after)->type == nir_instr_type_phi)
208 return false;
209
210 if (cf_node_has_side_effects(node))
211 return false;
212
213 nir_function_impl *impl = nir_cf_node_get_function(node);
214 nir_metadata_require(impl, nir_metadata_live_ssa_defs |
215 nir_metadata_dominance);
216
217 for (nir_block *cur = after->imm_dom; cur && cur != before;
218 cur = cur->imm_dom) {
219 nir_foreach_instr(instr, cur) {
220 if (!nir_foreach_ssa_def(instr, def_not_live_out, after))
221 return false;
222 }
223 }
224
225 return true;
226 }
227
228 static bool
229 dead_cf_block(nir_block *block)
230 {
231 nir_if *following_if = nir_block_get_following_if(block);
232 if (following_if) {
233 if (node_is_dead(&following_if->cf_node)) {
234 nir_cf_node_remove(&following_if->cf_node);
235 return true;
236 }
237
238 if (!nir_src_is_const(following_if->condition))
239 return false;
240
241 opt_constant_if(following_if, nir_src_as_bool(following_if->condition));
242 return true;
243 }
244
245 nir_loop *following_loop = nir_block_get_following_loop(block);
246 if (!following_loop)
247 return false;
248
249 if (!node_is_dead(&following_loop->cf_node))
250 return false;
251
252 nir_cf_node_remove(&following_loop->cf_node);
253 return true;
254 }
255
256 static bool
257 dead_cf_list(struct exec_list *list, bool *list_ends_in_jump)
258 {
259 bool progress = false;
260 *list_ends_in_jump = false;
261
262 nir_cf_node *prev = NULL;
263
264 foreach_list_typed(nir_cf_node, cur, node, list) {
265 switch (cur->type) {
266 case nir_cf_node_block: {
267 nir_block *block = nir_cf_node_as_block(cur);
268 if (dead_cf_block(block)) {
269 /* We just deleted the if or loop after this block, so we may have
270 * deleted the block before or after it -- which one is an
271 * implementation detail. Therefore, to recover the place we were
272 * at, we have to use the previous cf_node.
273 */
274
275 if (prev) {
276 cur = nir_cf_node_next(prev);
277 } else {
278 cur = exec_node_data(nir_cf_node, exec_list_get_head(list),
279 node);
280 }
281
282 block = nir_cf_node_as_block(cur);
283
284 progress = true;
285 }
286
287 if (nir_block_ends_in_jump(block)) {
288 *list_ends_in_jump = true;
289
290 if (!exec_node_is_tail_sentinel(cur->node.next)) {
291 remove_after_cf_node(cur);
292 return true;
293 }
294 }
295
296 break;
297 }
298
299 case nir_cf_node_if: {
300 nir_if *if_stmt = nir_cf_node_as_if(cur);
301 bool then_ends_in_jump, else_ends_in_jump;
302 progress |= dead_cf_list(&if_stmt->then_list, &then_ends_in_jump);
303 progress |= dead_cf_list(&if_stmt->else_list, &else_ends_in_jump);
304
305 if (then_ends_in_jump && else_ends_in_jump) {
306 *list_ends_in_jump = true;
307 nir_block *next = nir_cf_node_as_block(nir_cf_node_next(cur));
308 if (!exec_list_is_empty(&next->instr_list) ||
309 !exec_node_is_tail_sentinel(next->cf_node.node.next)) {
310 remove_after_cf_node(cur);
311 return true;
312 }
313 }
314
315 break;
316 }
317
318 case nir_cf_node_loop: {
319 nir_loop *loop = nir_cf_node_as_loop(cur);
320 bool dummy;
321 progress |= dead_cf_list(&loop->body, &dummy);
322
323 break;
324 }
325
326 default:
327 unreachable("unknown cf node type");
328 }
329
330 prev = cur;
331 }
332
333 return progress;
334 }
335
336 static bool
337 opt_dead_cf_impl(nir_function_impl *impl)
338 {
339 bool dummy;
340 bool progress = dead_cf_list(&impl->body, &dummy);
341
342 if (progress)
343 nir_metadata_preserve(impl, nir_metadata_none);
344
345 return progress;
346 }
347
348 bool
349 nir_opt_dead_cf(nir_shader *shader)
350 {
351 bool progress = false;
352
353 nir_foreach_function(function, shader)
354 if (function->impl)
355 progress |= opt_dead_cf_impl(function->impl);
356
357 return progress;
358 }