gcc/fold-const.h

   1 /* Fold a constant sub-tree into a single node for C-compiler
   2    Copyright (C) 1987-2020 Free Software Foundation, Inc.
   3
   4 This file is part of GCC.
   5
   6 GCC is free software; you can redistribute it and/or modify it under
   7 the terms of the GNU General Public License as published by the Free
   8 Software Foundation; either version 3, or (at your option) any later
   9 version.
  10
  11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
  12 WARRANTY; without even the implied warranty of MERCHANTABILITY or
  13 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  14 for more details.
  15
  16 You should have received a copy of the GNU General Public License
  17 along with GCC; see the file COPYING3.  If not see
  18 <http://www.gnu.org/licenses/>.  */
  19
  20 #ifndef GCC_FOLD_CONST_H
  21 #define GCC_FOLD_CONST_H
  22
  23 /* Non-zero if we are folding constants inside an initializer; zero
  24    otherwise.  */
  25 extern int folding_initializer;
  26
  27 /* Convert between trees and native memory representation.  */
  28 extern int native_encode_expr (const_tree, unsigned char *, int, int off = -1);
  29 extern int native_encode_initializer (tree, unsigned char *, int,
  30                                       int off = -1);
  31 extern tree native_interpret_expr (tree, const unsigned char *, int);
  32 extern bool can_native_interpret_type_p (tree);
  33 extern void shift_bytes_in_array_left (unsigned char *, unsigned int,
  34                                        unsigned int);
  35 extern void shift_bytes_in_array_right (unsigned char *, unsigned int,
  36                                         unsigned int);
  37
  38 /* Fold constants as much as possible in an expression.
  39    Returns the simplified expression.
  40    Acts only on the top level of the expression;
  41    if the argument itself cannot be simplified, its
  42    subexpressions are not changed.  */
  43
  44 extern tree fold (tree);
  45 #define fold_unary(CODE,T1,T2)\
  46    fold_unary_loc (UNKNOWN_LOCATION, CODE, T1, T2)
  47 extern tree fold_unary_loc (location_t, enum tree_code, tree, tree);
  48 #define fold_unary_ignore_overflow(CODE,T1,T2)\
  49    fold_unary_ignore_overflow_loc (UNKNOWN_LOCATION, CODE, T1, T2)
  50 extern tree fold_unary_ignore_overflow_loc (location_t, enum tree_code, tree, tree);
  51 #define fold_binary(CODE,T1,T2,T3)\
  52    fold_binary_loc (UNKNOWN_LOCATION, CODE, T1, T2, T3)
  53 extern tree fold_binary_loc (location_t, enum tree_code, tree, tree, tree);
  54 #define fold_ternary(CODE,T1,T2,T3,T4)\
  55    fold_ternary_loc (UNKNOWN_LOCATION, CODE, T1, T2, T3, T4)
  56 extern tree fold_ternary_loc (location_t, enum tree_code, tree, tree, tree, tree);
  57 #define fold_build1(c,t1,t2)\
  58    fold_build1_loc (UNKNOWN_LOCATION, c, t1, t2 MEM_STAT_INFO)
  59 extern tree fold_build1_loc (location_t, enum tree_code, tree,
  60                              tree CXX_MEM_STAT_INFO);
  61 #define fold_build2(c,t1,t2,t3)\
  62    fold_build2_loc (UNKNOWN_LOCATION, c, t1, t2, t3 MEM_STAT_INFO)
  63 extern tree fold_build2_loc (location_t, enum tree_code, tree, tree,
  64                              tree CXX_MEM_STAT_INFO);
  65 #define fold_build3(c,t1,t2,t3,t4)\
  66    fold_build3_loc (UNKNOWN_LOCATION, c, t1, t2, t3, t4 MEM_STAT_INFO)
  67 extern tree fold_build3_loc (location_t, enum tree_code, tree, tree, tree,
  68                                   tree CXX_MEM_STAT_INFO);
  69 extern tree fold_build1_initializer_loc (location_t, enum tree_code, tree, tree);
  70 extern tree fold_build2_initializer_loc (location_t, enum tree_code, tree, tree, tree);
  71 #define fold_build_call_array(T1,T2,N,T4)\
  72    fold_build_call_array_loc (UNKNOWN_LOCATION, T1, T2, N, T4)
  73 extern tree fold_build_call_array_loc (location_t, tree, tree, int, tree *);
  74 #define fold_build_call_array_initializer(T1,T2,N,T4)\
  75    fold_build_call_array_initializer_loc (UNKNOWN_LOCATION, T1, T2, N, T4)
  76 extern tree fold_build_call_array_initializer_loc (location_t, tree, tree, int, tree *);
  77 extern tree get_array_ctor_element_at_index (tree, offset_int,
  78                                              unsigned * = NULL);
  79 extern bool fold_convertible_p (const_tree, const_tree);
  80 #define fold_convert(T1,T2)\
  81    fold_convert_loc (UNKNOWN_LOCATION, T1, T2)
  82 extern tree fold_convert_loc (location_t, tree, tree);
  83 extern tree fold_single_bit_test (location_t, enum tree_code, tree, tree, tree);
  84 extern tree fold_ignored_result (tree);
  85 extern tree fold_abs_const (tree, tree);
  86 extern tree fold_indirect_ref_1 (location_t, tree, tree);
  87 extern void fold_defer_overflow_warnings (void);
  88 extern void fold_undefer_overflow_warnings (bool, const gimple *, int);
  89 extern void fold_undefer_and_ignore_overflow_warnings (void);
  90 extern bool fold_deferring_overflow_warnings_p (void);
  91 extern void fold_overflow_warning (const char*, enum warn_strict_overflow_code);
  92 extern enum tree_code fold_div_compare (enum tree_code, tree, tree,
  93                                         tree *, tree *, bool *);
  94 extern bool operand_equal_p (const_tree, const_tree, unsigned int flags = 0);
  95 extern int multiple_of_p (tree, const_tree, const_tree);
  96 #define omit_one_operand(T1,T2,T3)\
  97    omit_one_operand_loc (UNKNOWN_LOCATION, T1, T2, T3)
  98 extern tree omit_one_operand_loc (location_t, tree, tree, tree);
  99 #define omit_two_operands(T1,T2,T3,T4)\
 100    omit_two_operands_loc (UNKNOWN_LOCATION, T1, T2, T3, T4)
 101 extern tree omit_two_operands_loc (location_t, tree, tree, tree, tree);
 102 #define invert_truthvalue(T)\
 103    invert_truthvalue_loc (UNKNOWN_LOCATION, T)
 104 extern tree invert_truthvalue_loc (location_t, tree);
 105 extern tree fold_unary_to_constant (enum tree_code, tree, tree);
 106 extern tree fold_binary_to_constant (enum tree_code, tree, tree, tree);
 107 extern tree fold_bit_and_mask (tree, tree, enum tree_code,
 108                                tree, enum tree_code, tree, tree,
 109                                tree, enum tree_code, tree, tree, tree *);
 110 extern tree fold_read_from_constant_string (tree);
 111 extern tree fold_read_from_vector (tree, poly_uint64);
 112 #if GCC_VEC_PERN_INDICES_H
 113 extern tree fold_vec_perm (tree, tree, tree, const vec_perm_indices &);
 114 #endif
 115 extern bool wide_int_binop (wide_int &res, enum tree_code,
 116                             const wide_int &arg1, const wide_int &arg2,
 117                             signop, wi::overflow_type *);
 118 extern tree int_const_binop (enum tree_code, const_tree, const_tree, int = 1);
 119 #define build_fold_addr_expr(T)\
 120         build_fold_addr_expr_loc (UNKNOWN_LOCATION, (T))
 121 extern tree build_fold_addr_expr_loc (location_t, tree);
 122 #define build_fold_addr_expr_with_type(T,TYPE)\
 123         build_fold_addr_expr_with_type_loc (UNKNOWN_LOCATION, (T), TYPE)
 124 extern tree build_fold_addr_expr_with_type_loc (location_t, tree, tree);
 125 extern tree fold_build_cleanup_point_expr (tree type, tree expr);
 126 #define build_fold_indirect_ref(T)\
 127         build_fold_indirect_ref_loc (UNKNOWN_LOCATION, T)
 128 extern tree build_fold_indirect_ref_loc (location_t, tree);
 129 #define fold_indirect_ref(T)\
 130         fold_indirect_ref_loc (UNKNOWN_LOCATION, T)
 131 extern tree fold_indirect_ref_loc (location_t, tree);
 132 extern tree build_simple_mem_ref_loc (location_t, tree);
 133 #define build_simple_mem_ref(T)\
 134         build_simple_mem_ref_loc (UNKNOWN_LOCATION, T)
 135 extern poly_offset_int mem_ref_offset (const_tree);
 136 extern tree build_invariant_address (tree, tree, poly_int64);
 137 extern tree constant_boolean_node (bool, tree);
 138 extern tree div_if_zero_remainder (const_tree, const_tree);
 139
 140 extern bool tree_swap_operands_p (const_tree, const_tree);
 141 extern enum tree_code swap_tree_comparison (enum tree_code);
 142
 143 extern bool ptr_difference_const (tree, tree, poly_int64_pod *);
 144 extern enum tree_code invert_tree_comparison (enum tree_code, bool);
 145 extern bool inverse_conditions_p (const_tree, const_tree);
 146
 147 extern bool tree_unary_nonzero_warnv_p (enum tree_code, tree, tree, bool *);
 148 extern bool tree_binary_nonzero_warnv_p (enum tree_code, tree, tree, tree op1,
 149                                          bool *);
 150 extern bool tree_single_nonzero_warnv_p (tree, bool *);
 151 extern bool tree_unary_nonnegative_warnv_p (enum tree_code, tree, tree,
 152                                             bool *, int);
 153 extern bool tree_binary_nonnegative_warnv_p (enum tree_code, tree, tree, tree,
 154                                              bool *, int);
 155 extern bool tree_single_nonnegative_warnv_p (tree, bool *, int);
 156 extern bool tree_call_nonnegative_warnv_p (tree, combined_fn, tree, tree,
 157                                            bool *, int);
 158
 159 extern bool integer_valued_real_unary_p (tree_code, tree, int);
 160 extern bool integer_valued_real_binary_p (tree_code, tree, tree, int);
 161 extern bool integer_valued_real_call_p (combined_fn, tree, tree, int);
 162 extern bool integer_valued_real_single_p (tree, int);
 163 extern bool integer_valued_real_p (tree, int = 0);
 164
 165 extern bool fold_real_zero_addition_p (const_tree, const_tree, int);
 166 extern tree combine_comparisons (location_t, enum tree_code, enum tree_code,
 167                                  enum tree_code, tree, tree, tree);
 168 extern void debug_fold_checksum (const_tree);
 169 extern bool may_negate_without_overflow_p (const_tree);
 170 #define round_up(T,N) round_up_loc (UNKNOWN_LOCATION, T, N)
 171 extern tree round_up_loc (location_t, tree, unsigned int);
 172 #define round_down(T,N) round_down_loc (UNKNOWN_LOCATION, T, N)
 173 extern tree round_down_loc (location_t, tree, int);
 174 extern tree size_int_kind (poly_int64, enum size_type_kind);
 175 #define size_binop(CODE,T1,T2)\
 176    size_binop_loc (UNKNOWN_LOCATION, CODE, T1, T2)
 177 extern tree size_binop_loc (location_t, enum tree_code, tree, tree);
 178 #define size_diffop(T1,T2)\
 179    size_diffop_loc (UNKNOWN_LOCATION, T1, T2)
 180 extern tree size_diffop_loc (location_t, tree, tree);
 181
 182 /* Return an expr equal to X but certainly not valid as an lvalue.  */
 183 #define non_lvalue(T) non_lvalue_loc (UNKNOWN_LOCATION, T)
 184 extern tree non_lvalue_loc (location_t, tree);
 185
 186 extern bool tree_expr_nonzero_p (tree);
 187 extern bool tree_expr_nonnegative_p (tree);
 188 extern bool tree_expr_nonnegative_warnv_p (tree, bool *, int = 0);
 189 extern tree make_range (tree, int *, tree *, tree *, bool *);
 190 extern tree make_range_step (location_t, enum tree_code, tree, tree, tree,
 191                              tree *, tree *, int *, bool *);
 192 extern tree range_check_type (tree);
 193 extern tree build_range_check (location_t, tree, tree, int, tree, tree);
 194 extern bool merge_ranges (int *, tree *, tree *, int, tree, tree, int,
 195                           tree, tree);
 196 extern tree sign_bit_p (tree, const_tree);
 197 extern tree exact_inverse (tree, tree);
 198 extern bool expr_not_equal_to (tree t, const wide_int &);
 199 extern tree const_unop (enum tree_code, tree, tree);
 200 extern tree const_binop (enum tree_code, tree, tree, tree);
 201 extern bool negate_mathfn_p (combined_fn);
 202 extern const char *getbyterep (tree, unsigned HOST_WIDE_INT *);
 203 extern const char *c_getstr (tree);
 204 extern wide_int tree_nonzero_bits (const_tree);
 205
 206 /* Return OFF converted to a pointer offset type suitable as offset for
 207    POINTER_PLUS_EXPR.  Use location LOC for this conversion.  */
 208 extern tree convert_to_ptrofftype_loc (location_t loc, tree off);
 209
 210 #define convert_to_ptrofftype(t) convert_to_ptrofftype_loc (UNKNOWN_LOCATION, t)
 211
 212 /* Build and fold a POINTER_PLUS_EXPR at LOC offsetting PTR by OFF.  */
 213 extern tree fold_build_pointer_plus_loc (location_t loc, tree ptr, tree off);
 214
 215 #define fold_build_pointer_plus(p,o) \
 216         fold_build_pointer_plus_loc (UNKNOWN_LOCATION, p, o)
 217
 218 /* Build and fold a POINTER_PLUS_EXPR at LOC offsetting PTR by OFF.  */
 219 extern tree fold_build_pointer_plus_hwi_loc (location_t loc, tree ptr, HOST_WIDE_INT off);
 220
 221 #define fold_build_pointer_plus_hwi(p,o) \
 222         fold_build_pointer_plus_hwi_loc (UNKNOWN_LOCATION, p, o)
 223
 224
 225 /* Class used to compare gimple operands.  */
 226
 227 class operand_compare
 228 {
 229 public:
 230   /* Return true if two operands are equal.  The flags fields can be used
 231      to specify OEP flags described above.  */
 232   virtual bool operand_equal_p (const_tree, const_tree, unsigned int flags);
 233
 234   /* Generate a hash value for an expression.  This can be used iteratively
 235      by passing a previous result as the HSTATE argument.  */
 236   virtual void hash_operand (const_tree, inchash::hash &, unsigned flags);
 237
 238 protected:
 239   /* Verify that when arguments (ARG0 and ARG1) are equal, then they have
 240      an equal hash value.  When the function knowns comparison return,
 241      true is returned.  Then RET is set to corresponding comparsion result.  */
 242   bool verify_hash_value (const_tree arg0, const_tree arg1, unsigned int flags,
 243                           bool *ret);
 244 };
 245
 246 #endif // GCC_FOLD_CONST_H