Merge pull request #454 from michaeltryby/dev-list

Dev generic list

src/util/list.c

@@ -0,0 +1,176 @@
+/*
+ ******************************************************************************
+ Project:      OWA EPANET
+ Version:      2.2
+ Module:       util/list.h
+ Description:  Generic list
+               https://gist.github.com/pseudomuto/6334796#file-list-c
+               Accessed: April 9, 2019
+ Authors:      David Muto, Michael Tryby
+ Copyright:    see AUTHORS
+ License:      see LICENSE
+ Last Updated: 04/09/2019
+ ******************************************************************************
+*/
+
+#ifdef _DEBUG
+#define _CRTDBG_MAP_ALLOC
+#include <stdlib.h>
+#include <crtdbg.h>
+#else
+#include <stdlib.h>
+#endif
+
+#include <string.h>
+#include <assert.h>
+
+#include "list.h"
+
+
+typedef struct list_node_s {
+    void *data;
+    struct list_node_s *next;
+} list_node_t;
+
+
+typedef struct list_s {
+    int logicalLength;
+    size_t elementSize;
+    list_node_t *head;
+    list_node_t *tail;
+    freeFunction freeFn;
+} list_t;
+
+
+list_t *create_list(size_t elementSize, freeFunction freeFn)
+{
+    list_t *list;
+    list = (list_t *)calloc(1, sizeof(list_t));
+
+    assert(elementSize > 0);
+    list->logicalLength = 0;
+    list->elementSize = elementSize;
+    list->head = list->tail = NULL;
+    list->freeFn = freeFn;
+    return list;
+}
+
+void delete_list(list_t *list)
+{
+    list_node_t *current;
+
+    while(list->head != NULL) {
+        current = list->head;
+        list->head = current->next;
+        delete_node(list, current);
+    }
+    free(list);
+}
+
+void prepend_list(list_t *list, void *element)
+{
+    list_node_t *node = malloc(sizeof(list_node_t));
+    node->data = malloc(list->elementSize);
+    memcpy(node->data, element, list->elementSize);
+
+    node->next = list->head;
+    list->head = node;
+
+    // first node?
+    if(!list->tail) {
+        list->tail = list->head;
+    }
+
+    list->logicalLength++;
+}
+
+void append_list(list_t *list, void *element)
+{
+	list_node_t *node = malloc(sizeof(list_node_t));
+    node->data = malloc(list->elementSize);
+    node->next = NULL;
+
+    memcpy(node->data, element, list->elementSize);
+
+    if(list->logicalLength == 0) {
+        list->head = list->tail = node;
+    } else {
+        list->tail->next = node;
+        list->tail = node;
+    }
+
+    list->logicalLength++;
+}
+
+void for_each_list(list_t *list, listIterator iterator)
+{
+    assert(iterator != NULL);
+
+    list_node_t *node = list->head;
+    bool result = true;
+    while(node != NULL && result) {
+        result = iterator(node);
+        node = node->next;
+    }
+}
+
+list_node_t *head_list(list_t *list, bool removeFromList)
+//
+// Warning: When node is removed caller is responsible for freeing it.
+//
+{
+    assert(list->head != NULL);
+
+    list_node_t *node = list->head;
+    if(removeFromList) {
+        // Disconnecting head node
+        list->head = node->next;
+        list->logicalLength--;
+    }
+    return node;
+}
+
+list_node_t *tail_list(list_t *list)
+{
+    assert(list->tail != NULL);
+    return list->tail;
+}
+
+int size_list(list_t *list)
+{
+    return list->logicalLength;
+}
+
+void *get_data(list_node_t *lnode)
+{
+    return lnode->data;
+}
+
+void delete_node(list_t *list, list_node_t *lnode)
+{
+    if (list->freeFn)
+        list->freeFn(lnode->data);
+
+    free(lnode->data);
+    free(lnode);
+}
+
+//
+// Iterator first/done/next operations provide containment for list abstraction
+// http://www.cs.yale.edu/homes/aspnes/pinewiki/C(2f)Iterators.html
+// Accessed on April 11, 2019
+//
+list_node_t *first_list(list_t *list)
+{
+    return list->head;
+}
+
+bool done_list(list_node_t *lnode)
+{
+    return lnode != NULL;
+}
+
+list_node_t *next_list(list_node_t *lnode)
+{
+    return lnode->next;
+}

src/util/list.h

@@ -0,0 +1,111 @@
+/*
+ ******************************************************************************
+ Project:      OWA EPANET
+ Version:      2.2
+ Module:       util/list.h
+ Description:  Generic list
+               https://gist.github.com/pseudomuto/6334796#file-list-h
+               Accessed: April 9, 2019
+ Authors:      David Muto, Michael Tryby
+ Copyright:    see AUTHORS
+ License:      see LICENSE
+ Last Updated: 04/09/2019
+ ******************************************************************************
+*/
+
+#ifndef LIST_H
+#define LIST_H
+
+
+#include <stdbool.h>
+
+#if defined(__cplusplus)
+extern "C" {
+#endif
+
+
+// Forward declarations
+typedef struct list_node_s list_node_t;
+typedef struct list_s list_t;
+
+typedef void(*freeFunction)(void *);
+typedef bool(*listIterator)(list_node_t *);
+
+
+/**
+@brief Initializes a linked list to store elements of elementSize and to call
+freeFunction for each element when destroying a list.
+*/
+list_t *create_list(size_t elementSize, freeFunction freeFn);
+
+/**
+@brief Frees dynamically allocated nodes and optionally calls freeFunction
+with each node’s data pointer.
+*/
+void delete_list(list_t *list);
+
+/**
+@brief Adds a node to the head of the list.
+*/
+void prepend_list(list_t *list, void *element);
+
+/**
+@brief Adds a node to the tail of the list.
+*/
+void append_list(list_t *list, void *element);
+
+/**
+@brief Returns the number of items in the list.
+*/
+int size_list(list_t *list);
+
+
+/**
+@brief Returns pointer to list node's data.
+*/
+void *get_data(list_node_t *lnode);
+
+/**
+@brief Frees memory associated with a list node.
+*/
+void delete_node(list_t *list,  list_node_t *lnode);
+
+
+/**
+@brief Calls the supplied iterator function with the data element of each
+node (iterates over the list).
+*/
+void for_each_list(list_t *list, listIterator iterator);
+
+/**
+@brief Returns the head of the list (optionally removing it at the same time).
+*/
+list_node_t *head_list(list_t *list, bool removeFromList);
+
+/**
+@brief Returns the tail of the list.
+*/
+list_node_t *tail_list(list_t *list);
+
+
+/**
+@brief Returns list head node.
+*/
+list_node_t *first_list(list_t *list);
+
+/**
+@brief Returns true if end of list false otherwise.
+*/
+bool done_list(list_node_t *lnode);
+
+/**
+@brief Returns next node in the list.
+*/
+list_node_t *next_list(list_node_t *lnode);
+
+
+#if defined(__cplusplus)
+}
+#endif
+
+#endif /* LIST_H */