]> git.ipfire.org Git - thirdparty/gcc.git/blame - gcc/cfgloop.h
[35/77] Add uses of as_a <scalar_int_mode>
[thirdparty/gcc.git] / gcc / cfgloop.h
CommitLineData
3d436d2a 1/* Natural loop functions
cbe34bb5 2 Copyright (C) 1987-2017 Free Software Foundation, Inc.
3d436d2a
ZD
3
4This file is part of GCC.
5
6GCC is free software; you can redistribute it and/or modify it under
7the terms of the GNU General Public License as published by the Free
9dcd6f09 8Software Foundation; either version 3, or (at your option) any later
3d436d2a
ZD
9version.
10
11GCC is distributed in the hope that it will be useful, but WITHOUT ANY
12WARRANTY; without even the implied warranty of MERCHANTABILITY or
13FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14for more details.
15
16You should have received a copy of the GNU General Public License
9dcd6f09
NC
17along with GCC; see the file COPYING3. If not see
18<http://www.gnu.org/licenses/>. */
3d436d2a 19
59587b18
JQ
20#ifndef GCC_CFGLOOP_H
21#define GCC_CFGLOOP_H
22
893479de 23#include "cfgloopmanip.h"
7a8cba34 24
3d436d2a
ZD
25/* Structure to hold decision about unrolling/peeling. */
26enum lpt_dec
27{
28 LPT_NONE,
3d436d2a
ZD
29 LPT_UNROLL_CONSTANT,
30 LPT_UNROLL_RUNTIME,
31 LPT_UNROLL_STUPID
32};
33
d1b38208 34struct GTY (()) lpt_decision {
3d436d2a
ZD
35 enum lpt_dec decision;
36 unsigned times;
37};
38
1c1ad7bb
SB
39/* The type of extend applied to an IV. */
40enum iv_extend_code
41{
42 IV_SIGN_EXTEND,
43 IV_ZERO_EXTEND,
44 IV_UNKNOWN_EXTEND
45};
46
86df10e3
SP
47/* The structure describing a bound on number of iterations of a loop. */
48
d1b38208 49struct GTY ((chain_next ("%h.next"))) nb_iter_bound {
946e1bc7 50 /* The statement STMT is executed at most ... */
355fe088 51 gimple *stmt;
946e1bc7
ZD
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. */
807e902e 60 widest_int bound;
946e1bc7 61
b8698a0f 62 /* True if the statement will cause the loop to be leaved the (at most)
946e1bc7
ZD
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
946e1bc7 67 /* The next bound in the list. */
86df10e3 68 struct nb_iter_bound *next;
86df10e3
SP
69};
70
6270df4c
ZD
71/* Description of the loop exit. */
72
2a22f99c 73struct GTY ((for_user)) loop_exit {
6270df4c 74 /* The exit edge. */
b8244d74 75 edge e;
6270df4c
ZD
76
77 /* Previous and next exit in the list of the exits of the loop. */
78 struct loop_exit *prev;
79 struct loop_exit *next;
80
81 /* Next element in the list of loops from that E exits. */
82 struct loop_exit *next_e;
83};
84
ca752f39 85struct loop_exit_hasher : ggc_ptr_hash<loop_exit>
2a22f99c
TS
86{
87 typedef edge compare_type;
88
89 static hashval_t hash (loop_exit *);
90 static bool equal (loop_exit *, edge);
91 static void remove (loop_exit *);
92};
93
9ba025a2 94typedef struct loop *loop_p;
9ba025a2 95
ae50c0cb
TN
96/* An integer estimation of the number of iterations. Estimate_state
97 describes what is the state of the estimation. */
98enum loop_estimation
99{
100 /* Estimate was not computed yet. */
101 EST_NOT_COMPUTED,
102 /* Estimate is ready. */
dd366ec3
RB
103 EST_AVAILABLE,
104 EST_LAST
ae50c0cb
TN
105};
106
2f07b722
BC
107/* The structure describing non-overflow control induction variable for
108 loop's exit edge. */
109struct GTY ((chain_next ("%h.next"))) control_iv {
110 tree base;
111 tree step;
112 struct control_iv *next;
113};
114
3d436d2a 115/* Structure to hold information for each natural loop. */
d1b38208 116struct GTY ((chain_next ("%h.next"))) loop {
542e7230
BC
117 /* Index into loops array. Note indices will never be reused after loop
118 is destroyed. */
3d436d2a
ZD
119 int num;
120
8f5929e1
JJ
121 /* Number of loop insns. */
122 unsigned ninsns;
123
3d436d2a 124 /* Basic block of loop header. */
b8244d74 125 basic_block header;
3d436d2a
ZD
126
127 /* Basic block of loop latch. */
b8244d74 128 basic_block latch;
3d436d2a 129
3d436d2a
ZD
130 /* For loop unrolling/peeling decision. */
131 struct lpt_decision lpt_decision;
132
3d436d2a
ZD
133 /* Average number of executed insns per iteration. */
134 unsigned av_ninsns;
135
3d436d2a
ZD
136 /* Number of blocks contained within the loop. */
137 unsigned num_nodes;
138
9ba025a2 139 /* Superloops of the loop, starting with the outermost loop. */
9771b263 140 vec<loop_p, va_gc> *superloops;
3d436d2a
ZD
141
142 /* The first inner (child) loop or NULL if innermost loop. */
143 struct loop *inner;
144
145 /* Link to the next (sibling) loop. */
146 struct loop *next;
147
3d436d2a 148 /* Auxiliary info specific to a pass. */
9e2f83a5 149 PTR GTY ((skip (""))) aux;
3d436d2a 150
0a74c758
SP
151 /* The number of times the latch of the loop is executed. This can be an
152 INTEGER_CST, or a symbolic expression representing the number of
153 iterations like "N - 1", or a COND_EXPR containing the runtime
154 conditions under which the number of iterations is non zero.
155
156 Don't access this field directly: number_of_latch_executions
157 computes and caches the computed information in this field. */
9baba81b
SP
158 tree nb_iterations;
159
b4a9343c
ZD
160 /* An integer guaranteed to be greater or equal to nb_iterations. Only
161 valid if any_upper_bound is true. */
807e902e 162 widest_int nb_iterations_upper_bound;
9bdb685e 163
105e29c5
JH
164 widest_int nb_iterations_likely_upper_bound;
165
b4a9343c
ZD
166 /* An integer giving an estimate on nb_iterations. Unlike
167 nb_iterations_upper_bound, there is no guarantee that it is at least
168 nb_iterations. */
807e902e 169 widest_int nb_iterations_estimate;
86df10e3 170
74bf76ed
JJ
171 /* If > 0, an integer, where the user asserted that for any
172 I in [ 0, nb_iterations ) and for any J in
173 [ I, min ( I + safelen, nb_iterations ) ), the Ith and Jth iterations
174 of the loop can be safely evaluated concurrently. */
175 int safelen;
176
18767ebc
BC
177 /* Constraints are generally set by consumers and affect certain
178 semantics of niter analyzer APIs. Currently the APIs affected are
179 number_of_iterations_exit* functions and their callers. One typical
180 use case of constraints is to vectorize possibly infinite loop:
181
182 1) Compute niter->assumptions by calling niter analyzer API and
183 record it as possible condition for loop versioning.
184 2) Clear buffered result of niter/scev analyzer.
185 3) Set constraint LOOP_C_FINITE assuming the loop is finite.
186 4) Analyze data references. Since data reference analysis depends
187 on niter/scev analyzer, the point is that niter/scev analysis
188 is done under circumstance of LOOP_C_FINITE constraint.
189 5) Version the loop with niter->assumptions computed in step 1).
190 6) Vectorize the versioned loop in which niter->assumptions is
191 checked to be true.
192 7) Update constraints in versioned loops so that niter analyzer
193 in following passes can use it.
194
195 Note consumers are usually the loop optimizers and it is consumers'
196 responsibility to set/clear constraints correctly. Failing to do
197 that might result in hard to track down bugs in niter/scev consumers. */
198 unsigned constraints;
199
34e82342
RB
200 /* An integer estimation of the number of iterations. Estimate_state
201 describes what is the state of the estimation. */
202 ENUM_BITFIELD(loop_estimation) estimate_state : 8;
203
204 unsigned any_upper_bound : 1;
205 unsigned any_estimate : 1;
206 unsigned any_likely_upper_bound : 1;
207
208 /* True if the loop can be parallel. */
209 unsigned can_be_parallel : 1;
210
211 /* True if -Waggressive-loop-optimizations warned about this loop
212 already. */
213 unsigned warned_aggressive_loop_optimizations : 1;
214
5ce9450f 215 /* True if this loop should never be vectorized. */
34e82342 216 unsigned dont_vectorize : 1;
5ce9450f 217
718c4601 218 /* True if we should try harder to vectorize this loop. */
34e82342 219 unsigned force_vectorize : 1;
718c4601 220
886c388d 221 /* True if the loop is part of an oacc kernels region. */
34e82342 222 unsigned in_oacc_kernels_region : 1;
886c388d 223
74bf76ed
JJ
224 /* For SIMD loops, this is a unique identifier of the loop, referenced
225 by IFN_GOMP_SIMD_VF, IFN_GOMP_SIMD_LANE and IFN_GOMP_SIMD_LAST_LANE
226 builtins. */
227 tree simduid;
228
542e7230
BC
229 /* In loop optimization, it's common to generate loops from the original
230 loop. This field records the index of the original loop which can be
231 used to track the original loop from newly generated loops. This can
232 be done by calling function get_loop (cfun, orig_loop_num). Note the
233 original loop could be destroyed for various reasons thus no longer
234 exists, as a result, function call to get_loop returns NULL pointer.
235 In this case, this field should not be used and needs to be cleared
236 whenever possible. */
237 int orig_loop_num;
238
e9eb809d
ZD
239 /* Upper bound on number of iterations of a loop. */
240 struct nb_iter_bound *bounds;
82b85a85 241
2f07b722
BC
242 /* Non-overflow control ivs of a loop. */
243 struct control_iv *control_ivs;
244
6270df4c 245 /* Head of the cyclic list of the exits of the loop. */
9e2f83a5 246 struct loop_exit *exits;
ef23e6a2
RB
247
248 /* Number of iteration analysis data for RTL. */
249 struct niter_desc *simple_loop_desc;
e4ca2139 250
e4ca2139
RB
251 /* For sanity checking during loop fixup we record here the former
252 loop header for loops marked for removal. Note that this prevents
253 the basic-block from being collected but its index can still be
254 reused. */
255 basic_block former_header;
3d436d2a
ZD
256};
257
18767ebc
BC
258/* Set if the loop is known to be infinite. */
259#define LOOP_C_INFINITE (1 << 0)
260/* Set if the loop is known to be finite without any assumptions. */
261#define LOOP_C_FINITE (1 << 1)
262
263/* Set C to the LOOP constraint. */
264static inline void
265loop_constraint_set (struct loop *loop, unsigned c)
266{
267 loop->constraints |= c;
268}
269
270/* Clear C from the LOOP constraint. */
271static inline void
272loop_constraint_clear (struct loop *loop, unsigned c)
273{
274 loop->constraints &= ~c;
275}
276
277/* Check if C is set in the LOOP constraint. */
278static inline bool
279loop_constraint_set_p (struct loop *loop, unsigned c)
280{
281 return (loop->constraints & c) == c;
282}
283
3d436d2a
ZD
284/* Flags for state of loop structure. */
285enum
286{
287 LOOPS_HAVE_PREHEADERS = 1,
288 LOOPS_HAVE_SIMPLE_LATCHES = 2,
82b85a85 289 LOOPS_HAVE_MARKED_IRREDUCIBLE_REGIONS = 4,
89f8f30f 290 LOOPS_HAVE_RECORDED_EXITS = 8,
c7b852c8 291 LOOPS_MAY_HAVE_MULTIPLE_LATCHES = 16,
592c303d 292 LOOP_CLOSED_SSA = 32,
e855c69d
AB
293 LOOPS_NEED_FIXUP = 64,
294 LOOPS_HAVE_FALLTHRU_PREHEADERS = 128
3d436d2a
ZD
295};
296
d78f3f78
ZD
297#define LOOPS_NORMAL (LOOPS_HAVE_PREHEADERS | LOOPS_HAVE_SIMPLE_LATCHES \
298 | LOOPS_HAVE_MARKED_IRREDUCIBLE_REGIONS)
89f8f30f 299#define AVOID_CFG_MODIFICATIONS (LOOPS_MAY_HAVE_MULTIPLE_LATCHES)
d78f3f78 300
3d436d2a 301/* Structure to hold CFG information about natural loops within a function. */
d1b38208 302struct GTY (()) loops {
0162f155
RG
303 /* State of loops. */
304 int state;
3d436d2a 305
42fd6772 306 /* Array of the loops. */
9771b263 307 vec<loop_p, va_gc> *larray;
3d436d2a 308
6270df4c
ZD
309 /* Maps edges to the list of their descriptions as loop exits. Edges
310 whose sources or destinations have loop_father == NULL (which may
311 happen during the cfg manipulations) should not appear in EXITS. */
2a22f99c 312 hash_table<loop_exit_hasher> *GTY(()) exits;
6270df4c 313
3d436d2a
ZD
314 /* Pointer to root of loop hierarchy tree. */
315 struct loop *tree_root;
3d436d2a
ZD
316};
317
3d436d2a 318/* Loop recognition. */
0375167b 319bool bb_loop_header_p (basic_block);
dd366ec3 320void init_loops_structure (struct function *, struct loops *, unsigned);
0375167b 321extern struct loops *flow_loops_find (struct loops *);
89f8f30f 322extern void disambiguate_loops_with_multiple_latches (void);
d329e058 323extern void flow_loops_free (struct loops *);
d73be268 324extern void flow_loops_dump (FILE *,
d329e058
AJ
325 void (*)(const struct loop *, FILE *, int), int);
326extern void flow_loop_dump (const struct loop *, FILE *,
327 void (*)(const struct loop *, FILE *, int), int);
6270df4c 328struct loop *alloc_loop (void);
d329e058 329extern void flow_loop_free (struct loop *);
2b271002 330int flow_loop_nodes_find (basic_block, struct loop *);
8e89b5b5 331unsigned fix_loop_structure (bitmap changed_bbs);
2de58650 332bool mark_irreducible_loops (void);
61183076 333void release_recorded_exits (function *);
6270df4c
ZD
334void record_loop_exits (void);
335void rescan_loop_exit (edge, bool, bool);
3d436d2a 336
4d6922ee 337/* Loop data structure manipulation/querying. */
d329e058
AJ
338extern void flow_loop_tree_node_add (struct loop *, struct loop *);
339extern void flow_loop_tree_node_remove (struct loop *);
d329e058 340extern bool flow_loop_nested_p (const struct loop *, const struct loop *);
ed7a4b4b 341extern bool flow_bb_inside_loop_p (const struct loop *, const_basic_block);
d329e058 342extern struct loop * find_common_loop (struct loop *, struct loop *);
a7e5372d 343struct loop *superloop_at_depth (struct loop *, unsigned);
a79683d5 344struct eni_weights;
ed7a4b4b
KG
345extern int num_loop_insns (const struct loop *);
346extern int average_num_loop_insns (const struct loop *);
689ba89d 347extern unsigned get_loop_level (const struct loop *);
ed7a4b4b 348extern bool loop_exit_edge_p (const struct loop *, const_edge);
f4ce375d
VK
349extern bool loop_exits_to_bb_p (struct loop *, basic_block);
350extern bool loop_exits_from_bb_p (struct loop *, basic_block);
d73be268 351extern void mark_loop_exit_edges (void);
e25a6711 352extern location_t get_loop_location (struct loop *loop);
3d436d2a
ZD
353
354/* Loops & cfg manipulation. */
d329e058 355extern basic_block *get_loop_body (const struct loop *);
89f8f30f
ZD
356extern unsigned get_loop_body_with_size (const struct loop *, basic_block *,
357 unsigned);
50654f6c 358extern basic_block *get_loop_body_in_dom_order (const struct loop *);
40923b20 359extern basic_block *get_loop_body_in_bfs_order (const struct loop *);
b8698a0f 360extern basic_block *get_loop_body_in_custom_order (const struct loop *,
e855c69d
AB
361 int (*) (const void *, const void *));
362
9771b263 363extern vec<edge> get_loop_exit_edges (const struct loop *);
6d96bad2
JH
364extern edge single_exit (const struct loop *);
365extern edge single_likely_exit (struct loop *loop);
50654f6c 366extern unsigned num_loop_branches (const struct loop *);
3d436d2a 367
d329e058
AJ
368extern edge loop_preheader_edge (const struct loop *);
369extern edge loop_latch_edge (const struct loop *);
3d436d2a 370
d329e058
AJ
371extern void add_bb_to_loop (basic_block, struct loop *);
372extern void remove_bb_from_loops (basic_block);
3d436d2a 373
d73be268 374extern void cancel_loop_tree (struct loop *);
42fd6772 375extern void delete_loop (struct loop *);
3d436d2a 376
3d436d2a 377
d73be268 378extern void verify_loop_structure (void);
3d436d2a
ZD
379
380/* Loop analysis. */
ed7a4b4b 381extern bool just_once_each_iteration_p (const struct loop *, const_basic_block);
199b1891
ML
382gcov_type expected_loop_iterations_unbounded (const struct loop *,
383 bool *read_profile_p = NULL);
97c53806 384extern unsigned expected_loop_iterations (struct loop *);
30d2ef86 385extern rtx doloop_condition_get (rtx_insn *);
617b465c 386
08c13199
RB
387void mark_loop_for_removal (loop_p);
388
50654f6c
ZD
389/* Induction variable analysis. */
390
391/* The description of induction variable. The things are a bit complicated
392 due to need to handle subregs and extends. The value of the object described
393 by it can be obtained as follows (all computations are done in extend_mode):
394
395 Value in i-th iteration is
396 delta + mult * extend_{extend_mode} (subreg_{mode} (base + i * step)).
397
398 If first_special is true, the value in the first iteration is
399 delta + mult * base
c22cacf3 400
f822d252 401 If extend = UNKNOWN, first_special must be false, delta 0, mult 1 and value is
50654f6c
ZD
402 subreg_{mode} (base + i * step)
403
404 The get_iv_value function can be used to obtain these expressions.
405
406 ??? Add a third mode field that would specify the mode in that inner
407 computation is done, which would enable it to be different from the
408 outer one? */
409
410struct rtx_iv
411{
412 /* Its base and step (mode of base and step is supposed to be extend_mode,
413 see the description above). */
414 rtx base, step;
415
1c1ad7bb
SB
416 /* The type of extend applied to it (IV_SIGN_EXTEND, IV_ZERO_EXTEND,
417 or IV_UNKNOWN_EXTEND). */
418 enum iv_extend_code extend;
50654f6c
ZD
419
420 /* Operations applied in the extended mode. */
421 rtx delta, mult;
422
423 /* The mode it is extended to. */
ef4bddc2 424 machine_mode extend_mode;
50654f6c
ZD
425
426 /* The mode the variable iterates in. */
ef4bddc2 427 machine_mode mode;
50654f6c 428
50654f6c
ZD
429 /* Whether the first iteration needs to be handled specially. */
430 unsigned first_special : 1;
431};
432
f2dca510
ZD
433/* The description of an exit from the loop and of the number of iterations
434 till we take the exit. */
50654f6c 435
ef23e6a2 436struct GTY(()) niter_desc
50654f6c
ZD
437{
438 /* The edge out of the loop. */
439 edge out_edge;
440
441 /* The other edge leading from the condition. */
442 edge in_edge;
443
444 /* True if we are able to say anything about number of iterations of the
445 loop. */
446 bool simple_p;
447
448 /* True if the loop iterates the constant number of times. */
449 bool const_iter;
450
451 /* Number of iterations if constant. */
a9243bfc 452 uint64_t niter;
50654f6c 453
50654f6c
ZD
454 /* Assumptions under that the rest of the information is valid. */
455 rtx assumptions;
456
457 /* Assumptions under that the loop ends before reaching the latch,
458 even if value of niter_expr says otherwise. */
459 rtx noloop_assumptions;
460
461 /* Condition under that the loop is infinite. */
462 rtx infinite;
463
464 /* Whether the comparison is signed. */
465 bool signed_p;
466
467 /* The mode in that niter_expr should be computed. */
ef4bddc2 468 machine_mode mode;
50654f6c
ZD
469
470 /* The number of iterations of the loop. */
471 rtx niter_expr;
472};
473
474extern void iv_analysis_loop_init (struct loop *);
1b20d55a
DM
475extern bool iv_analyze (rtx_insn *, rtx, struct rtx_iv *);
476extern bool iv_analyze_result (rtx_insn *, rtx, struct rtx_iv *);
ef4bddc2 477extern bool iv_analyze_expr (rtx_insn *, rtx, machine_mode,
1b20d55a 478 struct rtx_iv *);
50654f6c 479extern rtx get_iv_value (struct rtx_iv *, rtx);
1b20d55a 480extern bool biv_p (rtx_insn *, rtx);
50654f6c 481extern void find_simple_exit (struct loop *, struct niter_desc *);
50654f6c
ZD
482extern void iv_analysis_done (void);
483
484extern struct niter_desc *get_simple_loop_desc (struct loop *loop);
485extern void free_simple_loop_desc (struct loop *loop);
486
487static inline struct niter_desc *
488simple_loop_desc (struct loop *loop)
489{
ef23e6a2 490 return loop->simple_loop_desc;
50654f6c
ZD
491}
492
42fd6772
ZD
493/* Accessors for the loop structures. */
494
0fc822d0 495/* Returns the loop with index NUM from FNs loop tree. */
42fd6772
ZD
496
497static inline struct loop *
0fc822d0 498get_loop (struct function *fn, unsigned num)
42fd6772 499{
0fc822d0 500 return (*loops_for_fn (fn)->larray)[num];
42fd6772
ZD
501}
502
9ba025a2
ZD
503/* Returns the number of superloops of LOOP. */
504
505static inline unsigned
506loop_depth (const struct loop *loop)
507{
9771b263 508 return vec_safe_length (loop->superloops);
9ba025a2
ZD
509}
510
511/* Returns the immediate superloop of LOOP, or NULL if LOOP is the outermost
512 loop. */
513
514static inline struct loop *
515loop_outer (const struct loop *loop)
516{
9771b263 517 unsigned n = vec_safe_length (loop->superloops);
9ba025a2
ZD
518
519 if (n == 0)
520 return NULL;
521
9771b263 522 return (*loop->superloops)[n - 1];
9ba025a2
ZD
523}
524
07643d76
AM
525/* Returns true if LOOP has at least one exit edge. */
526
527static inline bool
528loop_has_exit_edges (const struct loop *loop)
529{
530 return loop->exits->next->e != NULL;
531}
532
0fc822d0 533/* Returns the list of loops in FN. */
42fd6772 534
0fc822d0
RB
535inline vec<loop_p, va_gc> *
536get_loops (struct function *fn)
42fd6772 537{
0fc822d0
RB
538 struct loops *loops = loops_for_fn (fn);
539 if (!loops)
42fd6772
ZD
540 return NULL;
541
0fc822d0 542 return loops->larray;
42fd6772
ZD
543}
544
0fc822d0 545/* Returns the number of loops in FN (including the removed
42fd6772
ZD
546 ones and the fake loop that forms the root of the loop tree). */
547
548static inline unsigned
0fc822d0 549number_of_loops (struct function *fn)
42fd6772 550{
0fc822d0 551 struct loops *loops = loops_for_fn (fn);
0d0e2af6 552 if (!loops)
42fd6772
ZD
553 return 0;
554
0fc822d0 555 return vec_safe_length (loops->larray);
42fd6772
ZD
556}
557
f87000d0
ZD
558/* Returns true if state of the loops satisfies all properties
559 described by FLAGS. */
560
61183076
RB
561static inline bool
562loops_state_satisfies_p (function *fn, unsigned flags)
563{
564 return (loops_for_fn (fn)->state & flags) == flags;
565}
566
f87000d0
ZD
567static inline bool
568loops_state_satisfies_p (unsigned flags)
569{
61183076 570 return loops_state_satisfies_p (cfun, flags);
f87000d0
ZD
571}
572
573/* Sets FLAGS to the loops state. */
574
61183076
RB
575static inline void
576loops_state_set (function *fn, unsigned flags)
577{
578 loops_for_fn (fn)->state |= flags;
579}
580
f87000d0
ZD
581static inline void
582loops_state_set (unsigned flags)
583{
61183076 584 loops_state_set (cfun, flags);
f87000d0
ZD
585}
586
587/* Clears FLAGS from the loops state. */
588
61183076
RB
589static inline void
590loops_state_clear (function *fn, unsigned flags)
591{
592 loops_for_fn (fn)->state &= ~flags;
593}
594
f87000d0
ZD
595static inline void
596loops_state_clear (unsigned flags)
597{
598 if (!current_loops)
599 return;
61183076 600 loops_state_clear (cfun, flags);
f87000d0
ZD
601}
602
a84a49b7
RB
603/* Check loop structure invariants, if internal consistency checks are
604 enabled. */
605
606static inline void
607checking_verify_loop_structure (void)
608{
609 /* VERIFY_LOOP_STRUCTURE essentially asserts that no loops need fixups.
610
611 The loop optimizers should never make changes to the CFG which
612 require loop fixups. But the low level CFG manipulation code may
613 set the flag conservatively.
614
615 Go ahead and clear the flag here. That avoids the assert inside
616 VERIFY_LOOP_STRUCTURE, and if there is an inconsistency in the loop
617 structures VERIFY_LOOP_STRUCTURE will detect it.
618
619 This also avoid the compile time cost of excessive fixups. */
620 loops_state_clear (LOOPS_NEED_FIXUP);
621 if (flag_checking)
622 verify_loop_structure ();
623}
624
42fd6772
ZD
625/* Loop iterators. */
626
627/* Flags for loop iteration. */
628
629enum li_flags
630{
677cc14d
ZD
631 LI_INCLUDE_ROOT = 1, /* Include the fake root of the loop tree. */
632 LI_FROM_INNERMOST = 2, /* Iterate over the loops in the reverse order,
633 starting from innermost ones. */
634 LI_ONLY_INNERMOST = 4 /* Iterate only over innermost loops. */
42fd6772
ZD
635};
636
637/* The iterator for loops. */
638
f0bd40b1 639struct loop_iterator
42fd6772 640{
61183076 641 loop_iterator (function *fn, loop_p *loop, unsigned flags);
f0bd40b1
RB
642 ~loop_iterator ();
643
644 inline loop_p next ();
645
61183076
RB
646 /* The function we are visiting. */
647 function *fn;
648
677cc14d 649 /* The list of loops to visit. */
9771b263 650 vec<int> to_visit;
677cc14d
ZD
651
652 /* The index of the actual loop. */
653 unsigned idx;
f0bd40b1 654};
42fd6772 655
f0bd40b1
RB
656inline loop_p
657loop_iterator::next ()
42fd6772 658{
677cc14d
ZD
659 int anum;
660
f0bd40b1 661 while (this->to_visit.iterate (this->idx, &anum))
42fd6772 662 {
f0bd40b1 663 this->idx++;
61183076 664 loop_p loop = get_loop (fn, anum);
f0bd40b1
RB
665 if (loop)
666 return loop;
42fd6772
ZD
667 }
668
f0bd40b1 669 return NULL;
42fd6772
ZD
670}
671
f0bd40b1 672inline
61183076 673loop_iterator::loop_iterator (function *fn, loop_p *loop, unsigned flags)
42fd6772 674{
677cc14d
ZD
675 struct loop *aloop;
676 unsigned i;
677 int mn;
678
f0bd40b1 679 this->idx = 0;
61183076
RB
680 this->fn = fn;
681 if (!loops_for_fn (fn))
42fd6772 682 {
f0bd40b1 683 this->to_visit.create (0);
42fd6772
ZD
684 *loop = NULL;
685 return;
686 }
687
61183076 688 this->to_visit.create (number_of_loops (fn));
677cc14d
ZD
689 mn = (flags & LI_INCLUDE_ROOT) ? 0 : 1;
690
691 if (flags & LI_ONLY_INNERMOST)
692 {
61183076 693 for (i = 0; vec_safe_iterate (loops_for_fn (fn)->larray, i, &aloop); i++)
677cc14d
ZD
694 if (aloop != NULL
695 && aloop->inner == NULL
696 && aloop->num >= mn)
f0bd40b1 697 this->to_visit.quick_push (aloop->num);
677cc14d
ZD
698 }
699 else if (flags & LI_FROM_INNERMOST)
42fd6772 700 {
677cc14d 701 /* Push the loops to LI->TO_VISIT in postorder. */
61183076 702 for (aloop = loops_for_fn (fn)->tree_root;
677cc14d
ZD
703 aloop->inner != NULL;
704 aloop = aloop->inner)
705 continue;
706
707 while (1)
708 {
709 if (aloop->num >= mn)
f0bd40b1 710 this->to_visit.quick_push (aloop->num);
677cc14d
ZD
711
712 if (aloop->next)
713 {
714 for (aloop = aloop->next;
715 aloop->inner != NULL;
716 aloop = aloop->inner)
717 continue;
718 }
9ba025a2 719 else if (!loop_outer (aloop))
677cc14d
ZD
720 break;
721 else
9ba025a2 722 aloop = loop_outer (aloop);
677cc14d 723 }
42fd6772
ZD
724 }
725 else
726 {
677cc14d 727 /* Push the loops to LI->TO_VISIT in preorder. */
61183076 728 aloop = loops_for_fn (fn)->tree_root;
677cc14d
ZD
729 while (1)
730 {
731 if (aloop->num >= mn)
f0bd40b1 732 this->to_visit.quick_push (aloop->num);
677cc14d
ZD
733
734 if (aloop->inner != NULL)
735 aloop = aloop->inner;
736 else
737 {
738 while (aloop != NULL && aloop->next == NULL)
9ba025a2 739 aloop = loop_outer (aloop);
677cc14d
ZD
740 if (aloop == NULL)
741 break;
742 aloop = aloop->next;
743 }
744 }
42fd6772 745 }
677cc14d 746
f0bd40b1 747 *loop = this->next ();
42fd6772
ZD
748}
749
f0bd40b1
RB
750inline
751loop_iterator::~loop_iterator ()
752{
753 this->to_visit.release ();
754}
677cc14d 755
f0bd40b1 756#define FOR_EACH_LOOP(LOOP, FLAGS) \
61183076
RB
757 for (loop_iterator li(cfun, &(LOOP), FLAGS); \
758 (LOOP); \
759 (LOOP) = li.next ())
760
761#define FOR_EACH_LOOP_FN(FN, LOOP, FLAGS) \
762 for (loop_iterator li(fn, &(LOOP), FLAGS); \
f0bd40b1
RB
763 (LOOP); \
764 (LOOP) = li.next ())
42fd6772 765
8b11a64c 766/* The properties of the target. */
4391924a
RS
767struct target_cfgloop {
768 /* Number of available registers. */
769 unsigned x_target_avail_regs;
8b11a64c 770
4391924a
RS
771 /* Number of available registers that are call-clobbered. */
772 unsigned x_target_clobbered_regs;
773
774 /* Number of registers reserved for temporary expressions. */
775 unsigned x_target_res_regs;
776
777 /* The cost for register when there still is some reserve, but we are
778 approaching the number of available registers. */
779 unsigned x_target_reg_cost[2];
780
781 /* The cost for register when we need to spill. */
782 unsigned x_target_spill_cost[2];
783};
784
785extern struct target_cfgloop default_target_cfgloop;
786#if SWITCHABLE_TARGET
787extern struct target_cfgloop *this_target_cfgloop;
788#else
789#define this_target_cfgloop (&default_target_cfgloop)
790#endif
791
792#define target_avail_regs \
793 (this_target_cfgloop->x_target_avail_regs)
794#define target_clobbered_regs \
795 (this_target_cfgloop->x_target_clobbered_regs)
796#define target_res_regs \
797 (this_target_cfgloop->x_target_res_regs)
798#define target_reg_cost \
799 (this_target_cfgloop->x_target_reg_cost)
800#define target_spill_cost \
801 (this_target_cfgloop->x_target_spill_cost)
8b11a64c 802
5e962776
ZD
803/* Register pressure estimation for induction variable optimizations & loop
804 invariant motion. */
bec922f0 805extern unsigned estimate_reg_pressure_cost (unsigned, unsigned, bool, bool);
5e962776
ZD
806extern void init_set_costs (void);
807
617b465c 808/* Loop optimizer initialization. */
598ec7bd 809extern void loop_optimizer_init (unsigned);
61183076
RB
810extern void loop_optimizer_finalize (function *);
811inline void
812loop_optimizer_finalize ()
813{
814 loop_optimizer_finalize (cfun);
815}
617b465c
ZD
816
817/* Optimization passes. */
b17d5d7c
ZD
818enum
819{
f8934be7
JH
820 UAP_UNROLL = 1, /* Enables unrolling of loops if it seems profitable. */
821 UAP_UNROLL_ALL = 2 /* Enables unrolling of all loops. */
b17d5d7c
ZD
822};
823
d73be268
ZD
824extern void doloop_optimize_loops (void);
825extern void move_loop_invariants (void);
9771b263 826extern vec<basic_block> get_loop_hot_path (const struct loop *loop);
59587b18 827
a5497b12
VK
828/* Returns the outermost loop of the loop nest that contains LOOP.*/
829static inline struct loop *
830loop_outermost (struct loop *loop)
831{
9771b263 832 unsigned n = vec_safe_length (loop->superloops);
a5497b12
VK
833
834 if (n <= 1)
835 return loop;
836
9771b263 837 return (*loop->superloops)[1];
a5497b12
VK
838}
839
807e902e 840extern void record_niter_bound (struct loop *, const widest_int &, bool, bool);
1ef88893 841extern HOST_WIDE_INT get_estimated_loop_iterations_int (struct loop *);
199b1891 842extern HOST_WIDE_INT get_max_loop_iterations_int (const struct loop *);
105e29c5 843extern HOST_WIDE_INT get_likely_max_loop_iterations_int (struct loop *);
807e902e 844extern bool get_estimated_loop_iterations (struct loop *loop, widest_int *nit);
199b1891 845extern bool get_max_loop_iterations (const struct loop *loop, widest_int *nit);
105e29c5 846extern bool get_likely_max_loop_iterations (struct loop *loop, widest_int *nit);
4484a35a 847extern int bb_loop_depth (const_basic_block);
a5497b12 848
807e902e 849/* Converts VAL to widest_int. */
71343877 850
807e902e
KZ
851static inline widest_int
852gcov_type_to_wide_int (gcov_type val)
71343877 853{
807e902e 854 HOST_WIDE_INT a[2];
71343877 855
807e902e 856 a[0] = (unsigned HOST_WIDE_INT) val;
71343877
AM
857 /* If HOST_BITS_PER_WIDE_INT == HOST_BITS_PER_WIDEST_INT, avoid shifting by
858 the size of type. */
859 val >>= HOST_BITS_PER_WIDE_INT - 1;
860 val >>= 1;
807e902e 861 a[1] = (unsigned HOST_WIDE_INT) val;
71343877 862
807e902e 863 return widest_int::from_array (a, 2);
71343877 864}
59587b18 865#endif /* GCC_CFGLOOP_H */