Fix wapp_uuid_gen_uuid4 for C++

This reverts commit 1cdb08a81a.

.gitea/workflows/release.yml

@@ -0,0 +1,81 @@
+name: Release
+
+on:
+  push:
+    branches:
+      - main  # or your default branch
+
+jobs:
+  release:
+    runs-on: self-hosted
+
+    steps:
+      - name: Checkout repository
+        uses: actions/checkout@v4
+        with:
+            fetch-depth: 0   # fetch full history
+            tags: true       # fetch all tags
+
+      - name: Check/Create Tag
+        id: tag
+        run: |
+          VERSION=$(cat VERSION | tr -d '[:space:]')  # read version and trim whitespace
+          echo "Version: $VERSION"
+
+          if git rev-parse "v$VERSION" >/dev/null 2>&1; then
+            echo "Tag v$VERSION already exists. Skipping release."
+            exit 0
+          fi
+
+          # Tag does not exist → create it
+          echo "Creating tag v$VERSION"
+          git tag "v$VERSION"
+          git push origin "v$VERSION"
+
+          echo "version=$VERSION" >> $GITHUB_OUTPUT
+
+      - name: Build Artifacts
+        if: steps.tag.outputs.version
+        run: |
+          chmod +x ./package
+          ./package
+          ls -l dist/
+
+      - name: Create Release
+        if: steps.tag.outputs.version
+        id: create_release
+        run: |
+          VERSION="${{ steps.tag.outputs.version }}"
+          RESPONSE=$(curl -s -X POST \
+            -H "Authorization: token ${{ secrets.GITEA_TOKEN }}" \
+            -H "Content-Type: application/json" \
+            "https://git.thewizardapprentice.com/api/v1/repos/${{ gitea.repository }}/releases" \
+            -d '{
+              "tag_name": "v'"$VERSION"'",
+              "name": "wapp-v'"$VERSION"'",
+              "body": "Automated release for wapp-v'"$VERSION"'",
+              "draft": false,
+              "prerelease": false
+            }')
+
+          echo "$RESPONSE"
+          RELEASE_ID=$(echo $RESPONSE | jq -r '.id')
+          echo "release_id=$RELEASE_ID" >> $GITHUB_OUTPUT
+
+      - name: Upload Artifacts
+        if: steps.tag.outputs.version
+        run: |
+          RELEASE_ID="${{ steps.create_release.outputs.release_id }}"
+          for FILE in dist/*; do
+            FILENAME=$(basename "$FILE")
+            echo "Uploading $FILENAME"
+            curl -X POST \
+              -H "Authorization: token ${{ secrets.GITEA_TOKEN }}" \
+              -H "Content-Type: application/octet-stream" \
+              --data-binary @"$FILE" \
+              "https://git.thewizardapprentice.com/api/v1/repos/${{ gitea.repository }}/releases/$RELEASE_ID/assets?name=$FILENAME"
+          done
+
+      - name: Cleanup
+        if: steps.tag.outputs.version
+        run: rm -rf dist/*

.gitignore

@@ -1,5 +1,6 @@
 .cache
 .vscode
+.venv
 test
 test.*
 *.dSYM
@@ -8,6 +9,6 @@ test.*
 *.obj
 compile_commands.json
 libwapp-build
-libwapp.so
+dist
 *.vs
 __pycache__

LICENSE

@@ -0,0 +1,201 @@
+                             Apache License
+                       Version 2.0, January 2004
+                    http://www.apache.org/licenses/
+
+TERMS AND CONDITIONS FOR USE, REPRODUCTION, AND DISTRIBUTION
+
+1. Definitions.
+
+  "License" shall mean the terms and conditions for use, reproduction,
+  and distribution as defined by Sections 1 through 9 of this document.
+
+  "Licensor" shall mean the copyright owner or entity authorized by
+  the copyright owner that is granting the License.
+
+  "Legal Entity" shall mean the union of the acting entity and all
+  other entities that control, are controlled by, or are under common
+  control with that entity. For the purposes of this definition,
+  "control" means (i) the power, direct or indirect, to cause the
+  direction or management of such entity, whether by contract or
+  otherwise, or (ii) ownership of fifty percent (50%) or more of the
+  outstanding shares, or (iii) beneficial ownership of such entity.
+
+  "You" (or "Your") shall mean an individual or Legal Entity
+  exercising permissions granted by this License.
+
+  "Source" form shall mean the preferred form for making modifications,
+  including but not limited to software source code, documentation
+  source, and configuration files.
+
+  "Object" form shall mean any form resulting from mechanical
+  transformation or translation of a Source form, including but
+  not limited to compiled object code, generated documentation,
+  and conversions to other media types.
+
+  "Work" shall mean the work of authorship, whether in Source or
+  Object form, made available under the License, as indicated by a
+  copyright notice that is included in or attached to the work
+  (an example is provided in the Appendix below).
+
+  "Derivative Works" shall mean any work, whether in Source or Object
+  form, that is based on (or derived from) the Work and for which the
+  editorial revisions, annotations, elaborations, or other modifications
+  represent, as a whole, an original work of authorship. For the purposes
+  of this License, Derivative Works shall not include works that remain
+  separable from, or merely link (or bind by name) to the interfaces of,
+  the Work and Derivative Works thereof.
+
+  "Contribution" shall mean any work of authorship, including
+  the original version of the Work and any modifications or additions
+  to that Work or Derivative Works thereof, that is intentionally
+  submitted to Licensor for inclusion in the Work by the copyright owner
+  or by an individual or Legal Entity authorized to submit on behalf of
+  the copyright owner. For the purposes of this definition, "submitted"
+  means any form of electronic, verbal, or written communication sent
+  to the Licensor or its representatives, including but not limited to
+  communication on electronic mailing lists, source code control systems,
+  and issue tracking systems that are managed by, or on behalf of, the
+  Licensor for the purpose of discussing and improving the Work, but
+  excluding communication that is conspicuously marked or otherwise
+  designated in writing by the copyright owner as "Not a Contribution."
+
+  "Contributor" shall mean Licensor and any individual or Legal Entity
+  on behalf of whom a Contribution has been received by Licensor and
+  subsequently incorporated within the Work.
+
+2. Grant of Copyright License. Subject to the terms and conditions of
+  this License, each Contributor hereby grants to You a perpetual,
+  worldwide, non-exclusive, no-charge, royalty-free, irrevocable
+  copyright license to reproduce, prepare Derivative Works of,
+  publicly display, publicly perform, sublicense, and distribute the
+  Work and such Derivative Works in Source or Object form.
+
+3. Grant of Patent License. Subject to the terms and conditions of
+  this License, each Contributor hereby grants to You a perpetual,
+  worldwide, non-exclusive, no-charge, royalty-free, irrevocable
+  (except as stated in this section) patent license to make, have made,
+  use, offer to sell, sell, import, and otherwise transfer the Work,
+  where such license applies only to those patent claims licensable
+  by such Contributor that are necessarily infringed by their
+  Contribution(s) alone or by combination of their Contribution(s)
+  with the Work to which such Contribution(s) was submitted. If You
+  institute patent litigation against any entity (including a
+  cross-claim or counterclaim in a lawsuit) alleging that the Work
+  or a Contribution incorporated within the Work constitutes direct
+  or contributory patent infringement, then any patent licenses
+  granted to You under this License for that Work shall terminate
+  as of the date such litigation is filed.
+
+4. Redistribution. You may reproduce and distribute copies of the
+  Work or Derivative Works thereof in any medium, with or without
+  modifications, and in Source or Object form, provided that You
+  meet the following conditions:
+
+  (a) You must give any other recipients of the Work or
+      Derivative Works a copy of this License; and
+
+  (b) You must cause any modified files to carry prominent notices
+      stating that You changed the files; and
+
+  (c) You must retain, in the Source form of any Derivative Works
+      that You distribute, all copyright, patent, trademark, and
+      attribution notices from the Source form of the Work,
+      excluding those notices that do not pertain to any part of
+      the Derivative Works; and
+
+  (d) If the Work includes a "NOTICE" text file as part of its
+      distribution, then any Derivative Works that You distribute must
+      include a readable copy of the attribution notices contained
+      within such NOTICE file, excluding those notices that do not
+      pertain to any part of the Derivative Works, in at least one
+      of the following places: within a NOTICE text file distributed
+      as part of the Derivative Works; within the Source form or
+      documentation, if provided along with the Derivative Works; or,
+      within a display generated by the Derivative Works, if and
+      wherever such third-party notices normally appear. The contents
+      of the NOTICE file are for informational purposes only and
+      do not modify the License. You may add Your own attribution
+      notices within Derivative Works that You distribute, alongside
+      or as an addendum to the NOTICE text from the Work, provided
+      that such additional attribution notices cannot be construed
+      as modifying the License.
+
+  You may add Your own copyright statement to Your modifications and
+  may provide additional or different license terms and conditions
+  for use, reproduction, or distribution of Your modifications, or
+  for any such Derivative Works as a whole, provided Your use,
+  reproduction, and distribution of the Work otherwise complies with
+  the conditions stated in this License.
+
+5. Submission of Contributions. Unless You explicitly state otherwise,
+  any Contribution intentionally submitted for inclusion in the Work
+  by You to the Licensor shall be under the terms and conditions of
+  this License, without any additional terms or conditions.
+  Notwithstanding the above, nothing herein shall supersede or modify
+  the terms of any separate license agreement you may have executed
+  with Licensor regarding such Contributions.
+
+6. Trademarks. This License does not grant permission to use the trade
+  names, trademarks, service marks, or product names of the Licensor,
+  except as required for reasonable and customary use in describing the
+  origin of the Work and reproducing the content of the NOTICE file.
+
+7. Disclaimer of Warranty. Unless required by applicable law or
+  agreed to in writing, Licensor provides the Work (and each
+  Contributor provides its Contributions) on an "AS IS" BASIS,
+  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+  implied, including, without limitation, any warranties or conditions
+  of TITLE, NON-INFRINGEMENT, MERCHANTABILITY, or FITNESS FOR A
+  PARTICULAR PURPOSE. You are solely responsible for determining the
+  appropriateness of using or redistributing the Work and assume any
+  risks associated with Your exercise of permissions under this License.
+
+8. Limitation of Liability. In no event and under no legal theory,
+  whether in tort (including negligence), contract, or otherwise,
+  unless required by applicable law (such as deliberate and grossly
+  negligent acts) or agreed to in writing, shall any Contributor be
+  liable to You for damages, including any direct, indirect, special,
+  incidental, or consequential damages of any character arising as a
+  result of this License or out of the use or inability to use the
+  Work (including but not limited to damages for loss of goodwill,
+  work stoppage, computer failure or malfunction, or any and all
+  other commercial damages or losses), even if such Contributor
+  has been advised of the possibility of such damages.
+
+9. Accepting Warranty or Additional Liability. While redistributing
+  the Work or Derivative Works thereof, You may choose to offer,
+  and charge a fee for, acceptance of support, warranty, indemnity,
+  or other liability obligations and/or rights consistent with this
+  License. However, in accepting such obligations, You may act only
+  on Your own behalf and on Your sole responsibility, not on behalf
+  of any other Contributor, and only if You agree to indemnify,
+  defend, and hold each Contributor harmless for any liability
+  incurred by, or claims asserted against, such Contributor by reason
+  of your accepting any such warranty or additional liability.
+
+END OF TERMS AND CONDITIONS
+
+APPENDIX: How to apply the Apache License to your work.
+
+  To apply the Apache License to your work, attach the following
+  boilerplate notice, with the fields enclosed by brackets "[]"
+  replaced with your own identifying information. (Don't include
+  the brackets!)  The text should be enclosed in the appropriate
+  comment syntax for the file format. We also recommend that a
+  file or class name and description of purpose be included on the
+  same "printed page" as the copyright notice for easier
+  identification within third-party archives.
+
+Copyright [2026] [Abdelrahman Said]
+
+Licensed under the Apache License, Version 2.0 (the "License");
+you may not use this file except in compliance with the License.
+You may obtain a copy of the License at
+
+   http://www.apache.org/licenses/LICENSE-2.0
+
+Unless required by applicable law or agreed to in writing, software
+distributed under the License is distributed on an "AS IS" BASIS,
+WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+See the License for the specific language governing permissions and
+limitations under the License.

Makefile

@@ -1,22 +1,52 @@
-CC           = clang
-BUILD_TYPE   = debug
-CFLAGS       = -Wall -Wextra -Werror -pedantic -std=gnu11 -Isrc
-LIBFLAGS     = -fPIC -shared
-KERNEL       = $(shell uname -s)
-MACHINE      = $(shell uname -m)
-PLATFORM     = $(KERNEL)_$(MACHINE)
-TEST_INCLUDE = -Isrc $(shell find tests -type d | xargs -I{} echo -n "-I{} ")
-TEST_SRC     = src/wapp.c $(shell find tests -type f -name "*.c" | xargs -I{} echo -n "{} ")
-BUILD_DIR    = libwapp-build/$(PLATFORM)-$(BUILD_TYPE)
-LIB_OUT      = $(BUILD_DIR)/libwapp.so
-TEST_OUT     = $(BUILD_DIR)/wapptest
+.PHONY: help full base os prng testing uuid all clean builddir build-test run-test install build-lib
 
-ifeq ($(BUILD_TYPE),debug)
-	CFLAGS += -g -fsanitize=address,undefined
-else ifeq ($(BUILD_TYPE),release)
-	CFLAGS += -O3
+# External variables
+CC             = clang
+CXX            = clang++
+AR             = ar
+BUILD_TYPE     = Debug
+BUILD_DIR      = libwapp-build/$(PLATFORM)-$(BUILD_TYPE)
+INSTALL_PREFIX = dist
+RUNTIME_ASSERT = true
+
+# Internal variables
+override CFLAGS              = -Wall -Wextra -Werror -pedantic -Isrc
+override LIBFLAGS            = -fPIC
+override CSTD               := -std=gnu11
+override CXXSTD             := -std=gnu++11
+override KERNEL             := $(shell uname -s)
+override MACHINE            := $(shell uname -m)
+override PLATFORM           := $(KERNEL)_$(MACHINE)
+override TEST_INCLUDE       := -Isrc $(shell find tests -type d | xargs -I{} echo -n "-I{} ")
+override TEST_SRC           := $(shell find tests -type f -name "*.c" | xargs -I{} echo -n "{} ")
+override TEST_C_SRC         := src/wapp.c $(TEST_SRC)
+override TEST_CXX_SRC       := $(shell find tests -type f -name "*.cc" | xargs -I{} echo -n "{} ")
+override LIB_BASENAME       := wapp
+override OBJ_OUT            := $(BUILD_DIR)/$(LIB_BASENAME).o
+override LIB_STATIC_NAME    := lib$(LIB_BASENAME).a
+override LIB_OUT            := $(BUILD_DIR)/$(LIB_STATIC_NAME)
+override TEST_C_OUT         := $(BUILD_DIR)/wapptest
+override TEST_CXX_OUT       := $(BUILD_DIR)/wapptestcc
+override ABS_INSTALL_PREFIX := $(shell mkdir -p $(INSTALL_PREFIX) && realpath $(INSTALL_PREFIX))
+override INCLUDE_INSTALL    := $(ABS_INSTALL_PREFIX)/include/$(LIB_BASENAME)
+override LIB_INSTALL        := $(ABS_INSTALL_PREFIX)/lib
+override HEADER_INSTALL_CMD := scripts/header_install.sh
+
+ifeq ($(origin BUILD_FLAGS), undefined)
+ifeq ($(BUILD_TYPE),Debug)
+	BUILD_FLAGS += -g -fsanitize=address,undefined -DWAPP_DEBUG_ASSERT
+else ifeq ($(BUILD_TYPE),RelWithDebInfo)
+	BUILD_FLAGS += -g -O2 -fsanitize=address,undefined -DWAPP_DEBUG_ASSERT
+else ifeq ($(BUILD_TYPE),Release)
+	BUILD_FLAGS += -O3
 else
-	$(error Invalid BUILD type '$(BUILD_TYPE)'. Use 'debug' or 'release')
+	$(error Invalid BUILD type '$(BUILD_TYPE)'. Use 'Debug', 'RelWithDebInfo' or 'Release')
+endif
+endif
+
+# Disable runtime asserts
+ifeq ($(RUNTIME_ASSERT), false)
+	override BUILD_FLAGS += -DWAPP_NO_RUNTIME_ASSERT
 endif
 
 ifeq ($(CC),gcc)
@@ -24,43 +54,127 @@ ifeq ($(CC),gcc)
   export ASAN_OPTIONS=verify_asan_link_order=0
 endif
 
-.PHONY: all clean builddir build-test run-test codegen build-lib full prng testing uuid core primitives
+# Escape sequences
+BOLD              = \033[1m
+BLACK             = \033[30m
+BG_BLACK          = \033[40m
+RED               = \033[31m
+BG_RED            = \033[41m
+GREEN             = \033[32m
+BG_GREEN          = \033[42m
+YELLOW            = \033[33m
+BG_YELLOW         = \033[43m
+BLUE              = \033[34m
+BG_BLUE           = \033[44m
+MAGENTA           = \033[35m
+BG_MAGENTA        = \033[45m
+CYAN              = \033[36m
+BG_CYAN           = \033[46m
+WHITE             = \033[37m
+BG_WHITE          = \033[47m
+GRAY              = \033[90m
+BG_GRAY           = \033[100m
+BRIGHT_RED        = \033[91m
+BG_BRIGHT_RED     = \033[101m
+BRIGHT_GREEN      = \033[92m
+BG_BRIGHT_GREEN   = \033[102m
+BRIGHT_YELLOW     = \033[93m
+BG_BRIGHT_YELLOW  = \033[103m
+BRIGHT_BLUE       = \033[94m
+BG_BRIGHT_BLUE    = \033[104m
+BRIGHT_MAGENTA    = \033[95m
+BG_BRIGHT_MAGENTA = \033[105m
+BRIGHT_CYAN       = \033[96m
+BG_BRIGHT_CYAN    = \033[106m
+BRIGHT_WHITE      = \033[97m
+BG_BRIGHT_WHITE   = \033[107m
+RESET             = \033[0m
 
-all: clean builddir codegen run-test full
+ECHO_E = echo -e
+ifeq ($(KERNEL), Darwin)
+	ECHO_E = echo
+endif
 
-clean:
-	@rm -rf $(BUILD_DIR)
+all: clean builddir run-c-test full run-cc-test
 
-builddir:
-	@mkdir -p $(BUILD_DIR)
-
-build-test:
-	$(CC) $(CFLAGS) $(TEST_INCLUDE) $(TEST_SRC) -o $(TEST_OUT)
-
-run-test: build-test
-	@$(TEST_OUT)
-	@rm $(TEST_OUT)
-
-codegen:
-	python3 -m codegen
-
-build-lib:
-	$(CC) $(CFLAGS) $(LIBFLAGS) $(LIB_SRC) -o $(LIB_OUT)
+help:
+	@$(ECHO_E) "$(BOLD)$(BLUE)Available build variables:$(RESET)"
+	@$(ECHO_E) "  $(GREEN)CC$(RESET)                C compiler to use $(YELLOW)(Default: clang)$(RESET)."
+	@$(ECHO_E) "  $(GREEN)CXX$(RESET)               C++ compiler to use $(YELLOW)(Default: clang++)$(RESET)."
+	@$(ECHO_E) "  $(GREEN)AR$(RESET)                Archiving utility to use for building static libraries $(YELLOW)(Default: ar)$(RESET)."
+	@$(ECHO_E) "  $(GREEN)BUILD_TYPE$(RESET)        Build type $(MAGENTA)[Debug | RelWithDebInfo | Release] $(YELLOW)(Default: Debug)$(RESET)."
+	@$(ECHO_E) "  $(GREEN)BUILD_DIR$(RESET)         Directory where build files will be written."
+	@$(ECHO_E) "  $(GREEN)INSTALL_PREFIX$(RESET)    Prefix where library and include files will be installed."
+	@$(ECHO_E) "  $(GREEN)RUNTIME_ASSERT$(RESET)    Whether runtime asserts are enabled $(MAGENTA)[true | false] $(YELLOW)(Default: true)$(RESET)."
+	@$(ECHO_E) "  $(GREEN)$(RESET)                  $(BOLD)$(BG_RED)DISCLAIMER:$(RESET) Using this flag is not recommended as it disables safety checks"
+	@$(ECHO_E) "  $(GREEN)$(RESET)                  potentially leading to Undefined Behaviour."
+	@$(ECHO_E)
+	@$(ECHO_E) "$(BOLD)$(BLUE)Available targets:$(RESET)"
+	@$(ECHO_E) "  $(GREEN)make$(RESET)              Build, install and test the full wapp library."
+	@$(ECHO_E) "  $(GREEN)make full$(RESET)         Build and install the full wapp library."
+	@$(ECHO_E) "  $(GREEN)make base$(RESET)         Build and install only the $(CYAN)base$(RESET) component of the wapp library with all its dependencies."
+	@$(ECHO_E) "  $(GREEN)make os$(RESET)           Build and install only the $(CYAN)os$(RESET) component of the wapp library with all its dependencies."
+	@$(ECHO_E) "  $(GREEN)make prng$(RESET)         Build and install only the $(CYAN)prng$(RESET) component of the wapp library with all its dependencies."
+	@$(ECHO_E) "  $(GREEN)make uuid$(RESET)         Build and install only the $(CYAN)uuid$(RESET) component of the wapp library with all its dependencies."
+	@$(ECHO_E) "  $(GREEN)make testing$(RESET)      Build and install only the $(CYAN)testing$(RESET) component of the wapp library with all its dependencies."
+	@$(ECHO_E) "  $(GREEN)make clean$(RESET)        Clean the build directory."
+	@$(ECHO_E) "  $(GREEN)make help$(RESET)         Print this help message and exit."
 
 full: LIB_SRC = src/wapp.c
-full: build-lib
+full: INCLUDES = common os base prng testing uuid
+full: install
+
+base: LIB_SRC = src/base/wapp_base.c
+base: INCLUDES = common base
+base: install
+
+os: LIB_SRC = src/os/wapp_os.c
+os: INCLUDES = common os base
+os: install
 
 prng: LIB_SRC = src/prng/wapp_prng.c
-prng: build-lib
+prng: INCLUDES = common prng
+prng: install
 
 testing: LIB_SRC = src/testing/wapp_testing.c
-testing: build-lib
+testing: INCLUDES = common os testing
+testing: install
 
 uuid: LIB_SRC = src/uuid/wapp_uuid.c
-uuid: build-lib
+uuid: INCLUDES = common base prng
+uuid: install
 
-core: LIB_SRC = src/core/wapp_core.c
-core: build-lib
+clean:
+	@rm -rf "$(BUILD_DIR)"
+	@rm -rf "$(INCLUDE_INSTALL)"
+	@rm -f "$(LIB_INSTALL)/$(LIB_STATIC_NAME)"
 
-primitives: LIB_SRC = src/core/wapp_primitives.c
-primitives: build-lib
+builddir:
+	@mkdir -p "$(BUILD_DIR)"
+
+build-c-test:
+	$(CC) $(CSTD) $(CFLAGS) $(BUILD_FLAGS) $(TEST_INCLUDE) $(TEST_C_SRC) -o "$(TEST_C_OUT)"
+
+run-c-test: build-c-test
+	@echo -e "\n\033[34;1mRUNNING C TESTS\033[0m"
+	@"$(TEST_C_OUT)"
+	@rm "$(TEST_C_OUT)"
+
+build-cc-test:
+	$(CXX) $(CXXSTD) $(CFLAGS) $(BUILD_FLAGS) $(TEST_INCLUDE) $(TEST_CXX_SRC) "$(LIB_OUT)" -o "$(TEST_CXX_OUT)"
+
+run-cc-test: build-cc-test
+	@echo -e "\n\033[34;1mRUNNING C++ TESTS\033[0m"
+	@export LD_LIBRARY_PATH=$$LD_LIBRARY_PATH:"$(BUILD_DIR)" && "$(TEST_CXX_OUT)"
+	@rm "$(TEST_CXX_OUT)"
+
+install: build-lib
+	@mkdir -p "$(LIB_INSTALL)"
+	@cp -v "$(LIB_OUT)" "$(LIB_INSTALL)"
+	@mkdir -p "$(INCLUDE_INSTALL)"
+	@bash $(HEADER_INSTALL_CMD) $(LIB_SRC) "$(INCLUDE_INSTALL)" $(INCLUDES)
+
+build-lib: builddir
+	$(CC) -c $(CSTD) $(CFLAGS) $(BUILD_FLAGS) $(LIBFLAGS) $(LIB_SRC) -o "$(OBJ_OUT)"
+	$(AR) r "$(LIB_OUT)" "$(OBJ_OUT)"
+	@rm "$(OBJ_OUT)"

README.md

@@ -1,3 +1,5 @@
 # Wizard Apprentice Standard Library
 
-A collection of useful C utilities for my projects
+**Wizard Apprentice Standard Library** (`wapp`) is a lightweight collection of reusable utilities for **C and C++** projects.
+
+For more information about the library and how to use it, check the [wiki](https://git.thewizardapprentice.com/abdelrahman/wizapp-stdlib/wiki).

VERSION

@@ -0,0 +1 @@
+1.0.2

build

@@ -1,13 +1,45 @@
 #!/bin/bash
 
-BUILD_TYPE="debug"
+# Colors
+RED="\033[0;31m"
+BOLD="\033[1m"
+NC="\033[0m" # No Color
+
+BUILD_TYPE="Debug"
+ACCEPTED_BUILD_TYPES=("Debug" "RelWithDebInfo" "Release")
+KERNEL="$(uname -s)"
 ARGS=""
 
+join_array_elements() {
+  local IFS=","
+  echo "$*"
+}
+
+contains() {
+  local item="$1"; shift
+  local e
+  for e; do
+    [[ "$e" == "$item" ]] && return 0
+  done
+  return 1
+}
+
+print_usage() {
+  echo -e "Usage: build [-b build_type] ..."
+  echo -e "  Options:"
+  echo -e "    -b, --build-type    Choose from $(join_array_elements ${ACCEPTED_BUILD_TYPES[*]}) (Default: Debug)."
+  echo -e "    -h, --help          Print this message and exit"
+}
+
 while [[ $# > 0 ]];do
   case $1 in
-    --release)
-      BUILD_TYPE="release"
-      shift
+    -b|--build-type)
+      BUILD_TYPE="$2"
+      shift 2
+      ;;
+    -h|--help)
+      print_usage
+      exit 0
       ;;
     *|-*|--*)
       rest=("$@")
@@ -17,4 +49,10 @@ while [[ $# > 0 ]];do
   esac
 done
 
+if ! contains ${BUILD_TYPE} "${ACCEPTED_BUILD_TYPES[@]}"; then
+  echo -e "${RED}${BOLD}Unknown build type: ${BUILD_TYPE}${NC}\n"
+  print_usage
+  exit 1
+fi
+
 bear -- make BUILD_TYPE=$BUILD_TYPE $ARGS

build.ps1

@@ -3,9 +3,12 @@ Param(
 )
 
 $Compiler = "cl.exe"
+$Linker = "lib.exe"
 
-$GeneralFlags = "/Wall /WX /wd4996 /wd4464 /wd5105 /std:c11"
-$LibraryFlags = "/LD"
+$GeneralFlags = "/Wall /WX /wd4996 /wd4464 /wd5105 /EHs"
+$CStd = "/std:c11"
+$CppStd = "/std:c++14"
+$LibraryFlags = "/c"
 
 $Kernel = (Get-ChildItem Env:OS).Value
 $Machine = (Get-ChildItem Env:PROCESSOR_ARCHITECTURE).Value
@@ -15,14 +18,15 @@ $IncludeDirs = "/I src"
 $SrcFiles = "src/wapp.c"
 
 $TestIncludeDirs = Get-ChildItem -Path tests -Recurse -Directory -ErrorAction SilentlyContinue -Force | %{$("/I " + '"' + $_.FullName + '"')}
-$TestSrcFiles = Get-ChildItem -Path tests -Recurse -Filter *.c -ErrorAction SilentlyContinue -Force | %{$('"' + $_.FullName + '"')}
+$TestCSrcFiles = Get-ChildItem -Path tests -Recurse -Filter *.c -ErrorAction SilentlyContinue -Force | %{$('"' + $_.FullName + '"')}
+$TestCppSrcFiles = Get-ChildItem -Path tests -Recurse -Filter *.cc -ErrorAction SilentlyContinue -Force | %{$('"' + $_.FullName + '"')}
 
 If ($Release -eq $True) {
   $GeneralFlags += " /O2 /Og"
-  $BuildType = "release"
+  $BuildType = "Release"
 } Else {
   $GeneralFlags += " /Zi /Od /fsanitize=address"
-  $BuildType = "debug"
+  $BuildType = "Debug"
 }
 
 $BuildDir = "./libwapp-build/${Platform}-${BuildType}"
@@ -30,12 +34,15 @@ $ObjDir = "$BuildDir/objects"
 $OutDir = "$BuildDir/output"
 $TestsDir = "$BuildDir/tests"
 
-$OutBasename = "libwapp"
+$LibOutput = "$OutDir/libwapp.lib"
 $Objects = "/Fo:$ObjDir/"
-$Outputs = "/Fd:$OutDir/$OutBasename /Fe:$OutDir/$OutBasename"
+$LibOutputFlags = "/OUT:$LibOutput"
 
-$TestOutBasename = "wapptest"
-$TestOutputs = "/Fo:$TestsDir/ /Fe:$TestsDir/$TestOutBasename"
+$TestCOutputBasename = "wapptest"
+$TestCOutputFlags = "/Fo:$TestsDir/ /Fe:$TestsDir/$TestCOutputBasename"
+
+$TestCppOutputBasename = "wapptestcc"
+$TestCppOutputFlags = "/Fo:$TestsDir/ /Fe:$TestsDir/$TestCppOutputBasename"
 
 If (Test-Path $BuildDir) {
   Remove-Item $BuildDir -Recurse -Force
@@ -45,21 +52,23 @@ mkdir -p $ObjDir > $null
 mkdir -p $OutDir > $null
 mkdir -p $TestsDir > $null
 
-# Run code generation
-Invoke-Expression "python -m codegen"
+# Build and run C tests
+Invoke-Expression "$Compiler $GeneralFlags $CStd $IncludeDirs $TestIncludeDirs $SrcFiles $TestCSrcFiles $TestCOutputFlags" -ErrorAction Stop
+Invoke-Expression "$TestsDir/$TestCOutputBasename.exe"
 
-# Build and run tests
-Invoke-Expression "$Compiler $GeneralFlags $IncludeDirs $TestIncludeDirs $SrcFiles $TestSrcFiles $TestOutputs" -ErrorAction Stop
-
-Invoke-Expression "$TestsDir/$TestOutBasename.exe"
 $Status = $LASTEXITCODE
-
-Remove-Item $TestsDir -Recurse -Force
-
 If ($Status -ne 0) {
+  Remove-Item $TestsDir -Recurse -Force
   Write-Error "Tests failed"
   Exit 1
 }
 
 # Build library
-Invoke-Expression "$Compiler $GeneralFlags $LibraryFlags $SrcFiles $Objects $Outputs"
+Invoke-Expression "$Compiler $GeneralFlags $CStd $LibraryFlags $SrcFiles $Objects"
+Invoke-Expression "$Linker $ObjDir/*.obj $LibOutputFlags"
+
+# Build and run C++ tests
+Invoke-Expression "$Compiler $GeneralFlags $CppStd $IncludeDirs $TestIncludeDirs $LibOutput $TestCppSrcFiles $TestCppOutputFlags" -ErrorAction Stop
+Invoke-Expression "$TestsDir/$TestCppOutputBasename.exe"
+
+Remove-Item $TestsDir -Recurse -Force

codegen/__main__.py

@@ -1,23 +0,0 @@
-from typing import Dict
-from codegen.datatypes import CDataType
-from codegen.dbl_list.make_dbl_list import DblListData, make_dbl_list
-from codegen.array.make_array import ArrayData, make_array
-
-
-def main():
-    gen_dbl_list()
-    gen_array()
-
-
-def gen_dbl_list():
-    datatypes: Dict[CDataType, DblListData] = {}
-    make_dbl_list(datatypes)
-
-
-def gen_array():
-    datatypes: Dict[CDataType, ArrayData] = {}
-    make_array(datatypes)
-
-
-if __name__ == "__main__":
-    main()

codegen/array/make_array.py

@@ -1,393 +0,0 @@
-from pathlib import Path
-from dataclasses import dataclass, field
-from typing import List, Dict
-from codegen.constants import WAPP_SRC_ROOT
-from codegen.utils import load_func_body_from_file, convert_to_relative
-from codegen.datatypes import (
-    CDataType,
-    CMacro,
-    CStruct,
-    CFunc,
-    CHeader,
-    CSource,
-    CArg,
-    CType,
-    CPointer,
-    CPointerType,
-    CQualifier,
-    CInclude,
-    get_datatype_string,
-)
-
-
-@dataclass
-class ArrayData:
-    array_typename: str
-    hdr_decl_types: List[CStruct] = field(default_factory=list)
-    src_decl_types: List[CStruct] = field(default_factory=list)
-
-
-def make_array(user_datatypes: Dict[CDataType, ArrayData] = {}):
-    def __format_func_body(
-        filename: Path,
-        type_string: str,
-        type_string_upper: str,
-        type_string_lower: str,
-        array_typename: str
-    ):
-        return load_func_body_from_file(filename).format(
-            T=type_string,
-            ArrayType=array_typename,
-            Tupper=type_string_upper,
-            Tlower=type_string_lower,
-        )
-
-    out_dir = WAPP_SRC_ROOT / "primitives" / "array"
-    out_dir.mkdir(parents=True, exist_ok=True)
-
-    common_includes: List[CInclude] = [
-        CInclude(header="stdbool.h"),
-        CInclude(
-            header=str(convert_to_relative(WAPP_SRC_ROOT / "primitives" / "mem_allocator" / "mem_allocator.h", out_dir)).replace("\\", "/"),
-            local=True,
-        ),
-        CInclude(
-            header=str(convert_to_relative(WAPP_SRC_ROOT / "common" / "misc" / "misc_utils.h", out_dir)).replace("\\", "/"),
-            local=True,
-        ),
-    ]
-
-    common_decl_types: List[CStruct] = []
-
-    datatypes: dict[CDataType, ArrayData] = {
-        "Str8": ArrayData(
-            array_typename="Str8Array",
-            hdr_decl_types=[
-                CStruct(name="str8", cargs=[], typedef_name="Str8"),
-            ],
-        ),
-    }
-
-    for _type in CType:
-        if _type == CType.VOID:
-            datatypes["void *"] = ArrayData(
-                array_typename="VoidPArray",
-            )
-            continue
-        elif _type == CType.BOOL:
-            datatypes[_type.value] = ArrayData(
-                array_typename="BoolArray",
-            )
-            continue
-
-        type_title = _type.value.title()
-        datatypes[_type.value] = ArrayData(
-            array_typename=f"{type_title}Array",
-        )
-
-    datatypes.update(user_datatypes)
-
-    snippets_dir = Path(__file__).parent / "snippets"
-
-    header = CHeader(
-        name="array",
-        decl_types=[*common_decl_types],
-        includes=[],
-        types=[],
-        funcs=[]
-    )
-
-    source = CSource(
-        name=header.name,
-        decl_types=[*common_decl_types],
-        includes=[
-            CInclude(header, local=True, same_dir=True),
-            CInclude(header="stddef.h"),
-            CInclude(header="assert.h"),
-        ],
-        internal_funcs=[],
-        funcs=header.funcs
-    )
-
-    if len(common_includes) > 0:
-        header.includes.extend(common_includes)
-        source.includes.extend(common_includes)
-
-
-    generic_funcs = []
-
-    for _type, array_data in datatypes.items():
-        type_string = get_datatype_string(_type)
-        clean_type_string = type_string.replace(" ", "").replace("*", "_ptr")
-        type_string_upper = clean_type_string.upper()
-        type_string_lower = clean_type_string.lower()
-
-        array = CStruct(
-            name=array_data.array_typename,
-            cargs=[
-                CArg(name="items", _type=type_string, pointer=CPointer(_type=CPointerType.SINGLE)),
-                CArg(name="count", _type=CType.U64),
-                CArg(name="capacity", _type=CType.U64),
-                CArg(name="item_size", _type=CType.U64),
-            ],
-        )
-
-        if isinstance(_type, str) and _type == "void *":
-            alloc_capacity_func = CFunc(
-                name=f"_array_alloc_capacity",
-                ret_type=array,
-                args=[
-                    CArg(name="allocator", _type="Allocator", pointer=CPointer(CPointerType.SINGLE), qualifier=CQualifier.CONST),
-                    CArg(name="capacity", _type=CType.U64),
-                    CArg(name="item_size", _type=CType.U64),
-                ],
-                body=__format_func_body(
-                    filename=snippets_dir / "alloc_capacity",
-                    type_string=type_string,
-                    type_string_upper=type_string_upper,
-                    type_string_lower=type_string_lower,
-                    array_typename=array_data.array_typename,
-                ),
-                pointer=CPointer(CPointerType.SINGLE),
-            )
-            generic_funcs.append(alloc_capacity_func)
-        
-        stack_array_macro = CMacro(
-            name=f"wapp_{type_string_lower}_array(...)",
-            value=__format_func_body(
-                filename=snippets_dir / "stack_array",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                array_typename=array_data.array_typename,
-            ),
-        )
-
-        stack_capacity_array_macro = CMacro(
-            name=f"wapp_{type_string_lower}_array_with_capacity(CAPACITY)",
-            value=__format_func_body(
-                filename=snippets_dir / "stack_capacity_array",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                array_typename=array_data.array_typename,
-            ),
-        )
-
-        alloc_capacity_array_macro = CMacro(
-            name=f"wapp_{type_string_lower}_array_alloc_capacity(ALLOCATOR_PTR, CAPACITY)",
-            value=__format_func_body(
-                filename=snippets_dir / "alloc_capacity_macro",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                array_typename=array_data.array_typename,
-            ),
-        )
-
-        array_pop_macro = CMacro(
-            name=f"wapp_{type_string_lower}_array_pop(ARRAY_PTR)",
-            value=__format_func_body(
-                filename=snippets_dir / "array_pop_macro",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                array_typename=array_data.array_typename,
-            ),
-        )
-
-        get_func = CFunc(
-            name=f"wapp_{type_string_lower}_array_get",
-            ret_type=type_string,
-            args=[
-                CArg(name="array", _type=array, pointer=CPointer(CPointerType.SINGLE), qualifier=CQualifier.CONST),
-                CArg(name="index", _type=CType.U64),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "array_get",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                array_typename=array_data.array_typename,
-            ),
-            pointer=CPointer(CPointerType.SINGLE),
-        )
-
-        set_func = CFunc(
-            name=f"wapp_{type_string_lower}_array_set",
-            ret_type=CType.VOID,
-            args=[
-                CArg(name="array", _type=array, pointer=CPointer(CPointerType.SINGLE)),
-                CArg(name="index", _type=CType.U64),
-                CArg(name="item", _type=type_string, pointer=CPointer(CPointerType.SINGLE)),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "array_set",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                array_typename=array_data.array_typename,
-            ),
-        )
-
-        append_capped_func = CFunc(
-            name=f"wapp_{type_string_lower}_array_append_capped",
-            ret_type=CType.VOID,
-            args=[
-                CArg(name="array", _type=array, pointer=CPointer(CPointerType.SINGLE)),
-                CArg(name="item", _type=type_string, pointer=CPointer(CPointerType.SINGLE)),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "append_capped",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                array_typename=array_data.array_typename,
-            ),
-        )
-
-        extend_capped_func = CFunc(
-            name=f"wapp_{type_string_lower}_array_extend_capped",
-            ret_type=CType.VOID,
-            args=[
-                CArg(name="array", _type=array, pointer=CPointer(CPointerType.SINGLE)),
-                CArg(name="other", _type=array, pointer=CPointer(CPointerType.SINGLE), qualifier=CQualifier.CONST),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "extend_capped",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                array_typename=array_data.array_typename,
-            ),
-        )
-
-        clear_func = CFunc(
-            name=f"wapp_{type_string_lower}_array_clear",
-            ret_type=CType.VOID,
-            args=[
-                CArg(name="array", _type=array, pointer=CPointer(CPointerType.SINGLE)),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "clear",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                array_typename=array_data.array_typename,
-            ),
-        )
-
-        copy_capped_func = CFunc(
-            name=f"wapp_{type_string_lower}_array_copy_capped",
-            ret_type=CType.VOID,
-            args=[
-                CArg(name="src", _type=array, pointer=CPointer(CPointerType.SINGLE), qualifier=CQualifier.CONST),
-                CArg(name="dst", _type=array, pointer=CPointer(CPointerType.SINGLE)),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "copy_capped",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                array_typename=array_data.array_typename,
-            ),
-        )
-
-        append_alloc_func = CFunc(
-            name=f"wapp_{type_string_lower}_array_append_alloc",
-            ret_type=array,
-            args=[
-                CArg(name="allocator", _type="Allocator", pointer=CPointer(CPointerType.SINGLE), qualifier=CQualifier.CONST),
-                CArg(name="array", _type=array, pointer=CPointer(CPointerType.SINGLE)),
-                CArg(name="item", _type=type_string, pointer=CPointer(CPointerType.SINGLE)),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "append_alloc",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                array_typename=array_data.array_typename,
-            ),
-            pointer=CPointer(CPointerType.SINGLE),
-        )
-
-        extend_alloc_func = CFunc(
-            name=f"wapp_{type_string_lower}_array_extend_alloc",
-            ret_type=array,
-            args=[
-                CArg(name="allocator", _type="Allocator", pointer=CPointer(CPointerType.SINGLE), qualifier=CQualifier.CONST),
-                CArg(name="array", _type=array, pointer=CPointer(CPointerType.SINGLE)),
-                CArg(name="other", _type=array, pointer=CPointer(CPointerType.SINGLE), qualifier=CQualifier.CONST),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "extend_alloc",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                array_typename=array_data.array_typename,
-            ),
-            pointer=CPointer(CPointerType.SINGLE),
-        )
-
-        copy_alloc_func = CFunc(
-            name=f"wapp_{type_string_lower}_array_copy_alloc",
-            ret_type=array,
-            args=[
-                CArg(name="allocator", _type="Allocator", pointer=CPointer(CPointerType.SINGLE), qualifier=CQualifier.CONST),
-                CArg(name="src", _type=array, pointer=CPointer(CPointerType.SINGLE), qualifier=CQualifier.CONST),
-                CArg(name="dst", _type=array, pointer=CPointer(CPointerType.SINGLE)),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "copy_alloc",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                array_typename=array_data.array_typename,
-            ),
-            pointer=CPointer(CPointerType.SINGLE),
-        )
-
-        pop_func = CFunc(
-            name=f"_{type_string_lower}_array_pop",
-            ret_type=type_string,
-            args=[
-                CArg(name="array", _type=array, pointer=CPointer(CPointerType.SINGLE)),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "array_pop",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                array_typename=array_data.array_typename,
-            ),
-            pointer=CPointer(CPointerType.SINGLE),
-        )
-
-        header.decl_types.extend(array_data.hdr_decl_types)
-        header.macros.extend([
-            stack_array_macro,
-            stack_capacity_array_macro,
-            alloc_capacity_array_macro,
-            array_pop_macro,
-        ])
-        header.types.extend([array])
-        header.funcs.extend([
-            get_func,
-            set_func,
-            append_capped_func,
-            extend_capped_func,
-            clear_func,
-            copy_capped_func,
-            append_alloc_func,
-            extend_alloc_func,
-            copy_alloc_func,
-            pop_func,
-        ])
-
-        source.decl_types.extend(array_data.src_decl_types)
-        source.funcs = header.funcs
-
-
-    header.funcs.extend(generic_funcs)
-    header.save(out_dir)
-    source.save(out_dir)

codegen/array/snippets/alloc_capacity

@@ -1,15 +0,0 @@
-  assert(allocator != NULL);
-
-  u64 allocation_size = sizeof({ArrayType}) + item_size * capacity;
-  {ArrayType} *array  = wapp_mem_allocator_alloc(allocator, allocation_size);
-  if (!array) {{
-    goto RETURN_GENERIC_ARRAY_ALLOC;
-  }}
-
-  array->items     = ({T} *)((u8 *)array + sizeof({ArrayType}));
-  array->count     = 0;
-  array->capacity  = capacity;
-  array->item_size = item_size;
-
-RETURN_GENERIC_ARRAY_ALLOC:
-  return array;

codegen/array/snippets/alloc_capacity_macro

@@ -1 +0,0 @@
-(({ArrayType} *)_array_alloc_capacity(ALLOCATOR_PTR, CAPACITY, sizeof({T})))

codegen/array/snippets/append_alloc

@@ -1,18 +0,0 @@
-  assert(allocator != NULL && array != NULL);
-
-  {ArrayType} *output = array;
-
-  if (array->count >= array->capacity) {{
-    u64 new_capacity = wapp_misc_utils_u64_round_up_pow2(array->capacity * 2);
-    output           = ({ArrayType} *)_array_alloc_capacity(allocator, new_capacity, array->item_size);
-    if (!output) {{
-      output = array;
-      goto RETURN_{Tupper}_ARRAY_APPEND_ALLOC;
-    }}
-    wapp_{Tlower}_array_copy_capped(array, output);
-  }}
-
-  wapp_{Tlower}_array_append_capped(output, item);
-
-RETURN_{Tupper}_ARRAY_APPEND_ALLOC:
-  return output;

codegen/array/snippets/append_capped

@@ -1,4 +0,0 @@
-  assert(array != NULL && array->count < array->capacity);
-
-  u64 index = (array->count)++;
-  wapp_{Tlower}_array_set(array, index, item);

codegen/array/snippets/array_get

@@ -1,4 +0,0 @@
-  assert(array != NULL && index < array->count);
-
-  u8 *ptr = (u8 *)(array->items) + (array->item_size * index);
-  return ({T} *)ptr;

codegen/array/snippets/array_pop

@@ -1,4 +0,0 @@
-  u64 index = array->count - 1;
-  {T} *out = wapp_{Tlower}_array_get(array, index);
-  --(array->count);
-  return out;

codegen/array/snippets/array_pop_macro

@@ -1,4 +0,0 @@
-(ARRAY_PTR != NULL && (ARRAY_PTR)->count > 0 ? \
-  *_{Tlower}_array_pop(ARRAY_PTR) : \
-  ({T}){{0}} \
-)

codegen/array/snippets/array_set

@@ -1,3 +0,0 @@
-  {T} *ptr = wapp_{Tlower}_array_get(array, index);
-
-  memcpy((void *)ptr, (void *)item, array->item_size);

codegen/array/snippets/clear

@@ -1,2 +0,0 @@
-  assert(array != NULL);
-  array->count = 0;

codegen/array/snippets/copy_alloc

@@ -1,18 +0,0 @@
-  assert(allocator != NULL && src != NULL && dst != NULL);
-
-  {ArrayType} *output = dst;
-
-  if (src->count >= dst->capacity) {{
-    u64 new_capacity = wapp_misc_utils_u64_round_up_pow2(dst->capacity * 2);
-    output           = ({ArrayType} *)_array_alloc_capacity(allocator, new_capacity, src->item_size);
-    if (!output) {{
-      output = dst;
-      goto RETURN_{Tupper}_ARRAY_COPY_ALLOC;
-    }}
-  }}
-
-  wapp_{Tlower}_array_clear(output);
-  wapp_{Tlower}_array_copy_capped(src, output);
-
-RETURN_{Tupper}_ARRAY_COPY_ALLOC:
-  return output;

codegen/array/snippets/copy_capped

@@ -1,22 +0,0 @@
-  assert(src != NULL && dst != NULL);
-
-  wapp_{Tlower}_array_clear(dst);
-
-  {T} *item;
-
-  // NOTE (Abdelrahman): Uses a while loop instead of a for loop to get rid of
-  // MSVC Spectre mitigation warnings
-  u64 to_copy    = src->count < dst->capacity ? src->count : dst->capacity;
-  u64 item_index = 0;
-  bool running   = true;
-  while (running) {{
-    item = wapp_{Tlower}_array_get(src, item_index);
-    ++item_index;
-    running = item_index < to_copy;
-
-    if (!item) {{
-      continue;
-    }}
-    
-    wapp_{Tlower}_array_append_capped(dst, item);
-  }}

codegen/array/snippets/extend_alloc

@@ -1,19 +0,0 @@
-  assert(allocator != NULL && array != NULL && other != NULL);
-
-  {ArrayType} *output = array;
-
-  u64 remaining_capacity = array->capacity - array->count;
-  if (other->count >= remaining_capacity) {{
-    u64 new_capacity = wapp_misc_utils_u64_round_up_pow2(array->capacity * 2);
-    output           = ({ArrayType} *)_array_alloc_capacity(allocator, new_capacity, array->item_size);
-    if (!output) {{
-      output = array;
-      goto RETURN_{Tupper}_ARRAY_EXTEND_ALLOC;
-    }}
-    wapp_{Tlower}_array_copy_capped(array, output);
-  }}
-
-  wapp_{Tlower}_array_extend_capped(output, other);
-
-RETURN_{Tupper}_ARRAY_EXTEND_ALLOC:
-  return output;

codegen/array/snippets/extend_capped

@@ -1,23 +0,0 @@
-  assert(array != NULL && other != NULL);
-
-  u64 remaining_capacity = array->capacity - array->count;
-  assert(other->count < remaining_capacity);
-
-  {T} *item;
-
-  // NOTE (Abdelrahman): Uses a while loop instead of a for loop to get rid of
-  // MSVC Spectre mitigation warnings
-  u64 items_to_add = other->count;
-  u64 item_index   = 0;
-  bool running     = true;
-  while (running) {{
-    item = wapp_{Tlower}_array_get(other, item_index);
-    ++item_index;
-    running = item_index < items_to_add;
-
-    if (!item) {{
-      continue;
-    }}
-
-    wapp_{Tlower}_array_append_capped(array, item);
-  }}

codegen/array/snippets/stack_array

@@ -1,6 +0,0 @@
-(({ArrayType}){{ \
-  .items = ({T}[wapp_misc_utils_u64_round_up_pow2(wapp_misc_utils_va_args_count({T}, __VA_ARGS__) * 2)]){{__VA_ARGS__}}, \
-  .count = wapp_misc_utils_va_args_count({T}, __VA_ARGS__), \
-  .capacity = wapp_misc_utils_u64_round_up_pow2(wapp_misc_utils_va_args_count({T}, __VA_ARGS__) * 2), \
-  .item_size = sizeof({T}) \
-}})

codegen/array/snippets/stack_capacity_array

@@ -1 +0,0 @@
-(({ArrayType}){{.items = ({T}[CAPACITY]){{0}}, .count = 0, .capacity = CAPACITY, .item_size = sizeof({T})}})

codegen/constants.py

@@ -1,5 +0,0 @@
-from pathlib import Path
-
-
-PACKAGE_DIR = Path(__file__).parent.resolve()
-WAPP_SRC_ROOT = PACKAGE_DIR.parent / "src"

codegen/datatypes.py

@@ -1,350 +0,0 @@
-from enum import Enum
-from pathlib import Path
-from typing import Optional, Union, List
-from dataclasses import dataclass, field
-
-from codegen.constants import WAPP_SRC_ROOT
-from codegen.utils import convert_to_relative
-
-
-class CType(Enum):
-    VOID = "void"
-    BOOL = "bool"
-    CHAR = "char"
-    C8   = "c8"
-    C16  = "c16"
-    C32  = "c32"
-    I8   = "i8"
-    I16  = "i16"
-    I32  = "i32"
-    I64  = "i64"
-    U8   = "u8"
-    U16  = "u16"
-    U32  = "u32"
-    U64  = "u64"
-    F32  = "f32"
-    F64  = "f64"
-    F128 = "f128"
-    IPTR = "iptr"
-    UPTR = "uptr"
-
-    def __str__(self) -> str:
-        return self.value
-
-
-class CQualifier(Enum):
-    NONE       = ""
-    CONST      = "const "
-    EXTERNAL   = "external "
-    INTERNAL   = "internal "
-    PERSISTENT = "persistent "
-
-    def __str__(self) -> str:
-        return self.value
-
-
-class CPointerType(Enum):
-    NONE   = ""
-    SINGLE = "*"
-    DOUBLE = "**"
-
-    def __str__(self) -> str:
-        return self.value
-
-
-@dataclass
-class CPointer:
-    _type: CPointerType = CPointerType.NONE
-    qualifier: CQualifier = CQualifier.NONE
-
-    def __str__(self) -> str:
-        return str(self._type) + str(self.qualifier)
-
-
-@dataclass
-class CEnumVal:
-    name: str
-    value: Optional[int] = None
-
-    def __str__(self) -> str:
-        return self.name + "" if self.value is None else f" = {self.value}"
-
-
-@dataclass
-class CEnum:
-    name: str
-    values: List[CEnumVal]
-    typedef: bool = False
-
-    def __str__(self) -> str:
-        if self.typedef:
-            header = "typedef enum {\n"
-            footer = f"}} {self.name};\n"
-        else:
-            header = f"enum {self.name} {{\n"
-            footer = "};\n"
-
-        values = ""
-        for value in self.values:
-            values += f"  {str(value)},\n"
-
-        return header + values + footer
-
-
-@dataclass
-class CMacro:
-    name: str
-    value: str
-
-    def __str__(self) -> str:
-        return f"#define {self.name} {self.value}\n"
-
-
-@dataclass
-class CStruct:
-    name: str
-    cargs: List["CArg"]
-    typedef_name: Optional[str] = None
-
-    def __str__(self) -> str:
-        return self.declare() + self.define()
-
-    def declare(self) -> str:
-        declaration = f"typedef struct {self.name} {self.typedef_name if self.typedef_name is not None else self.name};\n"
-        return declaration
-
-    def define(self):
-        definition = f"struct {self.name} {{\n"
-        args = ""
-        for arg in self.cargs:
-            args += f"  {str(arg)};\n"
-        footer = "};\n"
-
-        return definition + args + footer;
-
-
-CUserType = Union[CStruct, CEnum]
-CDataType = Union[CType, CUserType, str]
-
-
-@dataclass
-class CArg:
-    name: str
-    _type: CDataType
-    array: bool = False
-    pointer: CPointer = field(default_factory=CPointer)
-    qualifier: CQualifier = CQualifier.NONE
-
-    def __str__(self) -> str:
-        qualifier = str(self.qualifier)
-        _type = get_datatype_string(self._type) + " "
-        pointer = str(self.pointer)
-        array = "[]" if self.array else ""
-
-        return qualifier + _type + pointer + self.name + array
-
-
-@dataclass
-class CFunc:
-    name: str
-    ret_type: CDataType
-    args: List[CArg]
-    body: str
-    pointer: CPointer = field(default_factory=CPointer)
-    qualifiers: List[CQualifier] = field(default_factory=list)
-
-    def __str__(self) -> str:
-        qualifiers = ""
-        for qualifier in self.qualifiers:
-            if qualifier == CQualifier.NONE:
-                continue
-            if len(qualifiers) > 0:
-                qualifiers += " "
-            qualifiers += f"{str(qualifier)}"
-
-        args = ""
-        for i, arg in enumerate(self.args):
-            args += f"{str(arg)}"
-            if i + 1 < len(self.args):
-                args += ", "
-
-        return qualifiers + get_datatype_string(self.ret_type) + " " + str(self.pointer) + self.name + f"({args})"
-
-    def declare(self) -> str:
-        return f"{str(self)};\n"
-
-    def define(self) -> str:
-        return f"{str(self)} {{\n{self.body}\n}}\n\n"
-
-
-@dataclass
-class CInclude:
-    header: Union[str, "CHeader"]
-    local: bool = False
-    same_dir: bool = False
-
-    def __str__(self) -> str:
-        if isinstance(self.header, CHeader):
-            name = f"{self.header.name}.{self.header.extension}"
-        else:
-            name = self.header
-
-        if self.local:
-            open_symbol = '"'
-            close_symbol = '"'
-
-            if self.same_dir:
-                name = f"./{name}"
-        else:
-            open_symbol = '<'
-            close_symbol = '>'
-        
-        return f"#include {open_symbol}{name}{close_symbol}\n"
-
-
-@dataclass
-class CFile:
-    name: str
-    extension: str
-    includes: List[CInclude] = field(default_factory=list)
-    types: List[CUserType] = field(default_factory=list)
-    funcs: List[CFunc] = field(default_factory=list)
-    decl_types: List[CStruct] = field(default_factory=list)
-    macros: List[CMacro] = field(default_factory=list)
-
-    def save(self, output_dir: Path):
-        self.includes.extend(
-            [
-                CInclude(
-                    header=str(convert_to_relative(WAPP_SRC_ROOT / "common" / "aliases" / "aliases.h", output_dir)).replace("\\", "/"),
-                    local=True,
-                ),
-                CInclude(
-                    header=str(convert_to_relative(WAPP_SRC_ROOT / "common" / "platform" / "platform.h", output_dir)).replace("\\", "/"),
-                    local=True,
-                )
-            ]
-        )
-        output_file = output_dir / f"{self.name}.{self.extension}"
-        with open(output_file, "w+") as outfile:
-            outfile.write(str(self))
-
-    def __str__(self) -> str:
-        return """\
-/**
- * THIS FILE IS AUTOMATICALLY GENERATED. ANY MODIFICATIONS TO IT WILL BE OVERWRITTEN
- */
-
-"""
-
-
-@dataclass
-class CHeader(CFile):
-    extension: str = "h"
-
-    def __str__(self) -> str:
-        name_upper = self.name.upper()
-        header_guard_name = f"{name_upper}_H"
-        header_guard_open = f"#ifndef {header_guard_name}\n#define {header_guard_name}\n\n"
-        header_guard_close = f"\n#endif // !{header_guard_name}\n"
-
-        includes = _get_includes_string(self.includes)
-
-        macros = ""
-        for macro in self.macros:
-            macros += str(macro)
-        if len(macros) > 0:
-            macros += "\n"
-
-        forward_declarations = ""
-        for _type in self.decl_types:
-            forward_declarations += _type.declare()
-        if len(forward_declarations) > 0:
-            forward_declarations += "\n"
-
-        types = ""
-        for _type in self.types:
-            types += str(_type) + "\n"
-
-        funcs = ""
-        for func in self.funcs:
-            funcs += func.declare()
-
-        return (
-            super().__str__() +
-            header_guard_open +
-            includes +
-            macros +
-            forward_declarations +
-            types +
-            funcs +
-            header_guard_close
-        )
-
-
-@dataclass
-class CSource(CFile):
-    extension: str = "c"
-    internal_funcs: List[CFunc] = field(default_factory=list)
-
-    def __str__(self) -> str:
-        includes = _get_includes_string(self.includes)
-
-        macros = ""
-        for macro in self.macros:
-            macros += str(macro)
-        if len(macros) > 0:
-            macros += "\n"
-
-        forward_declarations = ""
-        for _type in self.decl_types:
-            forward_declarations += _type.declare()
-        if len(forward_declarations) > 0:
-            forward_declarations += "\n"
-
-        types = ""
-        for _type in self.types:
-            types += str(_type) + "\n"
-
-        internal_funcs_decl = ""
-        internal_funcs_def = ""
-        for func in self.internal_funcs:
-            internal_funcs_decl += func.declare()
-            internal_funcs_def += func.define()
-
-        if len(internal_funcs_decl) > 0:
-            internal_funcs_decl += "\n"
-
-        funcs = ""
-        for func in self.funcs:
-            funcs += func.define()
-
-        return (
-            super().__str__() +
-            includes +
-            macros +
-            forward_declarations +
-            types +
-            internal_funcs_decl +
-            funcs +
-            internal_funcs_def
-        )
-
-
-def get_datatype_string(_type: CDataType) -> str:
-    if isinstance(_type, CType):
-        return str(_type)
-    elif isinstance(_type, CStruct) or isinstance(_type, CEnum):
-        return _type.name
-    elif isinstance(_type, str):
-        return _type
-
-
-def _get_includes_string(includes: List[CInclude]) -> str:
-    output = ""
-    for include in sorted(includes, key=lambda inc: inc.local, reverse=True):
-        output += str(include)
-    if len(output) > 0:
-        output += "\n"
-
-    return output

codegen/dbl_list/make_dbl_list.py

@@ -1,321 +0,0 @@
-from pathlib import Path
-from dataclasses import dataclass, field
-from typing import List, Dict
-from codegen.constants import WAPP_SRC_ROOT
-from codegen.utils import load_func_body_from_file
-from codegen.datatypes import (
-    CDataType,
-    CMacro,
-    CStruct,
-    CFunc,
-    CHeader,
-    CSource,
-    CArg,
-    CType,
-    CPointer,
-    CPointerType,
-    CQualifier,
-    CInclude,
-    get_datatype_string,
-)
-
-
-@dataclass
-class DblListData:
-    node_typename: str
-    list_typename: str
-    hdr_decl_types: List[CStruct] = field(default_factory=list)
-    src_decl_types: List[CStruct] = field(default_factory=list)
-
-
-def make_dbl_list(user_datatypes: Dict[CDataType, DblListData] = {}):
-    def __format_func_body(
-        filename: Path,
-        type_string: str,
-        type_string_upper: str,
-        type_string_lower: str,
-        node_typename: str,
-        list_typename: str
-    ):
-        return load_func_body_from_file(filename).format(
-            T=type_string,
-            NodeType=node_typename,
-            ListType=list_typename,
-            Tupper=type_string_upper,
-            Tlower=type_string_lower,
-        )
-
-    out_dir = WAPP_SRC_ROOT / "primitives" / "dbl_list"
-    out_dir.mkdir(parents=True, exist_ok=True)
-
-    common_includes: List[CInclude] = [
-        CInclude(header="stdbool.h")
-    ]
-
-    common_decl_types: List[CStruct] = []
-
-    datatypes: dict[CDataType, DblListData] = {
-        "Str8": DblListData(
-            node_typename="Str8Node",
-            list_typename="Str8List",
-            hdr_decl_types=[
-                CStruct(name="str8", cargs=[], typedef_name="Str8"),
-            ],
-        ),
-    }
-
-    for _type in CType:
-        if _type == CType.VOID:
-            datatypes["void *"] = DblListData(
-                node_typename="VoidPNode",
-                list_typename="VoidPList",
-            )
-            continue
-
-        type_title = _type.value.title()
-        datatypes[_type.value] = DblListData(
-            node_typename=f"{type_title}Node",
-            list_typename=f"{type_title}List",
-        )
-
-    datatypes.update(user_datatypes)
-
-    snippets_dir = Path(__file__).parent / "snippets"
-
-    header = CHeader(
-        name="dbl_list",
-        decl_types=[*common_decl_types],
-        includes=[],
-        types=[],
-        funcs=[]
-    )
-
-    source = CSource(
-        name=header.name,
-        decl_types=[*common_decl_types],
-        includes=[
-            CInclude(header, local=True, same_dir=True),
-            CInclude(header="stddef.h"),
-            CInclude(header="assert.h"),
-        ],
-        internal_funcs=[],
-        funcs=header.funcs
-    )
-
-    if len(common_includes) > 0:
-        header.includes.extend(common_includes)
-        source.includes.extend(common_includes)
-
-    for _type, dbl_list_data in datatypes.items():
-        type_string = get_datatype_string(_type)
-        clean_type_string = type_string.replace(" ", "").replace("*", "_ptr")
-        type_string_upper = clean_type_string.upper()
-        type_string_lower = clean_type_string.lower()
-
-        node = CStruct(
-            name=dbl_list_data.node_typename,
-            cargs=[
-                CArg(name="item", _type=type_string, pointer=CPointer(_type=CPointerType.SINGLE)),
-            ],
-        )
-        node.cargs.extend([
-            CArg(name="prev", _type=node, pointer=CPointer(_type=CPointerType.SINGLE)),
-            CArg(name="next", _type=node, pointer=CPointer(_type=CPointerType.SINGLE)),
-        ])
-        
-        dl_list = CStruct(
-            name=dbl_list_data.list_typename,
-            cargs=[
-                CArg(name="first", _type=node, pointer=CPointer(_type=CPointerType.SINGLE)),
-                CArg(name="last", _type=node, pointer=CPointer(_type=CPointerType.SINGLE)),
-                CArg(name="node_count", _type=CType.U64),
-            ],
-        )
-
-        node_macro = CMacro(
-            name=f"wapp_{type_string_lower}_list_node(ITEM_PTR)",
-            value=__format_func_body(
-                filename=snippets_dir / "list_node",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                node_typename=dbl_list_data.node_typename,
-                list_typename=dbl_list_data.list_typename
-            ),
-        )
-
-        get_func = CFunc(
-            name=f"wapp_{type_string_lower}_list_get",
-            ret_type=node,
-            args=[
-                CArg(name="list", _type=dl_list, pointer=CPointer(CPointerType.SINGLE), qualifier=CQualifier.CONST),
-                CArg(name="index", _type=CType.U64),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "list_get",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                node_typename=dbl_list_data.node_typename,
-                list_typename=dbl_list_data.list_typename
-            ),
-            pointer=CPointer(CPointerType.SINGLE),
-        )
-
-        push_front_func = CFunc(
-            name=f"wapp_{type_string_lower}_list_push_front",
-            ret_type=CType.VOID,
-            args=[
-                CArg(name="list", _type=dl_list, pointer=CPointer(CPointerType.SINGLE)),
-                CArg(name="node", _type=node, pointer=CPointer(CPointerType.SINGLE)),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "list_push_front",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                node_typename=dbl_list_data.node_typename,
-                list_typename=dbl_list_data.list_typename
-            ),
-        )
-
-        push_back_func = CFunc(
-            name=f"wapp_{type_string_lower}_list_push_back",
-            ret_type=CType.VOID,
-            args=[
-                CArg(name="list", _type=dl_list, pointer=CPointer(CPointerType.SINGLE)),
-                CArg(name="node", _type=node, pointer=CPointer(CPointerType.SINGLE)),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "list_push_back",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                node_typename=dbl_list_data.node_typename,
-                list_typename=dbl_list_data.list_typename
-            ),
-        )
-
-        insert_func = CFunc(
-            name=f"wapp_{type_string_lower}_list_insert",
-            ret_type=CType.VOID,
-            args=[
-                CArg(name="list", _type=dl_list, pointer=CPointer(CPointerType.SINGLE)),
-                CArg(name="node", _type=node, pointer=CPointer(CPointerType.SINGLE)),
-                CArg(name="index", _type=CType.U64),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "list_insert",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                node_typename=dbl_list_data.node_typename,
-                list_typename=dbl_list_data.list_typename
-            ),
-        )
-
-        pop_front_func = CFunc(
-            name=f"wapp_{type_string_lower}_list_pop_front",
-            ret_type=node,
-            args=[
-                CArg(name="list", _type=dl_list, pointer=CPointer(CPointerType.SINGLE)),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "list_pop_front",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                node_typename=dbl_list_data.node_typename,
-                list_typename=dbl_list_data.list_typename
-            ),
-            pointer=CPointer(CPointerType.SINGLE),
-        )
-
-        pop_back_func = CFunc(
-            name=f"wapp_{type_string_lower}_list_pop_back",
-            ret_type=node,
-            args=[
-                CArg(name="list", _type=dl_list, pointer=CPointer(CPointerType.SINGLE)),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "list_pop_back",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                node_typename=dbl_list_data.node_typename,
-                list_typename=dbl_list_data.list_typename
-            ),
-            pointer=CPointer(CPointerType.SINGLE),
-        )
-
-        remove_func = CFunc(
-            name=f"wapp_{type_string_lower}_list_remove",
-            ret_type=node,
-            args=[
-                CArg(name="list", _type=dl_list, pointer=CPointer(CPointerType.SINGLE)),
-                CArg(name="index", _type=CType.U64),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "list_remove",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                node_typename=dbl_list_data.node_typename,
-                list_typename=dbl_list_data.list_typename
-            ),
-            pointer=CPointer(CPointerType.SINGLE),
-        )
-
-        empty_func = CFunc(
-            name=f"wapp_{type_string_lower}_list_empty",
-            ret_type=CType.VOID,
-            args=[
-                CArg(name="list", _type=dl_list, pointer=CPointer(CPointerType.SINGLE)),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "list_empty",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                node_typename=dbl_list_data.node_typename,
-                list_typename=dbl_list_data.list_typename
-            ),
-        )
-
-        node_to_list_func = CFunc(
-            name=f"{type_string_lower}_node_to_list",
-            ret_type=dl_list,
-            args=[
-                CArg(name="node", _type=node, pointer=CPointer(CPointerType.SINGLE)),
-            ],
-            body=__format_func_body(
-                filename=snippets_dir / "node_to_list",
-                type_string=type_string,
-                type_string_upper=type_string_upper,
-                type_string_lower=type_string_lower,
-                node_typename=dbl_list_data.node_typename,
-                list_typename=dbl_list_data.list_typename
-            ),
-            qualifiers=[CQualifier.INTERNAL],
-        )
-
-        header.decl_types.extend(dbl_list_data.hdr_decl_types)
-        header.macros.append(node_macro)
-        header.types.extend([node, dl_list])
-        header.funcs.extend([
-            get_func,
-            push_front_func,
-            push_back_func,
-            insert_func,
-            pop_front_func,
-            pop_back_func,
-            remove_func,
-            empty_func,
-        ])
-
-        source.decl_types.extend(dbl_list_data.src_decl_types)
-        source.internal_funcs.append(node_to_list_func)
-        source.funcs = header.funcs
-
-    header.save(out_dir)
-    source.save(out_dir)

codegen/dbl_list/snippets/list_empty

@@ -1,6 +0,0 @@
-  assert(list != NULL);
-
-  u64 count = list->node_count;
-  for (u64 i = 0; i < count; ++i) {{
-    wapp_{Tlower}_list_pop_back(list);
-  }}

codegen/dbl_list/snippets/list_get

@@ -1,11 +0,0 @@
-  assert(index < list->node_count);
-
-  {NodeType} *output  = NULL;
-  {NodeType} *current = list->first;
-  for (u64 i = 1; i <= index; ++i) {{
-    current = current->next;
-  }}
-
-  output = current;
-
-  return output;

codegen/dbl_list/snippets/list_insert

@@ -1,26 +0,0 @@
-  assert(list != NULL && node != NULL && (node->item) != NULL);
-
-  if (index == 0) {{
-    wapp_{Tlower}_list_push_front(list, node);
-    return;
-  }} else if (index == list->node_count) {{
-    wapp_{Tlower}_list_push_back(list, node);
-    return;
-  }}
-
-  {NodeType} *dst_node = wapp_{Tlower}_list_get(list, index);
-  if (!dst_node) {{
-    return;
-  }}
-
-  {ListType} node_list = {Tlower}_node_to_list(node);
-
-  list->node_count += node_list.node_count;
-
-  {NodeType} *prev = dst_node->prev;
-
-  dst_node->prev = node_list.last;
-  prev->next     = node_list.first;
-
-  node_list.first->prev = prev;
-  node_list.last->next  = dst_node;

codegen/dbl_list/snippets/list_node

@@ -1 +0,0 @@
-(({NodeType}){{.item = ITEM_PTR}})

codegen/dbl_list/snippets/list_pop_back

@@ -1,22 +0,0 @@
-  assert(list != NULL);
-
-  {NodeType} *output = NULL;
-
-  if (list->node_count == 0) {{
-    goto RETURN_{Tupper}_LIST_POP_BACK;
-  }}
-
-  output = list->last;
-
-  if (list->node_count == 1) {{
-    *list = ({ListType}){{0}};
-    goto RETURN_{Tupper}_LIST_POP_BACK;
-  }}
-
-  --(list->node_count);
-  list->last = output->prev;
-
-  output->prev = output->next = NULL;
-
-RETURN_{Tupper}_LIST_POP_BACK:
-  return output;

codegen/dbl_list/snippets/list_pop_front

@@ -1,22 +0,0 @@
-  assert(list != NULL);
-
-  {NodeType} *output = NULL;
-
-  if (list->node_count == 0) {{
-    goto RETURN_{Tupper}_LIST_POP_FRONT;
-  }}
-
-  output = list->first;
-
-  if (list->node_count == 1) {{
-    *list = ({ListType}){{0}};
-    goto RETURN_{Tupper}_LIST_POP_FRONT;
-  }}
-
-  --(list->node_count);
-  list->first = output->next;
-
-  output->prev = output->next = NULL;
-
-RETURN_{Tupper}_LIST_POP_FRONT:
-  return output;

codegen/dbl_list/snippets/list_push_back

@@ -1,18 +0,0 @@
-  assert(list != NULL && node != NULL && (node->item) != NULL);
-
-  {ListType} node_list = {Tlower}_node_to_list(node);
-
-  if (list->node_count == 0) {{
-    *list = node_list;
-    return;
-  }}
-
-  list->node_count += node_list.node_count;
-
-  {NodeType} *last = list->last;
-  if (last) {{
-    last->next = node_list.first;
-  }}
-
-  list->last            = node_list.last;
-  node_list.first->prev = last;

codegen/dbl_list/snippets/list_push_front

@@ -1,18 +0,0 @@
-  assert(list != NULL && node != NULL && (node->item) != NULL);
-
-  {ListType} node_list = {Tlower}_node_to_list(node);
-
-  if (list->node_count == 0) {{
-    *list = node_list;
-    return;
-  }}
-
-  list->node_count += node_list.node_count;
-
-  {NodeType} *first = list->first;
-  if (first) {{
-    first->prev = node_list.last;
-  }}
-
-  list->first          = node_list.first;
-  node_list.last->next = first;

codegen/dbl_list/snippets/list_remove

@@ -1,26 +0,0 @@
-  assert(list != NULL);
-
-  {NodeType} *output = NULL;
-
-  if (index == 0) {{
-    output = wapp_{Tlower}_list_pop_front(list);
-    goto RETURN_{Tupper}_LIST_REMOVE;
-  }} else if (index == list->node_count) {{
-    output = wapp_{Tlower}_list_pop_back(list);
-    goto RETURN_{Tupper}_LIST_REMOVE;
-  }}
-
-  output = wapp_{Tlower}_list_get(list, index);
-  if (!output) {{
-    goto RETURN_{Tupper}_LIST_REMOVE;
-  }}
-
-  output->prev->next = output->next;
-  output->next->prev = output->prev;
-
-  --(list->node_count);
-
-  output->prev = output->next = NULL;
-
-RETURN_{Tupper}_LIST_REMOVE:
-  return output;

codegen/dbl_list/snippets/node_to_list

@@ -1,13 +0,0 @@
-  {ListType} output = {{.first = node, .last = node, .node_count = 1}};
-
-  while (output.first->prev != NULL) {{
-    output.first = output.first->prev;
-    ++(output.node_count);
-  }}
-
-  while (output.last->next != NULL) {{
-    output.last = output.last->next;
-    ++(output.node_count);
-  }}
-
-  return output;

codegen/utils.py

@@ -1,18 +0,0 @@
-import os
-import sys
-from pathlib import Path
-
-
-def load_func_body_from_file(filename: Path) -> str:
-    with open(filename, "r") as infile:
-        return infile.read().rstrip()
-
-
-def convert_to_relative(path: Path, target: Path) -> Path:
-    major = sys.version_info.major
-    minor = sys.version_info.minor
-
-    if major >= 3 and minor >= 12:
-        return path.relative_to(target, walk_up=True)
-    else:
-        return Path(os.path.relpath(str(path), start=str(target)))

package

@@ -0,0 +1,11 @@
+#!/bin/bash
+
+cp -r src wapp
+
+mkdir -p dist
+
+ARCHIVE_NAME="wapp-v$(cat VERSION)"
+tar -czvf dist/$ARCHIVE_NAME.tar.gz wapp
+zip -r dist/$ARCHIVE_NAME.zip wapp
+
+rm -rf wapp

scripts/header_install.sh

@@ -0,0 +1,21 @@
+#!/bin/bash
+
+SCRIPT_DIR="$(dirname $0)"
+LIB_SRC="$1"
+INSTALL_PREFIX="$2"
+shift 2
+INCLUDES="$@"
+
+mkdir -p "$INSTALL_PREFIX"
+
+BASE_INCLUDE_DIR="$(dirname "$LIB_SRC")"
+find $BASE_INCLUDE_DIR -maxdepth 1 -type f -name "*.h" -exec cp -v {} "$INSTALL_PREFIX" \;
+
+cd "$SCRIPT_DIR/../src"
+for INCLUDE in $INCLUDES; do
+  for f in $(find "$INCLUDE" -type f -name "*.h"); do
+    DST="$INSTALL_PREFIX/$(dirname $f)"
+    mkdir -p "$DST"
+    cp -v "$f" "$DST"
+  done
+done

src/base/array/array.c

@@ -0,0 +1,266 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#include "./array.h"
+#include "../../common/assert/assert.h"
+#include "../mem/allocator/mem_allocator.h"
+#include "../../common/misc/misc_utils.h"
+#include "../../common/aliases/aliases.h"
+#include <stddef.h>
+
+#define _array_header(ARRAY) (ArrayHeader *)(wapp_pointer_offset(ARRAY, (i64)sizeof(ArrayHeader) * -1))
+
+wapp_persist inline void _array_validate(const GenericArray array, u64 item_size);
+
+u64 _array_count(GenericArray array) {
+	wapp_debug_assert(array != NULL, "`array` should not be NULL");
+
+	ArrayHeader *header = _array_header(array);
+	wapp_runtime_assert(WAPP_ARRAY_MAGIC == header->magic, "`array` is not a valid wapp array");
+
+	return header->count;
+}
+
+u64 _array_capacity(GenericArray array) {
+	wapp_debug_assert(array != NULL, "`array` should not be NULL");
+
+	ArrayHeader *header = _array_header(array);
+	wapp_runtime_assert(WAPP_ARRAY_MAGIC == header->magic, "`array` is not a valid wapp array");
+
+	return header->capacity;
+}
+
+u64 _array_item_size(GenericArray array) {
+	wapp_debug_assert(array != NULL, "`array` should not be NULL");
+
+	ArrayHeader *header = _array_header(array);
+	wapp_runtime_assert(WAPP_ARRAY_MAGIC == header->magic, "`array` is not a valid wapp array");
+
+	return header->item_size;
+}
+
+void _array_set_count(GenericArray array, u64 count) {
+	wapp_debug_assert(array != NULL, "`array` should not be NULL");
+
+	ArrayHeader *header = _array_header(array);
+	wapp_runtime_assert(WAPP_ARRAY_MAGIC == header->magic, "`array` is not a valid wapp array");
+
+	header->count = count;
+}
+
+void *_array_get(GenericArray array, u64 index, u64 item_size) {
+	wapp_runtime_assert(array != NULL, "`array` should not be NULL");
+	_array_validate(array, item_size);
+
+	ArrayHeader *header = _array_header(array);
+	wapp_runtime_assert(index < header->count, "`index` is out of bounds");
+
+	return wapp_pointer_offset(array, header->item_size * index);
+}
+
+void _array_set(GenericArray array, u64 index, void *value, u64 item_size) {
+	void *item = _array_get(array, index, item_size);
+
+	ArrayHeader *header = _array_header(array);
+	memcpy(item, value, header->item_size);
+}
+
+void _array_append_capped(GenericArray array, void *value, u64 item_size) {
+	wapp_runtime_assert(array != NULL, "`array` should not be NULL");
+	_array_validate(array, item_size);
+
+	ArrayHeader *header = _array_header(array);
+	if (header->count >= header->capacity) { return; }
+
+	u64 index = (header->count)++;
+	_array_set(array, index, value, item_size);
+}
+
+void _array_extend_capped(GenericArray dst, const GenericArray src, u64 item_size) {
+	wapp_runtime_assert(dst != NULL && src != NULL, "`dst` and `src` should not be NULL");
+	_array_validate(dst, item_size);
+	_array_validate(src, item_size);
+
+	ArrayHeader *src_header = _array_header(src);
+	ArrayHeader *dst_header = _array_header(dst);
+	u64 remaining_capacity = dst_header->capacity - dst_header->count;
+
+	u64 copy_count = src_header->count < remaining_capacity ? src_header->count : remaining_capacity;
+	void *dst_ptr  = wapp_pointer_offset(dst, dst_header->count * dst_header->item_size);
+	memcpy(dst_ptr, src, copy_count * src_header->item_size);
+	dst_header->count += copy_count;
+}
+
+void _array_copy_capped(GenericArray dst, const GenericArray src, u64 item_size) {
+	wapp_runtime_assert(dst != NULL && src != NULL, "`dst` and `src` should not be NULL");
+	_array_validate(dst, item_size);
+	_array_validate(src, item_size);
+
+	_array_clear(dst, item_size);
+
+	ArrayHeader *src_header = _array_header(src);
+	ArrayHeader *dst_header = _array_header(dst);
+	u64 copy_count = src_header->count < dst_header->capacity ? src_header->count : dst_header->capacity;
+	memcpy((void *)dst, (void *)src, copy_count * src_header->item_size);
+	dst_header->count = copy_count;
+}
+
+GenericArray _array_append_alloc(const Allocator *allocator, GenericArray array, void *value,
+                                 ArrayInitFlags flags, u64 item_size) {
+	wapp_runtime_assert(allocator != NULL && array != NULL, "`allocator` and `array` should not be NULL");
+	_array_validate(array, item_size);
+
+	GenericArray output = array;
+
+	ArrayHeader *header = _array_header(array);
+	if (header->count >= header->capacity) {
+		u64 new_capacity = wapp_misc_utils_u64_round_up_pow2(header->capacity * 2);
+		output           = (GenericArray )_array_alloc_capacity(allocator, new_capacity, flags,
+		                                                        header->item_size);
+		if (!output) {
+			output = array;
+			goto RETURN_ARRAY_APPEND_ALLOC;
+		}
+		_array_copy_capped(output, array, item_size);
+	}
+
+	_array_append_capped(output, value, item_size);
+
+	if ((flags & ARRAY_INIT_FILLED) == ARRAY_INIT_FILLED) {
+		_array_set_count(output, _array_capacity(output));
+	}
+
+RETURN_ARRAY_APPEND_ALLOC:
+	return output;
+}
+
+GenericArray _array_extend_alloc(const Allocator *allocator, GenericArray dst, const GenericArray src,
+                                 ArrayInitFlags flags, u64 item_size) {
+	wapp_runtime_assert(allocator != NULL && dst != NULL && src != NULL, "`allocator`, `dst` and `src` should not be NULL");
+	_array_validate(dst, item_size);
+	_array_validate(src, item_size);
+
+	GenericArray output = dst;
+
+	ArrayHeader *src_header = _array_header(src);
+	ArrayHeader *dst_header = _array_header(dst);
+	u64 remaining_capacity = dst_header->capacity - dst_header->count;
+	if (src_header->count >= remaining_capacity) {
+		u64 new_capacity  = wapp_misc_utils_u64_round_up_pow2(dst_header->capacity * 2);
+		output            = (GenericArray )_array_alloc_capacity(allocator, new_capacity,
+		                                                         flags, dst_header->item_size);
+		if (!output) {
+			output = dst;
+			goto RETURN_ARRAY_EXTEND_ALLOC;
+		}
+		_array_copy_capped(output, dst, item_size);
+	}
+
+	_array_extend_capped(output, src, item_size);
+
+	if ((flags & ARRAY_INIT_FILLED) == ARRAY_INIT_FILLED) {
+		_array_set_count(output, _array_capacity(output));
+	}
+
+RETURN_ARRAY_EXTEND_ALLOC:
+	return output;
+}
+
+GenericArray _array_copy_alloc(const Allocator *allocator, GenericArray dst, const GenericArray src,
+                               ArrayInitFlags flags, u64 item_size) {
+	wapp_runtime_assert(allocator != NULL && dst != NULL && src != NULL, "`allocator`, `dst` and `src` should not be NULL");
+	_array_validate(dst, item_size);
+	_array_validate(src, item_size);
+
+	GenericArray output = dst;
+
+	ArrayHeader *src_header = _array_header(src);
+	ArrayHeader *dst_header = _array_header(dst);
+	if (src_header->count >= dst_header->capacity) {
+		u64 new_capacity  = wapp_misc_utils_u64_round_up_pow2(dst_header->capacity * 2);
+		output            = (GenericArray )_array_alloc_capacity(allocator, new_capacity,
+		                                                         flags, src_header->item_size);
+		if (!output) {
+			output = dst;
+			goto RETURN_ARRAY_COPY_ALLOC;
+		}
+	}
+
+	_array_copy_capped(output, src, item_size);
+
+	if ((flags & ARRAY_INIT_FILLED) == ARRAY_INIT_FILLED) {
+		_array_set_count(output, _array_capacity(output));
+	}
+
+RETURN_ARRAY_COPY_ALLOC:
+	return output;
+}
+
+void *_array_pop(GenericArray array, u64 item_size) {
+	wapp_runtime_assert(array != NULL, "`array` should not be NULL");
+	_array_validate(array, item_size);
+
+	ArrayHeader *header = _array_header(array);
+	if (header->count == 0) { return NULL; }
+
+	u64 index = header->count - 1;
+	void *out = _array_get(array, index, item_size);
+	--(header->count);
+	return out;
+}
+
+void _array_clear(GenericArray array, u64 item_size) {
+	wapp_runtime_assert(array != NULL, "`array` should not be NULL");
+	_array_validate(array, item_size);
+
+	ArrayHeader *header = _array_header(array);
+	header->count = 0;
+}
+
+u64 _array_calc_alloc_size(u64 capacity, u64 item_size) {
+	return sizeof(ArrayHeader) + item_size * capacity;
+}
+
+GenericArray _array_alloc_capacity(const Allocator *allocator, u64 capacity, ArrayInitFlags flags,
+                                   u64 item_size) {
+	wapp_runtime_assert(allocator != NULL, "`allocator` should not be NULL");
+
+	GenericArray output = NULL;
+
+	u64 allocation_size = _array_calc_alloc_size(capacity, item_size);
+	void *buffer        = wapp_mem_allocator_alloc(allocator, allocation_size);
+	if (!buffer) {
+		goto RETURN_ARRAY_ALLOC;
+	}
+
+	output = _array_from_preallocated_buffer(buffer, allocation_size, flags, item_size);
+
+RETURN_ARRAY_ALLOC:
+	return output;
+}
+
+
+GenericArray _array_from_preallocated_buffer(void *buffer, u64 buffer_size, ArrayInitFlags flags,
+                                             u64 item_size) {
+	wapp_runtime_assert(buffer != NULL, "`buffer` should not be NULL");
+
+	i64 data_buffer_size = (i64)buffer_size - (i64)(sizeof(ArrayHeader));
+	if (data_buffer_size <= 0) {
+		return NULL;
+	}
+
+	u64 item_capacity   = (u64)data_buffer_size / item_size;
+	ArrayHeader *header = (ArrayHeader *)buffer;
+	GenericArray output = (u8 *)(header + 1);
+	header->magic       = WAPP_ARRAY_MAGIC;
+	header->count       = flags & ARRAY_INIT_FILLED ? item_capacity : 0;
+	header->capacity    = item_capacity;
+	header->item_size   = item_size;
+
+	return output;
+}
+
+wapp_persist inline void _array_validate(const GenericArray array, u64 item_size) {
+	ArrayHeader *header = _array_header(array);
+	wapp_runtime_assert(WAPP_ARRAY_MAGIC == header->magic, "`array` is not a valid wapp array");
+	wapp_runtime_assert(item_size == header->item_size, "Invalid item type provided");
+}

src/base/array/array.h

@@ -0,0 +1,216 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#ifndef ARRAY_H
+#define ARRAY_H
+
+#include "../mem/allocator/mem_allocator.h"
+#include "../../common/misc/misc_utils.h"
+#include "../../common/aliases/aliases.h"
+#include "../../common/platform/platform.h"
+
+#ifdef WAPP_PLATFORM_CPP
+BEGIN_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#define WAPP_ARRAY_MAGIC (u64)0x57415f415252
+
+#define _calc_array_count(TYPE, ...) wapp_misc_utils_va_args_count(TYPE, __VA_ARGS__)
+#define _calc_array_capacity(TYPE, ...) wapp_misc_utils_u64_round_up_pow2(_calc_array_count(TYPE, __VA_ARGS__) * 2)
+
+typedef struct Str8 Str8;
+
+// NOTE (Abdelrahman): Typedefs to distinguish arrays from regular pointers
+typedef void  *GenericArray;
+typedef void **VoidPtrArray;
+typedef c8    *C8Array;
+typedef c16   *C16Array;
+typedef c32   *C32Array;
+typedef u8    *U8Array;
+typedef u16   *U16Array;
+typedef u32   *U32Array;
+typedef u64   *U64Array;
+typedef b8    *B8Array;
+typedef i8    *I8Array;
+typedef i16   *I16Array;
+typedef i32   *I32Array;
+typedef i64   *I64Array;
+typedef f32   *F32Array;
+typedef f64   *F64Array;
+typedef f128  *F128Array;
+typedef uptr  *UptrArray;
+typedef iptr  *IptrArray;
+typedef Str8  *Str8Array;
+
+typedef enum {
+	ARRAY_INIT_NONE   = 0,
+	ARRAY_INIT_FILLED = 1 << 1,
+} ArrayInitFlags;
+
+#ifdef WAPP_PLATFORM_CPP
+#define wapp_array(TYPE, ...) ([&]() {                                                             \
+	u64 capacity = _calc_array_capacity(TYPE, __VA_ARGS__);                                          \
+	                                                                                                 \
+	TYPE items[_calc_array_capacity(TYPE, __VA_ARGS__)] = {__VA_ARGS__};                             \
+	                                                                                                 \
+	wapp_persist u8 array[                                                                           \
+		sizeof(ArrayHeader) + _calc_array_capacity(TYPE, __VA_ARGS__) * sizeof(TYPE)                   \
+	] = {0};                                                                                         \
+	ArrayHeader *header = (ArrayHeader *)array;                                                      \
+	header->magic       = WAPP_ARRAY_MAGIC;                                                          \
+	header->count       = _calc_array_count(TYPE, __VA_ARGS__);                                      \
+	header->capacity    = _calc_array_capacity(TYPE, __VA_ARGS__);                                   \
+	header->item_size   = sizeof(TYPE);                                                              \
+	                                                                                                 \
+	u8 *buf = (u8 *)(header + 1);                                                                    \
+	memcpy(buf, items, capacity * sizeof(TYPE));                                                     \
+	return (TYPE *)buf;                                                                              \
+}())
+#define wapp_array_with_capacity(TYPE, CAPACITY, FLAGS) ([&]() {                                   \
+	wapp_persist u8 array[                                                                           \
+		sizeof(ArrayHeader) + CAPACITY * sizeof(TYPE)                                                  \
+	] = {0};                                                                                         \
+	ArrayHeader *header = (ArrayHeader *)array;                                                      \
+	header->magic       = WAPP_ARRAY_MAGIC;                                                          \
+	header->count       = (FLAGS & ARRAY_INIT_FILLED) ? CAPACITY : 0;                                \
+	header->capacity    = CAPACITY;                                                                  \
+	header->item_size   = sizeof(TYPE);                                                              \
+	                                                                                                 \
+	return (TYPE *)(header + 1);                                                                     \
+}())
+#define wapp_array_pop(TYPE, ARRAY) ([&]() {                                                       \
+	if (ARRAY == NULL || _array_count((GenericArray)ARRAY) == 0) {                                   \
+		TYPE result{};                                                                                 \
+		return result;                                                                                 \
+	}                                                                                                \
+	                                                                                                 \
+	return *((TYPE *)_array_pop((GenericArray)ARRAY, sizeof(TYPE)));                                 \
+}())
+#else
+#define _stack_array(TYPE, SIZE) struct {ArrayHeader header;                                       \
+                                         TYPE items[SIZE];                                         \
+                                         wapp_misc_utils_reserve_padding(sizeof(ArrayHeader) +     \
+                                                                         sizeof(TYPE) * SIZE);}
+#define wapp_array(TYPE, ...)                                                                      \
+	((TYPE *)(                                                                                       \
+		(_stack_array(TYPE, _calc_array_capacity(TYPE, __VA_ARGS__))){                                 \
+			.header = {                                                                                  \
+				.magic     = WAPP_ARRAY_MAGIC,                                                             \
+				.count     = _calc_array_count(TYPE, __VA_ARGS__),                                         \
+				.capacity  = _calc_array_capacity(TYPE, __VA_ARGS__),                                      \
+				.item_size = sizeof(TYPE),                                                                 \
+			},                                                                                           \
+			.items  = {__VA_ARGS__},                                                                     \
+		}.items                                                                                        \
+	))
+#define wapp_array_with_capacity(TYPE, CAPACITY, FLAGS)                                            \
+	((TYPE *)(                                                                                       \
+		(_stack_array(TYPE, CAPACITY)){                                                                \
+			.header = {                                                                                  \
+				.magic     = WAPP_ARRAY_MAGIC,                                                             \
+				.count     = (FLAGS & ARRAY_INIT_FILLED) ? CAPACITY : 0,                                   \
+				.capacity  = CAPACITY,                                                                     \
+				.item_size = sizeof(TYPE),                                                                 \
+			},                                                                                           \
+			.items  = {0},                                                                               \
+		}.items                                                                                        \
+	))
+#define wapp_array_pop(TYPE, ARRAY)                                                                \
+	(ARRAY == NULL || _array_count((GenericArray)ARRAY) == 0 ?                                       \
+		(TYPE){0} :                                                                                    \
+		*((TYPE *)_array_pop((GenericArray)ARRAY, sizeof(TYPE)))                                       \
+	)
+#endif // !WAPP_PLATFORM_CPP
+
+#define wapp_array_count(ARRAY)                                                                    \
+	(_array_count((GenericArray)ARRAY))
+#define wapp_array_capacity(ARRAY)                                                                 \
+	(_array_capacity((GenericArray)ARRAY))
+#define wapp_array_item_size(ARRAY)                                                                \
+	(_array_item_size((GenericArray)ARRAY))
+#define wapp_array_set_count(ARRAY, COUNT)                                                         \
+	(_array_set_count((GenericArray)ARRAY, COUNT))
+#define wapp_array_get(TYPE, ARRAY, INDEX)                                                         \
+	((TYPE *)_array_get((GenericArray)ARRAY,                                                         \
+	                    INDEX,                                                                       \
+	                    sizeof(TYPE)))
+#define wapp_array_set(TYPE, ARRAY, INDEX, VALUE_PTR)                                              \
+	(_array_set((GenericArray)ARRAY,                                                                 \
+	            INDEX,                                                                               \
+	            (u8 *)VALUE_PTR,                                                                     \
+	            sizeof(TYPE)))
+#define wapp_array_append_capped(TYPE, ARRAY, VALUE_PTR)                                           \
+	(_array_append_capped((GenericArray)ARRAY,                                                       \
+	                      (u8 *)VALUE_PTR,                                                           \
+	                      sizeof(TYPE)))
+#define wapp_array_extend_capped(TYPE, DST_ARRAY, SRC_ARRAY)                                       \
+	(_array_extend_capped((GenericArray)DST_ARRAY,                                                   \
+	                      (GenericArray)SRC_ARRAY,                                                   \
+	                      sizeof(TYPE)))
+#define wapp_array_copy_capped(TYPE, DST_ARRAY, SRC_ARRAY)                                         \
+	(_array_copy_capped((GenericArray)DST_ARRAY,                                                     \
+	                    (GenericArray)SRC_ARRAY,                                                     \
+	                    sizeof(TYPE)))
+#define wapp_array_append_alloc(TYPE, ALLOCATOR_PTR, ARRAY, VALUE_PTR, FLAGS)                      \
+	((TYPE *)_array_append_alloc(ALLOCATOR_PTR,                                                      \
+	                             (GenericArray)ARRAY,                                                \
+	                             (u8 *)VALUE_PTR,                                                    \
+	                             FLAGS,                                                              \
+	                             sizeof(TYPE)))
+#define wapp_array_extend_alloc(TYPE, ALLOCATOR_PTR, DST_ARRAY, SRC_ARRAY, FLAGS)                  \
+	((TYPE *)_array_extend_alloc(ALLOCATOR_PTR,                                                      \
+	                             (GenericArray)DST_ARRAY,                                            \
+	                             (GenericArray)SRC_ARRAY,                                            \
+	                             FLAGS,                                                              \
+	                             sizeof(TYPE)))
+#define wapp_array_copy_alloc(TYPE, ALLOCATOR_PTR, DST_ARRAY, SRC_ARRAY, FLAGS)                    \
+	((TYPE *)_array_copy_alloc(ALLOCATOR_PTR,                                                        \
+	                           (GenericArray)DST_ARRAY,                                              \
+	                           (GenericArray)SRC_ARRAY,                                              \
+	                           FLAGS,                                                                \
+	                           sizeof(TYPE)))
+#define wapp_array_clear(TYPE, ARRAY)                                                              \
+	(_array_clear((GenericArray)ARRAY,                                                               \
+	             sizeof(TYPE)))
+#define wapp_array_calc_alloc_size(TYPE, CAPACITY) _array_calc_alloc_size(CAPACITY, sizeof(TYPE))
+#define wapp_array_alloc_capacity(TYPE, ALLOCATOR_PTR, CAPACITY, FLAGS)                            \
+	((TYPE *)_array_alloc_capacity(ALLOCATOR_PTR, CAPACITY, FLAGS, sizeof(TYPE)))
+#define wapp_array_from_preallcated_buffer(TYPE, BUFFER, BUFFER_SIZE)                              \
+	((TYPE *)_array_from_preallcated_buffer(BUFFER, BUFFER_SIZE, sizeof(TYPE)))
+
+
+typedef struct header ArrayHeader;
+struct header {
+  u64 magic;
+  u64 count;
+  u64 capacity;
+  u64 item_size;
+};
+
+u64          _array_count(GenericArray array);
+u64          _array_capacity(GenericArray array);
+u64          _array_item_size(GenericArray array);
+void         _array_set_count(GenericArray array, u64 count);
+void        *_array_get(GenericArray array, u64 index, u64 item_size);
+void         _array_set(GenericArray array, u64 index, void *value, u64 item_size);
+void         _array_append_capped(GenericArray array, void *value, u64 item_size);
+void         _array_extend_capped(GenericArray dst, const GenericArray src, u64 item_size);
+void         _array_copy_capped(GenericArray dst, const GenericArray src, u64 item_size);
+GenericArray _array_append_alloc(const Allocator *allocator, GenericArray array, void *value,
+                                 ArrayInitFlags flags, u64 item_size);
+GenericArray _array_extend_alloc(const Allocator *allocator, GenericArray dst, const GenericArray src,
+                                 ArrayInitFlags flags, u64 item_size);
+GenericArray _array_copy_alloc(const Allocator *allocator, GenericArray dst, const GenericArray src,
+                               ArrayInitFlags flags, u64 item_size);
+void        *_array_pop(GenericArray array, u64 item_size);
+void         _array_clear(GenericArray array, u64 item_size);
+u64          _array_calc_alloc_size(u64 capacity, u64 item_size);
+GenericArray _array_alloc_capacity(const Allocator *allocator, u64 capacity, ArrayInitFlags flags,
+                                   u64 item_size);
+GenericArray _array_from_preallocated_buffer(void *buffer, u64 buffer_size, ArrayInitFlags flags,
+                                             u64 item_size);
+
+#ifdef WAPP_PLATFORM_CPP
+END_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#endif // !ARRAY_H

src/base/dbl_list/dbl_list.c

@@ -0,0 +1,259 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#include "./dbl_list.h"
+#include "../mem/allocator/mem_allocator.h"
+#include "../../common/assert/assert.h"
+#include "../../common/aliases/aliases.h"
+#include "../../common/platform/platform.h"
+#include <stddef.h>
+
+wapp_intern GenericList _node_to_list(GenericNode *node, u64 item_size);
+wapp_intern inline void _dbl_list_validate(const GenericList *list, u64 item_size);
+wapp_intern inline void _dbl_list_node_validate(const GenericList *list, const GenericNode *node, u64 item_size);
+
+GenericList *_dbl_list_alloc(const Allocator *allocator, u64 item_size) {
+	wapp_debug_assert(allocator != NULL, "`allocator` should not be NULL");
+
+	GenericList *list = wapp_mem_allocator_alloc(allocator, sizeof(GenericList));
+	if (!list) { goto DBL_LIST_ALLOC_RETURN; }
+
+	memset((void *)list, 0, sizeof(GenericList));
+	list->magic     = WAPP_DBL_LIST_MAGIC;
+	list->item_size = item_size;
+
+DBL_LIST_ALLOC_RETURN:
+	return list;
+}
+
+GenericNode *_dbl_list_node_alloc(const Allocator *allocator, void *item, u64 item_size) {
+	wapp_debug_assert(allocator != NULL, "`allocator` should not be NULL");
+
+	GenericNode *node = wapp_mem_allocator_alloc(allocator, sizeof(GenericNode));
+	if (!node) { goto DBL_LIST_NODE_ALLOC_RETURN; }
+
+	memset((void *)node, 0, sizeof(GenericNode));
+	node->item             = item;
+	node->header.magic     = WAPP_DBL_NODE_MAGIC;
+	node->header.item_size = item_size;
+
+DBL_LIST_NODE_ALLOC_RETURN:
+	return node;
+}
+
+GenericNode *_dbl_list_get(const GenericList *list, u64 index, u64 item_size) {
+	wapp_debug_assert(list != NULL, "`list` should not be NULL");
+	_dbl_list_validate(list, item_size);
+	wapp_runtime_assert(index < list->node_count, "`index` is out of bounds");
+
+	GenericNode *output  = NULL;
+	GenericNode *current = list->first;
+	for (u64 i = 1; i <= index; ++i) {
+		current = current->header.next;
+	}
+
+	output = current;
+
+	return output;
+}
+
+void _dbl_list_push_front(GenericList *list, GenericNode *node, u64 item_size) {
+	wapp_debug_assert(list != NULL && node != NULL && (node->item) != NULL, "`list`, `node` and `node->item` should not be NULL");
+	_dbl_list_validate(list, item_size);
+	_dbl_list_node_validate(list, node, item_size);
+
+	GenericList node_list = _node_to_list(node, item_size);
+
+	if (list->node_count == 0) {
+		*list = node_list;
+		return;
+	}
+
+	list->node_count += node_list.node_count;
+
+	GenericNode *first = list->first;
+	if (first) {
+		first->header.prev = node_list.last;
+	}
+
+	list->first          = node_list.first;
+	node_list.last->header.next = first;
+}
+
+void _dbl_list_push_back(GenericList *list, GenericNode *node, u64 item_size) {
+	wapp_debug_assert(list != NULL && node != NULL && (node->item) != NULL, "`list`, `node` and `node->item` should not be NULL");
+	_dbl_list_validate(list, item_size);
+	_dbl_list_node_validate(list, node, item_size);
+
+	GenericList node_list = _node_to_list(node, item_size);
+
+	if (list->node_count == 0) {
+		*list = node_list;
+		return;
+	}
+
+	list->node_count += node_list.node_count;
+
+	GenericNode *last = list->last;
+	if (last) {
+		last->header.next = node_list.first;
+	}
+
+	list->last            = node_list.last;
+	node_list.first->header.prev = last;
+}
+
+void _dbl_list_insert(GenericList *list, GenericNode *node, u64 index, u64 item_size) {
+	wapp_debug_assert(list != NULL && node != NULL && (node->item) != NULL, "`list`, `node` and `node->item` should not be NULL");
+	_dbl_list_validate(list, item_size);
+	_dbl_list_node_validate(list, node, item_size);
+
+	if (index == 0) {
+		_dbl_list_push_front(list, node, item_size);
+		return;
+	} else if (index == list->node_count) {
+		_dbl_list_push_back(list, node, item_size);
+		return;
+	}
+
+	GenericNode *dst_node = _dbl_list_get(list, index, item_size);
+	if (!dst_node) {
+		return;
+	}
+
+	GenericList node_list = _node_to_list(node, item_size);
+
+	list->node_count += node_list.node_count;
+
+	GenericNode *prev = dst_node->header.prev;
+
+	dst_node->header.prev = node_list.last;
+	prev->header.next     = node_list.first;
+
+	node_list.first->header.prev = prev;
+	node_list.last->header.next  = dst_node;
+}
+
+GenericNode *_dbl_list_pop_front(GenericList *list, u64 item_size) {
+	wapp_debug_assert(list != NULL, "`list` should not be NULL");
+	_dbl_list_validate(list, item_size);
+
+	GenericNode *output = NULL;
+
+	if (list->node_count == 0) {
+		goto RETURN_LIST_POP_FRONT;
+	}
+
+	output = list->first;
+
+	if (list->node_count == 1) {
+		*list = (GenericList){.magic = WAPP_DBL_LIST_MAGIC, .item_size = item_size};
+		goto RETURN_LIST_POP_FRONT;
+	}
+
+	--(list->node_count);
+	list->first = output->header.next;
+
+	output->header.prev = output->header.next = NULL;
+
+RETURN_LIST_POP_FRONT:
+	return output;
+}
+
+GenericNode *_dbl_list_pop_back(GenericList *list, u64 item_size) {
+	wapp_debug_assert(list != NULL, "`list` should not be NULL");
+	_dbl_list_validate(list, item_size);
+
+	GenericNode *output = NULL;
+
+	if (list->node_count == 0) {
+		goto RETURN_LIST_POP_BACK;
+	}
+
+	output = list->last;
+
+	if (list->node_count == 1) {
+		*list = (GenericList){.magic = WAPP_DBL_LIST_MAGIC, .item_size = item_size};
+		goto RETURN_LIST_POP_BACK;
+	}
+
+	--(list->node_count);
+	list->last = output->header.prev;
+
+	output->header.prev = output->header.next = NULL;
+
+RETURN_LIST_POP_BACK:
+	return output;
+}
+
+GenericNode *_dbl_list_remove(GenericList *list, u64 index, u64 item_size) {
+	wapp_debug_assert(list != NULL, "`list` should not be NULL");
+	_dbl_list_validate(list, item_size);
+
+	GenericNode *output = NULL;
+
+	if (index == 0) {
+		output = _dbl_list_pop_front(list, item_size);
+		goto RETURN_LIST_REMOVE;
+	} else if (index == list->node_count) {
+		output = _dbl_list_pop_back(list, item_size);
+		goto RETURN_LIST_REMOVE;
+	}
+
+	output = _dbl_list_get(list, index, item_size);
+	if (!output) {
+		goto RETURN_LIST_REMOVE;
+	}
+
+	output->header.prev->header.next = output->header.next;
+	output->header.next->header.prev = output->header.prev;
+
+	--(list->node_count);
+
+	output->header.prev = output->header.next = NULL;
+
+RETURN_LIST_REMOVE:
+	return output;
+}
+
+void _dbl_list_empty(GenericList *list, u64 item_size) {
+	wapp_debug_assert(list != NULL, "`list` should not be NULL");
+	_dbl_list_validate(list, item_size);
+
+	u64 count = list->node_count;
+	for (u64 i = 0; i < count; ++i) {
+		_dbl_list_pop_back(list, item_size);
+	}
+}
+
+wapp_intern GenericList _node_to_list(GenericNode *node, u64 item_size) {
+	GenericList output = {
+		.magic      = WAPP_DBL_LIST_MAGIC,
+		.first      = node,
+		.last       = node,
+		.node_count = 1,
+		.item_size  = item_size,
+	};
+
+	while (output.first->header.prev != NULL) {
+		output.first = output.first->header.prev;
+		++(output.node_count);
+	}
+
+	while (output.last->header.next != NULL) {
+		output.last = output.last->header.next;
+		++(output.node_count);
+	}
+
+	return output;
+}
+
+wapp_intern inline void _dbl_list_validate(const GenericList *list, u64 item_size) {
+	wapp_runtime_assert(list->magic == WAPP_DBL_LIST_MAGIC, "`list` isn't a valid wapp list type");
+	wapp_runtime_assert(list->item_size == item_size, "Invalid item provided");
+}
+
+wapp_intern inline void _dbl_list_node_validate(const GenericList *list, const GenericNode *node, u64 item_size) {
+	wapp_runtime_assert(node->header.magic == WAPP_DBL_NODE_MAGIC, "`node` isn't a valid wapp node type");
+	wapp_runtime_assert(list->item_size == node->header.item_size, "Mismatched `list` and `node` types");
+	wapp_runtime_assert(node->header.item_size == item_size, "Invalid item provided");
+}

src/base/dbl_list/dbl_list.h

@@ -0,0 +1,184 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#ifndef DBL_LIST_H
+#define DBL_LIST_H
+
+#include "../mem/allocator/mem_allocator.h"
+#include "../../common/aliases/aliases.h"
+#include "../../common/platform/platform.h"
+
+#ifdef WAPP_PLATFORM_CPP
+BEGIN_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#define WAPP_DBL_LIST_MAGIC (u64)0x57415f444c5354
+#define WAPP_DBL_NODE_MAGIC (u64)0x57415f444e44
+
+typedef struct GenericNode GenericNode;
+
+typedef struct {
+	u64 magic;
+	u64 item_size;
+	GenericNode *prev;
+	GenericNode *next;
+} NodeHeader;
+
+struct GenericNode {
+	NodeHeader header;
+	void *item;
+};
+
+typedef struct {
+	u64 magic;
+	u64 node_count;
+	u64 item_size;
+	GenericNode *first;
+	GenericNode *last;
+} GenericList;
+
+// NOTE (Abdelrahman): GenericList typedefs for readability
+typedef GenericList VoidPtrList;
+typedef GenericList C8List;
+typedef GenericList C16List;
+typedef GenericList C32List;
+typedef GenericList U8List;
+typedef GenericList U16List;
+typedef GenericList U32List;
+typedef GenericList U64List;
+typedef GenericList B8List;
+typedef GenericList I8List;
+typedef GenericList I16List;
+typedef GenericList I32List;
+typedef GenericList I64List;
+typedef GenericList F32List;
+typedef GenericList F64List;
+typedef GenericList F128List;
+typedef GenericList UptrList;
+typedef GenericList IptrList;
+typedef GenericList Str8List;
+
+// NOTE (Abdelrahman): GenericNode typedefs for readability
+typedef GenericNode VoidPtrNode;
+typedef GenericNode C8Node;
+typedef GenericNode C16Node;
+typedef GenericNode C32Node;
+typedef GenericNode U8Node;
+typedef GenericNode U16Node;
+typedef GenericNode U32Node;
+typedef GenericNode U64Node;
+typedef GenericNode B8Node;
+typedef GenericNode I8Node;
+typedef GenericNode I16Node;
+typedef GenericNode I32Node;
+typedef GenericNode I64Node;
+typedef GenericNode F32Node;
+typedef GenericNode F64Node;
+typedef GenericNode F128Node;
+typedef GenericNode UptrNode;
+typedef GenericNode IptrNode;
+typedef GenericNode Str8Node;
+
+#ifdef WAPP_PLATFORM_CPP
+#define wapp_dbl_list(TYPE)                                                                        \
+	GenericList{WAPP_DBL_LIST_MAGIC, 0, sizeof(TYPE), nullptr, nullptr}
+#define _dbl_list_node(TYPE, ITEM_PTR) ([&]() {                                                    \
+	wapp_persist GenericNode node = {                                                                \
+		NodeHeader{WAPP_DBL_NODE_MAGIC, sizeof(TYPE), nullptr, nullptr},                               \
+		ITEM_PTR,                                                                                      \
+	};                                                                                               \
+                                                                                                   \
+	return &node;                                                                                    \
+}())
+#else
+#define wapp_dbl_list(TYPE) (                                                                      \
+	(GenericList){.magic = WAPP_DBL_LIST_MAGIC, .item_size = sizeof(TYPE)}                           \
+)
+#define _dbl_list_node(TYPE, ITEM_PTR) (                                                           \
+	&((GenericNode){.header = {.magic = WAPP_DBL_NODE_MAGIC, .item_size = sizeof(TYPE)},             \
+	                .item = ITEM_PTR})                                                               \
+)
+#endif // !WAPP_PLATFORM_CPP
+
+#define wapp_dbl_list_alloc(TYPE, ALLOCATOR)                                                       \
+	(_dbl_list_alloc(ALLOCATOR, sizeof(TYPE)))
+#define wapp_dbl_list_get(TYPE, LIST_PTR, ITEM_INDEX)                                              \
+	((TYPE *)(_dbl_list_get(LIST_PTR, ITEM_INDEX, sizeof(TYPE))->item))
+#define wapp_dbl_list_get_node(TYPE, LIST_PTR, ITEM_INDEX)                                         \
+	(_dbl_list_get(LIST_PTR, ITEM_INDEX, sizeof(TYPE)))
+#define wapp_dbl_list_get_node_item(TYPE, NODE_PTR)                                                \
+	((TYPE *)(                                                                                       \
+		(NODE_PTR == NULL) ?                                                                           \
+		NULL :                                                                                         \
+		(NODE_PTR)->item                                                                               \
+	))
+#define wapp_dbl_list_push_front(TYPE, LIST_PTR, ITEM_PTR)                                         \
+	(_dbl_list_push_front(LIST_PTR, _dbl_list_node(TYPE, ITEM_PTR), sizeof(TYPE)))
+#define wapp_dbl_list_push_back(TYPE, LIST_PTR, ITEM_PTR)                                          \
+	(_dbl_list_push_back(LIST_PTR, _dbl_list_node(TYPE, ITEM_PTR), sizeof(TYPE)))
+#define wapp_dbl_list_insert(TYPE, LIST_PTR, ITEM_PTR, ITEM_INDEX)                                 \
+	(_dbl_list_insert(LIST_PTR, _dbl_list_node(TYPE, ITEM_PTR),                                      \
+	                  ITEM_INDEX, sizeof(TYPE)))
+#define wapp_dbl_list_push_front_alloc(TYPE, ALLOCATOR, LIST_PTR, ITEM_PTR)                        \
+	(_dbl_list_push_front(LIST_PTR, _dbl_list_node_alloc(ALLOCATOR, ITEM_PTR, sizeof(TYPE)),         \
+	                      sizeof(TYPE)))
+#define wapp_dbl_list_push_back_alloc(TYPE, ALLOCATOR, LIST_PTR, ITEM_PTR)                         \
+	(_dbl_list_push_back(LIST_PTR, _dbl_list_node_alloc(ALLOCATOR, ITEM_PTR, sizeof(TYPE)),          \
+	                     sizeof(TYPE)))
+#define wapp_dbl_list_insert_alloc(TYPE, ALLOCATOR, LIST_PTR, ITEM_PTR, ITEM_INDEX)                \
+	(_dbl_list_insert(LIST_PTR, _dbl_list_node_alloc(ALLOCATOR, ITEM_PTR, sizeof(TYPE)),             \
+	                  ITEM_INDEX, sizeof(TYPE)))
+#define wapp_dbl_list_pop_front(TYPE, LIST_PTR)                                                    \
+	((TYPE *)(                                                                                       \
+		(LIST_PTR == NULL || (LIST_PTR)->node_count == 0) ?                                            \
+		NULL :                                                                                         \
+		_dbl_list_pop_front(LIST_PTR, sizeof(TYPE))->item                                              \
+	))
+#define wapp_dbl_list_pop_back(TYPE, LIST_PTR)                                                     \
+	((TYPE *)(                                                                                       \
+		(LIST_PTR == NULL || (LIST_PTR)->node_count == 0) ?                                            \
+		NULL :                                                                                         \
+		_dbl_list_pop_back(LIST_PTR, sizeof(TYPE))->item                                               \
+	))
+#define wapp_dbl_list_remove(TYPE, LIST_PTR, ITEM_INDEX)                                           \
+	((TYPE *)(                                                                                       \
+		(LIST_PTR == NULL || (LIST_PTR)->node_count == 0 || ITEM_INDEX >= (LIST_PTR)->node_count) ?    \
+		NULL :                                                                                         \
+		_dbl_list_remove(LIST_PTR, ITEM_INDEX, sizeof(TYPE))->item                                     \
+	))
+#define wapp_dbl_list_pop_front_node(TYPE, LIST_PTR)                                               \
+	(                                                                                                \
+		(LIST_PTR == NULL || (LIST_PTR)->node_count == 0) ?                                            \
+		NULL :                                                                                         \
+		_dbl_list_pop_front(LIST_PTR, sizeof(TYPE))                                                    \
+	)
+#define wapp_dbl_list_pop_back_node(TYPE, LIST_PTR)                                                \
+	(                                                                                                \
+		(LIST_PTR == NULL || (LIST_PTR)->node_count == 0) ?                                            \
+		NULL :                                                                                         \
+		_dbl_list_pop_back(LIST_PTR, sizeof(TYPE))                                                     \
+	)
+#define wapp_dbl_list_remove_node(TYPE, LIST_PTR, ITEM_INDEX)                                      \
+	(                                                                                                \
+		(LIST_PTR == NULL || (LIST_PTR)->node_count == 0 || ITEM_INDEX >= (LIST_PTR)->node_count) ?    \
+		NULL :                                                                                         \
+		_dbl_list_remove(LIST_PTR, ITEM_INDEX, sizeof(TYPE))                                           \
+	)
+#define wapp_dbl_list_empty(TYPE, LIST_PTR)                                                        \
+	(_dbl_list_empty(LIST_PTR, sizeof(TYPE)))
+
+GenericList *_dbl_list_alloc(const Allocator *allocator, u64 item_size);
+GenericNode *_dbl_list_node_alloc(const Allocator *allocator, void *item, u64 item_size);
+GenericNode *_dbl_list_get(const GenericList *list, u64 index, u64 item_size);
+void         _dbl_list_push_front(GenericList *list, GenericNode *node, u64 item_size);
+void         _dbl_list_push_back(GenericList *list, GenericNode *node, u64 item_size);
+void         _dbl_list_insert(GenericList *list, GenericNode *node, u64 index, u64 item_size);
+GenericNode *_dbl_list_pop_front(GenericList *list, u64 item_size);
+GenericNode *_dbl_list_pop_back(GenericList *list, u64 item_size);
+GenericNode *_dbl_list_remove(GenericList *list, u64 index, u64 item_size);
+void         _dbl_list_empty(GenericList *list, u64 item_size);
+
+#ifdef WAPP_PLATFORM_CPP
+END_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#endif // !DBL_LIST_H

src/base/mem/allocator/mem_allocator.c

@@ -0,0 +1,35 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#include "mem_allocator.h"
+#include "../../../common/aliases/aliases.h"
+#include "../../../common/assert/assert.h"
+#include <stdlib.h>
+
+void *wapp_mem_allocator_alloc(const Allocator *allocator, u64 size) {
+	wapp_debug_assert(allocator != NULL && (allocator->alloc) != NULL, "`allocator` and `allocator->alloc` should not be NULL");
+	return allocator->alloc(size, allocator->obj);
+}
+
+void *wapp_mem_allocator_alloc_aligned(const Allocator *allocator, u64 size, u64 alignment) {
+	wapp_debug_assert(allocator != NULL && (allocator->alloc_aligned) != NULL, "`allocator` and `allocator->alloc_aligned` should not be NULL");
+	return allocator->alloc_aligned(size, alignment, allocator->obj);
+}
+
+void *wapp_mem_allocator_realloc(const Allocator *allocator, void *ptr, u64 old_size, u64 new_size) {
+	wapp_debug_assert(allocator != NULL && (allocator->realloc) != NULL, "`allocator` and `allocator->realloc` should not be NULL");
+	return allocator->realloc(ptr, old_size, new_size, allocator->obj);
+}
+
+void *wapp_mem_allocator_realloc_aligned(const Allocator *allocator, void *ptr, u64 old_size,
+                                         u64 new_size, u64 alignment) {
+	wapp_debug_assert(allocator != NULL && (allocator->realloc_aligned) != NULL, "`allocator` and `allocator->realloc_aligned` should not be NULL");
+	return allocator->realloc_aligned(ptr, old_size, new_size, alignment, allocator->obj);
+}
+
+void wapp_mem_allocator_free(const Allocator *allocator, void **ptr, u64 size) {
+	if (!allocator || !(allocator->free)) {
+		return;
+	}
+
+	allocator->free(ptr, size, allocator->obj);
+}

src/base/mem/allocator/mem_allocator.h

@@ -0,0 +1,50 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#ifndef MEM_ALLOCATOR_H
+#define MEM_ALLOCATOR_H
+
+#include "../../../common/aliases/aliases.h"
+#include "../../../common/platform/platform.h"
+#include <string.h>
+
+#ifdef WAPP_PLATFORM_CPP
+BEGIN_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+typedef void  *(MemAllocFunc)(u64 size, void *alloc_obj);
+typedef void  *(MemAllocAlignedFunc)(u64 size, u64 alignment, void *alloc_obj);
+typedef void  *(MemReallocFunc)(void *ptr, u64 old_size, u64 new_size, void *alloc_obj);
+typedef void  *(MemReallocAlignedFunc)(void *ptr, u64 old_size, u64 new_size, u64 alignment, void *alloc_obj);
+typedef void   (MemFreeFunc)(void **ptr, u64 size, void *alloc_obj);
+
+typedef struct Allocator Allocator;
+struct Allocator {
+	void *obj;
+	MemAllocFunc *alloc;
+	MemAllocAlignedFunc *alloc_aligned;
+	MemReallocFunc *realloc;
+	MemReallocAlignedFunc *realloc_aligned;
+	MemFreeFunc *free;
+};
+
+#ifdef WAPP_PLATFORM_CPP
+#define wapp_mem_allocator_invalid(ALLOCATOR) ([&]() {      \
+	Allocator alloc{};                                        \
+	return memcmp(ALLOCATOR, &alloc, sizeof(Allocator)) == 0; \
+}())
+#else
+#define wapp_mem_allocator_invalid(ALLOCATOR) (memcmp(ALLOCATOR, &((Allocator){0}), sizeof(Allocator)) == 0)
+#endif // !WAPP_PLATFORM_CPP
+
+void *wapp_mem_allocator_alloc(const Allocator *allocator, u64 size);
+void *wapp_mem_allocator_alloc_aligned(const Allocator *allocator, u64 size, u64 alignment);
+void *wapp_mem_allocator_realloc(const Allocator *allocator, void *ptr, u64 old_size, u64 new_size);
+void *wapp_mem_allocator_realloc_aligned(const Allocator *allocator, void *ptr, u64 old_size,
+                                         u64 new_size, u64 alignment);
+void wapp_mem_allocator_free(const Allocator *allocator, void **ptr, u64 size);
+
+#ifdef WAPP_PLATFORM_CPP
+END_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#endif // !MEM_ALLOCATOR_H

src/base/mem/utils/mem_utils.c

@@ -0,0 +1,25 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#include "mem_utils.h"
+#include "../../../common/aliases/aliases.h"
+#include "../../../common/assert/assert.h"
+#include "../../../common/misc/misc_utils.h"
+#include <stddef.h>
+
+void *wapp_mem_util_align_forward(void *ptr, u64 alignment) {
+	wapp_debug_assert(ptr != NULL, "`ptr` should not be NULL");
+	wapp_runtime_assert(wapp_is_power_of_two(alignment), "`alignment` value is not a power of two");
+
+	uptr p      = (uptr)ptr;
+	uptr align  = (uptr)alignment;
+
+	// Similar to p % align, but it's a faster implementation that works fine
+	// because align is guaranteed to be a power of 2
+	uptr modulo = p & (align - 1);
+
+	if (modulo != 0) {
+		p += align - modulo;
+	}
+
+	return (void *)p;
+}

src/base/mem/utils/mem_utils.h

@@ -1,9 +1,19 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
 #ifndef MEM_UTILS_H
 #define MEM_UTILS_H
 
 #include "../../../common/aliases/aliases.h"
 #include "../../../common/platform/platform.h"
 
+#ifdef WAPP_PLATFORM_CPP
+BEGIN_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
 void *wapp_mem_util_align_forward(void *ptr, u64 alignment);
 
+#ifdef WAPP_PLATFORM_CPP
+END_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
 #endif // !MEM_UTILS_H

src/base/queue/queue.c

@@ -0,0 +1,85 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#include "queue.h"
+#include "../array/array.h"
+#include "../../common/assert/assert.h"
+#include "../../common/misc/misc_utils.h"
+#include <string.h>
+
+void _queue_push(GenericQueue *queue, void *item, u64 item_size) {
+	wapp_debug_assert(queue != NULL, "`queue` should not be NULL");
+	wapp_runtime_assert(item_size == wapp_array_item_size(queue->items), "Invalid type");
+
+	u64 capacity = wapp_array_capacity(queue->items);
+	if (queue->count >= capacity) { return; }
+
+	u64 index = (queue->back)++;
+	_array_set(queue->items, index, item, item_size);
+	++(queue->count);
+
+	if (queue->back >= capacity) {
+		queue->back = 0;
+	}
+}
+
+GenericQueue *_queue_push_alloc(const Allocator *allocator, GenericQueue *queue, void *item, u64 item_size) {
+	wapp_debug_assert(allocator != NULL && queue != NULL && item != NULL,
+	                  "`allocator`, `queue` and `item` should not be NULL");
+	wapp_runtime_assert(item_size == wapp_array_item_size(queue->items), "Invalid type");
+
+	GenericQueue *output = queue;
+
+	u64 capacity = wapp_array_capacity(queue->items);
+	if (queue->count >= capacity) {
+		u64 new_capacity = wapp_misc_utils_u64_round_up_pow2(capacity * 2);
+		u64 array_size   = _array_calc_alloc_size(new_capacity, item_size);
+		u64 alloc_size   = sizeof(GenericQueue) + array_size;
+		void *buffer     = wapp_mem_allocator_alloc(allocator, alloc_size);
+		if (!buffer) {
+			goto RETURN_QUEUE_PUSH_ALLOC;
+		}
+
+		memset((void *)buffer, 0, alloc_size);
+
+		output        = (GenericQueue *)buffer;
+		output->items = _array_from_preallocated_buffer((void *)(output + 1), array_size, ARRAY_INIT_FILLED, item_size);
+
+		// NOTE (Abdelrahman): When the queue is full, the front and back indices should
+		// always be the same
+		u64 front_count     = capacity - queue->front;
+		u64 back_count      = queue->back;
+		void *copy_boundary = (void *)((uptr)(queue->items) + (queue->front * item_size));
+
+		memcpy(output->items, copy_boundary, front_count * item_size);
+		if (back_count > 0) {
+			void *back_copy_dst = (void *)((uptr)(output->items) + (front_count * item_size));
+			memcpy(back_copy_dst, queue->items, back_count * item_size);
+		}
+
+		output->front = 0;
+		output->back  = front_count + back_count;
+		output->count = queue->count;
+	}
+
+	_queue_push(output, item, item_size);
+
+RETURN_QUEUE_PUSH_ALLOC:
+	return output;
+}
+
+void *_queue_pop(GenericQueue *queue, u64 item_size) {
+	wapp_debug_assert(queue != NULL, "`queue` should not be NULL");
+	wapp_runtime_assert(item_size == wapp_array_item_size(queue->items), "Invalid type");
+
+	if (queue->count == 0) { return NULL; }
+
+	u64 index = (queue->front)++;
+	--(queue->count);
+
+	u64 capacity = wapp_array_capacity(queue->items);
+	if (queue->front >= capacity) {
+		queue->front = 0;
+	}
+
+	return _array_get(queue->items, index, item_size);
+}

src/base/queue/queue.h

@@ -0,0 +1,100 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#ifndef QUEUE_H
+#define QUEUE_H
+
+#include "../array/array.h"
+#include "../mem/allocator/mem_allocator.h"
+#include "../../common/aliases/aliases.h"
+#include "../../common/platform/platform.h"
+
+#ifdef WAPP_PLATFORM_CPP
+BEGIN_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+typedef struct {
+	GenericArray items;
+	u64 front;
+	u64 back;
+	u64 count;
+} GenericQueue;
+
+// NOTE (Abdelrahman): GenericQueue typedefs for readability
+typedef GenericQueue VoidPtrQueue;
+typedef GenericQueue C8Queue;
+typedef GenericQueue C16Queue;
+typedef GenericQueue C32Queue;
+typedef GenericQueue U8Queue;
+typedef GenericQueue U16Queue;
+typedef GenericQueue U32Queue;
+typedef GenericQueue U64Queue;
+typedef GenericQueue B8Queue;
+typedef GenericQueue I8Queue;
+typedef GenericQueue I16Queue;
+typedef GenericQueue I32Queue;
+typedef GenericQueue I64Queue;
+typedef GenericQueue F32Queue;
+typedef GenericQueue F64Queue;
+typedef GenericQueue F128Queue;
+typedef GenericQueue UptrQueue;
+typedef GenericQueue IptrQueue;
+typedef GenericQueue Str8Queue;
+
+#ifdef WAPP_PLATFORM_CPP
+#define wapp_queue(TYPE, CAPACITY) ([&]() {                                                        \
+	wapp_persist GenericArray arr   = wapp_array_with_capacity(TYPE, CAPACITY, ARRAY_INIT_FILLED);   \
+	wapp_persist GenericQueue queue = {                                                              \
+		arr,                                                                                           \
+		0,                                                                                             \
+		0,                                                                                             \
+		0,                                                                                             \
+	};                                                                                               \
+                                                                                                   \
+	return queue;                                                                                    \
+}())
+#define wapp_queue_alloc(TYPE, ALLOCATOR_PTR, CAPACITY) ([&]() {                                   \
+	wapp_persist GenericQueue queue = {                                                              \
+		wapp_array_alloc_capacity(TYPE, ALLOCATOR_PTR, CAPACITY, ARRAY_INIT_FILLED),                   \
+		0,                                                                                             \
+		0,                                                                                             \
+		0,                                                                                             \
+	};                                                                                               \
+                                                                                                   \
+	return queue;                                                                                    \
+}())
+#else
+#define wapp_queue(TYPE, CAPACITY) ((GenericQueue){                                                \
+	.items = wapp_array_with_capacity(TYPE, CAPACITY, ARRAY_INIT_FILLED),                            \
+	.front = 0,                                                                                      \
+	.back  = 0,                                                                                      \
+	.count = 0,                                                                                      \
+})
+#define wapp_queue_alloc(TYPE, ALLOCATOR_PTR, CAPACITY) ((GenericQueue){                           \
+	.items = wapp_array_alloc_capacity(TYPE, ALLOCATOR_PTR, CAPACITY, ARRAY_INIT_FILLED),            \
+	.front = 0,                                                                                      \
+	.back  = 0,                                                                                      \
+	.count = 0,                                                                                      \
+})
+#endif // !WAPP_PLATFORM_CPP
+
+#define wapp_queue_capacity(QUEUE_PTR) (wapp_array_capacity((QUEUE_PTR)->items))
+#define wapp_queue_item_size(QUEUE_PTR) (wapp_array_item_size((QUEUE_PTR)->items))
+#define wapp_queue_push(TYPE, QUEUE_PTR, VALUE_PTR) (                                              \
+	_queue_push(QUEUE_PTR, VALUE_PTR, sizeof(TYPE))                                                  \
+)
+#define wapp_queue_push_alloc(TYPE, ALLOCATOR_PTR, QUEUE_PTR, VALUE_PTR) (                         \
+	_queue_push_alloc(ALLOCATOR_PTR, QUEUE_PTR, VALUE_PTR, sizeof(TYPE))                             \
+)
+#define wapp_queue_pop(TYPE, QUEUE_PTR) (                                                          \
+	(TYPE *)_queue_pop(QUEUE_PTR, sizeof(TYPE))                                                      \
+)
+
+void _queue_push(GenericQueue *queue, void *item, u64 item_size);
+GenericQueue *_queue_push_alloc(const Allocator *allocator, GenericQueue *queue, void *item, u64 item_size);
+void *_queue_pop(GenericQueue *queue, u64 item_size);
+
+#ifdef WAPP_PLATFORM_CPP
+END_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#endif // !QUEUE_H

src/base/strings/str8/str8.c

@@ -0,0 +1,480 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#include "str8.h"
+#include "../../array/array.h"
+#include "../../mem/allocator/mem_allocator.h"
+#include "../../../common/aliases/aliases.h"
+#include "../../../common/assert/assert.h"
+#include <ctype.h>
+#include <stdarg.h>
+#include <stddef.h>
+#include <stdio.h>
+#include <string.h>
+
+#define STR8_BUF_ALLOC_SIZE(CAPACITY) (sizeof(Str8) + sizeof(c8) * CAPACITY)
+
+Str8 *wapp_str8_alloc_buf(const Allocator *allocator, u64 capacity) {
+	wapp_debug_assert(allocator != NULL, "`allocator` should not be NULL");
+
+	Str8 *str = wapp_mem_allocator_alloc(allocator, STR8_BUF_ALLOC_SIZE(capacity));
+	if (!str) {
+		goto RETURN_STR8;
+	}
+
+	str->buf      = (u8 *)str + sizeof(Str8);
+	str->size     = 0;
+	str->capacity = capacity;
+
+RETURN_STR8:
+	return str;
+}
+
+Str8 *wapp_str8_alloc_and_fill_buf(const Allocator *allocator, u64 capacity) {
+	Str8 *out = wapp_str8_alloc_buf(allocator, capacity);
+	if (out) {
+		memset(out->buf, 0, capacity);
+		out->size = capacity;
+	}
+	return out;
+}
+
+Str8 *wapp_str8_alloc_cstr(const Allocator *allocator, const char *str) {
+	wapp_debug_assert(allocator != NULL && str != NULL, "`allocator` and `str` should not be NULL");
+
+	u64 length    = strlen(str);
+	Str8 *output  = wapp_str8_alloc_buf(allocator, length * 2);
+	if (!output) {
+		goto RETURN_ALLOC_CSTR;
+	}
+
+	output->size = length;
+	memcpy(output->buf, str, length);
+
+RETURN_ALLOC_CSTR:
+	return output;
+}
+
+Str8 *wapp_str8_alloc_str8(const Allocator *allocator, Str8RO *str) {
+	wapp_debug_assert(allocator != NULL && str != NULL, "`allocator` and `str` should not be NULL");
+
+	Str8 *output = wapp_str8_alloc_buf(allocator, str->capacity);
+	if (!output) {
+		goto RETURN_ALLOC_STR8;
+	}
+
+	output->size = str->size;
+	memcpy(output->buf, str->buf, str->size);
+
+RETURN_ALLOC_STR8:
+	return output;
+}
+
+Str8 *wapp_str8_alloc_substr(const Allocator *allocator, Str8RO *str, u64 start, u64 end) {
+	wapp_debug_assert(allocator != NULL && str != NULL, "`allocator` and `str` should not be NULL");
+
+	Str8 *output = NULL;
+
+	if (start >= str->size || start >= end) {
+		goto RETURN_ALLOC_SUBSTR;
+	}
+
+	if (end > str->size) {
+		end = str->size;
+	}
+
+	output = wapp_str8_alloc_buf(allocator, str->capacity);
+	if (!output) {
+		goto RETURN_ALLOC_SUBSTR;
+	}
+
+	output->size = end - start;
+	memcpy(output->buf, str->buf + start, output->size);
+
+RETURN_ALLOC_SUBSTR:
+	return output;
+}
+
+void wapp_str8_dealloc_buf(const Allocator *allocator, Str8 **str) {
+	wapp_debug_assert(allocator != NULL && str != NULL && (*str) != NULL, "Either `allocator` is NULL or `str` is an invalid double pointer");
+	wapp_mem_allocator_free(allocator, (void **)str, STR8_BUF_ALLOC_SIZE((*str)->capacity));
+}
+
+c8 wapp_str8_get(const Str8 *str, u64 index) {
+	if (index >= str->size) {
+		return '\0';
+	}
+
+	return str->buf[index];
+}
+
+void wapp_str8_set(Str8 *str, u64 index, c8 c) {
+	if (index >= str->size) {
+		return;
+	}
+
+	str->buf[index] = c;
+}
+
+void wapp_str8_push_back(Str8 *str, c8 c) {
+	if (!(str->size < str->capacity)) {
+		return;
+	}
+
+	u64 index = (str->size)++;
+	wapp_str8_set(str, index, c);
+}
+
+b8 wapp_str8_equal(Str8RO *s1, Str8RO *s2) {
+	if (s1->size != s2->size) {
+		return false;
+	}
+
+	return wapp_str8_equal_to_count(s1, s2, s1->size);
+}
+
+b8 wapp_str8_equal_to_count(Str8RO* s1, Str8RO* s2, u64 count) {
+	if (!s1 || !s2) {
+		return false;
+	}
+
+	return memcmp(s1->buf, s2->buf, count) == 0;
+}
+
+Str8 wapp_str8_slice(Str8RO *str, u64 start, u64 end) {
+	if (start >= str->size || start >= end) {
+		start  = str->size;
+		end    = str->size;
+	}
+
+	if (end > str->size) {
+		end = str->size;
+	}
+
+	return (Str8RO){
+		.capacity = end - start,
+		.size     = end - start,
+		.buf      = str->buf + start,
+	};
+}
+
+Str8 *wapp_str8_alloc_concat(const Allocator *allocator, Str8 *dst, Str8RO *src) {
+	wapp_debug_assert(allocator != NULL && dst != NULL && src != NULL, "`allocator`, `dst` and `src` should not be NULL");
+
+	Str8 *output  = NULL;
+	u64 remaining = dst->capacity - dst->size;
+	if (src->size <= remaining) {
+		output = dst;
+		goto SOURCE_STRING_STR8_CONCAT;
+	}
+
+	u64 capacity = dst->capacity + src->size;
+
+	output = wapp_str8_alloc_buf(allocator, capacity);
+	if (!output) {
+		goto RETURN_STR8_CONCAT;
+	}
+
+	wapp_str8_concat_capped(output, dst);
+
+SOURCE_STRING_STR8_CONCAT:
+	wapp_str8_concat_capped(output, src);
+
+RETURN_STR8_CONCAT:
+	return output;
+}
+
+void wapp_str8_concat_capped(Str8 *dst, Str8RO *src) {
+	wapp_debug_assert(dst != NULL && src != NULL, "`dst` and `src` should not be NULL");
+
+	u64 remaining = dst->capacity - dst->size;
+	u64 to_copy   = remaining < src->size ? remaining : src->size;
+
+	memcpy(dst->buf + dst->size, src->buf, to_copy);
+	dst->size += to_copy;
+}
+
+void wapp_str8_copy_cstr_capped(Str8 *dst, const char *src) {
+	wapp_debug_assert(dst != NULL && src != NULL, "`dst` and `src` should not be NULL");
+
+	u64 length  = strlen(src);
+	u64 to_copy = length <= dst->capacity ? length : dst->capacity;
+
+	memset(dst->buf, 0, dst->size);
+	memcpy(dst->buf, src, to_copy);
+	dst->size = to_copy;
+}
+
+void wapp_str8_copy_str8_capped(Str8 *dst, Str8RO *src) {
+	wapp_debug_assert(dst != NULL && src != NULL, "`dst` and `src` should not be NULL");
+
+	u64 to_copy = src->size <= dst->capacity ? src->size : dst->capacity;
+
+	memset(dst->buf, 0, dst->size);
+	memcpy(dst->buf, src->buf, to_copy);
+	dst->size = to_copy;
+}
+
+void wapp_str8_copy_to_cstr(char *dst, Str8RO *src, u64 dst_capacity) {
+	wapp_debug_assert(dst != NULL && src != NULL, "`dst` and `src` should not be NULL");
+
+	u64 to_copy = src->size < dst_capacity ? src->size : dst_capacity - 1;
+
+	memset(dst, 0, dst_capacity);
+	memcpy(dst, src->buf, to_copy);
+}
+
+void wapp_str8_format(Str8 *dst, const char *format, ...) {
+	wapp_debug_assert(dst != NULL && format != NULL, "`dst` and `format` should not be NULL");
+
+	va_list args1;
+	va_list args2;
+
+	va_start(args1, format);
+	va_copy(args2, args1);
+
+	u64 total_size = vsnprintf(NULL, 0, format, args1);
+	dst->size      = total_size <= dst->capacity ? total_size : dst->capacity;
+
+	vsnprintf((char *)(dst->buf), dst->capacity, format, args2);
+
+	va_end(args1);
+	va_end(args2);
+}
+
+void wapp_str8_to_lower(Str8 *dst, Str8RO *src) {
+	wapp_debug_assert(src != NULL && dst != NULL, "`dst` and `src` should not be NULL");
+	wapp_debug_assert(dst->capacity >= src->capacity, "`dst` does not have enough capacity");
+
+	dst->size = src->size;
+
+	// NOTE (Abdelrahman): Uses a while loop instead of a for loop to get rid of
+	// MSVC Spectre mitigation warnings
+	u64 index  = 0;
+	b8 running = true;
+	while (running) {
+		wapp_str8_set(dst, index, (u8)tolower(wapp_str8_get(src, index)));
+		++index;
+		running = index < src->size;
+	}
+}
+
+void wapp_str8_to_upper(Str8 *dst, Str8RO *src) {
+	wapp_debug_assert(src != NULL && dst != NULL, "`dst` and `src` should not be NULL");
+	wapp_debug_assert(dst->capacity >= src->capacity, "`dst` does not have enough capacity");
+
+	dst->size = src->size;
+
+	// NOTE (Abdelrahman): Uses a while loop instead of a for loop to get rid of
+	// MSVC Spectre mitigation warnings
+	u64 index  = 0;
+	b8 running = true;
+	while (running) {
+		wapp_str8_set(dst, index, (u8)toupper(wapp_str8_get(src, index)));
+		++index;
+		running = index < src->size;
+	}
+}
+
+void wapp_str8_from_bytes(Str8 *dst, const U8Array src) {
+	wapp_debug_assert(src != NULL && dst != NULL, "`dst` and `src` should not be NULL");
+
+	u64 size = wapp_array_count(src) * wapp_array_item_size(src);
+
+	wapp_debug_assert(dst->capacity >= size, "`dst` does not have enough capacity");
+
+	dst->size = size;
+	memcpy(dst->buf, src, size);
+}
+
+i64 wapp_str8_find(Str8RO *str, Str8RO substr) {
+	if (!str || substr.size > str->size) {
+		return -1;
+	}
+
+	// NOTE (Abdelrahman): Uses a while loop instead of a for loop to get rid of
+	// MSVC Spectre mitigation warnings
+	u64 char_index  = 0;
+	b8 running      = char_index < str->size;
+	while (running) {
+		const c8 *sub = str->buf + char_index;
+		if (memcmp(sub, substr.buf, substr.size) == 0) {
+			return char_index;
+		}
+
+		++char_index;
+		running = char_index < str->size;
+	}
+
+	return -1;
+}
+
+i64 wapp_str8_rfind(Str8RO *str, Str8RO substr) {
+	if (!str || substr.size > str->size) {
+		return -1;
+	}
+
+	// NOTE (Abdelrahman): Uses a while loop instead of a for loop to get rid of
+	// MSVC Spectre mitigation warnings
+	i64 char_index = str->size - substr.size;
+	b8 running     = char_index >= 0;
+	while (running) {
+		const c8 *sub = str->buf + char_index;
+		if (memcmp(sub, substr.buf, substr.size) == 0) {
+			return char_index;
+		}
+
+		--char_index;
+		running = char_index >= 0;
+	}
+
+	return -1;
+}
+
+Str8List *wapp_str8_split_with_max(const Allocator *allocator, Str8RO *str, Str8RO *delimiter, i64 max_splits) {
+	wapp_debug_assert(allocator != NULL && str != NULL && delimiter != NULL, "`allocator`, `str` and `delimiter` should not be NULL");
+
+	Str8List *output = wapp_dbl_list_alloc(Str8, allocator);
+
+	if (delimiter->size > str->size) {
+		Str8 *full = wapp_str8_alloc_str8(allocator, str);
+		if (full) {
+			wapp_dbl_list_push_back_alloc(Str8, allocator, output, full);
+		}
+
+		goto RETURN_STR8_SPLIT;
+	}
+
+	i64 start  = 0;
+	i64 end    = 0;
+	i64 splits = 0;
+	Str8 *rest = wapp_str8_alloc_str8(allocator, str);
+	Str8 *before_str;
+
+	while ((end = wapp_str8_find(rest, *delimiter)) != -1) {
+		if (max_splits > 0 && splits >= max_splits) {
+			break;
+		}
+
+		before_str = wapp_str8_alloc_substr(allocator, str, start, start + end);
+		if (before_str) {
+			wapp_dbl_list_push_back_alloc(Str8, allocator, output, before_str);
+		}
+
+		wapp_mem_allocator_free(allocator, (void **)&rest, sizeof(Str8));
+		rest   = wapp_str8_alloc_substr(allocator, str, start + end + delimiter->size, str->size);
+		start += end + delimiter->size;
+
+		++splits;
+	}
+
+	// Ensure the last part of the string after the delimiter is added to the list
+	rest = wapp_str8_alloc_substr(allocator, str, start, str->size);
+	if (rest) {
+		wapp_dbl_list_push_back_alloc(Str8, allocator, output, rest);
+	}
+
+RETURN_STR8_SPLIT:
+	return output;
+}
+
+Str8List *wapp_str8_rsplit_with_max(const Allocator *allocator, Str8RO *str, Str8RO *delimiter, i64 max_splits) {
+	wapp_debug_assert(allocator != NULL && str != NULL && delimiter != NULL, "`allocator`, `str` and `delimiter` should not be NULL");
+
+	Str8List *output = wapp_dbl_list_alloc(Str8, allocator);
+
+	if (delimiter->size > str->size) {
+		Str8 *full = wapp_str8_alloc_str8(allocator, str);
+		if (full) {
+			wapp_dbl_list_push_back_alloc(Str8, allocator, output, full);
+		}
+
+		goto RETURN_STR8_SPLIT;
+	}
+
+	i64 end    = 0;
+	i64 splits = 0;
+	Str8 *rest = wapp_str8_alloc_str8(allocator, str);
+	Str8 *after_str;
+
+	while ((end = wapp_str8_rfind(rest, *delimiter)) != -1) {
+		if (max_splits > 0 && splits >= max_splits) {
+			break;
+		}
+
+		after_str = wapp_str8_alloc_substr(allocator, rest, end + delimiter->size, str->size);
+		if (after_str) {
+			wapp_dbl_list_push_front_alloc(Str8, allocator, output, after_str);
+		}
+
+		wapp_mem_allocator_free(allocator, (void **)&rest, sizeof(Str8));
+		rest = wapp_str8_alloc_substr(allocator, rest, 0, end);
+
+		++splits;
+	}
+
+	rest = wapp_str8_alloc_substr(allocator, str, 0, rest->size);
+	if (rest) {
+		wapp_dbl_list_push_front_alloc(Str8, allocator, output, rest);
+	}
+
+RETURN_STR8_SPLIT:
+	return output;
+}
+
+Str8 *wapp_str8_join(const Allocator *allocator, const Str8List *list, Str8RO *delimiter) {
+	wapp_debug_assert(allocator != NULL && list != NULL && delimiter != NULL, "`allocator`, `list` and `delimiter` should not be NULL");
+
+	u64 capacity = wapp_str8_list_total_size(list) + (delimiter->size * (list->node_count - 1));
+	Str8 *output = wapp_str8_alloc_buf(allocator, capacity * 2);
+
+	// NOTE (Abdelrahman): Uses a while loop instead of a for loop to get rid of
+	// MSVC Spectre mitigation warnings
+	Str8 *node;
+	u64 node_index = 0;
+	b8 running     = node_index < list->node_count;
+	while (running) {
+		node = wapp_dbl_list_get(Str8, list, node_index);
+		if (!node) {
+			break;
+		}
+
+		wapp_str8_concat_capped(output, node);
+
+		// NOTE (Abdelrahman): Comparison extracted to variable to silence
+		// MSVC Spectre mitigation warnings
+		b8 not_last = node_index + 1 < list->node_count;
+		if (not_last) {
+			wapp_str8_concat_capped(output, delimiter);
+		}
+
+		++node_index;
+		running = node_index < list->node_count;
+	}
+
+	return output;
+}
+
+u64 wapp_str8_list_total_size(const Str8List *list) {
+	if (!list) {
+		return 0;
+	}
+
+	// NOTE (Abdelrahman): Uses a while loop instead of a for loop to get rid of
+	// MSVC Spectre mitigation warnings
+	Str8 *node;
+	u64 node_index = 0;
+	u64 output     = 0;
+	b8 running     = node_index < list->node_count;
+	while (running) {
+		node = wapp_dbl_list_get(Str8, list, node_index);
+		if (!node) {
+				break;
+		}
+
+		output += node->size;
+		++node_index;
+		running = node_index < list->node_count;
+	}
+
+	return output;
+}

src/base/strings/str8/str8.h

@@ -1,15 +1,22 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
 #ifndef STR8_H
 #define STR8_H
 
 #include "../../../common/aliases/aliases.h"
+#include "../../../common/assert/assert.h"
 #include "../../../common/platform/platform.h"
-#include "../../../primitives/dbl_list/dbl_list.h"
-#include "../../mem_allocator/mem_allocator.h"
+#include "../../array/array.h"
+#include "../../dbl_list/dbl_list.h"
+#include "../../mem/allocator/mem_allocator.h"
 #include <string.h>
-#include <stdbool.h>
 
-typedef struct str8 Str8;
-struct str8 {
+#ifdef WAPP_PLATFORM_CPP
+BEGIN_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+typedef struct Str8 Str8;
+struct Str8 {
 	u64 capacity;
 	u64 size;
 	c8 *buf;
@@ -26,13 +33,34 @@ typedef const Str8 Str8RO;
 /**
  * Str8 stack buffers
  */
+
+#ifdef WAPP_PLATFORM_CPP
+// Uses a lambda to achieve the same behaviour achieved by the C macro
+#define wapp_str8_buf(CAPACITY) ([&](){ \
+	wapp_persist c8 buf[CAPACITY] = {};   \
+	memset(buf, 0, CAPACITY);             \
+	return Str8{CAPACITY, 0, buf};        \
+}())
+
+// Uses a lambda to achieve the same behaviour achieved by the C macro
+#define wapp_str8_lit(STRING) ([&]() {                            \
+	wapp_persist c8 buf[sizeof(STRING) * 2] = {};                   \
+	memcpy(buf, STRING, sizeof(STRING));                            \
+	return Str8{(sizeof(STRING) - 1) * 2, sizeof(STRING) - 1, buf}; \
+}())
+
+#define wapp_str8_lit_ro(STRING) Str8RO{sizeof(STRING) - 1, sizeof(STRING) - 1, (c8 *)STRING}
+#define wapp_str8_lit_ro_initialiser_list(STRING) {sizeof(STRING) - 1, sizeof(STRING) - 1, (c8 *)STRING}
+#else
 #define wapp_str8_buf(CAPACITY) ((Str8){.capacity = CAPACITY, .size = 0, .buf = (c8[CAPACITY]){0}})
 
 // Utilises the fact that memcpy returns pointer to dest buffer and that getting
 // address of compound literals is valid in C to create a string on the stack
 #define wapp_str8_lit(STRING) ((Str8){.capacity  = (sizeof(STRING) - 1) * 2,               \
                                       .size      = sizeof(STRING) - 1,                     \
-                                      .buf      = memcpy(&((c8 [sizeof(STRING) * 2]){0}), STRING, sizeof(STRING))})
+                                      .buf       = memcpy(&((c8 [sizeof(STRING) * 2]){0}), \
+                                                          STRING,                          \
+                                                          sizeof(STRING))})
 #define wapp_str8_lit_ro(STRING) ((Str8RO){.capacity  = sizeof(STRING) - 1,  \
                                            .size      = sizeof(STRING) - 1,  \
                                            .buf       = (c8 *)STRING})
@@ -42,11 +70,13 @@ typedef const Str8 Str8RO;
 #define wapp_str8_lit_ro_initialiser_list(STRING) {.capacity  = sizeof(STRING) - 1,  \
                                                    .size      = sizeof(STRING) - 1,  \
                                                    .buf       = (c8 *)STRING}
+#endif // !WAPP_PLATFORM_CPP
 
 /**
  * Str8 allocated buffers
  */
 Str8 *wapp_str8_alloc_buf(const Allocator *allocator, u64 capacity);
+Str8 *wapp_str8_alloc_and_fill_buf(const Allocator *allocator, u64 capacity);
 Str8 *wapp_str8_alloc_cstr(const Allocator *allocator, const char *str);
 Str8 *wapp_str8_alloc_str8(const Allocator *allocator, Str8RO *str);
 Str8 *wapp_str8_alloc_substr(const Allocator *allocator, Str8RO *str, u64 start, u64 end);
@@ -61,14 +91,17 @@ void wapp_str8_dealloc_buf(const Allocator *allocator, Str8 **str);
 c8   wapp_str8_get(Str8RO *str, u64 index);
 void wapp_str8_set(Str8 *str, u64 index, c8 c);
 void wapp_str8_push_back(Str8 *str, c8 c);
-bool wapp_str8_equal(Str8RO *s1, Str8RO *s2);
-bool wapp_str8_equal_to_count(Str8RO* s1, Str8RO* s2, u64 count);
+b8   wapp_str8_equal(Str8RO *s1, Str8RO *s2);
+b8   wapp_str8_equal_to_count(Str8RO* s1, Str8RO* s2, u64 count);
 Str8 wapp_str8_slice(Str8RO *str, u64 start, u64 end);
 void wapp_str8_concat_capped(Str8 *dst, Str8RO *src);
 void wapp_str8_copy_cstr_capped(Str8 *dst, const char *src);
 void wapp_str8_copy_str8_capped(Str8 *dst, Str8RO *src);
 void wapp_str8_copy_to_cstr(char *dst, Str8RO *src, u64 dst_capacity);
 void wapp_str8_format(Str8 *dst, const char *format, ...);
+void wapp_str8_to_lower(Str8 *dst, Str8RO *src);
+void wapp_str8_to_upper(Str8 *dst, Str8RO *src);
+void wapp_str8_from_bytes(Str8 *dst, const U8Array src);
 
 /**
  * Str8 find functions
@@ -88,8 +121,10 @@ Str8     *wapp_str8_join(const Allocator *allocator, const Str8List *list, Str8R
 /**
  * Str8 list utilities
  */
-#define wapp_str8_node_from_cstr(STRING) wapp_str8_list_node(&wapp_str8_lit(STRING))
-#define wapp_str8_node_from_str8(STRING) wapp_str8_list_node(&(STRING))
 u64 wapp_str8_list_total_size(const Str8List *list);
 
+#ifdef WAPP_PLATFORM_CPP
+END_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
 #endif // !STR8_H

src/base/wapp_base.c

@@ -0,0 +1,14 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#ifndef WAPP_BASE_C
+#define WAPP_BASE_C
+
+#include "wapp_base.h"
+#include "array/array.c"
+#include "dbl_list/dbl_list.c"
+#include "queue/queue.c"
+#include "mem/allocator/mem_allocator.c"
+#include "mem/utils/mem_utils.c"
+#include "strings/str8/str8.c"
+
+#endif // !WAPP_BASE_C

src/base/wapp_base.h

@@ -0,0 +1,14 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#ifndef WAPP_BASE_H
+#define WAPP_BASE_H
+
+#include "array/array.h"
+#include "dbl_list/dbl_list.h"
+#include "queue/queue.h"
+#include "mem/allocator/mem_allocator.h"
+#include "mem/utils/mem_utils.h"
+#include "strings/str8/str8.h"
+#include "../common/wapp_common.h"
+
+#endif // !WAPP_BASE_H

src/common/aliases/aliases.h

@@ -1,45 +1,67 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
 #ifndef ALIASES_H
 #define ALIASES_H
 
 #include "../platform/platform.h"
 #include <stdint.h>
 
-#if WAPP_PLATFORM_C_VERSION >= WAPP_PLATFORM_C11_VERSION
+#if defined(WAPP_PLATFORM_C) && WAPP_PLATFORM_C_VERSION >= WAPP_PLATFORM_C11_VERSION && !defined(WAPP_PLATFORM_APPLE)
 	#include <uchar.h>
 
 	#if WAPP_PLATFORM_C_VERSION >= WAPP_PLATFORM_C23_VERSION
-    #define c8 char8_t
+		typedef char8_t c8;
 	#else
-    #define c8 uint8_t
+		typedef uint8_t c8;
 	#endif // !WAPP_PLATFORM_C23_VERSION
 
-  #define c16 char16_t
-  #define c32 char32_t
+	typedef char16_t c16;
+	typedef char32_t c32;
 #else
-  #define c8 uint8_t
-  #define c16 uint16_t
-  #define c32 uint32_t
-#endif // !WAPP_PLATFORM_C11_VERSION
+	typedef uint8_t c8;
+	typedef uint16_t c16;
+	typedef uint32_t c32;
+#endif // !WAPP_PLATFORM_C
 
-#define u8 uint8_t
-#define u16 uint16_t
-#define u32 uint32_t
-#define u64 uint64_t
+typedef uint8_t u8;
+typedef uint16_t u16;
+typedef uint32_t u32;
+typedef uint64_t u64;
 
-#define i8 int8_t
-#define i16 int16_t
-#define i32 int32_t
-#define i64 int64_t
+typedef uint8_t b8;
 
-#define f32 float
-#define f64 double
-#define f128 long double
+#ifndef WAPP_PLATFORM_CPP
 
-#define uptr uintptr_t
-#define iptr intptr_t
+#ifndef false
+#define false (b8)0
+#endif // !false
 
-#define external extern
-#define internal static
-#define persistent static
+#ifndef true
+#define true (b8)1
+#endif // !true
+
+#endif // !WAPP_PLATFORM_CPP
+
+typedef int8_t i8;
+typedef int16_t i16;
+typedef int32_t i32;
+typedef int64_t i64;
+
+typedef float f32;
+typedef double f64;
+typedef long double f128;
+
+typedef uintptr_t uptr;
+typedef intptr_t iptr;
+
+#define wapp_extern extern
+#define wapp_intern static
+#define wapp_persist static
+
+#ifdef WAPP_PLATFORM_CPP
+#define wapp_class_mem static
+#define BEGIN_C_LINKAGE extern "C" {
+#define END_C_LINKAGE }
+#endif // WAPP_PLATFORM_CPP
 
 #endif // !ALIASES_H

src/common/assert/assert.h

@@ -0,0 +1,61 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#ifndef WAPP_ASSERT_H
+#define WAPP_ASSERT_H
+
+#include "../aliases/aliases.h"
+#include "../platform/platform.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <inttypes.h>
+
+#ifdef WAPP_PLATFORM_CPP
+BEGIN_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#define wapp_static_assert(EXPR, MSG) extern char ASSERTION_FAILED[EXPR ? 1 : -1]
+
+#ifndef WAPP_NO_RUNTIME_ASSERT
+	#define wapp_runtime_assert(EXPR, MSG) __wapp_runtime_assert(EXPR, MSG)
+#else
+	#define wapp_runtime_assert(EXPR, MSG)
+#endif
+
+#ifdef WAPP_DEBUG_ASSERT
+	#define wapp_debug_assert(EXPR, MSG) wapp_runtime_assert(EXPR, MSG)
+#else
+	#define wapp_debug_assert(EXPR, MSG)
+#endif
+
+#ifdef WAPP_PLATFORM_WINDOWS
+#define __wapp_runtime_assert(EXPR, MSG) do {                                       \
+	__pragma(warning(push))                                                           \
+	__pragma(warning(disable:4127))                                                   \
+	if (!(EXPR)) {                                                                    \
+	__pragma(warning(pop))                                                            \
+		__runtime_assert_failed(EXPR, MSG);                                             \
+	}                                                                                 \
+} while(false)
+#else
+#define __wapp_runtime_assert(EXPR, MSG) do {                                       \
+	if (!(EXPR)) {                                                                    \
+		__runtime_assert_failed(EXPR, MSG);                                             \
+	}                                                                                 \
+} while(false)
+#endif // !WAPP_PLATFORM_WINDOWS
+
+#define __runtime_assert_failed(EXPR, MSG) do {                                     \
+	fprintf(                                                                          \
+		stderr,                                                                         \
+		"%s:%d (In function `%s`): Assertion failed (%" PRIu32 ")\nDiagnostic: %s\n\n", \
+		__FILE__, __LINE__, __func__,                                                   \
+		EXPR, MSG                                                                       \
+	);                                                                                \
+	abort();                                                                          \
+} while(false)
+
+#ifdef WAPP_PLATFORM_CPP
+END_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#endif // !WAPP_ASSERT_H

src/common/misc/misc_utils.h

@@ -1,14 +1,29 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
 #ifndef MISC_UTILS_H
 #define MISC_UTILS_H
 
 #include "../aliases/aliases.h"
 
-#define KB(SIZE) (SIZE * 1024ull)
-#define MB(SIZE) (KB(SIZE) * 1024)
-#define GB(SIZE) (MB(SIZE) * 1024)
-#define TB(SIZE) (GB(SIZE) * 1024)
+#ifdef WAPP_PLATFORM_CPP
+BEGIN_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
 
-#define wapp_misc_utils_padding_size(SIZE) u8 reserved_padding[sizeof(void *) - ((SIZE) % sizeof(void *))]
+#define KiB(SIZE) (((u64)SIZE) << 10)
+#define MiB(SIZE) (((u64)SIZE) << 20)
+#define GiB(SIZE) (((u64)SIZE) << 30)
+#define TiB(SIZE) (((u64)SIZE) << 40)
+#define PiB(SIZE) (((u64)SIZE) << 50)
+#define EiB(SIZE) (((u64)SIZE) << 60)
+
+#define KB(SIZE) (((u64)SIZE) * 1000llu)
+#define MB(SIZE) (KB(SIZE)    * 1000llu)
+#define GB(SIZE) (MB(SIZE)    * 1000llu)
+#define TB(SIZE) (GB(SIZE)    * 1000llu)
+#define PB(SIZE) (TB(SIZE)    * 1000llu)
+#define EB(SIZE) (PB(SIZE)    * 1000llu)
+
+#define wapp_misc_utils_reserve_padding(SIZE) u8 reserved_padding[sizeof(void *) - ((SIZE) % sizeof(void *))]
 
 #define U64_RSHIFT_OR_1(X)  (((u64)X) | (((u64)X) >> 1))
 #define U64_RSHIFT_OR_2(X)  (((u64)X) | (((u64)X) >> 2))
@@ -32,6 +47,17 @@
 	) + 1                                        \
 )
 
+#define wapp_is_power_of_two(NUM) ((NUM & (NUM - 1)) == 0)
+#define wapp_pointer_offset(PTR, OFFSET) ((void *)((uptr)(PTR) + (OFFSET)))
+
+#ifdef WAPP_PLATFORM_CPP
+END_C_LINKAGE
+
+#include <tuple>
+
+#define wapp_misc_utils_va_args_count(T, ...) (std::tuple_size<decltype(std::make_tuple(__VA_ARGS__))>::value)
+#else
 #define wapp_misc_utils_va_args_count(T, ...) (sizeof((T[]){__VA_ARGS__})/sizeof(T))
+#endif // !WAPP_PLATFORM_CPP
 
 #endif // !MISC_UTILS_H

src/common/platform/platform.h

@@ -1,3 +1,5 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
 #ifndef PLATFORM_H
 #define PLATFORM_H
 
@@ -59,7 +61,30 @@
 #endif
 
 #ifdef __cplusplus
-  #error "WAPP is a C only library"
+	#define WAPP_PLATFORM_CPP
+	#define WAPP_PLATFORM_CPP_VERSION __cplusplus
+	#define WAPP_PLATFORM_CPP98_VERSION 199711L
+	#define WAPP_PLATFORM_CPP11_VERSION 201103L
+	#define WAPP_PLATFORM_CPP14_VERSION 201402L
+	#define WAPP_PLATFORM_CPP17_VERSION 201703L
+	#define WAPP_PLATFORM_CPP20_VERSION 202002L
+	#define WAPP_PLATFORM_CPP23_VERSION 202302L
+
+	#if WAPP_PLATFORM_CPP_VERSION == WAPP_PLATFORM_CPP98_VERSION
+		#define WAPP_PLATFORM_CPP98
+	#elif WAPP_PLATFORM_CPP_VERSION == WAPP_PLATFORM_CPP11_VERSION
+		#define WAPP_PLATFORM_CPP11
+	#elif WAPP_PLATFORM_CPP_VERSION == WAPP_PLATFORM_CPP14_VERSION
+		#define WAPP_PLATFORM_CPP14
+	#elif WAPP_PLATFORM_CPP_VERSION == WAPP_PLATFORM_CPP17_VERSION
+		#define WAPP_PLATFORM_CPP17
+	#elif WAPP_PLATFORM_CPP_VERSION == WAPP_PLATFORM_CPP20_VERSION
+		#define WAPP_PLATFORM_CPP20
+	#elif WAPP_PLATFORM_CPP_VERSION == WAPP_PLATFORM_CPP23_VERSION
+		#define WAPP_PLATFORM_CPP23
+	#else
+		#error "Unrecognised C++ version"
+	#endif
 #else
 	#define WAPP_PLATFORM_C
 

src/common/wapp_common.h

@@ -1,7 +1,10 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
 #ifndef WAPP_COMMON_H
 #define WAPP_COMMON_H
 
 #include "aliases/aliases.h"
+#include "assert/assert.h"
 #include "misc/misc_utils.h"
 #include "platform/platform.h"
 

src/core/mem/arena/mem_arena.c

@@ -1,145 +0,0 @@
-#include "mem_arena.h"
-#include "../utils/mem_utils.h"
-#include "../../../common/aliases/aliases.h"
-#include "../../../common/misc/misc_utils.h"
-#include "../../os/mem/mem_os.h"
-#include <stdbool.h>
-#include <stdlib.h>
-#include <string.h>
-#include <assert.h>
-
-#ifndef DEFAULT_ALIGNMENT
-// Why 2 * sizeof(void *) instead of sizeof(void *)
-// https://handmade.network/forums/t/6860-alignment_arena_allocator
-#define DEFAULT_ALIGNMENT (2 * sizeof(void *))
-#endif /* ifndef DEFAULT_ALIGNMENT */
-
-#define ARENA_MINIMUM_CAPACITY KB(16) // Allocate minimum of 4 pages
-
-struct arena {
-  u8 *buf;
-  u8 *offset;
-  u64 capacity;
-  bool committed;
-
-#ifdef WAPP_PLATFORM_WINDOWS
-  wapp_misc_utils_padding_size(sizeof(u8 *) * 2 + sizeof(u64) + sizeof(bool));
-#endif // ifdef WAPP_PLATFORM_WINDOWS
-};
-
-bool wapp_mem_arena_init_custom(Arena **arena, u64 base_capacity, MemAllocFlags flags, bool zero_buffer) {
-  if (!arena || *arena || base_capacity == 0) {
-    return false;
-  }
-
-  *arena = (Arena *)calloc(1, sizeof(Arena));
-  Arena *arena_ptr = *arena;
-  if (!arena_ptr) {
-    return false;
-  }
-
-  u64 arena_capacity = wapp_misc_utils_u64_round_up_pow2(
-      base_capacity >= ARENA_MINIMUM_CAPACITY ?
-      base_capacity :
-      ARENA_MINIMUM_CAPACITY
-  );
-
-  arena_ptr->buf = (u8 *)wapp_mem_util_alloc(NULL, arena_capacity, WAPP_MEM_ACCESS_READ_WRITE, flags,
-                                             zero_buffer ? WAPP_MEM_INIT_INITIALISED : WAPP_MEM_INIT_UNINITIALISED);
-
-  if (!(arena_ptr->buf)) {
-    wapp_mem_arena_destroy(arena);
-    return false;
-  }
-
-  arena_ptr->capacity  = arena_capacity;
-  arena_ptr->offset    = arena_ptr->buf;
-  arena_ptr->committed = (flags & WAPP_MEM_ALLOC_COMMIT) == WAPP_MEM_ALLOC_COMMIT;
-
-  return true;
-}
-
-void *wapp_mem_arena_alloc(Arena *arena, u64 size) {
-  return wapp_mem_arena_alloc_aligned(arena, size, DEFAULT_ALIGNMENT);
-}
-
-void *wapp_mem_arena_alloc_aligned(Arena *arena, u64 size, u64 alignment) {
-  assert(arena != NULL);
-
-  u8 *alloc_start = arena->offset;
-
-  u8 *output = wapp_mem_util_align_forward((void *)alloc_start, alignment);
-  if (output + size >= arena->buf + arena->capacity) {
-    return NULL;
-  }
-
-  arena->offset = output + size;
-
-#ifdef WAPP_PLATFORM_WINDOWS
-  if (!(arena->committed)) {
-    wapp_mem_util_alloc(alloc_start, (uptr)(arena->offset) - (uptr)(alloc_start),
-                        WAPP_MEM_ACCESS_READ_WRITE, WAPP_MEM_ALLOC_COMMIT,
-                        WAPP_MEM_INIT_UNINITIALISED);
-  }
-#endif // ifdef WAPP_PLATFORM_WINDOWS
-
-  memset(output, 0, size);
-
-  return (void *)output;
-}
-
-void *wapp_mem_arena_realloc(Arena *arena, void *ptr, u64 old_size, u64 new_size) {
-  if ((u8*)ptr < arena->buf || (u8*)ptr > arena->offset ||
-      arena->offset + new_size >= arena->buf + arena->capacity) {
-    return NULL;
-  }
-
-  void *new_ptr = wapp_mem_arena_alloc(arena, new_size);
-  if (!new_ptr) {
-    return NULL;
-  }
-
-  u64 copy_size = new_size <= old_size ? new_size : old_size;
-  memcpy(new_ptr, ptr, copy_size);
-
-  return new_ptr;
-}
-
-void *wapp_mem_arena_realloc_aligned(Arena *arena, void *ptr, u64 old_size, u64 new_size, u64 alignment) {
-  if ((u8*)ptr < arena->buf || (u8*)ptr > arena->offset ||
-      arena->offset + new_size >= arena->buf + arena->capacity) {
-    return NULL;
-  }
-
-  void *new_ptr = wapp_mem_arena_alloc_aligned(arena, new_size, alignment);
-  if (!new_ptr) {
-    return NULL;
-  }
-
-  u64 copy_size = new_size <= old_size ? new_size : old_size;
-  memcpy(new_ptr, ptr, copy_size);
-
-  return new_ptr;
-}
-
-void wapp_mem_arena_clear(Arena *arena) {
-  assert(arena != NULL);
-
-  memset(arena->buf, 0, arena->offset - arena->buf);
-  arena->offset = arena->buf;
-}
-
-void wapp_mem_arena_destroy(Arena **arena) {
-  assert(arena != NULL && (*arena) != NULL);
-
-  Arena *arena_ptr = *arena;
-  if (arena_ptr->buf) {
-    wapp_mem_util_free(arena_ptr->buf, arena_ptr->capacity);
-  }
-
-  arena_ptr->buf = arena_ptr->offset = NULL;
-  arena_ptr->capacity = 0;
-
-  free(*arena);
-  *arena = NULL;
-}

src/core/mem/arena/mem_arena.h

@@ -1,33 +0,0 @@
-#ifndef MEM_ARENA_H
-#define MEM_ARENA_H
-
-#include "../../../common/aliases/aliases.h"
-#include "../../../common/platform/platform.h"
-#include "../../os/mem/mem_os.h"
-#include <stdbool.h>
-
-typedef struct arena Arena;
-
-#define wapp_mem_arena_init(arena_dptr, base_capacity)                         \
-  (wapp_mem_arena_init_custom(arena_dptr, base_capacity, WAPP_MEM_ALLOC_RESERVE, false))
-#define wapp_mem_arena_init_commit(arena_dptr, base_capacity)                  \
-  (wapp_mem_arena_init_custom(arena_dptr, base_capacity, WAPP_MEM_ALLOC_RESERVE | WAPP_MEM_ALLOC_COMMIT, false))
-#define wapp_mem_arena_init_zero(arena_dptr, base_capacity)                    \
-  (wapp_mem_arena_init_custom(arena_dptr, base_capacity, WAPP_MEM_ALLOC_RESERVE, true))
-#define wapp_mem_arena_init_commit_and_zero(arena_dptr, base_capacity)         \
-  (wapp_mem_arena_init_custom(arena_dptr, base_capacity, WAPP_MEM_ALLOC_RESERVE | WAPP_MEM_ALLOC_COMMIT, true))
-
-/**
- * Arena initialisation function. `wapp_mem_arena_init_custom` provides the most
- * control over how the Arena is initialised. Wrapper macros are provided for
- * easier use.
- */
-bool wapp_mem_arena_init_custom(Arena **arena, u64 base_capacity, MemAllocFlags flags, bool zero_buffer);
-void *wapp_mem_arena_alloc(Arena *arena, u64 size);
-void *wapp_mem_arena_alloc_aligned(Arena *arena, u64 size, u64 alignment);
-void *wapp_mem_arena_realloc(Arena *arena, void *ptr, u64 old_size, u64 new_size);
-void *wapp_mem_arena_realloc_aligned(Arena *arena, void *ptr, u64 old_size, u64 new_size, u64 alignment);
-void wapp_mem_arena_clear(Arena *arena);
-void wapp_mem_arena_destroy(Arena **arena);
-
-#endif // !MEM_ARENA_H

src/core/mem/arena/mem_arena_allocator.c

@@ -1,57 +0,0 @@
-#include "mem_arena_allocator.h"
-#include "mem_arena.h"
-#include "../../../common/aliases/aliases.h"
-#include "../../os/mem/mem_os.h"
-
-internal inline void *mem_arena_alloc(u64 size, void *alloc_obj);
-internal inline void *mem_arena_alloc_aligned(u64 size, u64 alignment, void *alloc_obj);
-internal inline void *mem_arena_realloc(void *ptr, u64 old_size, u64 new_size, void *alloc_obj);
-internal inline void *mem_arena_realloc_aligned(void *ptr, u64 old_size, u64 new_size, u64 alignment,
-                                                void *alloc_obj);
-
-
-Allocator wapp_mem_arena_allocator_init_custom(u64 base_capacity, MemAllocFlags flags, bool zero_buffer) {
-  Allocator allocator = {0};
-  bool initialised = wapp_mem_arena_init_custom((Arena **)(&allocator.obj), base_capacity, flags, zero_buffer);
-  if (!initialised) {
-    return allocator;
-  }
-
-  allocator.alloc           = mem_arena_alloc;
-  allocator.alloc_aligned   = mem_arena_alloc_aligned;
-  allocator.realloc         = mem_arena_realloc;
-  allocator.realloc_aligned = mem_arena_realloc_aligned;
-
-  return allocator;
-}
-
-void wapp_mem_arena_allocator_clear(Allocator *allocator) {
-  wapp_mem_arena_clear((Arena *)(allocator->obj));
-}
-
-void wapp_mem_arena_allocator_destroy(Allocator *allocator) {
-  wapp_mem_arena_destroy((Arena **)(&(allocator->obj)));
-  *allocator = (Allocator){0};
-}
-
-
-internal inline void *mem_arena_alloc(u64 size, void *alloc_obj) {
-  Arena *arena = (Arena *)alloc_obj;
-  return wapp_mem_arena_alloc(arena, size);
-}
-
-internal inline void *mem_arena_alloc_aligned(u64 size, u64 alignment, void *alloc_obj) {
-  Arena *arena = (Arena *)alloc_obj;
-  return wapp_mem_arena_alloc_aligned(arena, size, alignment);
-}
-
-internal inline void *mem_arena_realloc(void *ptr, u64 old_size, u64 new_size, void *alloc_obj) {
-  Arena *arena = (Arena *)alloc_obj;
-  return wapp_mem_arena_realloc(arena, ptr, old_size, new_size);
-}
-
-internal inline void *mem_arena_realloc_aligned(void *ptr, u64 old_size, u64 new_size, u64 alignment,
-                                                void *alloc_obj) {
-  Arena *arena = (Arena *)alloc_obj;
-  return wapp_mem_arena_realloc_aligned(arena, ptr, old_size, new_size, alignment);
-}

src/core/mem/arena/mem_arena_allocator.h

@@ -1,34 +0,0 @@
-#ifndef MEM_ARENA_ALLOCATOR_H
-#define MEM_ARENA_ALLOCATOR_H
-
-#include "../../../common/aliases/aliases.h"
-#include "../../../common/platform/platform.h"
-#include "../../../primitives/mem_allocator/mem_allocator.h"
-#include "../../os/mem/mem_os.h"
-#include <stdbool.h>
-
-#define wapp_mem_arena_allocator_init(base_capacity)                           \
-  (wapp_mem_arena_allocator_init_custom(base_capacity, WAPP_MEM_ALLOC_RESERVE, false))
-#define wapp_mem_arena_allocator_init_commit(base_capacity)                    \
-  (wapp_mem_arena_allocator_init_custom(base_capacity, WAPP_MEM_ALLOC_RESERVE | WAPP_MEM_ALLOC_COMMIT, false))
-#define wapp_mem_arena_allocator_init_zero(base_capacity)                      \
-  (wapp_mem_arena_allocator_init_custom(base_capacity, WAPP_MEM_ALLOC_RESERVE, true))
-#define wapp_mem_arena_allocator_init_commit_and_zero(base_capacity)           \
-  (wapp_mem_arena_allocator_init_custom(base_capacity, WAPP_MEM_ALLOC_RESERVE | WAPP_MEM_ALLOC_COMMIT, true))
-
-/**
- * Wraps an Arena in an Allocator object. It attempts to initialise the Arena
- * and, if successful, defines the operations supported by it to be used by the
- * Allocator.
- *
- * An Arena allocator only supports normal allocation and aligned allocation.
- * Reallocation, aligned reallocation and freeing aren't implemented.
- *
- * The `wapp_mem_arena_allocator_init_custom` provides the most control over how
- * the Arena is initialised. Wrapper macros are provided for easier use.
- */
-Allocator wapp_mem_arena_allocator_init_custom(u64 base_capacity, MemAllocFlags flags, bool zero_buffer);
-void wapp_mem_arena_allocator_clear(Allocator *allocator);
-void wapp_mem_arena_allocator_destroy(Allocator *allocator);
-
-#endif // !MEM_ARENA_ALLOCATOR_H

src/core/mem/utils/mem_utils.c

@@ -1,25 +0,0 @@
-#include "mem_utils.h"
-#include "../../../common/aliases/aliases.h"
-#include <stdbool.h>
-#include <stddef.h>
-#include <assert.h>
-
-internal bool is_power_of_two(u64 num) { return (num & (num - 1)) == 0; }
-
-void *wapp_mem_util_align_forward(void *ptr, u64 alignment) {
-  assert(ptr != NULL);
-  assert(is_power_of_two(alignment));
-
-  uptr p = (uptr)ptr;
-  uptr align = (uptr)alignment;
-
-  // Similar to p % align, but it's a faster implementation that works fine
-  // because align is guaranteed to be a power of 2
-  uptr modulo = p & (align - 1);
-
-  if (modulo != 0) {
-    p += align - modulo;
-  }
-
-  return (void *)p;
-}

src/core/os/cpath/cpath.c

@@ -1,134 +0,0 @@
-#include "cpath.h"
-#include "../../../common/aliases/aliases.h"
-#include "../../../common/misc/misc_utils.h"
-#include "../../mem/arena/mem_arena_allocator.h"
-#include "../../../primitives/dbl_list/dbl_list.h"
-#include "../../../primitives/mem_allocator/mem_allocator.h"
-#include "../../../primitives/strings/str8/str8.h"
-#include <stdarg.h>
-#include <stdbool.h>
-#include <stdio.h>
-#include <string.h>
-
-u32 wapp_cpath_join_path(Str8 *dst, const Str8List *parts) {
-  if (!dst || !parts) {
-    return CPATH_JOIN_INVALID_ARGS;
-  }
-
-  if (parts->node_count == 0) {
-    return CPATH_JOIN_EMPTY_PARTS;
-  }
-
-  Str8 separator = wapp_str8_buf(4);
-  wapp_str8_push_back(&separator, PATH_SEP);
-
-  u64 required_capacity = parts->node_count * separator.size + wapp_str8_list_total_size(parts);
-  if (dst->capacity < required_capacity) {
-    return CPATH_JOIN_INSUFFICIENT_DST_CAPACITY;
-  }
-
-  // Handle first node
-  const Str8Node *first_node = wapp_str8_list_get(parts, 0);
-  wapp_str8_copy_str8_capped(dst, first_node->item);
-
-  // NOTE (Abdelrahman): Uses a while loop instead of a for loop to get rid of
-  // MSVC Spectre mitigation warnings
-  const Str8Node *node = first_node;
-  u64 node_index       = 1;
-  bool running         = node_index < parts->node_count;
-  while (running && node->next) {
-    node = node->next;
-    if (node->item->size == 0) {
-      continue;
-    }
-
-    if (dst->size > 0) {
-      char dst_last = wapp_str8_get(dst, dst->size - 1);
-      char node_start = wapp_str8_get(node->item, 0);
-      bool add_path_sep = dst_last != PATH_SEP && node_start != PATH_SEP;
-
-      if (add_path_sep) {
-        wapp_str8_concat_capped(dst, &separator);
-      }
-    }
-
-    wapp_str8_concat_capped(dst, node->item);
-
-    ++node_index;
-    running = node_index < parts->node_count;
-  }
-
-  return CPATH_JOIN_SUCCESS;
-}
-
-Str8 *dirup(const Allocator *allocator, Str8RO *path, u64 levels) {
-  Str8 *output = NULL;
-  if (!allocator || !path) {
-    goto RETURN_DIRUP;
-  }
-
-  bool absolute  = wapp_str8_get(path, 0) == PATH_SEP;
-  Str8 separator = wapp_str8_buf(4);
-  wapp_str8_push_back(&separator, PATH_SEP);
-
-  if (path->size == 0) {
-    output = wapp_str8_alloc_buf(allocator, 16);
-    if (!output) {
-      goto RETURN_DIRUP;
-    }
-
-    wapp_str8_push_back(output, absolute ? PATH_SEP : '.');
-    goto RETURN_DIRUP;
-  }
-
-  if (levels < 1) {
-    output = wapp_str8_alloc_str8(allocator, path);
-    goto RETURN_DIRUP;
-  }
-
-  Allocator tmp_arena = wapp_mem_arena_allocator_init(MB(8));
-  if (wapp_mem_allocator_invalid(&tmp_arena)) {
-    goto RETURN_DIRUP;
-  }
-
-  Str8List *parts = wapp_str8_split(&tmp_arena, path, &separator);
-  if (!parts) {
-    goto RETURN_DIRUP;
-  }
-
-  if (levels >= parts->node_count) {
-    output = wapp_str8_alloc_buf(allocator, 16);
-    if (!output) {
-      goto LIST_CLEANUP_DIRUP;
-    }
-
-    wapp_str8_push_back(output, absolute ? PATH_SEP : '.');
-  } else {
-    for (u64 i = 0; i < levels; ++i) {
-      wapp_str8_list_pop_back(parts);
-    }
-    
-    u64 alignment  = sizeof(void *) * 2;
-    u64 alloc_size = wapp_str8_list_total_size(parts) + parts->node_count * separator.size;
-    u64 modulo     = alloc_size & (alignment - 1);
-    alloc_size    += alignment - modulo;
-
-    output = wapp_str8_alloc_buf(allocator, alloc_size);
-    if (output) {
-      if (absolute) {
-        wapp_str8_push_back(output, PATH_SEP);
-      }
-
-      Str8 *joined = wapp_str8_join(&tmp_arena, parts, &separator);
-      if (joined) {
-        wapp_str8_concat_capped(output, joined);
-      }
-    }
-  }
-
-LIST_CLEANUP_DIRUP:
-  wapp_mem_arena_allocator_destroy(&tmp_arena);
-
-RETURN_DIRUP:
-  return output;
-}

src/core/os/cpath/cpath.h

@@ -1,30 +0,0 @@
-#ifndef CPATH_H
-#define CPATH_H
-
-#include "../../../common/aliases/aliases.h"
-#include "../../../common/platform/platform.h"
-#include "../../../primitives/mem_allocator/mem_allocator.h"
-#include "../../../primitives/strings/str8/str8.h"
-
-#ifdef WAPP_PLATFORM_POSIX
-#define PATH_SEP '/'
-#elif defined(WAPP_PLATFORM_WINDOWS)
-#define PATH_SEP '\\'
-#else
-#error "Unrecognised platform"
-#endif
-
-#define wapp_cpath_dirname(ALLOCATOR, PATH) dirup(ALLOCATOR, PATH, 1)
-#define wapp_cpath_dirup(ALLOCATOR, PATH, COUNT) dirup(ALLOCATOR, PATH, COUNT)
-
-enum {
-  CPATH_JOIN_SUCCESS = 0,
-  CPATH_JOIN_INVALID_ARGS,
-  CPATH_JOIN_EMPTY_PARTS,
-  CPATH_JOIN_INSUFFICIENT_DST_CAPACITY,
-};
-
-u32  wapp_cpath_join_path(Str8 *dst, const Str8List *parts);
-Str8 *dirup(const Allocator *allocator, Str8RO *path, u64 levels);
-
-#endif // !CPATH_H

src/core/os/mem/mem_os.c

@@ -1,29 +0,0 @@
-#include "mem_os.h"
-#include "mem_os_ops.h"
-#include "../../../common/aliases/aliases.h"
-#include "../../../common/platform/platform.h"
-#include <assert.h>
-#include <stdbool.h>
-#include <string.h>
-
-#if defined(WAPP_PLATFORM_WINDOWS)
-#include "win/mem_os_win.h"
-#elif defined(WAPP_PLATFORM_POSIX)
-#include "posix/mem_os_posix.h"
-#else
-#error "Unrecognised platform"
-#endif
-
-void *wapp_mem_util_alloc(void *addr, u64 size, MemAccess access, MemAllocFlags flags, MemInitType type) {
-  void *output = mem_util_allocate(addr, size, access, flags, type);
-
-  if (type == WAPP_MEM_INIT_INITIALISED) {
-    memset(output, 0, size);
-  }
-
-  return output;
-}
-
-void wapp_mem_util_free(void *ptr, u64 size) {
-  mem_util_free(ptr, size);
-}

src/core/os/mem/mem_os.h

@@ -1,23 +0,0 @@
-#ifndef MEM_OS_H
-#define MEM_OS_H
-
-#include "../../../common/aliases/aliases.h"
-#include "../../../common/platform/platform.h"
-
-#include "mem_os_ops.h"
-
-#if defined(WAPP_PLATFORM_WINDOWS)
-#include "win/mem_os_win.h"
-#elif defined(WAPP_PLATFORM_POSIX)
-#include "posix/mem_os_posix.h"
-#else
-#error "Unrecognised platform"
-#endif
-
-void *wapp_mem_util_alloc(void *addr, u64 size, MemAccess access, MemAllocFlags flags, MemInitType type);
-void wapp_mem_util_free(void *ptr, u64 size);
-
-external void *mem_util_allocate(void *addr, u64 size, MemAccess access, MemAllocFlags flags, MemInitType type);
-external void mem_util_free(void *ptr, u64 size);
-
-#endif // !MEM_OS_H

src/core/os/mem/mem_os_ops.h

@@ -1,20 +0,0 @@
-#ifndef MEM_OS_OPS_H
-#define MEM_OS_OPS_H
-
-#include "../../../common/platform/platform.h"
-
-typedef enum mem_access {
-  WAPP_MEM_ACCESS_NONE,
-  WAPP_MEM_ACCESS_READ_ONLY,
-  WAPP_MEM_ACCESS_EXEC_ONLY,
-  WAPP_MEM_ACCESS_READ_WRITE,
-  WAPP_MEM_ACCESS_READ_EXEC,
-  WAPP_MEM_ACCESS_READ_WRITE_EXEC,
-} MemAccess;
-
-typedef enum mem_init_type {
-  WAPP_MEM_INIT_UNINITIALISED,
-  WAPP_MEM_INIT_INITIALISED,
-} MemInitType;
-
-#endif // !MEM_OS_OPS_H

src/core/os/mem/posix/mem_os_posix.c

@@ -1,34 +0,0 @@
-#include "../../../../common/aliases/aliases.h"
-#include "../../../../common/platform/platform.h"
-
-#ifdef WAPP_PLATFORM_POSIX
-
-#include "mem_os_posix.h"
-#include "../mem_os_ops.h"
-#include <sys/mman.h>
-
-internal const i32 access_types[] = {
-    [WAPP_MEM_ACCESS_NONE]            = PROT_NONE,
-    [WAPP_MEM_ACCESS_READ_ONLY]       = PROT_READ,
-    [WAPP_MEM_ACCESS_EXEC_ONLY]       = PROT_EXEC,
-    [WAPP_MEM_ACCESS_READ_WRITE]      = PROT_READ | PROT_WRITE,
-    [WAPP_MEM_ACCESS_READ_EXEC]       = PROT_READ | PROT_EXEC,
-    [WAPP_MEM_ACCESS_READ_WRITE_EXEC] = PROT_READ | PROT_WRITE | PROT_EXEC,
-};
-
-void *mem_util_allocate(void *addr, u64 size, MemAccess access, MemAllocFlags flags, MemInitType type) {
-  (void)type;
-  i32 alloc_flags = flags | MAP_ANON | MAP_PRIVATE;
-
-#if defined(WAPP_PLATFORM_LINUX) || defined(WAPP_PLATFORM_GNU) || defined(WAPP_PLATFORM_NET_BSD)
-  alloc_flags |= MAP_NORESERVE;
-#endif
-
-  return mmap(addr, size, access_types[access], alloc_flags, -1, 0);
-}
-
-void mem_util_free(void *ptr, u64 size) {
-  munmap(ptr, size);
-}
-
-#endif // !WAPP_PLATFORM_POSIX

src/core/os/mem/posix/mem_os_posix.h

@@ -1,25 +0,0 @@
-#ifndef MEM_OS_POSIX_H
-#define MEM_OS_POSIX_H
-
-#include "../../../../common/platform/platform.h"
-
-#ifdef WAPP_PLATFORM_POSIX
-
-#include <sys/mman.h>
-
-typedef enum mem_alloc_flags {
-#if defined(WAPP_PLATFORM_LINUX) || defined(WAPP_PLATFORM_GNU)
-  WAPP_MEM_ALLOC_RESERVE = 0,
-  WAPP_MEM_ALLOC_COMMIT  = MAP_POPULATE,
-#elif defined(WAPP_PLATFORM_FREE_BSD)
-  WAPP_MEM_ALLOC_RESERVE = 0,
-  WAPP_MEM_ALLOC_COMMIT  = MAP_PREFAULT_READ,
-#elif defined(WAPP_PLATFORM_BSD) || defined(WAPP_PLATFORM_UNIX) || defined(WAPP_PLATFORM_APPLE)
-  WAPP_MEM_ALLOC_RESERVE = 0,
-  WAPP_MEM_ALLOC_COMMIT  = 0,
-#endif
-} MemAllocFlags;
-
-#endif // !WAPP_PLATFORM_POSIX
-
-#endif // !MEM_OS_POSIX_H

src/core/os/mem/win/mem_os_win.c

@@ -1,35 +0,0 @@
-#include "../../../../common/aliases/aliases.h"
-#include "../../../../common/platform/platform.h"
-
-#ifdef WAPP_PLATFORM_WINDOWS
-
-#include "mem_os_win.h"
-#include "../mem_os_ops.h"
-
-#define WIN32_LEAN_AND_MEAN
-#include <Windows.h>
-#include <memoryapi.h>
-
-internal const i32 access_types[] = {
-    [WAPP_MEM_ACCESS_NONE]            = PAGE_NOACCESS,
-    [WAPP_MEM_ACCESS_READ_ONLY]       = PAGE_READONLY,
-    [WAPP_MEM_ACCESS_EXEC_ONLY]       = PAGE_EXECUTE,
-    [WAPP_MEM_ACCESS_READ_WRITE]      = PAGE_READWRITE,
-    [WAPP_MEM_ACCESS_READ_EXEC]       = PAGE_EXECUTE_READ,
-    [WAPP_MEM_ACCESS_READ_WRITE_EXEC] = PAGE_EXECUTE_READWRITE,
-};
-
-void *mem_util_allocate(void *addr, u64 size, MemAccess access, MemAllocFlags flags, MemInitType type) {
-  // Ensure memory is committed if it's meant to be initialised
-  if (type == WAPP_MEM_INIT_INITIALISED) {
-    flags |= WAPP_MEM_ALLOC_COMMIT;
-  }
-
-  return VirtualAlloc(addr, (SIZE_T)size, flags, access_types[access]);
-}
-
-void mem_util_free(void *ptr, u64 size) {
-  VirtualFree(ptr, size, MEM_RELEASE);
-}
-
-#endif // !WAPP_PLATFORM_WINDOWS

src/core/os/mem/win/mem_os_win.h

@@ -1,19 +0,0 @@
-#ifndef MEM_OS_WIN_H
-#define MEM_OS_WIN_H
-
-#include "../../../../common/platform/platform.h"
-
-#ifdef WAPP_PLATFORM_WINDOWS
-
-#define WIN32_LEAN_AND_MEAN
-#include <Windows.h>
-#include <memoryapi.h>
-
-typedef enum mem_alloc_flags {
-  WAPP_MEM_ALLOC_RESERVE = MEM_RESERVE,
-  WAPP_MEM_ALLOC_COMMIT  = MEM_COMMIT,
-} MemAllocFlags;
-
-#endif // !WAPP_PLATFORM_WINDOWS
-
-#endif // !MEM_OS_WIN_H

src/core/os/shell/commander/commander.c

@@ -1,100 +0,0 @@
-#include "commander.h"
-#include "commander_output.h"
-#include "../utils/shell_utils.h"
-#include "../../../mem/arena/mem_arena_allocator.h"
-#include "../../../../common/aliases/aliases.h"
-#include "../../../../common/misc/misc_utils.h"
-#include "../../../../primitives/dbl_list/dbl_list.h"
-#include "../../../../primitives/mem_allocator/mem_allocator.h"
-#include "../../../../primitives/strings/str8/str8.h"
-#include <stdarg.h>
-#include <stdbool.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-
-#define CMD_BUF_LEN 8192
-#define OUT_BUF_LEN 4096
-
-internal inline CMDResult execute_command(Str8RO *cmd, CMDOutHandling out_handling, Str8 *out_buf);
-internal inline CMDError get_command_output(FILE *fp, CMDOutHandling out_handling, Str8 *out_buf);
-
-CMDResult wapp_shell_commander_execute(CMDOutHandling out_handling, Str8 *out_buf, const Str8List *cmd) {
-  if (!cmd) {
-    return CMD_NO_EXIT(SHELL_ERR_INVALID_ARGS);
-  }
-
-  Allocator arena = wapp_mem_arena_allocator_init(KB(500));
-
-  Str8 *cmd_str = wapp_str8_join(&arena, cmd, &wapp_str8_lit_ro(" "));
-  if (!cmd_str) {
-    wapp_mem_arena_allocator_destroy(&arena);
-    return CMD_NO_EXIT(SHELL_ERR_ALLOCATION_FAIL);
-  }
-
-  // Redirect output
-  cmd_str = wapp_str8_alloc_concat(&arena, cmd_str, &wapp_str8_lit_ro(" 2>&1"));
-
-  CMDResult output = execute_command(cmd_str, out_handling, out_buf);
-
-  wapp_mem_arena_allocator_destroy(&arena);
-
-  return output;
-}
-
-internal inline CMDResult execute_command(Str8RO *cmd, CMDOutHandling out_handling, Str8 *out_buf) {
-  char cmd_buf[CMD_BUF_LEN] = {0};
-  wapp_str8_copy_to_cstr(cmd_buf, cmd, CMD_BUF_LEN);
-
-  FILE *fp = wapp_shell_utils_popen(cmd_buf, "r");
-  if (!fp) {
-    return CMD_NO_EXIT(SHELL_ERR_PROC_START_FAIL);
-  }
-
-  CMDResult output;
-
-  CMDError err = get_command_output(fp, out_handling, out_buf);
-  if (err > SHELL_ERR_NO_ERROR) {
-    output = CMD_NO_EXIT(err);
-    goto EXECUTE_COMMAND_CLOSE;
-  }
-
-  i32 st = EXIT_SUCCESS;
-  err = get_output_status(fp, &st);
-  if (err > SHELL_ERR_NO_ERROR) {
-    output = CMD_NO_EXIT(err);
-    goto EXECUTE_COMMAND_CLOSE;
-  }
-
-  // Process is already closed in get_output_status
-  fp = NULL;
-
-  output = (CMDResult){
-      .exited = true,
-      .exit_code = st,
-      .error = SHELL_ERR_NO_ERROR,
-  };
-
-EXECUTE_COMMAND_CLOSE:
-  if (fp) {
-    wapp_shell_utils_pclose(fp);
-  }
-  return output;
-}
-
-internal inline CMDError get_command_output(FILE *fp, CMDOutHandling out_handling, Str8 *out_buf) {
-  Str8 out = wapp_str8_buf(OUT_BUF_LEN);
-
-  out.size = fread((void *)out.buf, sizeof(u8), out.capacity, fp);
-  if (out_handling == SHELL_OUTPUT_CAPTURE && out_buf != NULL) {
-    if (out.size >= out_buf->capacity) {
-      return SHELL_ERR_OUT_BUF_FULL;
-    }
-
-    wapp_str8_concat_capped(out_buf, &out);
-  } else if (out_handling == SHELL_OUTPUT_PRINT) {
-    printf(WAPP_STR8_SPEC, wapp_str8_varg(out));
-  }
-
-  return SHELL_ERR_NO_ERROR;
-}

src/core/os/shell/commander/commander.h

@@ -1,18 +0,0 @@
-#ifndef COMMANDER_H
-#define COMMANDER_H
-
-#include "commander_output.h"
-#include "../../../../common/aliases/aliases.h"
-#include "../../../../common/platform/platform.h"
-#include "../../../../primitives/strings/str8/str8.h"
-#include <stdbool.h>
-#include <stdio.h>
-#include <stdlib.h>
-
-#define CMD_NO_EXIT(ERR) ((CMDResult){.exited = false, .exit_code = EXIT_FAILURE, .error = ERR})
-
-CMDResult wapp_shell_commander_execute(CMDOutHandling out_handling, Str8 *out_buf, const Str8List *cmd);
-
-external CMDError get_output_status(FILE *fp, i32 *status_out);
-
-#endif // !COMMANDER_H

src/core/os/shell/commander/commander_output.h

@@ -1,35 +0,0 @@
-#ifndef COMMANDER_OUTPUT_H
-#define COMMANDER_OUTPUT_H
-
-#include "../../../../common/aliases/aliases.h"
-#include "../../../../common/platform/platform.h"
-#include <stdbool.h>
-
-typedef enum {
-  SHELL_OUTPUT_DISCARD,
-  SHELL_OUTPUT_PRINT,
-  SHELL_OUTPUT_CAPTURE,
-} CMDOutHandling;
-
-typedef enum {
-  SHELL_ERR_NO_ERROR,
-  SHELL_ERR_INVALID_ARGS,
-  SHELL_ERR_ALLOCATION_FAIL,
-  SHELL_ERR_PROC_START_FAIL,
-  SHELL_ERR_OUT_BUF_FULL,
-  SHELL_ERR_PROC_EXIT_FAIL,
-} CMDError;
-
-typedef struct commander_result CMDResult;
-struct commander_result {
-  i32 exit_code;
-  CMDError error;
-  bool exited;
-
-#ifdef WAPP_PLATFORM_WINDOWS
-  #include "../../../../common/misc/misc_utils.h"
-  wapp_misc_utils_padding_size(sizeof(bool) + sizeof(i32) + sizeof(CMDError));
-#endif // !WAPP_PLATFORM_WINDOWS
-};
-
-#endif // !COMMANDER_OUTPUT_H

src/core/os/shell/commander/posix/commander_posix.c

@@ -1,23 +0,0 @@
-#include "../../../../../common/aliases/aliases.h"
-#include "../../../../../common/platform/platform.h"
-
-#ifdef WAPP_PLATFORM_POSIX
-
-#include "../commander_output.h"
-#include "../../utils/shell_utils.h"
-#include <stdio.h>
-#include <stdlib.h>
-
-CMDError get_output_status(FILE *fp, i32 *status_out) {
-  *status_out = wapp_shell_utils_pclose(fp);
-
-  if (!WIFEXITED(*status_out)) {
-    return SHELL_ERR_PROC_EXIT_FAIL;
-  }
-
-  *status_out = WEXITSTATUS(*status_out);
-
-  return SHELL_ERR_NO_ERROR;
-}
-
-#endif // !WAPP_PLATFORM_POSIX

src/core/os/shell/commander/win/commander_win.c

@@ -1,22 +0,0 @@
-#include "../../../../../common/aliases/aliases.h"
-#include "../../../../../common/platform/platform.h"
-
-#ifdef WAPP_PLATFORM_WINDOWS
-
-#include "../commander_output.h"
-#include "../../utils/shell_utils.h"
-#include <stdio.h>
-
-CMDError get_output_status(FILE *fp, i32 *status_out) {
-  if (!feof(fp)) {
-    // Ensure process is closed on failure
-    wapp_shell_utils_pclose(fp);
-    return SHELL_ERR_PROC_EXIT_FAIL;
-  }
-
-  *status_out = wapp_shell_utils_pclose(fp);
-
-  return SHELL_ERR_NO_ERROR;
-}
-
-#endif // !WAPP_PLATFORM_WINDOWS

src/core/os/shell/termcolour/posix/termcolour_posix.c

@@ -1,34 +0,0 @@
-#include "../../../../../common/aliases/aliases.h"
-#include "../../../../../common/platform/platform.h"
-#include "../../../../../primitives/strings/str8/str8.h"
-
-#ifdef WAPP_PLATFORM_POSIX
-
-#include "../terminal_colours.h"
-#include <stdio.h>
-
-internal Str8RO colours[COUNT_TERM_COLOUR] = {
-    [WAPP_TERM_COLOUR_FG_BLACK]      = wapp_str8_lit_ro_initialiser_list("\033[30m"),
-    [WAPP_TERM_COLOUR_FG_RED]        = wapp_str8_lit_ro_initialiser_list("\033[31m"),
-    [WAPP_TERM_COLOUR_FG_GREEN]      = wapp_str8_lit_ro_initialiser_list("\033[32m"),
-    [WAPP_TERM_COLOUR_FG_BLUE]       = wapp_str8_lit_ro_initialiser_list("\033[34m"),
-    [WAPP_TERM_COLOUR_FG_CYAN]       = wapp_str8_lit_ro_initialiser_list("\033[36m"),
-    [WAPP_TERM_COLOUR_FG_MAGENTA]    = wapp_str8_lit_ro_initialiser_list("\033[35m"),
-    [WAPP_TERM_COLOUR_FG_YELLOW]     = wapp_str8_lit_ro_initialiser_list("\033[33m"),
-    [WAPP_TERM_COLOUR_FG_WHITE]      = wapp_str8_lit_ro_initialiser_list("\033[37m"),
-    [WAPP_TERM_COLOUR_FG_BR_BLACK]   = wapp_str8_lit_ro_initialiser_list("\033[90m"),
-    [WAPP_TERM_COLOUR_FG_BR_RED]     = wapp_str8_lit_ro_initialiser_list("\033[91m"),
-    [WAPP_TERM_COLOUR_FG_BR_GREEN]   = wapp_str8_lit_ro_initialiser_list("\033[92m"),
-    [WAPP_TERM_COLOUR_FG_BR_BLUE]    = wapp_str8_lit_ro_initialiser_list("\033[94m"),
-    [WAPP_TERM_COLOUR_FG_BR_CYAN]    = wapp_str8_lit_ro_initialiser_list("\033[96m"),
-    [WAPP_TERM_COLOUR_FG_BR_MAGENTA] = wapp_str8_lit_ro_initialiser_list("\033[95m"),
-    [WAPP_TERM_COLOUR_FG_BR_YELLOW]  = wapp_str8_lit_ro_initialiser_list("\033[93m"),
-    [WAPP_TERM_COLOUR_FG_BR_WHITE]   = wapp_str8_lit_ro_initialiser_list("\033[97m"),
-    [WAPP_TERM_COLOUR_CLEAR]         = wapp_str8_lit_ro_initialiser_list("\033[0m"),
-};
-
-void print_coloured_text(Str8RO *text, TerminalColour colour) {
-  printf(WAPP_STR8_SPEC WAPP_STR8_SPEC, wapp_str8_varg(colours[colour]), wapp_str8_varg((*text)));
-}
-
-#endif // !WAPP_PLATFORM_POSIX

src/core/os/shell/termcolour/termcolour.c

@@ -1,16 +0,0 @@
-#include "termcolour.h"
-#include "terminal_colours.h"
-#include "../../../../primitives/strings/str8/str8.h"
-
-void wapp_shell_termcolour_print_text(Str8RO *text, TerminalColour colour) {
-  if (colour < WAPP_TERM_COLOUR_FG_BLACK || colour > WAPP_TERM_COLOUR_FG_BR_WHITE) {
-    return;
-  }
-
-  print_coloured_text(text, colour);
-}
-
-void wapp_shell_termcolour_clear_colour(void) {
-  Str8RO empty = wapp_str8_lit_ro("");
-  print_coloured_text(&empty, WAPP_TERM_COLOUR_CLEAR);
-}

src/core/os/shell/termcolour/termcolour.h

@@ -1,14 +0,0 @@
-#ifndef TERM_COLOUR_H
-#define TERM_COLOUR_H
-
-#include "terminal_colours.h"
-#include "../../../../common/aliases/aliases.h"
-#include "../../../../common/platform/platform.h"
-#include "../../../../primitives/strings/str8/str8.h"
-
-void wapp_shell_termcolour_print_text(Str8RO *text, TerminalColour colour);
-void wapp_shell_termcolour_clear_colour(void);
-
-external void print_coloured_text(Str8RO *text, TerminalColour colour);
-
-#endif // !TERM_COLOUR_H

src/core/os/shell/termcolour/terminal_colours.h

@@ -1,28 +0,0 @@
-#ifndef TERMINAL_COLOURS_H
-#define TERMINAL_COLOURS_H
-
-#include "../../../../common/platform/platform.h"
-
-typedef enum {
-  WAPP_TERM_COLOUR_FG_BLACK,
-  WAPP_TERM_COLOUR_FG_RED,
-  WAPP_TERM_COLOUR_FG_GREEN,
-  WAPP_TERM_COLOUR_FG_BLUE,
-  WAPP_TERM_COLOUR_FG_CYAN,
-  WAPP_TERM_COLOUR_FG_MAGENTA,
-  WAPP_TERM_COLOUR_FG_YELLOW,
-  WAPP_TERM_COLOUR_FG_WHITE,
-  WAPP_TERM_COLOUR_FG_BR_BLACK,
-  WAPP_TERM_COLOUR_FG_BR_RED,
-  WAPP_TERM_COLOUR_FG_BR_GREEN,
-  WAPP_TERM_COLOUR_FG_BR_BLUE,
-  WAPP_TERM_COLOUR_FG_BR_CYAN,
-  WAPP_TERM_COLOUR_FG_BR_MAGENTA,
-  WAPP_TERM_COLOUR_FG_BR_YELLOW,
-  WAPP_TERM_COLOUR_FG_BR_WHITE,
-  WAPP_TERM_COLOUR_CLEAR,
-
-  COUNT_TERM_COLOUR,
-} TerminalColour;
-
-#endif // !TERMINAL_COLOURS_H

src/core/os/shell/termcolour/win/termcolour_win.c

@@ -1,71 +0,0 @@
-#include "../../../../../common/aliases/aliases.h"
-#include "../../../../../common/platform/platform.h"
-#include "../../../../../primitives/strings/str8/str8.h"
-
-#ifdef WAPP_PLATFORM_WINDOWS
-
-#include "../terminal_colours.h"
-#include "../../../../../common/misc/misc_utils.h"
-#include <stdio.h>
-
-#define WIN32_LEAN_AND_MEAN
-#include <Windows.h>
-
-typedef struct termcolour_data TermcolourData;
-struct termcolour_data {
-  HANDLE handle;
-  WORD   default_colour;
-  WORD   current_colour;
-
-  wapp_misc_utils_padding_size(sizeof(HANDLE) + sizeof(WORD) + sizeof(WORD));
-};
-
-internal void init_data(TermcolourData *data);
-
-internal WORD colours[COUNT_TERM_COLOUR] = {
-    [WAPP_TERM_COLOUR_FG_BLACK]      = 0,
-    [WAPP_TERM_COLOUR_FG_RED]        = FOREGROUND_RED,
-    [WAPP_TERM_COLOUR_FG_GREEN]      = FOREGROUND_GREEN,
-    [WAPP_TERM_COLOUR_FG_BLUE]       = FOREGROUND_BLUE,
-    [WAPP_TERM_COLOUR_FG_CYAN]       = FOREGROUND_GREEN | FOREGROUND_BLUE,
-    [WAPP_TERM_COLOUR_FG_MAGENTA]    = FOREGROUND_RED | FOREGROUND_BLUE,
-    [WAPP_TERM_COLOUR_FG_YELLOW]     = FOREGROUND_RED | FOREGROUND_GREEN,
-    [WAPP_TERM_COLOUR_FG_WHITE]      = FOREGROUND_RED | FOREGROUND_GREEN | FOREGROUND_BLUE,
-    [WAPP_TERM_COLOUR_FG_BR_BLACK]   = FOREGROUND_INTENSITY,
-    [WAPP_TERM_COLOUR_FG_BR_RED]     = FOREGROUND_RED | FOREGROUND_INTENSITY,
-    [WAPP_TERM_COLOUR_FG_BR_GREEN]   = FOREGROUND_GREEN | FOREGROUND_INTENSITY,
-    [WAPP_TERM_COLOUR_FG_BR_BLUE]    = FOREGROUND_BLUE | FOREGROUND_INTENSITY,
-    [WAPP_TERM_COLOUR_FG_BR_CYAN]    = FOREGROUND_GREEN | FOREGROUND_BLUE | FOREGROUND_INTENSITY,
-    [WAPP_TERM_COLOUR_FG_BR_MAGENTA] = FOREGROUND_RED | FOREGROUND_BLUE | FOREGROUND_INTENSITY,
-    [WAPP_TERM_COLOUR_FG_BR_YELLOW]  = FOREGROUND_RED | FOREGROUND_GREEN | FOREGROUND_INTENSITY,
-    [WAPP_TERM_COLOUR_FG_BR_WHITE]   = FOREGROUND_RED | FOREGROUND_GREEN | FOREGROUND_BLUE | FOREGROUND_INTENSITY,
-};
-
-void print_coloured_text(Str8RO *text, TerminalColour colour) {
-  persistent TermcolourData data = {0};
-  if (data.handle == 0) {
-    init_data(&data);
-  }
-
-  if (colour == WAPP_TERM_COLOUR_CLEAR) {
-    data.current_colour = data.default_colour;
-  } else {
-    data.current_colour = colours[colour];
-  }
-
-  SetConsoleTextAttribute(data.handle, data.current_colour);
-  printf(WAPP_STR8_SPEC, wapp_str8_varg((*text)));
-}
-
-internal void init_data(TermcolourData *data) {
-  // create handle
-  data->handle = GetStdHandle(STD_OUTPUT_HANDLE);
-
-  // get console colour information
-  CONSOLE_SCREEN_BUFFER_INFO csbi;
-  GetConsoleScreenBufferInfo(data->handle, &csbi);
-  data->default_colour = csbi.wAttributes;
-  data->current_colour = data->default_colour;
-}
-
-#endif // !WAPP_PLATFORM_WINDOWS

src/core/os/shell/utils/shell_utils.h

@@ -1,15 +0,0 @@
-#ifndef SHELL_UTILS_H
-#define SHELL_UTILS_H
-
-#include "../../../../common/platform/platform.h"
-#include <stdio.h>
-
-#ifdef WAPP_PLATFORM_WINDOWS
-  #define wapp_shell_utils_popen  _popen
-  #define wapp_shell_utils_pclose _pclose
-#else
-  #define wapp_shell_utils_popen  popen
-  #define wapp_shell_utils_pclose pclose
-#endif /* ifdef WAPP_PLATFORM_WINDOWS */
-
-#endif // !SHELL_UTILS_H

src/core/wapp_core.c

@@ -1,20 +0,0 @@
-#ifndef WAPP_CORE_C
-#define WAPP_CORE_C
-
-#include "wapp_core.h"
-#include "os/shell/termcolour/posix/termcolour_posix.c"
-#include "os/shell/termcolour/win/termcolour_win.c"
-#include "os/shell/termcolour/termcolour.c"
-#include "os/shell/commander/posix/commander_posix.c"
-#include "os/shell/commander/win/commander_win.c"
-#include "os/shell/commander/commander.c"
-#include "os/cpath/cpath.c"
-#include "os/mem/posix/mem_os_posix.c"
-#include "os/mem/win/mem_os_win.c"
-#include "os/mem/mem_os.c"
-#include "mem/utils/mem_utils.c"
-#include "mem/arena/mem_arena.c"
-#include "mem/arena/mem_arena_allocator.c"
-#include "../primitives/wapp_primitives.c"
-
-#endif // !WAPP_CORE_C

src/core/wapp_core.h

@@ -1,20 +0,0 @@
-#ifndef WAPP_CORE_H
-#define WAPP_CORE_H
-
-#include "os/shell/termcolour/termcolour.h"
-#include "os/shell/termcolour/terminal_colours.h"
-#include "os/shell/commander/commander.h"
-#include "os/shell/commander/commander_output.h"
-#include "os/shell/utils/shell_utils.h"
-#include "os/cpath/cpath.h"
-#include "os/mem/posix/mem_os_posix.h"
-#include "os/mem/win/mem_os_win.h"
-#include "os/mem/mem_os_ops.h"
-#include "os/mem/mem_os.h"
-#include "mem/utils/mem_utils.h"
-#include "mem/arena/mem_arena_allocator.h"
-#include "mem/arena/mem_arena.h"
-#include "../common/wapp_common.h"
-#include "../primitives/wapp_primitives.h"
-
-#endif // !WAPP_CORE_H

src/os/allocators/arena/mem_arena.c

@@ -0,0 +1,192 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#include "mem_arena.h"
+#include "../../mem/mem_os.h"
+#include "../../../common/aliases/aliases.h"
+#include "../../../common/assert/assert.h"
+#include "../../../common/misc/misc_utils.h"
+#include "../../../base/mem/utils/mem_utils.h"
+#include <string.h>
+
+#ifndef DEFAULT_ALIGNMENT
+// Why 2 * sizeof(void *) instead of sizeof(void *)
+// https://handmade.network/forums/t/6860-alignment_arena_allocator
+#define DEFAULT_ALIGNMENT (2 * sizeof(void *))
+#endif /* ifndef DEFAULT_ALIGNMENT */
+
+#define ARENA_MINIMUM_CAPACITY KiB(16) // Allocate minimum of 4 pages
+
+typedef enum {
+	ARENA_STORAGE_TYPE_ALLOCATED,
+	ARENA_STORAGE_TYPE_BUFFER,
+} ArenaStorageType;
+
+struct Arena {
+	u8 *buf;
+	u8 *offset;
+	u8 *prev_offset;
+	u64 capacity;
+	ArenaStorageType type;
+	b8 committed;
+
+	wapp_misc_utils_reserve_padding(sizeof(u8 *) * 3 + sizeof(u64) + sizeof(ArenaStorageType) + sizeof(b8));
+};
+
+b8 wapp_mem_arena_init_buffer(Arena **arena, u8 *buffer, u64 buffer_size) {
+	if (!arena || *arena || buffer_size < sizeof(Arena)) {
+		return false;
+	}
+
+	*arena           = (Arena *)buffer;
+	Arena *arena_ptr = *arena;
+
+	arena_ptr->buf         = (u8 *)(arena_ptr + 1);
+	arena_ptr->offset      = arena_ptr->buf;
+	arena_ptr->prev_offset = NULL;
+	arena_ptr->capacity    = buffer_size - sizeof(Arena);
+	arena_ptr->type        = ARENA_STORAGE_TYPE_BUFFER;
+	arena_ptr->committed   = true;
+
+	return true;
+}
+
+b8 wapp_mem_arena_init_allocated_custom(Arena **arena, u64 base_capacity, MemAllocFlags flags, b8 zero_buffer) {
+	if (!arena || *arena || base_capacity == 0) {
+		return false;
+	}
+
+	u64 size       = sizeof(Arena) + (base_capacity >= ARENA_MINIMUM_CAPACITY ? base_capacity : ARENA_MINIMUM_CAPACITY);
+	u64 alloc_size = wapp_misc_utils_u64_round_up_pow2(size);
+	u8 *allocated  = (u8 *)wapp_os_mem_alloc(NULL, alloc_size, WAPP_MEM_ACCESS_READ_WRITE, flags,
+	                                         zero_buffer ? WAPP_MEM_INIT_INITIALISED : WAPP_MEM_INIT_UNINITIALISED);
+	if (!allocated) {
+		return false;
+	}
+
+	b8 committed = (flags & WAPP_MEM_ALLOC_COMMIT) == WAPP_MEM_ALLOC_COMMIT;
+
+#ifdef WAPP_PLATFORM_WINDOWS
+	if (!committed) {
+		wapp_os_mem_alloc(allocated, sizeof(Arena), WAPP_MEM_ACCESS_READ_WRITE, WAPP_MEM_ALLOC_COMMIT,
+		                  WAPP_MEM_INIT_INITIALISED);
+	}
+#endif // ifdef WAPP_PLATFORM_WINDOWS
+
+	if (!wapp_mem_arena_init_buffer(arena, allocated, alloc_size)) {
+		wapp_mem_arena_destroy(arena);
+		return false;
+	}
+
+	Arena *arena_ptr     = *arena;
+	arena_ptr->type      = ARENA_STORAGE_TYPE_ALLOCATED;
+	arena_ptr->committed = committed;
+
+	return true;
+}
+
+void *wapp_mem_arena_alloc(Arena *arena, u64 size) {
+	return wapp_mem_arena_alloc_aligned(arena, size, DEFAULT_ALIGNMENT);
+}
+
+void *wapp_mem_arena_alloc_aligned(Arena *arena, u64 size, u64 alignment) {
+	wapp_debug_assert(arena != NULL, "`arena` should not be NULL");
+
+	u8 *alloc_start = arena->offset;
+
+	u8 *output = wapp_mem_util_align_forward((void *)alloc_start, alignment);
+	if (output + size >= arena->buf + arena->capacity) {
+		return NULL;
+	}
+
+	arena->offset = output + size;
+
+#ifdef WAPP_PLATFORM_WINDOWS
+	if (arena->type == ARENA_STORAGE_TYPE_ALLOCATED && !(arena->committed)) {
+		wapp_os_mem_alloc(alloc_start, (uptr)(arena->offset) - (uptr)(alloc_start),
+		                  WAPP_MEM_ACCESS_READ_WRITE, WAPP_MEM_ALLOC_COMMIT,
+		                  WAPP_MEM_INIT_UNINITIALISED);
+	}
+#endif // ifdef WAPP_PLATFORM_WINDOWS
+
+	memset(output, 0, size);
+
+	return (void *)output;
+}
+
+void *wapp_mem_arena_realloc(Arena *arena, void *ptr, u64 old_size, u64 new_size) {
+	wapp_debug_assert(arena != NULL, "`arena` should not be NULL");
+
+	if ((u8*)ptr < arena->buf || (u8*)ptr > arena->offset ||
+		  arena->offset + new_size >= arena->buf + arena->capacity) {
+		return NULL;
+	}
+
+	void *new_ptr = wapp_mem_arena_alloc(arena, new_size);
+	if (!new_ptr) {
+		return NULL;
+	}
+
+	u64 copy_size = new_size <= old_size ? new_size : old_size;
+	memcpy(new_ptr, ptr, copy_size);
+
+	return new_ptr;
+}
+
+void *wapp_mem_arena_realloc_aligned(Arena *arena, void *ptr, u64 old_size, u64 new_size, u64 alignment) {
+	wapp_debug_assert(arena != NULL, "`arena` should not be NULL");
+
+	if ((u8*)ptr < arena->buf || (u8*)ptr > arena->offset ||
+		  arena->offset + new_size >= arena->buf + arena->capacity) {
+		return NULL;
+	}
+
+	void *new_ptr = wapp_mem_arena_alloc_aligned(arena, new_size, alignment);
+	if (!new_ptr) {
+		return NULL;
+	}
+
+	u64 copy_size = new_size <= old_size ? new_size : old_size;
+	memcpy(new_ptr, ptr, copy_size);
+
+	return new_ptr;
+}
+
+void wapp_mem_arena_temp_begin(Arena *arena) {
+	wapp_debug_assert(arena != NULL, "`arena` should not be NULL");
+
+	if (arena->prev_offset != NULL) {
+		return;
+	}
+
+	arena->prev_offset = arena->offset;
+}
+
+void wapp_mem_arena_temp_end(Arena *arena) {
+	wapp_debug_assert(arena != NULL, "`arena` should not be NULL");
+
+	if (arena->prev_offset == NULL) {
+		return;
+	}
+
+	arena->offset      = arena->prev_offset;
+	arena->prev_offset = NULL;
+}
+
+void wapp_mem_arena_clear(Arena *arena) {
+	wapp_debug_assert(arena != NULL, "`arena` should not be NULL");
+
+	memset(arena->buf, 0, arena->offset - arena->buf);
+	arena->offset = arena->buf;
+}
+
+void wapp_mem_arena_destroy(Arena **arena) {
+	wapp_debug_assert(arena != NULL && (*arena) != NULL, "`arena` double pointer is not valid");
+
+	Arena *arena_ptr = *arena;
+
+	if (arena_ptr->type == ARENA_STORAGE_TYPE_ALLOCATED) {
+		wapp_os_mem_free(*arena, sizeof(Arena) + arena_ptr->capacity);
+	}
+
+	*arena = NULL;
+}

src/os/allocators/arena/mem_arena.h

@@ -0,0 +1,45 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#ifndef MEM_ARENA_H
+#define MEM_ARENA_H
+
+#include "../../mem/mem_os.h"
+#include "../../../common/aliases/aliases.h"
+#include "../../../common/platform/platform.h"
+
+#ifdef WAPP_PLATFORM_CPP
+BEGIN_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+typedef struct Arena Arena;
+
+#define wapp_mem_arena_init_allocated(arena_dptr, base_capacity)                                                           \
+	(wapp_mem_arena_init_allocated_custom(arena_dptr, base_capacity, WAPP_MEM_ALLOC_RESERVE, false))
+#define wapp_mem_arena_init_allocated_commit(arena_dptr, base_capacity)                                                    \
+	(wapp_mem_arena_init_allocated_custom(arena_dptr, base_capacity, WAPP_MEM_ALLOC_RESERVE | WAPP_MEM_ALLOC_COMMIT, false))
+#define wapp_mem_arena_init_allocated_zero(arena_dptr, base_capacity)                                                      \
+	(wapp_mem_arena_init_allocated_custom(arena_dptr, base_capacity, WAPP_MEM_ALLOC_RESERVE, true))
+#define wapp_mem_arena_init_allocated_commit_and_zero(arena_dptr, base_capacity)                                           \
+	(wapp_mem_arena_init_allocated_custom(arena_dptr, base_capacity, WAPP_MEM_ALLOC_RESERVE | WAPP_MEM_ALLOC_COMMIT, true))
+
+/**
+ * Arena initialisation function. `wapp_mem_arena_init_allocated_custom` provides the most
+ * control over how the Arena is initialised. Wrapper macros are provided for
+ * easier use.
+ */
+b8    wapp_mem_arena_init_allocated_custom(Arena **arena, u64 base_capacity, MemAllocFlags flags, b8 zero_buffer);
+b8    wapp_mem_arena_init_buffer(Arena **arena, u8 *buffer, u64 buffer_size);
+void *wapp_mem_arena_alloc(Arena *arena, u64 size);
+void *wapp_mem_arena_alloc_aligned(Arena *arena, u64 size, u64 alignment);
+void *wapp_mem_arena_realloc(Arena *arena, void *ptr, u64 old_size, u64 new_size);
+void *wapp_mem_arena_realloc_aligned(Arena *arena, void *ptr, u64 old_size, u64 new_size, u64 alignment);
+void  wapp_mem_arena_temp_begin(Arena *arena);
+void  wapp_mem_arena_temp_end(Arena *arena);
+void  wapp_mem_arena_clear(Arena *arena);
+void  wapp_mem_arena_destroy(Arena **arena);
+
+#ifdef WAPP_PLATFORM_CPP
+END_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#endif // !MEM_ARENA_H

src/os/allocators/arena/mem_arena_allocator.c

@@ -0,0 +1,87 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#include "mem_arena_allocator.h"
+#include "mem_arena.h"
+#include "../../mem/mem_os.h"
+#include "../../../common/aliases/aliases.h"
+#include "../../../common/assert/assert.h"
+
+wapp_intern void initialise_arena_allocator(Allocator *allocator);
+wapp_intern void *mem_arena_alloc(u64 size, void *alloc_obj);
+wapp_intern void *mem_arena_alloc_aligned(u64 size, u64 alignment, void *alloc_obj);
+wapp_intern void *mem_arena_realloc(void *ptr, u64 old_size, u64 new_size, void *alloc_obj);
+wapp_intern void *mem_arena_realloc_aligned(void *ptr, u64 old_size, u64 new_size, u64 alignment,
+                                            void *alloc_obj);
+
+Allocator wapp_mem_arena_allocator_init_with_buffer(u8 *buffer, u64 buffer_size) {
+	Allocator allocator = {0};
+	b8 initialised = wapp_mem_arena_init_buffer((Arena **)(&allocator.obj), buffer, buffer_size);
+	if (!initialised) {
+		return allocator;
+	}
+
+	initialise_arena_allocator(&allocator);
+
+	return allocator;
+}
+
+Allocator wapp_mem_arena_allocator_init_custom(u64 base_capacity, MemAllocFlags flags, b8 zero_buffer) {
+	Allocator allocator = {0};
+	b8 initialised = wapp_mem_arena_init_allocated_custom((Arena **)(&allocator.obj), base_capacity, flags, zero_buffer);
+	if (!initialised) {
+		return allocator;
+	}
+
+	initialise_arena_allocator(&allocator);
+
+	return allocator;
+}
+
+void wapp_mem_arena_allocator_temp_begin(const Allocator *allocator) {
+	wapp_debug_assert(allocator != NULL, "`allocator` should not be NULL");
+	wapp_mem_arena_temp_begin((Arena *)(allocator->obj));
+}
+
+void wapp_mem_arena_allocator_temp_end(const Allocator *allocator) {
+	wapp_debug_assert(allocator != NULL, "`allocator` should not be NULL");
+	wapp_mem_arena_temp_end((Arena *)(allocator->obj));
+}
+
+void wapp_mem_arena_allocator_clear(Allocator *allocator) {
+	wapp_debug_assert(allocator != NULL, "`allocator` should not be NULL");
+	wapp_mem_arena_clear((Arena *)(allocator->obj));
+}
+
+void wapp_mem_arena_allocator_destroy(Allocator *allocator) {
+	wapp_debug_assert(allocator != NULL, "`allocator` should not be NULL");
+	wapp_mem_arena_destroy((Arena **)(&(allocator->obj)));
+	*allocator = (Allocator){0};
+}
+
+wapp_intern void initialise_arena_allocator(Allocator *allocator) {
+	allocator->alloc           = mem_arena_alloc;
+	allocator->alloc_aligned   = mem_arena_alloc_aligned;
+	allocator->realloc         = mem_arena_realloc;
+	allocator->realloc_aligned = mem_arena_realloc_aligned;
+}
+
+wapp_intern void *mem_arena_alloc(u64 size, void *alloc_obj) {
+	Arena *arena = (Arena *)alloc_obj;
+	return wapp_mem_arena_alloc(arena, size);
+}
+
+wapp_intern void *mem_arena_alloc_aligned(u64 size, u64 alignment, void *alloc_obj) {
+	Arena *arena = (Arena *)alloc_obj;
+	return wapp_mem_arena_alloc_aligned(arena, size, alignment);
+}
+
+wapp_intern void *mem_arena_realloc(void *ptr, u64 old_size, u64 new_size, void *alloc_obj) {
+	Arena *arena = (Arena *)alloc_obj;
+	return wapp_mem_arena_realloc(arena, ptr, old_size, new_size);
+}
+
+wapp_intern void *mem_arena_realloc_aligned(void *ptr, u64 old_size, u64 new_size, u64 alignment,
+                                            void *alloc_obj) {
+	Arena *arena = (Arena *)alloc_obj;
+	return wapp_mem_arena_realloc_aligned(arena, ptr, old_size, new_size, alignment);
+}

src/os/allocators/arena/mem_arena_allocator.h

@@ -0,0 +1,46 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#ifndef MEM_ARENA_ALLOCATOR_H
+#define MEM_ARENA_ALLOCATOR_H
+
+#include "../../mem/mem_os.h"
+#include "../../../common/aliases/aliases.h"
+#include "../../../common/platform/platform.h"
+#include "../../../base/mem/allocator/mem_allocator.h"
+
+#ifdef WAPP_PLATFORM_CPP
+BEGIN_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#define wapp_mem_arena_allocator_init(base_capacity)                                                           \
+	(wapp_mem_arena_allocator_init_custom(base_capacity, WAPP_MEM_ALLOC_RESERVE, false))
+#define wapp_mem_arena_allocator_init_commit(base_capacity)                                                    \
+	(wapp_mem_arena_allocator_init_custom(base_capacity, WAPP_MEM_ALLOC_RESERVE | WAPP_MEM_ALLOC_COMMIT, false))
+#define wapp_mem_arena_allocator_init_zero(base_capacity)                                                      \
+	(wapp_mem_arena_allocator_init_custom(base_capacity, WAPP_MEM_ALLOC_RESERVE, true))
+#define wapp_mem_arena_allocator_init_commit_and_zero(base_capacity)                                           \
+	(wapp_mem_arena_allocator_init_custom(base_capacity, WAPP_MEM_ALLOC_RESERVE | WAPP_MEM_ALLOC_COMMIT, true))
+
+/**
+ * Wraps an Arena in an Allocator object. It attempts to initialise the Arena
+ * and, if successful, defines the operations supported by it to be used by the
+ * Allocator.
+ *
+ * An Arena allocator only supports normal allocation and aligned allocation.
+ * Reallocation, aligned reallocation and freeing aren't implemented.
+ *
+ * The `wapp_mem_arena_allocator_init_custom` provides the most control over how
+ * the Arena is initialised. Wrapper macros are provided for easier use.
+ */
+Allocator wapp_mem_arena_allocator_init_custom(u64 base_capacity, MemAllocFlags flags, b8 zero_buffer);
+Allocator wapp_mem_arena_allocator_init_with_buffer(u8 *buffer, u64 buffer_size);
+void      wapp_mem_arena_allocator_temp_begin(const Allocator *allocator);
+void      wapp_mem_arena_allocator_temp_end(const Allocator *allocator);
+void      wapp_mem_arena_allocator_clear(Allocator *allocator);
+void      wapp_mem_arena_allocator_destroy(Allocator *allocator);
+
+#ifdef WAPP_PLATFORM_CPP
+END_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#endif // !MEM_ARENA_ALLOCATOR_H

src/os/cpath/cpath.c

@@ -0,0 +1,136 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#include "cpath.h"
+#include "../allocators/arena/mem_arena_allocator.h"
+#include "../../common/aliases/aliases.h"
+#include "../../common/misc/misc_utils.h"
+#include "../../base/dbl_list/dbl_list.h"
+#include "../../base/mem/allocator/mem_allocator.h"
+#include "../../base/strings/str8/str8.h"
+#include <stdarg.h>
+#include <stdio.h>
+#include <string.h>
+
+u32 wapp_cpath_join_path(Str8 *dst, const Str8List *parts) {
+	if (!dst || !parts) {
+		return CPATH_JOIN_INVALID_ARGS;
+	}
+
+	if (parts->node_count == 0) {
+		return CPATH_JOIN_EMPTY_PARTS;
+	}
+
+	Str8 separator = wapp_str8_buf(4);
+	wapp_str8_push_back(&separator, WAPP_PATH_SEP);
+
+	u64 required_capacity = parts->node_count * separator.size + wapp_str8_list_total_size(parts);
+	if (dst->capacity < required_capacity) {
+		return CPATH_JOIN_INSUFFICIENT_DST_CAPACITY;
+	}
+
+	// Handle first node
+	Str8 *first_node = wapp_dbl_list_get(Str8, parts, 0);
+	wapp_str8_copy_str8_capped(dst, first_node);
+
+	// NOTE (Abdelrahman): Uses a while loop instead of a for loop to get rid of
+	// MSVC Spectre mitigation warnings
+	Str8 *node       = first_node;
+	u64 node_index   = 1;
+	b8 running       = node_index < parts->node_count;
+	while (running) {
+		node = wapp_dbl_list_get(Str8, parts, node_index);
+		if (node->size == 0) {
+			goto CPATH_JOIN_LOOP_END;
+		}
+
+		if (dst->size > 0) {
+			char dst_last   = wapp_str8_get(dst, dst->size - 1);
+			char node_start = wapp_str8_get(node, 0);
+			b8 add_path_sep = dst_last != WAPP_PATH_SEP && node_start != WAPP_PATH_SEP;
+
+			if (add_path_sep) {
+				wapp_str8_concat_capped(dst, &separator);
+			}
+		}
+
+		wapp_str8_concat_capped(dst, node);
+
+CPATH_JOIN_LOOP_END:
+		++node_index;
+		running = node_index < parts->node_count;
+	}
+
+	return CPATH_JOIN_SUCCESS;
+}
+
+Str8 *dirup(const Allocator *allocator, Str8RO *path, u64 levels) {
+	Str8 *output = NULL;
+	if (!allocator || !path) {
+		goto RETURN_DIRUP;
+	}
+
+	b8 absolute    = wapp_str8_get(path, 0) == WAPP_PATH_SEP;
+	Str8 separator = wapp_str8_buf(4);
+	wapp_str8_push_back(&separator, WAPP_PATH_SEP);
+
+	if (path->size == 0) {
+		output = wapp_str8_alloc_buf(allocator, 16);
+		if (!output) {
+			goto RETURN_DIRUP;
+		}
+
+		wapp_str8_push_back(output, absolute ? WAPP_PATH_SEP : '.');
+		goto RETURN_DIRUP;
+	}
+
+	if (levels < 1) {
+		output = wapp_str8_alloc_str8(allocator, path);
+		goto RETURN_DIRUP;
+	}
+
+	Allocator tmp_arena = wapp_mem_arena_allocator_init(MiB(8));
+	if (wapp_mem_allocator_invalid(&tmp_arena)) {
+		goto RETURN_DIRUP;
+	}
+
+	Str8List *parts = wapp_str8_split(&tmp_arena, path, &separator);
+	if (!parts) {
+		goto RETURN_DIRUP;
+	}
+
+	if (levels >= parts->node_count) {
+		output = wapp_str8_alloc_buf(allocator, 16);
+		if (!output) {
+			goto LIST_CLEANUP_DIRUP;
+		}
+
+		wapp_str8_push_back(output, absolute ? WAPP_PATH_SEP : '.');
+	} else {
+		for (u64 i = 0; i < levels; ++i) {
+			wapp_dbl_list_pop_back(Str8, parts);
+		}
+		
+		u64 alignment  = sizeof(void *) * 2;
+		u64 alloc_size = wapp_str8_list_total_size(parts) + parts->node_count * separator.size;
+		u64 modulo     = alloc_size & (alignment - 1);
+		alloc_size    += alignment - modulo;
+
+		output = wapp_str8_alloc_buf(allocator, alloc_size);
+		if (output) {
+			if (absolute) {
+				wapp_str8_push_back(output, WAPP_PATH_SEP);
+			}
+
+			Str8 *joined = wapp_str8_join(&tmp_arena, parts, &separator);
+			if (joined) {
+				wapp_str8_concat_capped(output, joined);
+			}
+		}
+	}
+
+LIST_CLEANUP_DIRUP:
+	wapp_mem_arena_allocator_destroy(&tmp_arena);
+
+RETURN_DIRUP:
+	return output;
+}

src/os/cpath/cpath.h

@@ -0,0 +1,45 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#ifndef CPATH_H
+#define CPATH_H
+
+#include "../../common/aliases/aliases.h"
+#include "../../common/platform/platform.h"
+#include "../../base/mem/allocator/mem_allocator.h"
+#include "../../base/strings/str8/str8.h"
+
+#ifdef WAPP_PLATFORM_CPP
+BEGIN_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#ifdef WAPP_PLATFORM_POSIX
+#include <limits.h>
+#define WAPP_PATH_SEP '/'
+#define WAPP_PATH_MAX PATH_MAX
+#elif defined(WAPP_PLATFORM_WINDOWS)
+#define WIN32_LEAN_AND_MEAN
+#include <Windows.h>
+#define WAPP_PATH_SEP '\\'
+#define WAPP_PATH_MAX MAX_PATH
+#else
+#error "Unrecognised platform"
+#endif
+
+#define wapp_cpath_dirname(ALLOCATOR, PATH) dirup(ALLOCATOR, PATH, 1)
+#define wapp_cpath_dirup(ALLOCATOR, PATH, COUNT) dirup(ALLOCATOR, PATH, COUNT)
+
+enum {
+	CPATH_JOIN_SUCCESS = 0,
+	CPATH_JOIN_INVALID_ARGS,
+	CPATH_JOIN_EMPTY_PARTS,
+	CPATH_JOIN_INSUFFICIENT_DST_CAPACITY,
+};
+
+u32   wapp_cpath_join_path(Str8 *dst, const Str8List *parts);
+Str8 *dirup(const Allocator *allocator, Str8RO *path, u64 levels);
+
+#ifdef WAPP_PLATFORM_CPP
+END_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#endif // !CPATH_H

src/os/file/file.c

@@ -0,0 +1,129 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#include "file.h"
+#include "../cpath/cpath.h"
+#include "../../common/assert/assert.h"
+#include "../../common/aliases/aliases.h"
+#include "../../base/array/array.h"
+#include "../../base/strings/str8/str8.h"
+
+WFile *wapp_file_open(const Allocator *allocator, Str8RO *filepath, FileAccessMode mode) {
+	wapp_debug_assert(allocator != NULL && filepath != NULL, "`allocator` and `filepath` should not be NULL");
+	wapp_debug_assert(filepath->size < WAPP_PATH_MAX, "`filepath` exceeds max path limit.");
+	return _file_open(allocator, filepath, mode);
+}
+
+i64 wapp_file_get_current_position(WFile *file) {
+	wapp_debug_assert(file != NULL, "`file` should not be NULL.");
+	return _file_seek(file, 0, WAPP_SEEK_CURRENT);
+}
+
+i64 wapp_file_seek(WFile *file, i64 offset, FileSeekOrigin origin) {
+	wapp_debug_assert(file != NULL, "`file` should not be NULL.");
+	return _file_seek(file, offset, origin);
+}
+
+i64 wapp_file_get_length(WFile *file) {
+	wapp_debug_assert(file != NULL, "`file` should not be NULL.");
+
+	i64 current = wapp_file_get_current_position(file);
+
+	_file_seek(file, 0, WAPP_SEEK_END);
+
+	i64 output = wapp_file_get_current_position(file);
+
+	// Restore position
+	_file_seek(file, current, WAPP_SEEK_START);
+
+	return output;
+}
+
+u64 wapp_file_read(void *dst_buf, WFile *file, u64 byte_count) {
+	wapp_debug_assert(dst_buf != NULL && file != NULL,
+	                  "`dst_buf` and `file` should not be NULL.");
+
+	i64 file_length = wapp_file_get_length(file);
+	if (file_length < 0) {
+		return 0;
+	}
+
+	return _file_read(dst_buf, byte_count, file, file_length);
+}
+
+i64 wapp_file_write(const void *src_buf, WFile *file, u64 byte_count) {
+	wapp_debug_assert(src_buf != NULL && file != NULL,
+	                  "`src_buf` and `file` should not be NULL.");
+	return _file_write(src_buf, file, byte_count);
+}
+
+u64 wapp_file_read_array(GenericArray dst_buf, WFile *file, u64 item_count) {
+	wapp_debug_assert(dst_buf != NULL && file != NULL,
+	                  "`dst_buf` and `file` should not be NULL.");
+
+	i64 _file_length = wapp_file_get_length(file);
+	if (_file_length < 0) {
+		return 0;
+	}
+
+	u64 file_length       = (u64)_file_length;
+	u64 item_size         = wapp_array_item_size(dst_buf);
+	u64 dst_byte_capacity = wapp_array_capacity(dst_buf) * item_size;
+	u64 req_byte_count    = item_count * item_size;
+	u64 copy_byte_count   = 0;
+
+	if (req_byte_count <= file_length && req_byte_count <= dst_byte_capacity) {
+		copy_byte_count = req_byte_count;
+	} else {
+		copy_byte_count = file_length <= dst_byte_capacity ? file_length : dst_byte_capacity;
+	}
+
+	u64 byte_count = _file_read(dst_buf, copy_byte_count, file, file_length);
+	if (byte_count == 0) {
+		return 0;
+	}
+
+	wapp_array_set_count(dst_buf, byte_count / item_size);
+
+	return wapp_array_count(dst_buf);
+}
+
+i64 wapp_file_write_array(const GenericArray src_buf, WFile *file, u64 item_count) {
+	wapp_debug_assert(src_buf != NULL && file != NULL,
+	                  "`src_buf` and `file` should not be NULL.");
+
+	u64 item_size      = wapp_array_item_size(src_buf);
+	u64 src_byte_count = wapp_array_count(src_buf) * item_size;
+	u64 req_byte_count = item_count * item_size;
+	u64 to_copy        = req_byte_count <= src_byte_count ? req_byte_count : src_byte_count;
+
+	i64 bytes_written = _file_write(src_buf, file, to_copy);
+	if (bytes_written < 0) {
+		return 0;
+	}
+
+	return (u64)bytes_written / item_size;
+}
+
+i32 wapp_file_flush(WFile *file) {
+	wapp_debug_assert(file != NULL, "`file` should not be NULL.");
+	return _file_flush(file);
+}
+
+i32 wapp_file_close(WFile *file) {
+	wapp_debug_assert(file != NULL, "`file` should not be NULL.");
+	return _file_close(file);
+}
+
+i32 wapp_file_rename(Str8RO *old_filepath, Str8RO *new_filepath) {
+	wapp_debug_assert(old_filepath != NULL && new_filepath != NULL,
+	                  "`old_filepath` and `new_filepath` should not be NULL");
+	wapp_debug_assert(old_filepath->size < WAPP_PATH_MAX, "`old_filepath` exceeds max path limit.");
+	wapp_debug_assert(new_filepath->size < WAPP_PATH_MAX, "`new_filepath` exceeds max path limit.");
+	return _file_rename(old_filepath, new_filepath);
+}
+
+i32 wapp_file_remove(Str8RO *filepath) {
+	wapp_debug_assert(filepath != NULL, "`filepath` should not be NULL");
+	wapp_debug_assert(filepath->size < WAPP_PATH_MAX, "`filepath` exceeds max path limit.");
+	return _file_remove(filepath);
+}

src/os/file/file.h

@@ -0,0 +1,63 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#ifndef FILE_H
+#define FILE_H
+
+#include "../../base/mem/allocator/mem_allocator.h"
+#include "../../common/aliases/aliases.h"
+#include "../../base/strings/str8/str8.h"
+
+#ifdef WAPP_PLATFORM_CPP
+BEGIN_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+typedef struct WFile WFile;
+
+typedef enum {
+	WAPP_ACCESS_READ,                       // Equivalent to r
+	WAPP_ACCESS_WRITE,                      // Equivalent to w
+	WAPP_ACCESS_APPEND,                     // Equivalent to a
+	WAPP_ACCESS_READ_EX,                    // Equivalent to r+
+	WAPP_ACCESS_WRITE_EX,                   // Equivalent to w+
+	WAPP_ACCESS_APPEND_EX,                  // Equivalent to a+
+	WAPP_ACCESS_WRITE_FAIL_ON_EXIST,        // Equivalent to wx
+	WAPP_ACCESS_WRITE_FAIL_ON_EXIST_EX,     // Equivalent to wx+
+
+	FILE_ACCESS_MODE_COUNT,
+} FileAccessMode;
+
+typedef enum {
+	WAPP_SEEK_START,
+	WAPP_SEEK_CURRENT,
+	WAPP_SEEK_END,
+
+	FILE_SEEK_ORIGIN_COUNT,
+} FileSeekOrigin;
+
+WFile *wapp_file_open(const Allocator *allocator, Str8RO *filepath, FileAccessMode mode);
+i64    wapp_file_get_current_position(WFile *file);
+i64    wapp_file_seek(WFile *file, i64 offset, FileSeekOrigin origin);
+i64    wapp_file_get_length(WFile *file);
+u64    wapp_file_read(void *dst_buf, WFile *file, u64 byte_count);
+i64    wapp_file_write(const void *src_buf, WFile *file, u64 byte_count);
+u64    wapp_file_read_array(GenericArray dst_buf, WFile *file, u64 item_count);
+i64    wapp_file_write_array(const GenericArray src_buf, WFile *file, u64 item_count);
+i32    wapp_file_flush(WFile *file);
+i32    wapp_file_close(WFile *file);
+i32    wapp_file_rename(Str8RO *old_filepath, Str8RO *new_filepath);
+i32    wapp_file_remove(Str8RO *filepath);
+
+extern WFile *_file_open(const Allocator *allocator, Str8RO *filepath, FileAccessMode mode);
+extern i64    _file_seek(WFile *file, i64 offset, FileSeekOrigin origin);
+extern u64    _file_read(void *dst_buf, u64 byte_count, WFile *file, u64 file_length);
+extern i64    _file_write(const void *src_buf, WFile *file, u64 byte_count);
+extern i32    _file_flush(WFile *file);
+extern i32    _file_close(WFile *file);
+extern i32    _file_rename(Str8RO *old_filepath, Str8RO *new_filepath);
+extern i32    _file_remove(Str8RO *filepath);
+
+#ifdef WAPP_PLATFORM_CPP
+END_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#endif // !FILE_H

src/os/file/posix/file_posix.c

@@ -0,0 +1,119 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#include "file_posix.h"
+#include "../../../common/platform/platform.h"
+
+#ifdef WAPP_PLATFORM_POSIX
+
+#include "../file.h"
+#include "../../cpath/cpath.h"
+#include "../../../common/aliases/aliases.h"
+#include "../../../base/array/array.h"
+#include "../../../base/strings/str8/str8.h"
+
+#ifdef WAPP_PLATFORM_APPLE
+#define _FILE_OFFSET_BITS 64
+#define lseek64 lseek
+#endif // !WAPP_PLATFORM_APPLE
+
+#define __USE_LARGEFILE64
+#include <fcntl.h>
+#include <unistd.h>
+#include <sys/types.h>
+
+wapp_intern i32 file_flags[FILE_ACCESS_MODE_COUNT] = {
+	[WAPP_ACCESS_READ]                       = O_RDONLY,
+	[WAPP_ACCESS_WRITE]                      = O_WRONLY | O_CREAT,
+	[WAPP_ACCESS_APPEND]                     = O_WRONLY | O_APPEND | O_CREAT,
+	[WAPP_ACCESS_READ_EX]                    = O_RDWR,
+	[WAPP_ACCESS_WRITE_EX]                   = O_RDWR | O_CREAT,
+	[WAPP_ACCESS_APPEND_EX]                  = O_RDWR | O_APPEND | O_CREAT,
+	[WAPP_ACCESS_WRITE_FAIL_ON_EXIST]        = O_WRONLY | O_CREAT | O_EXCL,
+	[WAPP_ACCESS_WRITE_FAIL_ON_EXIST_EX]     = O_RDWR | O_CREAT | O_EXCL,
+};
+
+wapp_intern mode_t file_modes[FILE_ACCESS_MODE_COUNT] = {
+	[WAPP_ACCESS_READ]                       = 0,
+	[WAPP_ACCESS_WRITE]                      = S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP,
+	[WAPP_ACCESS_APPEND]                     = S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP,
+	[WAPP_ACCESS_READ_EX]                    = 0,
+	[WAPP_ACCESS_WRITE_EX]                   = S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP,
+	[WAPP_ACCESS_APPEND_EX]                  = S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP,
+	[WAPP_ACCESS_WRITE_FAIL_ON_EXIST]        = S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP,
+	[WAPP_ACCESS_WRITE_FAIL_ON_EXIST_EX]     = S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP,
+};
+
+wapp_intern i32 file_seek_origins[FILE_SEEK_ORIGIN_COUNT] = {
+	[WAPP_SEEK_START]   = SEEK_SET,
+	[WAPP_SEEK_CURRENT] = SEEK_CUR,
+	[WAPP_SEEK_END]     = SEEK_END,
+};
+
+WFile *_file_open(const Allocator *allocator, Str8RO *filepath, FileAccessMode mode) {
+	wapp_persist c8 tmp[WAPP_PATH_MAX] = {0};
+	memset(tmp, 0, WAPP_PATH_MAX);
+	memcpy(tmp, filepath->buf, filepath->size);
+
+	i32 fd = open((const char *)tmp, file_flags[mode], file_modes[mode]);
+	if (fd < 0) {
+		return NULL;
+	}
+
+	WFile *output = wapp_mem_allocator_alloc(allocator, sizeof(WFile));
+	if (output) {
+		output->fd = fd;
+	}
+
+	return output;
+}
+
+i64 _file_seek(WFile *file, i64 offset, FileSeekOrigin origin) {
+	return lseek64(file->fd, offset, file_seek_origins[origin]);
+}
+
+u64 _file_read(void *dst_buf, u64 byte_count, WFile *file, u64 file_length) {
+	u64 copy_byte_count = file_length <= byte_count ? file_length : byte_count;
+
+	i64 count = read(file->fd, dst_buf, copy_byte_count);
+	if (count < 0) { return 0; }
+
+	return count;
+}
+
+i64 _file_write(const void *src_buf, WFile *file, u64 byte_count) {
+	return write(file->fd, src_buf, byte_count);
+}
+
+i32 _file_flush(WFile *file) {
+	return fsync(file->fd);
+}
+
+i32 _file_close(WFile *file) {
+	return close(file->fd);
+}
+
+i32 _file_rename(Str8RO *old_filepath, Str8RO *new_filepath) {
+	wapp_persist c8 old_tmp[WAPP_PATH_MAX] = {0};
+	wapp_persist c8 new_tmp[WAPP_PATH_MAX] = {0};
+	memset(old_tmp, 0, WAPP_PATH_MAX);
+	memcpy(old_tmp, old_filepath->buf, old_filepath->size);
+	memset(new_tmp, 0, WAPP_PATH_MAX);
+	memcpy(new_tmp, new_filepath->buf, new_filepath->size);
+
+	i32 link_result = link((const char *)old_tmp, (const char *)new_tmp);
+	if (link_result == 0) {
+		_file_remove(old_filepath);
+	}
+
+	return link_result;
+}
+
+i32 _file_remove(Str8RO *filepath) {
+	wapp_persist c8 tmp[WAPP_PATH_MAX] = {0};
+	memset(tmp, 0, WAPP_PATH_MAX);
+	memcpy(tmp, filepath->buf, filepath->size);
+
+	return unlink((const char *)tmp);
+}
+
+#endif // !WAPP_PLATFORM_POSIX

src/os/file/posix/file_posix.h

@@ -0,0 +1,27 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#ifndef FILE_POSIX_H
+#define FILE_POSIX_H
+
+#include "../../../common/aliases/aliases.h"
+#include "../../../common/platform/platform.h"
+
+#ifdef WAPP_PLATFORM_CPP
+BEGIN_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#ifdef WAPP_PLATFORM_POSIX
+
+#define END_OF_LINE "\n"
+
+struct WFile {
+	i32 fd;
+};
+
+#endif // !WAPP_PLATFORM_POSIX
+
+#ifdef WAPP_PLATFORM_CPP
+END_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#endif // !FILE_POSIX_H

src/os/file/win/file_win.c

@@ -0,0 +1,159 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#include "file_win.h"
+#include "../../../common/platform/platform.h"
+
+#ifdef WAPP_PLATFORM_WINDOWS
+
+#include "../file.h"
+#include "../../cpath/cpath.h"
+#include "../../../common/aliases/aliases.h"
+#include "../../../base/array/array.h"
+#include "../../../base/strings/str8/str8.h"
+#define WIN32_LEAN_AND_MEAN
+#include <Windows.h>
+#include <fileapi.h>
+#include <intsafe.h>
+
+wapp_intern DWORD file_accesses[FILE_ACCESS_MODE_COUNT] = {
+	[WAPP_ACCESS_READ]                       = FILE_READ_DATA,
+	[WAPP_ACCESS_WRITE]                      = FILE_WRITE_DATA,
+	[WAPP_ACCESS_APPEND]                     = FILE_APPEND_DATA,
+	[WAPP_ACCESS_READ_EX]                    = FILE_READ_DATA | FILE_WRITE_DATA,
+	[WAPP_ACCESS_WRITE_EX]                   = FILE_READ_DATA | FILE_WRITE_DATA,
+	[WAPP_ACCESS_APPEND_EX]                  = FILE_READ_DATA | FILE_APPEND_DATA,
+	[WAPP_ACCESS_WRITE_FAIL_ON_EXIST]        = FILE_WRITE_DATA,
+	[WAPP_ACCESS_WRITE_FAIL_ON_EXIST_EX]     = FILE_READ_DATA | FILE_WRITE_DATA,
+};
+
+wapp_intern DWORD creation_dispositions[FILE_ACCESS_MODE_COUNT] = {
+	[WAPP_ACCESS_READ]                       = OPEN_EXISTING,
+	[WAPP_ACCESS_WRITE]                      = CREATE_ALWAYS,
+	[WAPP_ACCESS_APPEND]                     = OPEN_ALWAYS,
+	[WAPP_ACCESS_READ_EX]                    = OPEN_EXISTING,
+	[WAPP_ACCESS_WRITE_EX]                   = CREATE_ALWAYS,
+	[WAPP_ACCESS_APPEND_EX]                  = OPEN_ALWAYS,
+	[WAPP_ACCESS_WRITE_FAIL_ON_EXIST]        = CREATE_NEW,
+	[WAPP_ACCESS_WRITE_FAIL_ON_EXIST_EX]     = CREATE_NEW,
+};
+
+wapp_intern DWORD sharing_modes[FILE_ACCESS_MODE_COUNT] = {
+	[WAPP_ACCESS_READ]                       = FILE_SHARE_READ | FILE_SHARE_WRITE,
+	[WAPP_ACCESS_WRITE]                      = FILE_SHARE_READ,
+	[WAPP_ACCESS_APPEND]                     = FILE_SHARE_READ,
+	[WAPP_ACCESS_READ_EX]                    = FILE_SHARE_READ | FILE_SHARE_WRITE,
+	[WAPP_ACCESS_WRITE_EX]                   = FILE_SHARE_READ,
+	[WAPP_ACCESS_APPEND_EX]                  = FILE_SHARE_READ,
+	[WAPP_ACCESS_WRITE_FAIL_ON_EXIST]        = FILE_SHARE_READ,
+	[WAPP_ACCESS_WRITE_FAIL_ON_EXIST_EX]     = FILE_SHARE_READ,
+};
+
+wapp_intern DWORD file_seek_origins[FILE_SEEK_ORIGIN_COUNT] = {
+	[WAPP_SEEK_START]   = FILE_BEGIN,
+	[WAPP_SEEK_CURRENT] = FILE_CURRENT,
+	[WAPP_SEEK_END]     = FILE_END,
+};
+
+WFile *_file_open(const Allocator *allocator, Str8RO *filepath, FileAccessMode mode) {
+	wapp_persist c8 tmp[WAPP_PATH_MAX] = {0};
+	memset(tmp, 0, WAPP_PATH_MAX);
+	memcpy(tmp, filepath->buf, filepath->size);
+
+	HANDLE fh = CreateFileA((LPCSTR)tmp,
+	                        file_accesses[mode],
+	                        sharing_modes[mode],
+	                        NULL,
+	                        creation_dispositions[mode],
+	                        FILE_ATTRIBUTE_NORMAL,
+	                        NULL);
+	if (fh == INVALID_HANDLE_VALUE) {
+		return NULL;
+	}
+
+	WFile *output = wapp_mem_allocator_alloc(allocator, sizeof(WFile));
+	if (output) {
+		output->fh = fh;
+	}
+
+	return output;
+}
+
+i64 _file_seek(WFile *file, i64 offset, FileSeekOrigin origin) {
+	LARGE_INTEGER distance = {0};
+	LARGE_INTEGER output   = {0};
+
+	distance.QuadPart = offset;
+
+	if (!SetFilePointerEx(file->fh, distance, &output, file_seek_origins[origin])) {
+		return -1;
+	}
+
+	return output.QuadPart;
+}
+
+u64 _file_read(void* dst_buf, u64 byte_count, WFile* file, u64 file_length) {
+	u64 copy_byte_count = file_length <= byte_count ? file_length : byte_count;
+	wapp_debug_assert(copy_byte_count <= DWORD_MAX, "Attempting to read large number of bytes at once");
+
+	DWORD read_count = 0;
+	if (!ReadFile(file->fh, dst_buf, (DWORD)copy_byte_count, &read_count, NULL)) {
+		return 0;
+	}
+
+	return (u64)read_count;
+}
+
+i64 _file_write(const void *src_buf, WFile *file, u64 byte_count) {
+	wapp_debug_assert(byte_count <= DWORD_MAX, "Attempting to write large number of bytes at once");
+
+	DWORD write_count = 0;
+	if (!WriteFile(file->fh, src_buf, (DWORD)byte_count, &write_count, NULL)) {
+		return 0;
+	}
+	return (i64)write_count;
+}
+
+i32 _file_flush(WFile *file) {
+	if (!FlushFileBuffers(file->fh)) {
+		return -1;
+	}
+
+	return 0;
+}
+
+i32 _file_close(WFile *file) {
+	if (!CloseHandle(file->fh)) {
+		return -1;
+	}
+
+	return 0;
+}
+
+i32 _file_rename(Str8RO *old_filepath, Str8RO *new_filepath) {
+	wapp_persist c8 old_tmp[WAPP_PATH_MAX] = {0};
+	wapp_persist c8 new_tmp[WAPP_PATH_MAX] = {0};
+	memset(old_tmp, 0, WAPP_PATH_MAX);
+	memcpy(old_tmp, old_filepath->buf, old_filepath->size);
+	memset(new_tmp, 0, WAPP_PATH_MAX);
+	memcpy(new_tmp, new_filepath->buf, new_filepath->size);
+
+	if (!MoveFile((LPCSTR)old_tmp, (LPCSTR)new_tmp)) {
+		return -1;
+	}
+
+	return 0;
+}
+
+i32 _file_remove(Str8RO *filepath) {
+	wapp_persist c8 tmp[WAPP_PATH_MAX] = {0};
+	memset(tmp, 0, WAPP_PATH_MAX);
+	memcpy(tmp, filepath->buf, filepath->size);
+
+	if (!DeleteFile((LPCSTR)tmp)) {
+		return -1;
+	}
+
+	return 0;
+}
+
+#endif // !WAPP_PLATFORM_WINDOWS

src/os/file/win/file_win.h

@@ -0,0 +1,31 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#ifndef FILE_WIN_H
+#define FILE_WIN_H
+
+#include "../../../common/aliases/aliases.h"
+#include "../../../common/platform/platform.h"
+
+#ifdef WAPP_PLATFORM_CPP
+BEGIN_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#ifdef WAPP_PLATFORM_WINDOWS
+
+#define END_OF_LINE "\r\n"
+
+#define WIN32_LEAN_AND_MEAN
+#include <Windows.h>
+#include <fileapi.h>
+
+struct WFile {
+	HANDLE fh;
+};
+
+#endif // !WAPP_PLATFORM_WINDOWS
+
+#ifdef WAPP_PLATFORM_CPP
+END_C_LINKAGE
+#endif // !WAPP_PLATFORM_CPP
+
+#endif // !FILE_WIN_H

src/os/mem/mem_os.c

@@ -0,0 +1,30 @@
+// vim:fileencoding=utf-8:foldmethod=marker
+
+#include "mem_os.h"
+#include "mem_os_ops.h"
+#include "../../common/aliases/aliases.h"
+#include "../../common/platform/platform.h"
+#include <assert.h>
+#include <string.h>
+
+#if defined(WAPP_PLATFORM_WINDOWS)
+#include "win/mem_os_win.h"
+#elif defined(WAPP_PLATFORM_POSIX)
+#include "posix/mem_os_posix.h"
+#else
+#error "Unrecognised platform"
+#endif
+
+void *wapp_os_mem_alloc(void *addr, u64 size, MemAccess access, MemAllocFlags flags, MemInitType type) {
+	void *output = os_mem_allocate(addr, size, access, flags, type);
+
+	if (type == WAPP_MEM_INIT_INITIALISED) {
+		memset(output, 0, size);
+	}
+
+	return output;
+}
+
+void wapp_os_mem_free(void *ptr, u64 size) {
+	os_mem_free(ptr, size);
+}