2dbc556e7424c6ea8eb46499afac0ce68ae1bcd5
[c11tester.git] / history.cc
1 #include <inttypes.h>
2 #include "history.h"
3 #include "action.h"
4 #include "funcnode.h"
5 #include "common.h"
6
7 #include "model.h"
8 #include "execution.h"
9
10
11 /** @brief Constructor */
12 ModelHistory::ModelHistory() :
13         func_counter(1),        /* function id starts with 1 */
14         func_map(),
15         func_map_rev(),
16         func_nodes(),
17         write_history(),
18         write_locations()
19 {}
20
21 void ModelHistory::enter_function(const uint32_t func_id, thread_id_t tid)
22 {
23         //model_print("thread %d entering func %d\n", tid, func_id);
24         uint id = id_to_int(tid);
25         SnapVector<func_id_list_t> * thrd_func_list = model->get_execution()->get_thrd_func_list();
26         SnapVector< SnapList<action_list_t *> *> *
27                 thrd_func_act_lists = model->get_execution()->get_thrd_func_act_lists();
28
29         if ( thrd_func_list->size() <= id ) {
30                 uint oldsize = thrd_func_list->size();
31                 thrd_func_list->resize( id + 1 );
32                 for (uint i = oldsize; i < id + 1; i++) {
33                         new (&(*thrd_func_list)[i]) func_id_list_t();
34                         // push 0 as a dummy function id to a void seg fault
35                         (*thrd_func_list)[i].push_back(0);
36                 }
37
38                 thrd_func_act_lists->resize( id + 1 );
39                 for (uint i = oldsize; i < id + 1; i++) {
40                         (*thrd_func_act_lists)[i] = new SnapList<action_list_t *>();
41                 }
42         }
43
44         SnapList<action_list_t *> * func_act_lists = (*thrd_func_act_lists)[id];
45
46         (*thrd_func_list)[id].push_back(func_id);
47         func_act_lists->push_back( new action_list_t() );
48
49         if ( func_nodes.size() <= func_id )
50                 resize_func_nodes( func_id + 1 );
51 }
52
53 /* @param func_id a non-zero value */
54 void ModelHistory::exit_function(const uint32_t func_id, thread_id_t tid)
55 {
56         uint32_t id = id_to_int(tid);
57         SnapVector<func_id_list_t> * thrd_func_list = model->get_execution()->get_thrd_func_list();
58         SnapVector< SnapList<action_list_t *> *> *
59                 thrd_func_act_lists = model->get_execution()->get_thrd_func_act_lists();
60
61         SnapList<action_list_t *> * func_act_lists = (*thrd_func_act_lists)[id];
62         uint32_t last_func_id = (*thrd_func_list)[id].back();
63
64         if (last_func_id == func_id) {
65                 FuncNode * func_node = func_nodes[func_id];
66                 func_node->clear_read_map(tid);
67
68                 action_list_t * curr_act_list = func_act_lists->back();
69
70                 func_node->incr_exit_count();
71
72                 /* defer the processing of curr_act_list until the function has exits a few times 
73                  * (currently 2 times) so that more information can be gathered to infer nullity predicates.
74                  */
75                 if (func_node->get_exit_count() >= 2) {
76                         ModelList<action_list_t *> * action_list_buffer = func_node->get_action_list_buffer();
77                         while (action_list_buffer->size() > 0) {
78                                 action_list_t * act_list = action_list_buffer->back();
79                                 action_list_buffer->pop_back();
80                                 func_node->update_tree(act_list);
81                         }
82
83                         func_node->update_tree(curr_act_list);
84                 } else
85                         func_node->get_action_list_buffer()->push_front(curr_act_list);
86
87                 (*thrd_func_list)[id].pop_back();
88                 func_act_lists->pop_back();
89         } else {
90                 model_print("trying to exit with a wrong function id\n");
91                 model_print("--- last_func: %d, func_id: %d\n", last_func_id, func_id);
92         }
93         //model_print("thread %d exiting func %d\n", tid, func_id);
94 }
95
96 void ModelHistory::resize_func_nodes(uint32_t new_size)
97 {
98         uint32_t old_size = func_nodes.size();
99
100         if ( old_size < new_size )
101                 func_nodes.resize(new_size);
102
103         for (uint32_t id = old_size;id < new_size;id++) {
104                 const char * func_name = func_map_rev[id];
105                 FuncNode * func_node = new FuncNode(this);
106                 func_node->set_func_id(id);
107                 func_node->set_func_name(func_name);
108                 func_nodes[id] = func_node;
109         }
110 }
111
112 void ModelHistory::process_action(ModelAction *act, thread_id_t tid)
113 {
114         /* return if thread i has not entered any function or has exited
115            from all functions */
116         SnapVector<func_id_list_t> * thrd_func_list = model->get_execution()->get_thrd_func_list();
117         SnapVector< SnapList<action_list_t *> *> *
118                 thrd_func_act_lists = model->get_execution()->get_thrd_func_act_lists();
119
120         uint32_t id = id_to_int(tid);
121         if ( thrd_func_list->size() <= id )
122                 return;
123
124         /* get the function id that thread i is currently in */
125         uint32_t func_id = (*thrd_func_list)[id].back();
126         SnapList<action_list_t *> * func_act_lists = (*thrd_func_act_lists)[id];
127
128         if (act->is_write())
129                 add_to_write_history(act->get_location(), act->get_write_value());
130
131         if (func_id == 0)
132                 return;
133         else if ( func_nodes.size() <= func_id )
134                 resize_func_nodes( func_id + 1 );
135
136         FuncNode * func_node = func_nodes[func_id];
137
138         /* do not care about actions without a position */
139
140         if (act->get_position() == NULL)
141                 return;
142
143         if (act->is_read())
144                 func_node->store_read(act, tid);
145
146         /* add to curr_inst_list */
147
148         bool second_part_of_rmw = act->is_rmwc() || act->is_rmw();
149         if (!second_part_of_rmw) {
150                 action_list_t * curr_act_list = func_act_lists->back();
151                 ASSERT(curr_act_list != NULL);
152
153                 ModelAction * last_act;
154                 if (curr_act_list->size() != 0)
155                         last_act = curr_act_list->back();
156
157                 // do not add actions with the same sequence number twice
158                 if (last_act != NULL && last_act->get_seq_number() == act->get_seq_number())
159                         return;
160
161                 curr_act_list->push_back(act);
162                 func_node->add_inst(act);
163         }
164 }
165
166 /* return the FuncNode given its func_id  */
167 FuncNode * ModelHistory::get_func_node(uint32_t func_id)
168 {
169         if (func_nodes.size() <= func_id)       // this node has not been added to func_nodes
170                 return NULL;
171
172         return func_nodes[func_id];
173 }
174
175 uint64_t ModelHistory::query_last_read(void * location, thread_id_t tid)
176 {
177         SnapVector<func_id_list_t> * thrd_func_list = model->get_execution()->get_thrd_func_list();
178         uint32_t id = id_to_int(tid);
179
180         ASSERT( thrd_func_list->size() > id );
181         uint32_t func_id = (*thrd_func_list)[id].back();
182         FuncNode * func_node = func_nodes[func_id];
183
184         uint64_t last_read_val = 0xdeadbeef;
185         if (func_node != NULL) {
186                 last_read_val = func_node->query_last_read(location, tid);
187         }
188
189         return last_read_val;
190 }
191
192 void ModelHistory::add_to_write_history(void * location, uint64_t write_val)
193 {
194         write_set_t * write_set = write_history.get(location);
195
196         if (write_set == NULL) {
197                 write_set = new write_set_t();
198                 write_history.put(location, write_set);
199         }
200
201         write_set->add(write_val);
202         write_locations.add(location);
203 }
204
205 void ModelHistory::set_new_exec_flag()
206 {
207         for (uint i = 1; i < func_nodes.size(); i++) {
208                 FuncNode * func_node = func_nodes[i];
209                 func_node->set_new_exec_flag();
210         }
211 }
212
213 void ModelHistory::print_write()
214 {
215 }
216
217 void ModelHistory::print_func_node()
218 {
219         /* function id starts with 1 */
220         for (uint32_t i = 1; i < func_nodes.size(); i++) {
221                 FuncNode * func_node = func_nodes[i];
222
223                 func_inst_list_mt * entry_insts = func_node->get_entry_insts();
224                 model_print("function %s has entry actions\n", func_node->get_func_name());
225
226                 mllnode<FuncInst*>* it;
227                 for (it = entry_insts->begin();it != NULL;it=it->getNext()) {
228                         FuncInst *inst = it->getVal();
229                         model_print("type: %d, at: %s\n", inst->get_type(), inst->get_position());
230                 }
231 /*
232                 func_inst_list_mt * inst_list = funcNode->get_inst_list();
233
234                 model_print("function %s has following actions\n", funcNode->get_func_name());
235                 func_inst_list_mt::iterator it;
236                 for (it = inst_list->begin(); it != inst_list->end(); it++) {
237                         FuncInst *inst = *it;
238                         model_print("type: %d, at: %s\n", inst->get_type(), inst->get_position());
239                 }
240 */
241         }
242 }