1 /* Gimple folding definitions.
2
3 Copyright (C) 2011-2022 Free Software Foundation, Inc.
4 Contributed by Richard Guenther <rguenther@suse.de>
5
6 This file is part of GCC.
7
8 GCC is free software; you can redistribute it and/or modify it under
9 the terms of the GNU General Public License as published by the Free
10 Software Foundation; either version 3, or (at your option) any later
11 version.
12
13 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
14 WARRANTY; without even the implied warranty of MERCHANTABILITY or
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
16 for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with GCC; see the file COPYING3. If not see
20 <http://www.gnu.org/licenses/>. */
21
22 #ifndef GCC_GIMPLE_FOLD_H
23 #define GCC_GIMPLE_FOLD_H
24
25 extern tree create_tmp_reg_or_ssa_name (tree, gimple *stmt = NULL);
26 extern tree canonicalize_constructor_val (tree, tree);
27 extern tree get_symbol_constant_value (tree);
28 struct c_strlen_data;
29 extern bool get_range_strlen (tree, c_strlen_data *, unsigned eltsize);
30 extern void gimplify_and_update_call_from_tree (gimple_stmt_iterator *, tree);
31 extern bool update_gimple_call (gimple_stmt_iterator *, tree, int, ...);
32 extern bool fold_stmt (gimple_stmt_iterator *);
33 extern bool fold_stmt (gimple_stmt_iterator *, tree (*) (tree));
34 extern bool fold_stmt_inplace (gimple_stmt_iterator *);
35 extern tree maybe_fold_and_comparisons (tree, enum tree_code, tree, tree,
36 enum tree_code, tree, tree,
37 basic_block = nullptr);
38 extern tree maybe_fold_or_comparisons (tree, enum tree_code, tree, tree,
39 enum tree_code, tree, tree,
40 basic_block = nullptr);
41 extern bool clear_padding_type_may_have_padding_p (tree);
42 extern void clear_type_padding_in_mask (tree, unsigned char *);
43 extern bool optimize_atomic_compare_exchange_p (gimple *);
44 extern void fold_builtin_atomic_compare_exchange (gimple_stmt_iterator *);
45 extern bool arith_overflowed_p (enum tree_code, const_tree, const_tree,
46 const_tree);
47 extern tree no_follow_ssa_edges (tree);
48 extern tree follow_single_use_edges (tree);
49 extern tree follow_all_ssa_edges (tree);
50 extern tree gimple_fold_stmt_to_constant_1 (gimple *, tree (*) (tree),
51 tree (*) (tree) = no_follow_ssa_edges);
52 extern tree gimple_fold_stmt_to_constant (gimple *, tree (*) (tree));
53 extern tree fold_ctor_reference (tree, tree, const poly_uint64&,
54 const poly_uint64&, tree,
55 unsigned HOST_WIDE_INT * = NULL);
56 extern tree fold_const_aggregate_ref_1 (tree, tree (*) (tree));
57 extern tree fold_const_aggregate_ref (tree);
58 extern tree gimple_get_virt_method_for_binfo (HOST_WIDE_INT, tree,
59 bool *can_refer = NULL);
60 extern tree gimple_get_virt_method_for_vtable (HOST_WIDE_INT, tree,
61 unsigned HOST_WIDE_INT,
62 bool *can_refer = NULL);
63 extern tree gimple_fold_indirect_ref (tree);
64 extern bool gimple_fold_builtin_sprintf (gimple_stmt_iterator *);
65 extern bool gimple_fold_builtin_snprintf (gimple_stmt_iterator *);
66 extern bool arith_code_with_undefined_signed_overflow (tree_code);
67 extern gimple_seq rewrite_to_defined_overflow (gimple *, bool = false);
68 extern void replace_call_with_value (gimple_stmt_iterator *, tree);
69 extern tree tree_vec_extract (gimple_stmt_iterator *, tree, tree, tree, tree);
70
71 /* gimple_build, functionally matching fold_buildN, outputs stmts
72 int the provided sequence, matching and simplifying them on-the-fly.
73 Supposed to replace force_gimple_operand (fold_buildN (...), ...). */
74 extern tree gimple_build (gimple_seq *, location_t,
75 enum tree_code, tree, tree);
76 inline tree
gimple_build(gimple_seq * seq,enum tree_code code,tree type,tree op0)77 gimple_build (gimple_seq *seq,
78 enum tree_code code, tree type, tree op0)
79 {
80 return gimple_build (seq, UNKNOWN_LOCATION, code, type, op0);
81 }
82 extern tree gimple_build (gimple_seq *, location_t,
83 enum tree_code, tree, tree, tree);
84 inline tree
gimple_build(gimple_seq * seq,enum tree_code code,tree type,tree op0,tree op1)85 gimple_build (gimple_seq *seq,
86 enum tree_code code, tree type, tree op0, tree op1)
87 {
88 return gimple_build (seq, UNKNOWN_LOCATION, code, type, op0, op1);
89 }
90 extern tree gimple_build (gimple_seq *, location_t,
91 enum tree_code, tree, tree, tree, tree);
92 inline tree
gimple_build(gimple_seq * seq,enum tree_code code,tree type,tree op0,tree op1,tree op2)93 gimple_build (gimple_seq *seq,
94 enum tree_code code, tree type, tree op0, tree op1, tree op2)
95 {
96 return gimple_build (seq, UNKNOWN_LOCATION, code, type, op0, op1, op2);
97 }
98 extern tree gimple_build (gimple_seq *, location_t, combined_fn, tree);
99 inline tree
gimple_build(gimple_seq * seq,combined_fn fn,tree type)100 gimple_build (gimple_seq *seq, combined_fn fn, tree type)
101 {
102 return gimple_build (seq, UNKNOWN_LOCATION, fn, type);
103 }
104 extern tree gimple_build (gimple_seq *, location_t, combined_fn, tree, tree);
105 inline tree
gimple_build(gimple_seq * seq,combined_fn fn,tree type,tree arg0)106 gimple_build (gimple_seq *seq, combined_fn fn, tree type, tree arg0)
107 {
108 return gimple_build (seq, UNKNOWN_LOCATION, fn, type, arg0);
109 }
110 extern tree gimple_build (gimple_seq *, location_t, combined_fn,
111 tree, tree, tree);
112 inline tree
gimple_build(gimple_seq * seq,combined_fn fn,tree type,tree arg0,tree arg1)113 gimple_build (gimple_seq *seq, combined_fn fn,
114 tree type, tree arg0, tree arg1)
115 {
116 return gimple_build (seq, UNKNOWN_LOCATION, fn, type, arg0, arg1);
117 }
118 extern tree gimple_build (gimple_seq *, location_t, combined_fn,
119 tree, tree, tree, tree);
120 inline tree
gimple_build(gimple_seq * seq,combined_fn fn,tree type,tree arg0,tree arg1,tree arg2)121 gimple_build (gimple_seq *seq, combined_fn fn,
122 tree type, tree arg0, tree arg1, tree arg2)
123 {
124 return gimple_build (seq, UNKNOWN_LOCATION, fn, type, arg0, arg1, arg2);
125 }
126
127 extern tree gimple_convert (gimple_seq *, location_t, tree, tree);
128 inline tree
gimple_convert(gimple_seq * seq,tree type,tree op)129 gimple_convert (gimple_seq *seq, tree type, tree op)
130 {
131 return gimple_convert (seq, UNKNOWN_LOCATION, type, op);
132 }
133
134 extern tree gimple_convert_to_ptrofftype (gimple_seq *, location_t, tree);
135 inline tree
gimple_convert_to_ptrofftype(gimple_seq * seq,tree op)136 gimple_convert_to_ptrofftype (gimple_seq *seq, tree op)
137 {
138 return gimple_convert_to_ptrofftype (seq, UNKNOWN_LOCATION, op);
139 }
140
141 extern tree gimple_build_vector_from_val (gimple_seq *, location_t, tree,
142 tree);
143 inline tree
gimple_build_vector_from_val(gimple_seq * seq,tree type,tree op)144 gimple_build_vector_from_val (gimple_seq *seq, tree type, tree op)
145 {
146 return gimple_build_vector_from_val (seq, UNKNOWN_LOCATION, type, op);
147 }
148
149 class tree_vector_builder;
150 extern tree gimple_build_vector (gimple_seq *, location_t,
151 tree_vector_builder *);
152 inline tree
gimple_build_vector(gimple_seq * seq,tree_vector_builder * builder)153 gimple_build_vector (gimple_seq *seq, tree_vector_builder *builder)
154 {
155 return gimple_build_vector (seq, UNKNOWN_LOCATION, builder);
156 }
157
158 extern tree gimple_build_round_up (gimple_seq *, location_t, tree, tree,
159 unsigned HOST_WIDE_INT);
160 inline tree
gimple_build_round_up(gimple_seq * seq,tree type,tree old_size,unsigned HOST_WIDE_INT align)161 gimple_build_round_up (gimple_seq *seq, tree type, tree old_size,
162 unsigned HOST_WIDE_INT align)
163 {
164 return gimple_build_round_up (seq, UNKNOWN_LOCATION, type, old_size, align);
165 }
166
167 extern bool gimple_stmt_nonnegative_warnv_p (gimple *, bool *, int = 0);
168 extern bool gimple_stmt_integer_valued_real_p (gimple *, int = 0);
169
170 /* In gimple-match.cc. */
171 extern tree gimple_simplify (enum tree_code, tree, tree,
172 gimple_seq *, tree (*)(tree));
173 extern tree gimple_simplify (enum tree_code, tree, tree, tree,
174 gimple_seq *, tree (*)(tree));
175 extern tree gimple_simplify (enum tree_code, tree, tree, tree, tree,
176 gimple_seq *, tree (*)(tree));
177 extern tree gimple_simplify (combined_fn, tree, tree,
178 gimple_seq *, tree (*)(tree));
179 extern tree gimple_simplify (combined_fn, tree, tree, tree,
180 gimple_seq *, tree (*)(tree));
181 extern tree gimple_simplify (combined_fn, tree, tree, tree, tree,
182 gimple_seq *, tree (*)(tree));
183
184 #endif /* GCC_GIMPLE_FOLD_H */
185