Add some methods for WaitObj
[c11tester.git] / newfuzzer.cc
index 1fdc7d85f91f2b5b121b242b9c84ece0e987594d..69f1ce148bb3c2eb70f2252c1f8cba07b7722888 100644 (file)
@@ -1,18 +1,24 @@
 #include "newfuzzer.h"
 #include "threads-model.h"
-#include "model.h"
 #include "action.h"
-#include "execution.h"
+#include "history.h"
 #include "funcnode.h"
-#include "schedule.h"
+#include "funcinst.h"
+#include "predicate.h"
 #include "concretepredicate.h"
+#include "waitobj.h"
+
+#include "model.h"
+#include "schedule.h"
+#include "execution.h"
 
 NewFuzzer::NewFuzzer() :
        thrd_last_read_act(),
        thrd_curr_pred(),
        thrd_selected_child_branch(),
        thrd_pruned_writes(),
-       paused_thread_set()
+       paused_thread_set(),
+       paused_thread_table(128)
 {}
 
 /**
@@ -38,21 +44,19 @@ int NewFuzzer::selectWrite(ModelAction *read, SnapVector<ModelAction *> * rf_set
        if (read != thrd_last_read_act[thread_id]) {
                thrd_last_read_act[thread_id] = read;
 
-               SnapVector<func_id_list_t> * thrd_func_list = execution->get_thrd_func_list();
-               uint32_t func_id = (*thrd_func_list)[thread_id].back();
-               FuncNode * func_node = history->get_func_node(func_id);
-               inst_act_map_t * inst_act_map = func_node->get_inst_act_map(tid);
+               FuncNode * func_node = history->get_curr_func_node(tid);
                Predicate * curr_pred = func_node->get_predicate_tree_position(tid);
                FuncInst * read_inst = func_node->get_inst(read);
-
                Predicate * selected_branch = selectBranch(tid, curr_pred, read_inst);
+
+               inst_act_map_t * inst_act_map = func_node->get_inst_act_map(tid);
                prune_writes(tid, selected_branch, rf_set, inst_act_map);
        }
 
-       // No write satisfies the selected predicate
+       // No write satisfies the selected predicate, so pause this thread.
        if ( rf_set->size() == 0 ) {
                Thread * read_thread = execution->get_thread(tid);
-               model_print("the %d read action of thread %d is unsuccessful\n", read->get_seq_number(), read_thread->get_id());
+               model_print("the %d read action of thread %d at %p is unsuccessful\n", read->get_seq_number(), read_thread->get_id(), read->get_location());
 
                // reset thread pending action and revert sequence numbers
                read_thread->set_pending(read);
@@ -60,6 +64,9 @@ int NewFuzzer::selectWrite(ModelAction *read, SnapVector<ModelAction *> * rf_set
                execution->restore_last_seq_num();
 
                conditional_sleep(read_thread);
+
+               find_threads(read);
+
                return -1;
 /*
                SnapVector<ModelAction *> * pruned_writes = thrd_pruned_writes[thread_id];
@@ -149,15 +156,17 @@ bool NewFuzzer::prune_writes(thread_id_t tid, Predicate * pred,
 
        bool pruned = false;
        uint index = 0;
-       SnapVector<struct concrete_pred_expr> concrete_exprs = pred->evaluate(inst_act_map);
+
+       ConcretePredicate * concrete_pred = pred->evaluate(inst_act_map, tid);
+       SnapVector<struct concrete_pred_expr> * concrete_exprs = concrete_pred->getExpressions();
 
        while ( index < rf_set->size() ) {
                ModelAction * write_act = (*rf_set)[index];
                uint64_t write_val = write_act->get_write_value();
                bool satisfy_predicate = true;
 
-               for (uint i = 0; i < concrete_exprs.size(); i++) {
-                       struct concrete_pred_expr concrete = concrete_exprs[i];
+               for (uint i = 0; i < concrete_exprs->size(); i++) {
+                       struct concrete_pred_expr concrete = (*concrete_exprs)[i];
                        bool equality;
 
                        switch (concrete.token) {
@@ -192,6 +201,8 @@ bool NewFuzzer::prune_writes(thread_id_t tid, Predicate * pred,
                        index++;
        }
 
+       delete concrete_pred;
+
        return pruned;
 }
 
@@ -201,8 +212,23 @@ bool NewFuzzer::prune_writes(thread_id_t tid, Predicate * pred,
  */
 void NewFuzzer::conditional_sleep(Thread * thread)
 {
+       int index = paused_thread_set.size();
+
        model->getScheduler()->add_sleep(thread);
        paused_thread_set.push_back(thread);
+       paused_thread_table.put(thread, index); // Update table
+
+       /* Add the waiting condition to ModelHistory */
+       ModelAction * read = thread->get_pending();
+       thread_id_t tid = thread->get_id();
+       FuncNode * func_node = history->get_curr_func_node(tid);
+       inst_act_map_t * inst_act_map = func_node->get_inst_act_map(tid);
+
+       Predicate * selected_branch = get_selected_child_branch(tid);
+       ConcretePredicate * concrete = selected_branch->evaluate(inst_act_map, tid);
+       concrete->set_location(read->get_location());
+
+       history->add_waiting_write(concrete);
 }
 
 bool NewFuzzer::has_paused_threads()
