From f3b82b0618c9e2a0ebe85f3a4a5dc81d612ec3f1 Mon Sep 17 00:00:00 2001
From: Sven Heidemann <sven.heidemann@sh-edraft.de>
Date: Wed, 5 Nov 2025 22:00:58 +0100
Subject: [PATCH] =?UTF-8?q?ocnet.lua=20hinzugef=C3=BCgt?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 ocnet.lua | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 ocnet.lua

diff --git a/ocnet.lua b/ocnet.lua
new file mode 100644
index 0000000..a6aa966
--- /dev/null
+++ b/ocnet.lua
@@ -0,0 +1,25 @@
+local component = require("component")
+local minitel = require("minitel")
+
+local GATEWAY = "home1"
+local PORT = 5353
+
+-- hostname aus /etc/hostname lesen
+local f = io.open("/etc/hostname", "r")
+local hostname = f and f:read("*l") or "unknown"
+if f then f:close() end
+
+-- Hardware-UUID der ersten Netzwerkkarte finden
+local modemUUID
+for addr, t in component.list("modem") do
+  modemUUID = addr
+  break
+end
+
+if not modemUUID then
+  io.stderr:write("[ocnet] Keine Netzwerkkarte gefunden!\n")
+  return
+end
+
+print("[ocnet] registriere " .. hostname .. " (" .. modemUUID .. ") bei " .. GATEWAY)
+minitel.usend(GATEWAY, PORT, "REG " .. hostname .. " " .. modemUUID)