X-Git-Url: http://plrg.eecs.uci.edu/git/?p=c11tester.git;a=blobdiff_plain;f=predicate.cc;h=22fb0c7e8f8172d8cbf4963970c4edd7b5d85d3c;hp=9f4246e953a94cde78b88d55dc331016a501222f;hb=527eb9241e1b39b6ad4125a71b951d445d4e251e;hpb=db26d1e3370a583f8eef79194c87ba9d2ef92530

diff --git a/predicate.cc b/predicate.cc
index 9f4246e9..22fb0c7e 100644
--- a/predicate.cc
+++ b/predicate.cc
@@ -1,26 +1,207 @@
+#include "funcinst.h"
 #include "predicate.h"
+#include "concretepredicate.h"
 
-inline bool operator==(const predicate_expr& expr_A, const predicate_expr& expr_B)
+Predicate::Predicate(FuncInst * func_inst, bool is_entry, bool is_exit) :
+	func_inst(func_inst),
+	entry_predicate(is_entry),
+	exit_predicate(is_exit),
+	does_write(false),
+	depth(0),
+	weight(0),
+	exploration_count(0),
+	store_visible_count(0),
+	total_checking_count(0),
+	pred_expressions(16),
+	children(),
+	parent(NULL),
+	exit(NULL),
+	backedges(16)
+{}
+
+Predicate::~Predicate()
 {
-	if (expr_A.token != expr_B.token)
-		return false;
+	// parent and func_inst should not be deleted
+	pred_expressions.reset();
+	backedges.reset();
+	children.clear();
+}
 
-	if (expr_A.token == EQUALITY && expr_A.location != expr_B.location)
-		return false;
+unsigned int pred_expr_hash(struct pred_expr * expr)
+{
+	return (unsigned int)((uintptr_t)expr);
+}
 
-	if (expr_A.value != expr_B.value)
+bool pred_expr_equal(struct pred_expr * p1, struct pred_expr * p2)
+{
+	if (p1->token != p2->token)
+		return false;
+	if (p1->token == EQUALITY && p1->func_inst != p2->func_inst)
+		return false;
+	if (p1->value != p2->value)
 		return false;
-
 	return true;
 }
 
-void Predicate::add_predicate(predicate_expr predicate)
+void Predicate::add_predicate_expr(token_t token, FuncInst * func_inst, bool value)
+{
+	struct pred_expr *ptr = new pred_expr(token, func_inst, value);
+	pred_expressions.add(ptr);
+}
+
+void Predicate::add_child(Predicate * child)
+{
+	/* check duplication? */
+	children.push_back(child);
+}
+
+void Predicate::set_parent(Predicate * parent_pred)
+{
+	parent = parent_pred;
+	depth = parent_pred->get_depth() + 1;
+}
+
+void Predicate::set_exit(Predicate * exit_pred)
+{
+	exit = exit_pred;
+}
+
+void Predicate::copy_predicate_expr(Predicate * other)
+{
+	PredExprSet * other_pred_expressions = other->get_pred_expressions();
+	PredExprSetIter * it = other_pred_expressions->iterator();
+
+	while (it->hasNext()) {
+		struct pred_expr * ptr = it->next();
+		struct pred_expr * copy = new pred_expr(ptr->token, ptr->func_inst, ptr->value);
+		pred_expressions.add(copy);
+	}
+
+	delete it;
+}
+
+/* Follow the child if any child whose FuncInst matches with inst
+ *
+ * @param inst must be an ATOMIC_WRITE FuncInst
+ * @return NULL if no such child is found.
+ */
+Predicate * Predicate::follow_write_child(FuncInst * inst)
+{
+	action_type type = inst->get_type();
+	ASSERT(type == ATOMIC_WRITE || type == ATOMIC_INIT);
+
+	for (uint i = 0;i < children.size();i++) {
+		Predicate * child = children[i];
+		if (child->get_func_inst() == inst)
+			return child;
+	}
+
+	return NULL;
+}
+
+/* Evaluate predicate expressions against the given inst_act_map */
+ConcretePredicate * Predicate::evaluate(inst_act_map_t * inst_act_map, thread_id_t tid)
+{
+	ConcretePredicate * concrete = new ConcretePredicate(tid);
+	PredExprSetIter * it = pred_expressions.iterator();
+
+	while (it->hasNext()) {
+		struct pred_expr * ptr = it->next();
+		uint64_t value = 0;
+
+		switch(ptr->token) {
+		case NOPREDICATE:
+			break;
+		case EQUALITY:
+			FuncInst * to_be_compared;
+			ModelAction * last_act;
+
+			to_be_compared = ptr->func_inst;
+			last_act = inst_act_map->get(to_be_compared);
+			value = last_act->get_reads_from_value();
+			break;
+		case NULLITY:
+			break;
+		default:
+			break;
+		}
+
+		concrete->add_expression(ptr->token, value, ptr->value);
+	}
+
+	delete it;
+	return concrete;
+}
+
+void Predicate::print_predicate()
 {
-	ModelList<predicate_expr>::iterator it;
-	for (it = predicates.begin(); it != predicates.end(); it++) {
-		if (predicate == *it)
-			return;
+	model_print("\"%p\" [shape=box, label=\"", this);
+	if (entry_predicate) {
+		model_print("entry node\"];\n");
+		return;
+	}
+
+	if (exit_predicate) {
+		model_print("exit node\"];\n");
+		return;
+	}
+
+	model_print("depth: %u; weight: %g\n", depth, weight);
+
+	func_inst->print();
+
+	if (pred_expressions.getSize() == 0)
+		model_print("predicate unset\n");
+
+	PredExprSetIter * it = pred_expressions.iterator();
+	while (it->hasNext()) {
+		struct pred_expr * expr = it->next();
+		FuncInst * inst = expr->func_inst;
+		switch (expr->token) {
+		case NOPREDICATE:
+			break;
+		case EQUALITY:
+			model_print("predicate token: equality, position: %s, value: %d\n", inst->get_position(), expr->value);
+			break;
+		case NULLITY:
+			model_print("predicate token: nullity, value: %d\n", expr->value);
+			break;
+		default:
+			model_print("unknown predicate token\n");
+			break;
+		}
+	}
+
+	if (does_write) {
+		model_print("Does write\n");
+	}
+
+	double prob = (double) store_visible_count / total_checking_count;
+	model_print("Total checks: %d, visible count: %d; prob: %f\n", total_checking_count, store_visible_count, prob);
+	model_print("Exploration count: %d, failure count: %d", exploration_count, failure_count);
+	model_print("\"];\n");
+
+	delete it;
+}
+
+void Predicate::print_pred_subtree()
+{
+	print_predicate();
+	for (uint i = 0;i < children.size();i++) {
+		Predicate * child = children[i];
+		child->print_pred_subtree();
+		model_print("\"%p\" -> \"%p\"\n", this, child);
+	}
+
+	PredSetIter * it = backedges.iterator();
+	while (it->hasNext()) {
+		Predicate * backedge = it->next();
+		model_print("\"%p\" -> \"%p\"[style=dashed, color=grey]\n", this, backedge);
+	}
+
+	if (exit) {
+		model_print("\"%p\" -> \"%p\"[style=dashed, color=red]\n", this, exit);
 	}
 
-	predicates.push_back(predicate);
+	delete it;
 }