From f2c34b1d2c18270a0327fb4896fa307fae098770 Mon Sep 17 00:00:00 2001
From: Paul Oliver <contact@pauloliver.dev>
Date: Tue, 14 Jul 2026 17:29:02 +0200
Subject: Initial

---
 arch/null/arch.c | 164 +++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 164 insertions(+)
 create mode 100644 arch/null/arch.c

(limited to 'arch/null/arch.c')

diff --git a/arch/null/arch.c b/arch/null/arch.c
new file mode 100644
index 0000000..9faf40d
--- /dev/null
+++ b/arch/null/arch.c
@@ -0,0 +1,164 @@
+// file    : arch/null/arch.c
+// project : Salis-VM
+// author  : Paul Oliver <contact@pauloliver.dev>
+
+// index:
+// [section] includes
+// [section] getters
+// [section] callbacks
+// [section] validation
+// [section] data
+// [section] main
+
+// ----------------------------------------------------------------------------
+// [section] includes
+// ----------------------------------------------------------------------------
+#include <assert.h>
+#include <sqlite3.h>
+#include <stdbool.h>
+#include <stdint.h>
+#include <stdio.h>
+#include <threads.h>
+#include <zlib.h>
+
+#include "arch.h"
+#include "arch_spec.h"
+#include "compress.h"
+#include "logger.h"
+#include "salis.h"
+#include "sql.h"
+
+// ----------------------------------------------------------------------------
+// [section] getters
+// ----------------------------------------------------------------------------
+uint64_t arch_proc_get_ip_addr(const struct Core *core, uint64_t pix) {
+    assert(core);
+    assert(mvec_proc_is_live(core, pix));
+    return proc_get(core, pix)->ip;
+}
+
+uint64_t arch_proc_get_sp_addr(const struct Core *core, uint64_t pix) {
+    assert(core);
+    assert(mvec_proc_is_live(core, pix));
+    return proc_get(core, pix)->sp;
+}
+
+uint64_t arch_proc_get_mb0_addr(const struct Core *core, uint64_t pix) {
+    assert(core);
+    assert(mvec_proc_is_live(core, pix));
+    return proc_get(core, pix)->mb0a;
+}
+
+uint64_t arch_proc_get_mb0_size(const struct Core *core, uint64_t pix) {
+    assert(core);
+    assert(mvec_proc_is_live(core, pix));
+    return proc_get(core, pix)->mb0s;
+}
+
+uint64_t arch_proc_get_mb1_addr(const struct Core *core, uint64_t pix) {
+    assert(core);
+    assert(mvec_proc_is_live(core, pix));
+    return proc_get(core, pix)->mb1a;
+}
+
+uint64_t arch_proc_get_mb1_size(const struct Core *core, uint64_t pix) {
+    assert(core);
+    assert(mvec_proc_is_live(core, pix));
+    return proc_get(core, pix)->mb1s;
+}
+
+uint64_t arch_proc_get_slice(const struct Core *core, uint64_t pix) {
+    assert(core);
+    assert(mvec_proc_is_live(core, pix));
+    (void)core;
+    (void)pix;
+    return 1;
+}
+
+// ----------------------------------------------------------------------------
+// [section] callbacks
+// ----------------------------------------------------------------------------
+void arch_on_proc_step(struct Core *core, uint64_t pix) {
+    assert(core);
+    assert(mvec_proc_is_live(core, pix));
+    (void)core;
+    (void)pix;
+    return;
+}
+
+void arch_on_proc_kill(struct Core *core) {
+    assert(core);
+    assert(core->pnum > 1);
+    (void)core;
+}
+
+// ----------------------------------------------------------------------------
+// [section] validation
+// ----------------------------------------------------------------------------
+#if !defined(NDEBUG)
+void arch_validate_core(struct Core *core) {
+    assert(core);
+    (void)core;
+}
+#endif
+
+// ----------------------------------------------------------------------------
+// [section] data
+// ----------------------------------------------------------------------------
+void arch_push_data_header(void) {
+    log_info("Creating arch table in SQLite database");
+    sql_exec(NULL, NULL, "create table arch (step int not null);");
+}
+
+void arch_prepare_data_line(void) {
+    log_info("Preparing arch data-line");
+    sql_exec(NULL, NULL, "insert into arch (step) values (%ld);", g_step);
+}
+
+void arch_push_data_line(FILE *eva_file) {
+    assert(eva_file);
+    (void)eva_file;
+    log_info("Pushing row to arch table in SQLite database");
+    sql_exec(NULL, NULL, "insert into arch (step) values (%ld);", g_step);
+}
+
+// ----------------------------------------------------------------------------
+// [section] main
+// ----------------------------------------------------------------------------
+void arch_core_init(struct Core *core) {
+    assert(core);
+
+#if defined(ARCH_SPEC_MVEC_LOOP)
+    uint64_t addr = SALIS_UINT64_HALF;
+#else
+    uint64_t addr = 0;
+#endif
+
+    for (uint64_t i = 0; i < CLONES; i++) {
+        uint64_t addr_clone = addr + (MVEC_SIZE / CLONES) * i;
+        struct Proc *panc = proc_fetch(core, i);
+        panc->mb0a = addr_clone;
+        panc->mb0s = ANC_SIZE;
+        panc->ip = addr_clone;
+        panc->sp = addr_clone;
+    }
+}
+
+void arch_core_free(struct Core *core) {
+    assert(core);
+    (void)core;
+}
+
+void arch_core_load(struct Core *core, FILE *f) {
+    assert(core);
+    assert(f);
+    (void)core;
+    (void)f;
+}
+
+void arch_core_save(const struct Core *core, FILE *f) {
+    assert(core);
+    assert(f);
+    (void)core;
+    (void)f;
+}
-- 
cgit v1.3.1