From fcf7cdbe0a971825da0bb087383c60e714ab2be0 Mon Sep 17 00:00:00 2001
From: eunhhu <necpition205@gmail.com>
Date: Tue, 29 Sep 2026 07:11:32 +0100
Subject: Let links know nothing of the core: the host names inputs and shapes

A sender takes its messages' shape, and a listener asks its host which
input a stream goes to. The core gives the shape (pure_module_shape);
link/ now builds without the core's headers.
---
 core/module.c | 19 +++++++++++++++++++
 core/module.h |  4 ++++
 2 files changed, 23 insertions(+)

(limited to 'core')

diff --git a/core/module.c b/core/module.c
index cb4fe1a..8ac3b48 100644
--- a/core/module.c
+++ b/core/module.c
@@ -1094,6 +1094,25 @@ static int find(const char (*names)[PURE_MODULE_NAME], unsigned count, const cha
 
 int pure_module_state(const PureModule *m, const char *name) { return find(m->state_names, m->states, name); }
 int pure_module_input(const PureModule *m, const char *name) { return find(m->input_names, m->inputs, name); }
+static uint32_t fnv(uint32_t h, const void *bytes, size_t size) {
+    const unsigned char *p = bytes;
+    for (size_t i = 0; i < size; ++i) h = (h ^ p[i]) * 16777619u;
+    return h;
+}
+
+uint32_t pure_module_shape(const PureModule *m, uint32_t input) {
+    const PureInputShape *s = &m->input[input];
+    uint32_t h = fnv(2166136261u, &s->prefix, sizeof(s->prefix));
+    for (uint32_t f = 0; f < s->field_count; ++f) {
+        const PureField *field = &m->field[s->field_start + f];
+        unsigned char fixed[7] = {field->type, (unsigned char)field->rows, (unsigned char)(field->rows >> 8),
+                                  (unsigned char)field->offset, (unsigned char)(field->offset >> 8),
+                                  (unsigned char)(field->offset >> 16), (unsigned char)(field->offset >> 24)};
+        h = fnv(fnv(h, field->name, strlen(field->name) + 1), fixed, sizeof(fixed));
+    }
+    return h;
+}
+
 int pure_module_view(const PureModule *m, const char *name) {
     for (uint32_t i = 0; i < m->views; ++i)
         if (!m->view_table[i] && !strcmp(m->view_names[i], name)) return (int)i;
diff --git a/core/module.h b/core/module.h
index 3431c87..0b45ba2 100644
--- a/core/module.h
+++ b/core/module.h
@@ -211,6 +211,10 @@ int pure_module_state(const PureModule *, const char *name);
 int pure_module_input(const PureModule *, const char *name);
 int pure_module_view(const PureModule *, const char *name);
 int pure_module_column(const PureModule *, uint32_t table, const char *name);
+/* What a message of an input looks like, as 32 bits: its fields' names,
+ * types and places (FNV-1a). A sender's output and the input it sends to
+ * across nodes must agree on it (link/link.h). */
+uint32_t pure_module_shape(const PureModule *, uint32_t input);
 /* The index state a number view shows as its position (a view that is just
  * `at.position`), or -1: what a host moves with pure_app_point. */
 int pure_module_position(const PureModule *, uint32_t view);
-- 
cgit v1.2.3