Any identity could have arbitrary FORTH run as Zuse: KH-ELEVATE-SEND and KH-BLK-ATTACH-SEND sent any text to Hera, from any VM (shown live). And the drain popped a message after running it, so a payload calling a colon word ran twice. Both fixed test first (FABRIC-3 SXXXVII): - KH-BLK-ATTACH-SEND is ( dev-addr ok? -- sent? ), Artemis only; the kernel writes the reply text. BLK-ATTACH-ACK is Hera's only. - The drain pops before it runs. - Elevation, ruled not needed: KH-ELEVATE-SEND, message type 8, zuse-eligibility.4th, ZUSE-ELIGIBLE?/ZUSE-ELIGIBILITY-ADD/ ELEVATE-PUBKEY-UNPACK and the eligibility list removed; its disk area stays reserved, unused. FABRIC-3.7 closed. Three ISAs: POST 1052 passed; new parity baseline word_count=523 hash=0xb73b58052d591638 (deliberate). Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
25 lines
669 B
Forth
25 lines
669 B
Forth
Block 2057
|
|
( BOOT-BANNER - LithosAnanke REPL greeting )
|
|
: .SEP ." ================================================" CR ;
|
|
: BOOT-BANNER
|
|
CR .SEP
|
|
." LithosAnanke — FORTH-79 bare-metal kernel" CR
|
|
." Stadium step one: Hera alone" CR
|
|
.SEP
|
|
." Hera [live]" CR
|
|
.SEP CR ;
|
|
Block 2049
|
|
( Hera init — Mama VM personality )
|
|
: VM-TREE ( -- ) ." Hera[0]" CR ;
|
|
: VM-PARENT ( -- id ) 0 ;
|
|
: VM-CHILDREN ( -- ) ." (none)" CR ;
|
|
S" ACL.4th" EXEC
|
|
S" block-acl.4th" EXEC
|
|
S" lib.4th" EXEC
|
|
( FABRIC-3.6.md Phase 4, Stage E: common:messaging.4th/ )
|
|
( MSG-CD-INIT removed -- no longer exists, no longer needed. )
|
|
Block 2050
|
|
( Hera boot — banner )
|
|
BOOT-BANNER
|
|
STARTUP-BANNER
|