1 /*
2 * Copyright (C) 2011 Oracle.
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 #include "smatch.h"
19 #include "smatch_slist.h"
20 #include "smatch_extra.h"
21
22 int RETURN_ID;
23
24 struct return_states_callback {
25 void (*callback)(void);
26 };
27 ALLOCATOR(return_states_callback, "return states callbacks");
28 DECLARE_PTR_LIST(callback_list, struct return_states_callback);
29 static struct callback_list *callback_list;
30
31 DECLARE_PTR_LIST(stree_stack_stack, struct stree_stack);
push_stree_stack(struct stree_stack_stack ** stack_stack,struct stree_stack * stack)32 static void push_stree_stack(struct stree_stack_stack **stack_stack, struct stree_stack *stack)
33 {
34 add_ptr_list(stack_stack, stack);
35 }
36
pop_stree_stack(struct stree_stack_stack ** stack_stack)37 static struct stree_stack *pop_stree_stack(struct stree_stack_stack **stack_stack)
38 {
39 struct stree_stack *stack;
40
41 stack = last_ptr_list((struct ptr_list *)*stack_stack);
42 delete_ptr_list_last((struct ptr_list **)stack_stack);
43 return stack;
44 }
45
46 static struct stree_stack *return_stree_stack;
47 static struct stree_stack_stack *saved_stack_stack;
48 static struct stree *all_return_states;
49 static struct stree_stack *saved_stack;
50
all_return_states_hook(void (* callback)(void))51 void all_return_states_hook(void (*callback)(void))
52 {
53 struct return_states_callback *rs_cb = __alloc_return_states_callback(0);
54
55 rs_cb->callback = callback;
56 add_ptr_list(&callback_list, rs_cb);
57 }
58
call_hooks(void)59 static void call_hooks(void)
60 {
61 struct return_states_callback *rs_cb;
62 struct stree *orig;
63
64 orig = __swap_cur_stree(all_return_states);
65 FOR_EACH_PTR(callback_list, rs_cb) {
66 rs_cb->callback();
67 } END_FOR_EACH_PTR(rs_cb);
68 __swap_cur_stree(orig);
69 }
70
match_return(int return_id,char * return_ranges,struct expression * expr)71 static void match_return(int return_id, char *return_ranges, struct expression *expr)
72 {
73 struct stree *stree;
74
75 stree = clone_stree(__get_cur_stree());
76 merge_stree_no_pools(&all_return_states, stree);
77 push_stree(&return_stree_stack, stree);
78 }
79
match_end_func(struct symbol * sym)80 static void match_end_func(struct symbol *sym)
81 {
82 /*
83 * FIXME: either this isn't needed or we need to copy a stree into the
84 * return_stree_stack as well.
85 */
86 merge_stree(&all_return_states, __get_cur_stree());
87 call_hooks();
88 }
89
match_save_states(struct expression * expr)90 static void match_save_states(struct expression *expr)
91 {
92 push_stree(&saved_stack, all_return_states);
93 all_return_states = NULL;
94
95 push_stree_stack(&saved_stack_stack, return_stree_stack);
96 return_stree_stack = NULL;
97 }
98
match_restore_states(struct expression * expr)99 static void match_restore_states(struct expression *expr)
100 {
101 /* This free_stree() isn't needed is it?? */
102 free_stree(&all_return_states);
103
104 all_return_states = pop_stree(&saved_stack);
105 return_stree_stack = pop_stree_stack(&saved_stack_stack);
106 }
107
get_all_return_states(void)108 struct stree *get_all_return_states(void)
109 {
110 return all_return_states;
111 }
112
get_all_return_strees(void)113 struct stree_stack *get_all_return_strees(void)
114 {
115 return return_stree_stack;
116 }
117
free_resources(struct symbol * sym)118 static void free_resources(struct symbol *sym)
119 {
120 free_stree(&all_return_states);
121 free_stack_and_strees(&return_stree_stack);
122 }
123
register_returns_early(int id)124 void register_returns_early(int id)
125 {
126 RETURN_ID = id;
127
128 set_dynamic_states(RETURN_ID);
129 add_split_return_callback(match_return);
130 }
131
register_returns(int id)132 void register_returns(int id)
133 {
134 add_hook(&match_end_func, END_FUNC_HOOK);
135 add_hook(&match_save_states, INLINE_FN_START);
136 add_hook(&match_restore_states, INLINE_FN_END);
137 add_hook(&free_resources, AFTER_FUNC_HOOK);
138 }
139