Adding example of clist used as an intrusive list.

1 files changed, 52 insertions, 0 deletions

diff --git a/examples/intrusive.c b/examples/intrusive.c
new file mode 100644
index 00000000..d8236b04
--- /dev/null
+++ b/examples/intrusive.c
@@ -0,0 +1,52 @@
+// Example of intrusive list by using the node API and typesafe c_container_of().
+
+#include <stdio.h> 
+
+#define i_type List1
+#define i_val int
+#define i_extern // implement List1_sort()
+#include <stc/clist.h> 
+
+#define i_type List2
+#define i_val List1_node
+#define i_opt c_no_cmp // no elem. comparison
+#include <stc/clist.h> 
+
+int main()
+{
+    c_auto (List2, list2)
+    {
+        List1 list1 = List1_init(); // should not be destroyed, list2 will destroy shared nodes.
+
+        c_forlist (i, int, {6, 9, 3, 1, 7, 4, 5, 2, 8})
+            List2_push_back(&list2, (List1_node){NULL, *i.ref});
+
+        c_foreach (i, List2, list2)
+            List1_push_node_back(&list1, c_container_of(&i.ref->value, List1_node, value));
+
+        printf("list1:");
+        c_foreach (i, List1, list1) printf(" %d", *i.ref);
+        printf("\nlist2:");
+        c_foreach (i, List2, list2) printf(" %d", i.ref->value);
+
+        printf("\nsort list1");
+        List1_sort(&list1);
+
+        printf("\nlist1:");
+        c_foreach (i, List1, list1) printf(" %d", *i.ref);
+        printf("\nlist2:");
+        c_foreach (i, List2, list2) printf(" %d", i.ref->value);
+
+        printf("\nremove 5 from both lists in O(1) time");
+        List1_iter it1 = List1_find(&list1, 5);
+        if (it1.ref) {
+            List1_unlink_node_after(&list1, it1.prev);
+            free(List2_unlink_node_after(&list2, c_container_of(it1.prev, List2_node, value)));
+        }
+        printf("\nlist1:");
+        c_foreach (i, List1, list1) printf(" %d", *i.ref);
+        printf("\nlist2:");
+        c_foreach (i, List2, list2) printf(" %d", i.ref->value);
+        puts("");
+    }
+}
\ No newline at end of file