Basic support for double linked lists

sdk/xtklib/rtl/plist.c

@@ -0,0 +1,63 @@
+/**
+ * PROJECT:         ExectOS
+ * COPYRIGHT:       See COPYING.md in the top level directory
+ * FILE:            sdk/xtklib/rtl/plist.c
+ * DESCRIPTION:     Linked list manipulation routines
+ * DEVELOPERS:      Rafal Kupiec <belliash@codingworkshop.eu.org>
+ */
+
+#include <xtkmapi.h>
+
+
+/**
+ * This routine initializes a structure representing the head of a double-linked list.
+ *
+ * @param ListHead
+ *        Pointer to a structure that serves as the list header.
+ *
+ * @return This routine does not return any value.
+ *
+ * @since XT 1.0
+ */
+XTINLINE
+VOID
+RtlInitializeListHead(IN PLIST_ENTRY ListHead)
+{
+    ListHead->Blink = ListHead;
+    ListHead->Flink = ListHead;
+}
+
+/**
+ * This routine initializes a structure representing the head of a 32bit double-linked list.
+ *
+ * @param ListHead
+ *        Pointer to a structure that serves as the list header.
+ *
+ * @return This routine does not return any value.
+ *
+ * @since XT 1.0
+ */
+XTINLINE
+VOID
+RtlInitializeListHead32(IN PLIST_ENTRY32 ListHead)
+{
+    ListHead->Blink = PtrToUlong(ListHead);
+    ListHead->Flink = PtrToUlong(ListHead);
+}
+
+/**
+ * Indicates whether a doubly linked list structure is empty.
+ *
+ * @param ListHead
+ *        Pointer to a structure that represents the head of the list.
+ *
+ * @return TRUE if there are currently no entries in the list or FALSE otherwise.
+ *
+ * @since XT 1.0
+ */
+XTINLINE
+BOOLEAN
+RtlListEmpty(PLIST_ENTRY ListHead)
+{
+    return (ListHead->Flink == ListHead);
+}