Add model checker check before trylock
[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 {}
18
19 void ModelHistory::enter_function(const uint32_t func_id, thread_id_t tid)
20 {
21         //model_print("thread %d entering func %d\n", tid, func_id);
22         uint32_t id = id_to_int(tid);
23         SnapVector<func_id_list_t *> * thrd_func_list = model->get_execution()->get_thrd_func_list();
24         SnapVector< SnapList<func_inst_list_t *> *> *
25                 thrd_func_inst_lists = model->get_execution()->get_thrd_func_inst_lists();
26
27         if ( thrd_func_list->size() <= id ) {
28                 thrd_func_list->resize( id + 1 );
29                 thrd_func_inst_lists->resize( id + 1 );
30         }
31
32         func_id_list_t * func_list = thrd_func_list->at(id);
33         SnapList<func_inst_list_t *> * func_inst_lists = thrd_func_inst_lists->at(id);
34
35         if (func_list == NULL) {
36                 func_list = new func_id_list_t();
37                 thrd_func_list->at(id) = func_list;
38         }
39
40         if (func_inst_lists == NULL) {
41                 func_inst_lists = new SnapList< func_inst_list_t *>();
42                 thrd_func_inst_lists->at(id) = func_inst_lists;
43         }
44
45         func_list->push_back(func_id);
46         func_inst_lists->push_back( new func_inst_list_t() );
47 }
48
49 /* @param func_id a non-zero value */
50 void ModelHistory::exit_function(const uint32_t func_id, thread_id_t tid)
51 {
52         uint32_t id = id_to_int(tid);
53         SnapVector<func_id_list_t *> * thrd_func_list = model->get_execution()->get_thrd_func_list();
54         SnapVector< SnapList<func_inst_list_t *> *> *
55                 thrd_func_inst_lists = model->get_execution()->get_thrd_func_inst_lists();
56
57         func_id_list_t * func_list = thrd_func_list->at(id);
58         SnapList<func_inst_list_t *> * func_inst_lists = thrd_func_inst_lists->at(id);
59
60         uint32_t last_func_id = func_list->back();
61
62         if (last_func_id == func_id) {
63                 /* clear read map upon exiting functions */
64                 FuncNode * func_node = func_nodes[func_id];
65                 func_node->clear_read_map(tid);
66
67                 func_inst_list_t * curr_inst_list = func_inst_lists->back();
68                 func_node->link_insts(curr_inst_list);
69
70                 func_list->pop_back();
71                 func_inst_lists->pop_back();
72         } else {
73                 model_print("trying to exit with a wrong function id\n");
74                 model_print("--- last_func: %d, func_id: %d\n", last_func_id, func_id);
75         }
76         //model_print("thread %d exiting func %d\n", tid, func_id);
77 }
78
79 void ModelHistory::resize_func_nodes(uint32_t new_size)
80 {
81         uint32_t old_size = func_nodes.size();
82
83         if ( old_size < new_size )
84                 func_nodes.resize(new_size);
85
86         for (uint32_t id = old_size; id < new_size; id++) {
87                 const char * func_name = func_map_rev[id];
88                 FuncNode * func_node = new FuncNode();
89                 func_node->set_func_id(id);
90                 func_node->set_func_name(func_name);
91                 func_nodes[id] = func_node;
92         }
93 }
94
95 void ModelHistory::process_action(ModelAction *act, thread_id_t tid)
96 {
97         /* return if thread i has not entered any function or has exited
98            from all functions */
99         SnapVector<func_id_list_t *> * thrd_func_list = model->get_execution()->get_thrd_func_list();
100         SnapVector< SnapList<func_inst_list_t *> *> *
101                 thrd_func_inst_lists = model->get_execution()->get_thrd_func_inst_lists();
102
103         uint32_t id = id_to_int(tid);
104         if ( thrd_func_list->size() <= id )
105                 return;
106         else if (thrd_func_list->at(id) == NULL)
107                 return;
108
109         /* get the function id that thread i is currently in */
110         func_id_list_t * func_list = thrd_func_list->at(id);
111         SnapList<func_inst_list_t *> * func_inst_lists = thrd_func_inst_lists->at(id);
112
113         uint32_t func_id = func_list->back();
114
115         if ( func_nodes.size() <= func_id )
116                 resize_func_nodes( func_id + 1 );
117
118         FuncNode * func_node = func_nodes[func_id];
119         ASSERT (func_node != NULL);
120
121         /* add corresponding FuncInst to func_node */
122         FuncInst * inst = func_node->get_or_add_action(act);
123
124         if (inst == NULL)
125                 return;
126
127         if (inst->is_read())
128                 func_node->store_read(act, tid);
129
130         /* add to curr_inst_list */
131         func_inst_list_t * curr_inst_list = func_inst_lists->back();
132         ASSERT(curr_inst_list != NULL);
133         curr_inst_list->push_back(inst);
134 }
135
136 /* return the FuncNode given its func_id  */
137 FuncNode * ModelHistory::get_func_node(uint32_t func_id)
138 {
139         if (func_nodes.size() <= func_id)       // this node has not been added
140                 return NULL;
141
142         return func_nodes[func_id];
143 }
144
145 void ModelHistory::print()
146 {
147         /* function id starts with 1 */
148         for (uint32_t i = 1;i < func_nodes.size();i++) {
149                 FuncNode * func_node = func_nodes[i];
150
151                 func_inst_list_mt * entry_insts = func_node->get_entry_insts();
152                 model_print("function %s has entry actions\n", func_node->get_func_name());
153
154                 func_inst_list_mt::iterator it;
155                 for (it = entry_insts->begin();it != entry_insts->end();it++) {
156                         FuncInst *inst = *it;
157                         model_print("type: %d, at: %s\n", inst->get_type(), inst->get_position());
158                 }
159
160 /*
161                 func_inst_list_mt * inst_list = funcNode->get_inst_list();
162
163                 model_print("function %s has following actions\n", funcNode->get_func_name());
164                 func_inst_list_mt::iterator it;
165                 for (it = inst_list->begin(); it != inst_list->end(); it++) {
166                         FuncInst *inst = *it;
167                         model_print("type: %d, at: %s\n", inst->get_type(), inst->get_position());
168                 }
169  */
170         }
171 }