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 
243