try to make code more thread save

include/tr/hash.h

@@ -37,7 +37,7 @@ TR_CLASS(TR_Hash) {
 TR_INSTANCE_INIT(TR_Hash);
 TR_CLASSVARS_DECL(TR_Hash) {};
 
-#define TR_hashEmpty(hash) (NULL == (hash)->tree->root)
+//#define TR_hashEmpty(hash) (NULL == (hash)->tree->root)
 
 void          * TR_hashAdd(TR_Hash, void *);
 void          * TR_hashDelete(TR_Hash, const char *, size_t);
@@ -45,7 +45,7 @@ void * TR_hashGet(TR_Hash, const char *, size_t);
 void          * TR_hashGetFirst(TR_Hash);
 void          * TR_hashDeleteByVal(TR_Hash, unsigned long);
 void          * TR_hashGetByVal(TR_Hash, unsigned long);
-void   TR_hashEach(TR_Hash, const void *, void (*)(const void *, const void *));
+unsigned long   TR_hashEach(TR_Hash, const void *, void (*)(const void *, const void *));
 void            TR_hashCleanup(TR_Hash);
 
 #endif // __TR_HASH_H__

include/tr/tree.h

@@ -53,7 +53,7 @@ typedef void (*TR_TreeAction)(const void *, const void *, const int);
 void          * TR_treeFind(TR_Tree, const void *, TR_TreeComp);
 void          * TR_treeInsert(TR_Tree, const void *, TR_TreeComp);
 void          * TR_treeDelete(TR_Tree, const void *, TR_TreeComp);
-void   TR_treeWalk(TR_Tree, const void *, TR_TreeAction);
+unsigned long   TR_treeWalk(TR_Tree, const void *, TR_TreeAction);
 void            TR_treeDestroy(TR_Tree, TR_TreeAction);
 
 #endif // __TR_TREE_H__

src/hash/each.c

@@ -34,7 +34,7 @@ walk(const void * node, const void * data, const int depth)
 	cb(node, data);
 }
 
