tests: add standalone var management tests.

Author: adriweb

examples/standalone_examples/vars/.gitignore

@@ -0,0 +1,7 @@
+obj/
+bin/
+src/gfx/*.c
+src/gfx/*.h
+src/gfx/*.8xv
+.DS_Store
+convimg.yaml.lst

examples/standalone_examples/vars/autotest.json

@@ -0,0 +1,40 @@
+{
+  "transfer_files": [
+    "bin/DEMO.8xp"
+  ],
+  "target": {
+    "name": "DEMO",
+    "isASM": true
+  },
+  "sequence": [
+    "action|launch",
+    "delay|1000",
+    "hashWait|1",
+    "delay|100",
+    "key|enter",
+    "delay|500",
+    "hashWait|2"
+  ],
+  "hashes": {
+    "1": {
+      "description": "List variable handled",
+      "start": "vram_start",
+      "size": "vram_16_size",
+      "expected_CRCs": [
+        "BDBF7F60"
+      ]
+    },
+    "2": {
+      "description": "Test program exit",
+      "start": "vram_start",
+      "size": "vram_16_size",
+      "expected_CRCs": [
+        "FFAF89BA",
+        "101734A5",
+        "9DA19F44",
+        "A32840C8",
+        "349F4775"
+      ]
+    }
+  }
+}

examples/standalone_examples/vars/makefile

@@ -0,0 +1,15 @@
+# ----------------------------
+# Makefile Options
+# ----------------------------
+
+NAME = DEMO
+ICON = icon.png
+DESCRIPTION = "CE C Toolchain Demo"
+COMPRESSED = NO
+
+CFLAGS = -Wall -Wextra -Oz
+CXXFLAGS = -Wall -Wextra -Oz
+
+# ----------------------------
+
+include $(shell cedev-config --makefile)

examples/standalone_examples/vars/readme.md

@@ -0,0 +1,4 @@
+### Var management Demo
+
+This demo demonstrates using some OS routines for variable management.
+

examples/standalone_examples/vars/src/main.c

@@ -0,0 +1,110 @@
+#include <assert.h>
+#include <stdbool.h>
+#include <stdint.h>
+#include <string.h>
+
+#include <ti/getcsc.h>
+#include <ti/screen.h>
+#include <ti/vars.h>
+#include <debug.h>
+
+struct Counters {
+    unsigned int ram;
+    unsigned int flash;
+};
+
+// Those can't be deleted.
+static bool isInternalVar(uint8_t varType, const char* name) {
+    return !strcmp(name, "#")
+        || (varType == OS_TYPE_EQU  && !strcmp(name, "."))
+        || (varType == OS_TYPE_PRGM && !strcmp(name, "!"));
+}
+
+// Walk through the VAT, debug-prints some info about the entries, and returns the number of entries seen
+static struct Counters walkVAT(void)
+{
+    void* vatStart = os_GetSymTablePtr();
+    void* nextEntry = NULL;
+    void* entry = vatStart;
+    uint24_t varType = 0, nameLen = 0;
+    char name[9] = {0};
+    void* data = NULL;
+    struct Counters counters = { 0, 0 };
+
+    while (entry)
+    {
+        nextEntry = os_NextSymEntry(entry, &varType, &nameLen, name, &data);
+
+        const bool isArchived = (uintptr_t)data < (uintptr_t)os_RamStart;
+        const bool isNamed = entry <= *(void**)0xD0259D; // progPtr
+        const bool isInternal = isInternalVar(varType, name);
+        const uint8_t* actualDataAddr = isArchived ? (data + 9 + isNamed + nameLen) : data;
+
+        if (isArchived) {
+            counters.flash++;
+        } else {
+            counters.ram++;
+        }
+
+        dbg_printf("%s%s entry %p (data @ %06X ; actual data @ %06X) : [type %02X] [namelen %d] \"%s\"\n",
+                    isArchived ? "Archived" : "RAM", isInternal ? " internal" : "", entry, (uintptr_t)data,
+                    (uintptr_t)actualDataAddr, varType, nameLen, name);
+
+        entry = nextEntry;
+    }
+
+    return counters;
+}
+
+int main(void)
+{
+    char buf[31] = {0};
+    struct Counters counters = { 0, 0 };
+
+    os_ClrHome();
+
+    counters = walkVAT();
+    snprintf(buf, 30, "before: %d R / %d F", counters.ram, counters.flash);
+    os_PutStrFull(buf);
+    os_NewLine();
+
+    int ret = 0;
+    ret = os_SetListDim("\x5DTESTL", 10);
+    dbg_printf("os_SetListDim ret = %d\n", ret);
+    assert(ret == 0);
+
+    void *entry, *data;
+    ret = os_ChkFindSym(OS_TYPE_REAL_LIST, "\x5DTESTL", &entry, &data);
+    dbg_printf("os_ChkFindSym ret = %d. entry = %p, data = %p\n", ret, entry, data);
+    assert(ret == 1);
+
+    counters = walkVAT();
+    snprintf(buf, 30, "created: %d R / %d F", counters.ram, counters.flash);
+    os_PutStrFull(buf);
+    os_NewLine();
+
+    bool archived = arcUnarcVariable(OS_TYPE_REAL_LIST, 6, "\x5DTESTL");
+    assert(archived);
+
+    counters = walkVAT();
+    snprintf(buf, 30, "archived: %d R / %d F", counters.ram, counters.flash);
+    os_PutStrFull(buf);
+    os_NewLine();
+
+    ret = os_ChkFindSym(OS_TYPE_REAL_LIST, "\x5DTESTL", &entry, &data);
+    dbg_printf("os_ChkFindSym ret = %d. entry = %p, data = %p\n", ret, entry, data);
+    assert(ret == 1);
+
+    os_DelVar(entry);
+
+    ret = os_ChkFindSym(OS_TYPE_REAL_LIST, "\x5DTESTL", &entry, &data);
+    dbg_printf("os_ChkFindSym ret = %d. entry = %p, data = %p\n", ret, entry, data);
+    assert(ret == 0);
+
+    counters = walkVAT();
+    snprintf(buf, 30, "removed: %d R / %d F", counters.ram, counters.flash);
+    os_PutStrFull(buf);
+
+    while (!os_GetCSC());
+    return 0;
+}