@@ -214,8 +240,7 @@ Thread * NewFuzzer::selectThread(int * threadlist, int numthreads)
 {
        if (numthreads == 0 && has_paused_threads()) {
                wake_up_paused_threads(threadlist, &numthreads);
-               model_print("list size: %d\n", numthreads);
-               model_print("active t id: %d\n", threadlist[0]);
+               model_print("list size: %d, active t id: %d\n", numthreads, threadlist[0]);
        }
 
        int random_index = random() % numthreads;
@@ -224,25 +249,75 @@ Thread * NewFuzzer::selectThread(int * threadlist, int numthreads)
        return model->get_thread(curr_tid);
 }
 
-/* Force waking up one of threads paused by Fuzzer */
+/* Force waking up one of threads paused by Fuzzer, because otherwise
+ * the Fuzzer is not making progress
+ */
 void NewFuzzer::wake_up_paused_threads(int * threadlist, int * numthreads)
 {
        int random_index = random() % paused_thread_set.size();
        Thread * thread = paused_thread_set[random_index];
        model->getScheduler()->remove_sleep(thread);
 
-       paused_thread_set[random_index] = paused_thread_set.back();
+       Thread * last_thread = paused_thread_set.back();
+       paused_thread_set[random_index] = last_thread;
        paused_thread_set.pop_back();
+       paused_thread_table.put(last_thread, random_index);     // Update table
+       paused_thread_table.remove(thread);
 
-       model_print("thread %d is woken up\n", thread->get_id());
-       threadlist[*numthreads] = thread->get_id();
+       thread_id_t tid = thread->get_id();
+       history->remove_waiting_write(tid);
+
+       model_print("thread %d is woken up\n", tid);
+       threadlist[*numthreads] = tid;
        (*numthreads)++;
 }
 
-/* Notify one of conditional sleeping threads if the desired write is available */
-bool NewFuzzer::notify_conditional_sleep(Thread * thread)
+/* Wake up conditional sleeping threads if the desired write is available */
+void NewFuzzer::notify_paused_thread(Thread * thread)
 {
-       
+       ASSERT(paused_thread_table.contains(thread));
+
+       int index = paused_thread_table.get(thread);
+       model->getScheduler()->remove_sleep(thread);
+
+       Thread * last_thread = paused_thread_set.back();
+       paused_thread_set[index] = last_thread;
+       paused_thread_set.pop_back();
+       paused_thread_table.put(last_thread, index);    // Update table
+       paused_thread_table.remove(thread);
+
+       thread_id_t tid = thread->get_id();
+       history->remove_waiting_write(tid);
+}
+
+/* Find threads that may write values that the pending read action is waiting for */
+void NewFuzzer::find_threads(ModelAction * pending_read)
+{
+       void * location = pending_read->get_location();
+       thread_id_t self_id = pending_read->get_tid();
+
+       SnapVector<FuncNode *> * func_node_list = history->getWrFuncNodes(location);
+       for (uint i = 0; i < func_node_list->size(); i++) {
+               FuncNode * target_node = (*func_node_list)[i];
+               for (uint i = 1; i < execution->get_num_threads(); i++) {
+                       thread_id_t tid = int_to_id(i);
+                       if (tid == self_id)
+                               continue;
+
+                       FuncNode * node = history->get_curr_func_node(tid);
+                       /* It is possible that thread tid is not in any FuncNode */
+                       if (node == NULL)
+                               continue;
+
+                       int distance = node->compute_distance(target_node);
+                       if (distance != -1) {
+                               history->add_waiting_thread(self_id, tid, distance);
+                               model_print("thread: %d; distance from node %d to node %d: %d\n", tid, node->get_func_id(), target_node->get_func_id(), distance);
+
+                       }
+
+               }
+       }
 }
 
 bool NewFuzzer::shouldWait(const ModelAction * act)