1 /*
   2  * Copyright (C) 2009 Dan Carpenter.
   3  *
   4  * This program is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU General Public License
   6  * as published by the Free Software Foundation; either version 2
   7  * of the License, or (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, see http://www.gnu.org/copyleft/gpl.txt
  16  */
  17 
  18 DECLARE_PTR_LIST(range_list, struct data_range);
  19 DECLARE_PTR_LIST(range_list_stack, struct range_list);
  20 
  21 struct relation {
  22         char *name;
  23         struct symbol *sym;
  24 };
  25 
  26 DECLARE_PTR_LIST(related_list, struct relation);
  27 
  28 struct data_info {
  29         struct related_list *related;
  30         struct range_list *value_ranges;
  31         sval_t fuzzy_max;
  32         unsigned int hard_max:1;
  33         unsigned int capped:1;
  34         unsigned int treat_untagged:1;
  35         unsigned int set:1;
  36 };
  37 DECLARE_ALLOCATOR(data_info);
  38 
  39 extern struct string_list *__ignored_macros;
  40 
  41 /* these are implemented in smatch_ranges.c */
  42 struct range_list *rl_zero(void);
  43 struct range_list *rl_one(void);
  44 char *show_rl(struct range_list *list);
  45 int str_to_comparison_arg(const char *c, struct expression *call, int *comparison, struct expression **arg);
  46 void str_to_rl(struct symbol *type, char *value, struct range_list **rl);
  47 void call_results_to_rl(struct expression *call, struct symbol *type, const char *value, struct range_list **rl);
  48 
  49 struct data_range *alloc_range(sval_t min, sval_t max);
  50 struct data_range *alloc_range_perm(sval_t min, sval_t max);
  51 
  52 int rl_fits_in_type(struct range_list *rl, struct symbol *type);
  53 
  54 struct range_list *alloc_rl(sval_t min, sval_t max);
  55 struct range_list *clone_rl(struct range_list *list);
  56 struct range_list *clone_rl_permanent(struct range_list *list);
  57 struct range_list *alloc_whole_rl(struct symbol *type);
  58 
  59 void add_range(struct range_list **list, sval_t min, sval_t max);
  60 struct range_list *remove_range(struct range_list *list, sval_t min, sval_t max);
  61 void tack_on(struct range_list **list, struct data_range *drange);
  62 
  63 int true_comparison_range(struct data_range *left, int comparison, struct data_range *right);
  64 int true_comparison_range_LR(int comparison, struct data_range *var, struct data_range *val, int left);
  65 int false_comparison_range_LR(int comparison, struct data_range *var, struct data_range *val, int left);
  66 
  67 int possibly_true(struct expression *left, int comparison, struct expression *right);
  68 int possibly_true_rl(struct range_list *left_ranges, int comparison, struct range_list *right_ranges);
  69 int possibly_true_rl_LR(int comparison, struct range_list *a, struct range_list *b, int left);
  70 
  71 int possibly_false(struct expression *left, int comparison, struct expression *right);
  72 int possibly_false_rl(struct range_list *left_ranges, int comparison, struct range_list *right_ranges);
  73 int possibly_false_rl_LR(int comparison, struct range_list *a, struct range_list *b, int left);
  74 
  75 int rl_has_sval(struct range_list *rl, sval_t sval);
  76 int ranges_equiv(struct data_range *one, struct data_range *two);
  77 
  78 bool is_err_ptr(sval_t sval);
  79 
  80 int rl_equiv(struct range_list *one, struct range_list *two);
  81 int is_whole_rl(struct range_list *rl);
  82 int is_unknown_ptr(struct range_list *rl);
  83 int is_whole_rl_non_zero(struct range_list *rl);
  84 int estate_is_unknown(struct smatch_state *state);
  85 
  86 sval_t rl_min(struct range_list *rl);
  87 sval_t rl_max(struct range_list *rl);
  88 int rl_to_sval(struct range_list *rl, sval_t *sval);
  89 struct symbol *rl_type(struct range_list *rl);
  90 
  91 struct range_list *rl_filter(struct range_list *rl, struct range_list *filter);
  92 struct range_list *rl_intersection(struct range_list *one, struct range_list *two);
  93 struct range_list *rl_union(struct range_list *one, struct range_list *two);
  94 struct range_list *rl_binop(struct range_list *left, int op, struct range_list *right);
  95 
  96 void push_rl(struct range_list_stack **rl_stack, struct range_list *rl);
  97 struct range_list *pop_rl(struct range_list_stack **rl_stack);
  98 struct range_list *top_rl(struct range_list_stack *rl_stack);
  99 void filter_top_rl(struct range_list_stack **rl_stack, struct range_list *filter);
 100 
 101 struct range_list *rl_truncate_cast(struct symbol *type, struct range_list *rl);
 102 struct range_list *cast_rl(struct symbol *type, struct range_list *rl);
 103 int get_implied_rl(struct expression *expr, struct range_list **rl);
 104 int get_absolute_rl(struct expression *expr, struct range_list **rl);
 105 void set_real_absolute(struct expression *expr, struct smatch_state *state);
 106 int get_real_absolute_rl(struct expression *expr, struct range_list **rl);
 107 struct range_list *var_to_absolute_rl(struct expression *expr);
 108 int custom_get_absolute_rl(struct expression *expr,
 109                            struct range_list *(*fn)(struct expression *expr),
 110                            struct range_list **rl);
 111 int get_implied_rl_var_sym(const char *var, struct symbol *sym, struct range_list **rl);
 112 void split_comparison_rl(struct range_list *left_orig, int op, struct range_list *right_orig,
 113                 struct range_list **left_true_rl, struct range_list **left_false_rl,
 114                 struct range_list **right_true_rl, struct range_list **right_false_rl);
 115 
 116 void free_data_info_allocs(void);
 117 void free_all_rl(void);
 118 
 119 /* smatch_estate.c */
 120 
 121 struct smatch_state *alloc_estate_empty(void);
 122 struct smatch_state *alloc_estate_sval(sval_t sval);
 123 struct smatch_state *alloc_estate_range(sval_t min, sval_t max);
 124 struct smatch_state *alloc_estate_rl(struct range_list *rl);
 125 struct smatch_state *alloc_estate_whole(struct symbol *type);
 126 struct smatch_state *clone_estate(struct smatch_state *state);
 127 struct smatch_state *clone_estate_cast(struct symbol *type, struct smatch_state *state);
 128 struct smatch_state *clone_partial_estate(struct smatch_state *state, struct range_list *rl);
 129 
 130 struct smatch_state *merge_estates(struct smatch_state *s1, struct smatch_state *s2);
 131 
 132 int estates_equiv(struct smatch_state *one, struct smatch_state *two);
 133 int estate_is_whole(struct smatch_state *state);
 134 int estate_is_empty(struct smatch_state *state);
 135 
 136 struct range_list *estate_rl(struct smatch_state *state);
 137 struct related_list *estate_related(struct smatch_state *state);
 138 
 139 sval_t estate_min(struct smatch_state *state);
 140 sval_t estate_max(struct smatch_state *state);
 141 struct symbol *estate_type(struct smatch_state *state);
 142 
 143 int estate_has_fuzzy_max(struct smatch_state *state);
 144 sval_t estate_get_fuzzy_max(struct smatch_state *state);
 145 void estate_set_fuzzy_max(struct smatch_state *state, sval_t max);
 146 void estate_copy_fuzzy_max(struct smatch_state *new, struct smatch_state *old);
 147 void estate_clear_fuzzy_max(struct smatch_state *state);
 148 int estate_has_hard_max(struct smatch_state *state);
 149 void estate_set_hard_max(struct smatch_state *state);
 150 void estate_clear_hard_max(struct smatch_state *state);
 151 int estate_get_hard_max(struct smatch_state *state, sval_t *sval);
 152 bool estate_capped(struct smatch_state *state);
 153 void estate_set_capped(struct smatch_state *state);
 154 bool estate_treat_untagged(struct smatch_state *state);
 155 void estate_set_treat_untagged(struct smatch_state *state);
 156 bool estate_new(struct smatch_state *state);
 157 void estate_set_new(struct smatch_state *state);
 158 
 159 int estate_get_single_value(struct smatch_state *state, sval_t *sval);
 160 struct smatch_state *get_implied_estate(struct expression *expr);
 161 
 162 struct smatch_state *estate_filter_sval(struct smatch_state *orig, sval_t filter);
 163 struct data_info *clone_dinfo_perm(struct data_info *dinfo);
 164 struct smatch_state *clone_estate_perm(struct smatch_state *state);
 165 
 166 /* smatch_extra.c */
 167 bool is_impossible_variable(struct expression *expr);
 168 struct sm_state *get_extra_sm_state(struct expression *expr);
 169 struct smatch_state *get_extra_state(struct expression *expr);
 170 void call_extra_mod_hooks(const char *name, struct symbol *sym, struct expression *expr, struct smatch_state *state);
 171 void set_extra_mod(const char *name, struct symbol *sym, struct expression *expr, struct smatch_state *state);
 172 void set_extra_expr_mod(struct expression *expr, struct smatch_state *state);
 173 void set_extra_nomod(const char *name, struct symbol *sym, struct expression *expr, struct smatch_state *state);
 174 void set_extra_nomod_vsl(const char *name, struct symbol *sym, struct var_sym_list *vsl, struct expression *expr, struct smatch_state *state);
 175 void set_extra_expr_nomod(struct expression *expr, struct smatch_state *state);
 176 void set_extra_mod_helper(const char *name, struct symbol *sym, struct expression *expr, struct smatch_state *state);
 177 
 178 struct data_info *get_dinfo(struct smatch_state *state);
 179 
 180 void add_extra_mod_hook(void (*fn)(const char *name, struct symbol *sym, struct expression *expr, struct smatch_state *state));
 181 void add_extra_nomod_hook(void (*fn)(const char *name, struct symbol *sym, struct expression *expr, struct smatch_state *state));
 182 int implied_not_equal(struct expression *expr, long long val);
 183 int implied_not_equal_name_sym(char *name, struct symbol *sym, long long val);
 184 int parent_is_null_var_sym(const char *name, struct symbol *sym);
 185 int parent_is_null(struct expression *expr);
 186 int parent_is_free_var_sym_strict(const char *name, struct symbol *sym);
 187 int parent_is_free_var_sym(const char *name, struct symbol *sym);
 188 int parent_is_free(struct expression *expr);
 189 
 190 struct sm_state *__extra_handle_canonical_loops(struct statement *loop, struct stree **stree);
 191 int __iterator_unchanged(struct sm_state *sm);
 192 void __extra_pre_loop_hook_after(struct sm_state *sm,
 193                                 struct statement *iterator,
 194                                 struct expression *condition);
 195 
 196 /* smatch_equiv.c */
 197 void set_equiv(struct expression *left, struct expression *right);
 198 void set_related(struct smatch_state *estate, struct related_list *rlist);
 199 struct related_list *get_shared_relations(struct related_list *one,
 200                                               struct related_list *two);
 201 struct related_list *clone_related_list(struct related_list *related);
 202 void remove_from_equiv(const char *name, struct symbol *sym);
 203 void remove_from_equiv_expr(struct expression *expr);
 204 void set_equiv_state_expr(int id, struct expression *expr, struct smatch_state *state);
 205 
 206 /* smatch_function_hooks.c */
 207 void function_comparison(struct expression *left, int comparison, struct expression *right);
 208 
 209 /* smatch_expressions.c */
 210 struct expression *zero_expr();
 211 struct expression *value_expr(long long val);
 212 struct expression *member_expression(struct expression *deref, int op, struct ident *member);
 213 struct expression *preop_expression(struct expression *expr, int op);
 214 struct expression *deref_expression(struct expression *expr);
 215 struct expression *assign_expression(struct expression *left, int op, struct expression *right);
 216 struct expression *binop_expression(struct expression *left, int op, struct expression *right);
 217 struct expression *array_element_expression(struct expression *array, struct expression *offset);
 218 struct expression *symbol_expression(struct symbol *sym);
 219 struct expression *string_expression(char *str);
 220 struct expression *compare_expression(struct expression *left, int op, struct expression *right);
 221 struct expression *call_expression(struct expression *fn, struct expression_list *args);
 222 struct expression *unknown_value_expression(struct expression *expr);
 223 int is_fake_call(struct expression *expr);
 224 struct expression *gen_expression_from_name_sym(const char *name, struct symbol *sym);
 225 struct expression *gen_expression_from_key(struct expression *arg, const char *key);
 226 void free_tmp_expressions(void);
 227 void expr_set_parent_expr(struct expression *expr, struct expression *parent);
 228 void expr_set_parent_stmt(struct expression *expr, struct statement *parent);
 229 struct expression *expr_get_parent_expr(struct expression *expr);
 230 struct statement *expr_get_parent_stmt(struct expression *expr);
 231 
 232 /* smatch_param_limit.c */
 233 struct smatch_state *get_orig_estate(const char *name, struct symbol *sym);
 234 
 235 /* smatch_real_absolute.c */
 236 struct smatch_state *get_real_absolute_state(struct expression *expr);
 237 struct smatch_state *get_real_absolute_state_var_sym(const char *name, struct symbol *sym);
 238 
 239 /* smatch_imaginary_absolute.c */
 240 void __save_imaginary_state(struct expression *expr, struct range_list *true_rl, struct range_list *false_rl);
 241 int get_imaginary_absolute(struct expression *expr, struct range_list **rl);
 242