1 files changed, 59 insertions, 25 deletions

diff --git a/src/list.c b/src/list.c
index b2d9f13..afd1b5d 100644
--- a/src/list.c
+++ b/src/list.c
@@ -88,2 +88,42 @@ grecs_list_remove_entry(struct grecs_list *lp, struct grecs_list_entry *ent)
 
+void *
+grecs_list_remove_tail(struct grecs_list *lp)
+{
+	void *data;
+	struct grecs_list_entry *ep;
+  
+	if (!lp || !lp->tail)
+		return NULL;
+	ep = lp->tail;
+	data = lp->tail->data;
+	grecs_list_remove_entry(lp, ep);
+	return data;
+}
+
+static int
+_ptrcmp(const void *a, const void *b)
+{
+	return a != b;
+}
+
+int
+grecs_list_remove(struct grecs_list *lp, void *data)
+{
+	struct grecs_list_entry *ep;
+	int (*cmp)(const void *, const void *);
+
+
+	if (!lp)
+		return 1;
+	
+	cmp = lp->cmp ? lp->cmp : _ptrcmp;
+	for (ep = lp->head; ep; ep = ep->next) {
+		if (cmp(ep->data, data) == 0) {
+			grecs_list_remove_entry(lp, ep);
+			return 0;
+		}
+	}
+	return 1;
+}
+
 void
@@ -125,3 +165,7 @@ grecs_list_pop(struct grecs_list *lp)
 	void *data;
-	struct grecs_list_entry *ep = lp->head;
+	struct grecs_list_entry *ep;
+
+	if (!lp)
+		return NULL;
+	ep = lp->head;
 	if (ep)	{
@@ -134,16 +178,2 @@ grecs_list_pop(struct grecs_list *lp)
 
-void *
-grecs_list_remove_tail(struct grecs_list *lp)
-{
-	void *data;
-	struct grecs_list_entry *ep;
-  
-	if (!lp->tail)
-		return NULL;
-	ep = lp->tail;
-	data = lp->tail->data;
-	grecs_list_remove_entry(lp, ep);
-	return data;
-}
-
 void
@@ -151,4 +181,7 @@ grecs_list_clear(struct grecs_list *lp)
 {
-	struct grecs_list_entry *ep = lp->head;
+	struct grecs_list_entry *ep;
 
+	if (!lp)
+		return;
+	ep = lp->head;
 	while (ep) {
@@ -173,8 +206,2 @@ grecs_list_free(struct grecs_list *lp)
 
-static int
-_ptrcmp(const void *a, const void *b)
-{
-	return a != b;
-}
-
 void *
@@ -183,3 +210,8 @@ grecs_list_locate(struct grecs_list *lp, void *data)
 	struct grecs_list_entry *ep;
-	int (*cmp)(const void *, const void *) = lp->cmp ? lp->cmp : _ptrcmp;
+	int (*cmp)(const void *, const void *);
+
+	if (!lp)
+		return NULL;
+	
+	cmp = lp->cmp ? lp->cmp : _ptrcmp;
 
@@ -196,3 +228,5 @@ grecs_list_index(struct grecs_list *lp, size_t idx)
 	struct grecs_list_entry *ep;
-	
+
+	if (!lp)
+		return NULL;
 	for (ep = lp->head; ep && idx; ep = ep->next, idx--)
@@ -221,3 +255,3 @@ grecs_list_compare(struct grecs_list *a, struct grecs_list *b)
 	for (ap = a->head, bp = b->head; ap; ap = ap->next, bp = bp->next)
-		if (cmp (ap->data, bp->data))
+		if (cmp(ap->data, bp->data))
 			return 1;