--- /dev/null
+#include "cyclegraph.h"
+
+CycleGraph::CycleGraph() {
+ hasCycles=false;
+}
+
+CycleNode * CycleGraph::getNode(ModelAction * action) {
+ CycleNode *node=actionToNode.get(action);
+ if (node==NULL) {
+ node=new CycleNode(action);
+ actionToNode.put(action, node);
+ }
+ return node;
+}
+
+void CycleGraph::addEdge(ModelAction *from, ModelAction *to) {
+ CycleNode *fromnode=getNode(from);
+ CycleNode *tonode=getNode(to);
+ if (!hasCycles) {
+ // Check for Cycles
+ hasCycles=checkReachable(fromnode, tonode);
+ }
+ fromnode->addEdge(tonode);
+}
+
+bool CycleGraph::checkReachable(CycleNode *from, CycleNode *to) {
+ std::vector<class CycleNode *> queue;
+ HashTable<class CycleNode *, class CycleNode *, uintptr_t, 4> discovered;
+
+ queue.push_back(from);
+ discovered.put(from, from);
+ while(!queue.empty()) {
+ class CycleNode * node=queue.back();
+ queue.pop_back();
+ if (node==to)
+ return true;
+
+ for(unsigned int i=0;i<node->getEdges()->size();i++) {
+ CycleNode *next=(*node->getEdges())[i];
+ if (!discovered.contains(next)) {
+ discovered.put(next,next);
+ queue.push_back(next);
+ }
+ }
+ }
+ return false;
+}
+
+CycleNode::CycleNode(ModelAction *modelaction) {
+ action=modelaction;
+}
+
+std::vector<class CycleNode *> * CycleNode::getEdges() {
+ return &edges;
+}
+
+void CycleNode::addEdge(CycleNode * node) {
+ edges.push_back(node);
+}
struct hashlistnode<_Key,_Val> *next;
};
-template<typename _Key, typename _Val, int _Shift>
+template<typename _Key, typename _Val, typename _KeyInt, int _Shift>
class HashTable {
public:
- HashTable(unsigned int initialcapacity, double factor) {
+ HashTable(unsigned int initialcapacity=1024, double factor=0.5) {
// Allocate space for the hash table
- table = calloc(initialcapacity, sizeof(struct hashlistnode<_Key,_Val> *));
+ table = (struct hashlistnode<_Key,_Val> **) calloc(initialcapacity, sizeof(struct hashlistnode<_Key,_Val> *));
loadfactor = factor;
capacity = initialcapacity;
threshold = initialcapacity*loadfactor;
}
~HashTable() {
+ for(unsigned int i=0;i<capacity;i++) {
+ struct hashlistnode<_Key,_Val> * bin = table[i];
+ while(bin!=NULL) {
+ struct hashlistnode<_Key,_Val> * next=bin->next;
+ free(bin);
+ bin=next;
+ }
+ }
free(table);
}
+
+ void reset() {
+ for(int i=0;i<capacity;i++) {
+ struct hashlistnode<_Key,_Val> * bin = table[i];
+ while(bin!=NULL) {
+ struct hashlistnode<_Key,_Val> * next=bin->next;
+ free(bin);
+ bin=next;
+ }
+ }
+ memset(table, 0, capacity*sizeof(struct hashlistnode<_Key, _Val> *));
+ size=0;
+ }
- void insert(_Key key, _Val val) {
+ void put(_Key key, _Val val) {
if(size > threshold) {
//Resize
unsigned int newsize = capacity << 1;
resize(newsize);
}
- struct hashlistnode<_Key,_Val> *ptr = table[(key & mask)>>_Shift];
+ struct hashlistnode<_Key,_Val> *ptr = table[(((_KeyInt)key) & mask)>>_Shift];
size++;
struct hashlistnode<_Key,_Val> *search = ptr;
search=search->next;
}
- struct hashlistnode<_Key,_Val> *newptr=malloc(sizeof(struct hashlistnode<_Key,_Val>));
+ struct hashlistnode<_Key,_Val> *newptr=(struct hashlistnode<_Key,_Val> *)malloc(sizeof(struct hashlistnode<_Key,_Val>));
newptr->key=key;
newptr->val=val;
newptr->next=ptr;
- table[(key&mask)>>_Shift]=newptr;
+ table[(((_KeyInt)key)&mask)>>_Shift]=newptr;
}
_Val get(_Key key) {
- struct hashlistnode<_Key,_Val> *search = table[(key & mask)>>_Shift];
+ struct hashlistnode<_Key,_Val> *search = table[(((_KeyInt)key) & mask)>>_Shift];
while(search!=NULL) {
if (search->key==key) {
}
return (_Val)0;
}
+
+ bool contains(_Key key) {
+ struct hashlistnode<_Key,_Val> *search = table[(((_KeyInt)key) & mask)>>_Shift];
+
+ while(search!=NULL) {
+ if (search->key==key) {
+ return true;
+ }
+ search=search->next;
+ }
+ return false;
+ }
void resize(unsigned int newsize) {
struct hashlistnode<_Key,_Val> ** oldtable = table;
struct hashlistnode<_Key,_Val> ** newtable;
unsigned int oldcapacity = capacity;
- if((newtable = calloc(newsize, sizeof(struct hashlistnode<_Key,_Val> *))) == NULL) {
+ if((newtable = (struct hashlistnode<_Key,_Val> **) calloc(newsize, sizeof(struct hashlistnode<_Key,_Val> *))) == NULL) {
printf("Calloc error %s %d\n", __FILE__, __LINE__);
exit(-1);
}
_Key key=bin->key;
struct hashlistnode<_Key, _Val> * next=bin->next;
- unsigned int index = (key & mask) >>_Shift;
- struct hashlistnode<_Key, _Val> tmp=newtable[index];
+ unsigned int index = (((_KeyInt)key) & mask) >>_Shift;
+ struct hashlistnode<_Key, _Val> * tmp=newtable[index];
bin->next=tmp;
newtable[index]=bin;
bin = next;
private:
struct hashlistnode<_Key,_Val> **table;
unsigned int capacity;
- _Key mask;
+ _KeyInt mask;
unsigned int size;
unsigned int threshold;
double loadfactor;