-void
+unsigned long
 TR_hashEach(
 		TR_Hash this,
 		const void * data,
@@ -42,7 +42,7 @@ TR_hashEach(
 {
 	cb = callback;
 
-	TR_treeWalk(this->tree, data, walk);
+	return TR_treeWalk(this->tree, data, walk);
 }
 
 // vim: set ts=4 sw=4:

src/queue/destroy.c

@@ -29,10 +29,12 @@
 void
 TR_queueDestroy(TR_Queue this)
 {
-	TR_Queue node = this->first;
+	TR_Queue node;
 	
 	pthread_mutex_lock(&(this->lock));
 
+	node = this->first;
+
 	while (NULL != node) {
 		TR_Queue next = node->next;
 		if (this->free_msgs) {

src/queue/find.c

@@ -20,6 +20,8 @@
  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  */
 
+#include <pthread.h>
+
 #include "trbase.h"
 #include "tr/queue.h"
 
@@ -28,7 +30,9 @@ TR_queueFind(TR_Queue this, void * msg)
 {
 	TR_Queue node;
 
+	pthread_mutex_lock(&(this->lock));
 	for (node = this->first; node && node->msg != msg; node = node->next);
+	pthread_mutex_unlock(&(this->lock));
 
 	return node;
 }

src/queue/find_parent.c

@@ -20,6 +20,8 @@
  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  */
 
+#include <pthread.h>
+
 #include "trbase.h"
 #include "tr/queue.h"
 
@@ -28,7 +30,9 @@ TR_queueFindParent(TR_Queue this, void * msg)
 {
 	TR_Queue node;
 
+	pthread_mutex_lock(&(this->lock));
 	for (node = this; node->next && node->next->msg != msg; node = node->next);
+	pthread_mutex_unlock(&(this->lock));
 
 	return node->next ? node : NULL;
 }

src/queue/put.c

@@ -28,10 +28,12 @@
 void
 TR_queuePut(TR_Queue this, void * msg)
 {
-	TR_Queue node = (this->last)? this->last : this;
+	TR_Queue node;
 
 	pthread_mutex_lock(&(this->lock));
 
+	node = (this->last)? this->last : this;
+
 	node->next = TR_new(TR_Queue);
 	this->last = node->next;
 

src/queue/put_first.c

@@ -28,10 +28,12 @@
 void
 TR_queuePutFirst(TR_Queue this, void * msg)
 {
-	TR_Queue current_first = this->first;
+	TR_Queue current_first;
 
 	pthread_mutex_lock(&(this->lock));
 
+	current_first = this->first;
+
 	this->first = this->next = TR_new(TR_Queue);
 	this->first->next = current_first;
 	this->first->msg  = msg;

src/tree/delete.c

@@ -28,7 +28,7 @@
 void *
 TR_treeDelete(TR_Tree this, const void * search, TR_TreeComp comp)
 {
-	TR_TreeNode   node = this->root;
+	TR_TreeNode   node;
 	TR_TreeNode   del_node;
 	TR_TreeNode   sibling;
 	int           found;
@@ -36,6 +36,8 @@ TR_treeDelete(TR_Tree this, const void * search, TR_TreeComp comp)
 
 	pthread_mutex_lock(&(this->lock));
 
+	node = this->root;
+
 	TR_TREE_FIND(node, search, found, comp);
 
 	/*

src/tree/destroy.c

@@ -26,10 +26,15 @@
 void
 TR_treeDestroy(TR_Tree this, TR_TreeAction action)
 {
-    TR_TreeNode previous = this->root;
-    TR_TreeNode node     = this->root;
+    TR_TreeNode previous;
+    TR_TreeNode node;
     int         depth = 1;
     
+	pthread_mutex_lock(&(this->lock));
+
+    previous = this->root;
+    node     = this->root;
+
     /*
      * I think this has something like O(n+log(n)) on a ballanced
      * tree because I have to traverse back the rightmost leaf to
@@ -83,6 +88,8 @@ TR_treeDestroy(TR_Tree this, TR_TreeAction action)
     }
 	
 	this->root = NULL;
+
+	pthread_mutex_unlock(&(this->lock));
 }
 
 // vim: set ts=4 sw=4:

src/tree/find.c

@@ -26,15 +26,18 @@ void *
 TR_treeFind(TR_Tree this, const void * search, TR_TreeComp comp)
 {
 	int           found;
-	TR_TreeNode node = this->root;
+	TR_TreeNode   node;
+	void        * retval;
 
 	pthread_mutex_lock(&(this->lock));
 
+	node = this->root;
 	TR_TREE_FIND(node, search, found, comp);
+	retval = found == 0 ? node->data : NULL;
 
 	pthread_mutex_unlock(&(this->lock));
 
-	return found == 0 ? node->data : NULL;
+	return retval;
 }
 
 // vim: set ts=4 sw=4:

src/tree/insert.c

@@ -28,12 +28,15 @@
 void *
 TR_treeInsert(TR_Tree this, const void * search, TR_TreeComp comp)
 {
-	TR_TreeNode node     = this->root;
 	TR_TreeNode   new_node = NULL;
+	TR_TreeNode   node;
 	int           found;
+	void        * retval;
 
 	pthread_mutex_lock(&(this->lock));
 
+	node = this->root;
+
 	/*
 	 * insert the node or return the one in tree if comparison
 	 * succeeds.
@@ -77,10 +80,11 @@ TR_treeInsert(TR_Tree this, const void * search, TR_TreeComp comp)
 	 * new node at this point...now rabalance the tree
 	 */
 	TR_TREE_BALANCE_INSERT(&(this->root), node);
+	retval = new_node->data;
 
 	pthread_mutex_unlock(&(this->lock));
 
-	return new_node->data;
+	return retval;
 }
 
 // vim: set ts=4 sw=4:

src/tree/walk.c

@@ -20,14 +20,22 @@
  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  */
 
+#include <pthread.h>
+
 #include "tr/tree.h"
 
-void
+unsigned long
 TR_treeWalk(TR_Tree this, const void * data, TR_TreeAction action)
 {
-	TR_TreeNode previous = this->root;
-	TR_TreeNode node     = this->root;
+	TR_TreeNode   previous;
+	TR_TreeNode   node;
 	int           depth     = 1;
+	unsigned long processed = 0;
+
+	pthread_mutex_lock(&(this->lock));
+
+	previous = this->root;
+	node     = this->root;
 
 	while (NULL != node) {
 		if (previous == TR_TREE_RIGHT(node)) {
@@ -40,6 +48,7 @@ TR_treeWalk(TR_Tree this, const void * data, TR_TreeAction action)
 		if (NULL == TR_TREE_LEFT(node) || previous == TR_TREE_LEFT(node)) {
 			if (action) {
 				action(node->data, data, depth);
+				processed++;
 			}
 			previous = node;
 
@@ -56,6 +65,10 @@ TR_treeWalk(TR_Tree this, const void * data, TR_TreeAction action)
 			depth++;
 		}
 	}
+
+	pthread_mutex_unlock(&(this->lock));
+
+	return processed;
 }
 
 // vim: set ts=4 sw=4: