]> git.ipfire.org Git - thirdparty/gcc.git/blame - gcc/cfgloop.h
gfortran.h (gfc_add_intrinsic_modules_path, [...]): New prototypes.
[thirdparty/gcc.git] / gcc / cfgloop.h
CommitLineData
3d436d2a 1/* Natural loop functions
613c5cd0 2 Copyright (C) 1987, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005
3d436d2a
ZD
3 Free Software Foundation, Inc.
4
5This file is part of GCC.
6
7GCC is free software; you can redistribute it and/or modify it under
8the terms of the GNU General Public License as published by the Free
9Software Foundation; either version 2, or (at your option) any later
10version.
11
12GCC is distributed in the hope that it will be useful, but WITHOUT ANY
13WARRANTY; without even the implied warranty of MERCHANTABILITY or
14FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
15for more details.
16
17You should have received a copy of the GNU General Public License
18along with GCC; see the file COPYING. If not, write to the Free
366ccddb
KC
19Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA
2002110-1301, USA. */
3d436d2a 21
59587b18
JQ
22#ifndef GCC_CFGLOOP_H
23#define GCC_CFGLOOP_H
24
25#include "basic-block.h"
26/* For rtx_code. */
27#include "rtl.h"
28
3d436d2a
ZD
29/* Structure to hold decision about unrolling/peeling. */
30enum lpt_dec
31{
32 LPT_NONE,
33 LPT_PEEL_COMPLETELY,
34 LPT_PEEL_SIMPLE,
35 LPT_UNROLL_CONSTANT,
36 LPT_UNROLL_RUNTIME,
37 LPT_UNROLL_STUPID
38};
39
40struct lpt_decision
41{
42 enum lpt_dec decision;
43 unsigned times;
44};
45
86df10e3
SP
46/* The structure describing a bound on number of iterations of a loop. */
47
48struct nb_iter_bound
49{
946e1bc7
ZD
50 /* The statement STMT is executed at most ... */
51 tree stmt;
52
53 /* ... BOUND + 1 times (BOUND must be an unsigned constant).
54 The + 1 is added for the following reasons:
55
56 a) 0 would otherwise be unused, while we would need to care more about
57 overflows (as MAX + 1 is sometimes produced as the estimate on number
58 of executions of STMT).
59 b) it is consistent with the result of number_of_iterations_exit. */
60 double_int bound;
61
62 /* True if the statement will cause the loop to be leaved the (at most)
63 BOUND + 1-st time it is executed, that is, all the statements after it
64 are executed at most BOUND times. */
65 bool is_exit;
66
67 /* True if the bound is "realistic" -- i.e., most likely the loop really has
68 number of iterations close to the bound. Exact bounds (if the number of
69 iterations of a loop is a constant) and bounds derived from the size of
70 data accessed in the loop are considered realistic. */
71 bool realistic;
72
73 /* The next bound in the list. */
86df10e3 74 struct nb_iter_bound *next;
86df10e3
SP
75};
76
3d436d2a
ZD
77/* Structure to hold information for each natural loop. */
78struct loop
79{
80 /* Index into loops array. */
81 int num;
82
83 /* Basic block of loop header. */
84 basic_block header;
85
86 /* Basic block of loop latch. */
87 basic_block latch;
88
3d436d2a
ZD
89 /* For loop unrolling/peeling decision. */
90 struct lpt_decision lpt_decision;
91
3d436d2a
ZD
92 /* Number of loop insns. */
93 unsigned ninsns;
94
95 /* Average number of executed insns per iteration. */
96 unsigned av_ninsns;
97
3d436d2a
ZD
98 /* Number of blocks contained within the loop. */
99 unsigned num_nodes;
100
3d436d2a
ZD
101 /* The loop nesting depth. */
102 int depth;
103
104 /* Superloops of the loop. */
105 struct loop **pred;
106
107 /* The height of the loop (enclosed loop levels) within the loop
108 hierarchy tree. */
109 int level;
110
111 /* The outer (parent) loop or NULL if outermost loop. */
112 struct loop *outer;
113
114 /* The first inner (child) loop or NULL if innermost loop. */
115 struct loop *inner;
116
117 /* Link to the next (sibling) loop. */
118 struct loop *next;
119
120 /* Loop that is copy of this loop. */
121 struct loop *copy;
122
3d436d2a
ZD
123 /* Auxiliary info specific to a pass. */
124 void *aux;
125
9baba81b
SP
126 /* The probable number of times the loop is executed at runtime.
127 This is an INTEGER_CST or an expression containing symbolic
128 names. Don't access this field directly:
129 number_of_iterations_in_loop computes and caches the computed
130 information in this field. */
131 tree nb_iterations;
132
946e1bc7
ZD
133 /* An integer estimation of the number of iterations. Estimate_state
134 describes what is the state of the estimation. */
135 enum
136 {
137 /* Estimate was not computed yet. */
138 EST_NOT_COMPUTED,
139 /* Estimate was computed, but we could derive no useful bound. */
140 EST_NOT_AVAILABLE,
141 /* Estimate is ready. */
142 EST_AVAILABLE
143 } estimate_state;
144 double_int estimated_nb_iterations;
86df10e3 145
e9eb809d
ZD
146 /* Upper bound on number of iterations of a loop. */
147 struct nb_iter_bound *bounds;
82b85a85
ZD
148
149 /* If not NULL, loop has just single exit edge stored here (edges to the
150 EXIT_BLOCK_PTR do not count. */
151 edge single_exit;
86df10e3
SP
152
153 /* True when the loop does not carry data dependences, and
154 consequently the iterations can be executed in any order. False
155 when the loop carries data dependences, or when the property is
156 not decidable. */
157 bool parallel_p;
3d436d2a
ZD
158};
159
160/* Flags for state of loop structure. */
161enum
162{
163 LOOPS_HAVE_PREHEADERS = 1,
164 LOOPS_HAVE_SIMPLE_LATCHES = 2,
82b85a85
ZD
165 LOOPS_HAVE_MARKED_IRREDUCIBLE_REGIONS = 4,
166 LOOPS_HAVE_MARKED_SINGLE_EXITS = 8
3d436d2a
ZD
167};
168
d78f3f78
ZD
169#define LOOPS_NORMAL (LOOPS_HAVE_PREHEADERS | LOOPS_HAVE_SIMPLE_LATCHES \
170 | LOOPS_HAVE_MARKED_IRREDUCIBLE_REGIONS)
171
3d436d2a
ZD
172/* Structure to hold CFG information about natural loops within a function. */
173struct loops
174{
175 /* Number of natural loops in the function. */
176 unsigned num;
177
0162f155
RG
178 /* State of loops. */
179 int state;
3d436d2a 180
0162f155 181 /* We store just pointers to loops here.
43a613f7
DB
182 Note that a loop in this array may actually be NULL, if the loop
183 has been removed and the entire loops structure has not been
184 recomputed since that time. */
3d436d2a
ZD
185 struct loop **parray;
186
187 /* Pointer to root of loop hierarchy tree. */
188 struct loop *tree_root;
189
190 /* Information derived from the CFG. */
191 struct cfg
192 {
3d436d2a
ZD
193 /* The ordering of the basic blocks in a depth first search. */
194 int *dfs_order;
195
196 /* The reverse completion ordering of the basic blocks found in a
197 depth first search. */
198 int *rc_order;
199 } cfg;
200
201 /* Headers shared by multiple loops that should be merged. */
202 sbitmap shared_headers;
3d436d2a
ZD
203};
204
9baba81b
SP
205/* The loop tree currently optimized. */
206
207extern struct loops *current_loops;
208
3d436d2a 209/* Loop recognition. */
70388d94 210extern int flow_loops_find (struct loops *);
d329e058
AJ
211extern void flow_loops_free (struct loops *);
212extern void flow_loops_dump (const struct loops *, FILE *,
213 void (*)(const struct loop *, FILE *, int), int);
214extern void flow_loop_dump (const struct loop *, FILE *,
215 void (*)(const struct loop *, FILE *, int), int);
d329e058 216extern void flow_loop_free (struct loop *);
2b271002
ZD
217int flow_loop_nodes_find (basic_block, struct loop *);
218void fix_loop_structure (struct loops *, bitmap changed_bbs);
d329e058 219void mark_irreducible_loops (struct loops *);
82b85a85 220void mark_single_exit_loops (struct loops *);
3d436d2a 221
4d6922ee 222/* Loop data structure manipulation/querying. */
d329e058
AJ
223extern void flow_loop_tree_node_add (struct loop *, struct loop *);
224extern void flow_loop_tree_node_remove (struct loop *);
d329e058
AJ
225extern bool flow_loop_nested_p (const struct loop *, const struct loop *);
226extern bool flow_bb_inside_loop_p (const struct loop *, const basic_block);
227extern struct loop * find_common_loop (struct loop *, struct loop *);
a7e5372d 228struct loop *superloop_at_depth (struct loop *, unsigned);
82b85a85 229extern unsigned tree_num_loop_insns (struct loop *);
d329e058
AJ
230extern int num_loop_insns (struct loop *);
231extern int average_num_loop_insns (struct loop *);
689ba89d 232extern unsigned get_loop_level (const struct loop *);
70388d94
ZD
233extern bool loop_exit_edge_p (const struct loop *, edge);
234extern void mark_loop_exit_edges (struct loops *);
3d436d2a
ZD
235
236/* Loops & cfg manipulation. */
d329e058 237extern basic_block *get_loop_body (const struct loop *);
50654f6c 238extern basic_block *get_loop_body_in_dom_order (const struct loop *);
40923b20 239extern basic_block *get_loop_body_in_bfs_order (const struct loop *);
d329e058 240extern edge *get_loop_exit_edges (const struct loop *, unsigned *);
50654f6c 241extern unsigned num_loop_branches (const struct loop *);
3d436d2a 242
d329e058
AJ
243extern edge loop_preheader_edge (const struct loop *);
244extern edge loop_latch_edge (const struct loop *);
3d436d2a 245
d329e058
AJ
246extern void add_bb_to_loop (basic_block, struct loop *);
247extern void remove_bb_from_loops (basic_block);
3d436d2a 248
d329e058 249extern void cancel_loop_tree (struct loops *, struct loop *);
3d436d2a 250
d47cc544 251extern basic_block loop_split_edge_with (edge, rtx);
d329e058 252extern int fix_loop_placement (struct loop *);
3d436d2a
ZD
253
254enum
255{
bc35512f 256 CP_SIMPLE_PREHEADERS = 1
3d436d2a
ZD
257};
258
d329e058
AJ
259extern void create_preheaders (struct loops *, int);
260extern void force_single_succ_latches (struct loops *);
3d436d2a 261
d329e058 262extern void verify_loop_structure (struct loops *);
3d436d2a
ZD
263
264/* Loop analysis. */
6c878b23 265extern bool just_once_each_iteration_p (const struct loop *, basic_block);
d329e058 266extern unsigned expected_loop_iterations (const struct loop *);
75c70254 267extern rtx doloop_condition_get (rtx);
617b465c
ZD
268
269/* Loop manipulation. */
d329e058 270extern bool can_duplicate_loop_p (struct loop *loop);
617b465c
ZD
271
272#define DLTHE_FLAG_UPDATE_FREQ 1 /* Update frequencies in
273 duplicate_loop_to_header_edge. */
7f7b1718
JH
274#define DLTHE_RECORD_COPY_NUMBER 2 /* Record copy number in the aux
275 field of newly create BB. */
178df94f 276#define DLTHE_FLAG_COMPLETTE_PEEL 4 /* Update frequencies expecting
a4d05547 277 a complete peeling. */
617b465c 278
f67d92e9
DB
279extern struct loop * duplicate_loop (struct loops *, struct loop *,
280 struct loop *);
1cb7dfc3
MH
281extern bool duplicate_loop_to_header_edge (struct loop *, edge, struct loops *,
282 unsigned, sbitmap, edge, edge *,
283 unsigned *, int);
5132abc2
KH
284extern struct loop *loopify (struct loops *, edge, edge,
285 basic_block, edge, edge, bool);
1cb7dfc3 286struct loop * loop_version (struct loops *, struct loop *, void *,
b9a66240 287 basic_block *, bool);
d329e058 288extern bool remove_path (struct loops *, edge);
617b465c 289
50654f6c
ZD
290/* Induction variable analysis. */
291
292/* The description of induction variable. The things are a bit complicated
293 due to need to handle subregs and extends. The value of the object described
294 by it can be obtained as follows (all computations are done in extend_mode):
295
296 Value in i-th iteration is
297 delta + mult * extend_{extend_mode} (subreg_{mode} (base + i * step)).
298
299 If first_special is true, the value in the first iteration is
300 delta + mult * base
c22cacf3 301
f822d252 302 If extend = UNKNOWN, first_special must be false, delta 0, mult 1 and value is
50654f6c
ZD
303 subreg_{mode} (base + i * step)
304
305 The get_iv_value function can be used to obtain these expressions.
306
307 ??? Add a third mode field that would specify the mode in that inner
308 computation is done, which would enable it to be different from the
309 outer one? */
310
311struct rtx_iv
312{
313 /* Its base and step (mode of base and step is supposed to be extend_mode,
314 see the description above). */
315 rtx base, step;
316
f822d252 317 /* The type of extend applied to it (SIGN_EXTEND, ZERO_EXTEND or UNKNOWN). */
50654f6c
ZD
318 enum rtx_code extend;
319
320 /* Operations applied in the extended mode. */
321 rtx delta, mult;
322
323 /* The mode it is extended to. */
324 enum machine_mode extend_mode;
325
326 /* The mode the variable iterates in. */
327 enum machine_mode mode;
328
50654f6c
ZD
329 /* Whether the first iteration needs to be handled specially. */
330 unsigned first_special : 1;
331};
332
f2dca510
ZD
333/* The description of an exit from the loop and of the number of iterations
334 till we take the exit. */
50654f6c
ZD
335
336struct niter_desc
337{
338 /* The edge out of the loop. */
339 edge out_edge;
340
341 /* The other edge leading from the condition. */
342 edge in_edge;
343
344 /* True if we are able to say anything about number of iterations of the
345 loop. */
346 bool simple_p;
347
348 /* True if the loop iterates the constant number of times. */
349 bool const_iter;
350
351 /* Number of iterations if constant. */
352 unsigned HOST_WIDEST_INT niter;
353
354 /* Upper bound on the number of iterations. */
355 unsigned HOST_WIDEST_INT niter_max;
356
357 /* Assumptions under that the rest of the information is valid. */
358 rtx assumptions;
359
360 /* Assumptions under that the loop ends before reaching the latch,
361 even if value of niter_expr says otherwise. */
362 rtx noloop_assumptions;
363
364 /* Condition under that the loop is infinite. */
365 rtx infinite;
366
367 /* Whether the comparison is signed. */
368 bool signed_p;
369
370 /* The mode in that niter_expr should be computed. */
371 enum machine_mode mode;
372
373 /* The number of iterations of the loop. */
374 rtx niter_expr;
375};
376
377extern void iv_analysis_loop_init (struct loop *);
6d4e0ecc 378extern bool iv_analyze (rtx, rtx, struct rtx_iv *);
03fd2215
ZD
379extern bool iv_analyze_result (rtx, rtx, struct rtx_iv *);
380extern bool iv_analyze_expr (rtx, rtx, enum machine_mode, struct rtx_iv *);
50654f6c 381extern rtx get_iv_value (struct rtx_iv *, rtx);
113d659a 382extern bool biv_p (rtx, rtx);
50654f6c 383extern void find_simple_exit (struct loop *, struct niter_desc *);
50654f6c 384extern void iv_analysis_done (void);
03fd2215 385extern struct df *iv_current_loop_df (void);
50654f6c
ZD
386
387extern struct niter_desc *get_simple_loop_desc (struct loop *loop);
388extern void free_simple_loop_desc (struct loop *loop);
389
390static inline struct niter_desc *
391simple_loop_desc (struct loop *loop)
392{
cceb1885 393 return (struct niter_desc *) loop->aux;
50654f6c
ZD
394}
395
8b11a64c
ZD
396/* The properties of the target. */
397
398extern unsigned target_avail_regs; /* Number of available registers. */
399extern unsigned target_res_regs; /* Number of reserved registers. */
400extern unsigned target_small_cost; /* The cost for register when there
401 is a free one. */
402extern unsigned target_pres_cost; /* The cost for register when there are
403 not too many free ones. */
404extern unsigned target_spill_cost; /* The cost for register when we need
405 to spill. */
406
5e962776
ZD
407/* Register pressure estimation for induction variable optimizations & loop
408 invariant motion. */
409extern unsigned global_cost_for_size (unsigned, unsigned, unsigned);
410extern void init_set_costs (void);
411
617b465c 412/* Loop optimizer initialization. */
10d22567
ZD
413extern struct loops *loop_optimizer_init (unsigned);
414extern void loop_optimizer_finalize (struct loops *);
617b465c
ZD
415
416/* Optimization passes. */
d329e058 417extern void unswitch_loops (struct loops *);
617b465c 418
b17d5d7c
ZD
419enum
420{
421 UAP_PEEL = 1, /* Enables loop peeling. */
422 UAP_UNROLL = 2, /* Enables peeling of loops if it seems profitable. */
423 UAP_UNROLL_ALL = 4 /* Enables peeling of all loops. */
424};
425
d329e058 426extern void unroll_and_peel_loops (struct loops *, int);
689ba89d 427extern void doloop_optimize_loops (struct loops *);
5e962776 428extern void move_loop_invariants (struct loops *);
59587b18
JQ
429
430#endif /* GCC_CFGLOOP_H */