Add VMIdentity type, relocate homeblocks_sig_t off devblock 0
Phase A of the identity pipeline (FABRIC-3.md §F.2/§F.16, §F.13):
- New include/starkernel/vm_identity.h: VMIdentity{owner_pubkey[32],
installed, acl_caps}, its own header per the project's "give real-shaped
data its own header" convention (VMUuid's own precedent), embedded by
value on struct VM. acl_caps is an independent capability bitmask, not
an ordered privilege tier (decided 2026-08-28) -- Zuse isn't a
structurally special VM, her identity just has every bit set
(VM_IDENTITY_CAP_ALL). No individual capability bits assigned yet,
deliberate slack matching blk_meta_t's own acl_reserved precedent --
real bits get names once the operation they gate (BINDSTEP, MINT, ...)
actually gets built.
- Applied the devblock-1 relocation decided in §F.13: new
HOMEBLOCKS_SIG_START_FBLOCK constant (homeblocks_sig.h), repl.c's
homeblocks_sig_check() call site updated from the literal 0. Also
applied the still-owed blockmap_offset/blockmap_devblocks ->
identity_src_offset/identity_src_devblocks rename decided in §F.6 (no
other code referenced the old names). Updated the header's own stale
GPT-relative doc comments to match -- GPT was dropped permanently, this
location is final, not an interim stand-in.
Verified live on all three architectures: clean compile, clean boot to
ok>, Hermes/Artemis both confirmed live with no KILL (no regression from
last session's session-less fix). One pre-existing, unrelated anomaly
observed consistently on all three arches, not caused by this change (no
code touched here intersects Zuse's own fence-write path): "Zuse: minted
but fence write FAILED (not persistent)" -- flagged for its own
investigation, not chased here.
Co-Authored-By: Claude Sonnet 5 <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_019ZGkimpfyh63EZyRkNbkPD
This commit is contained in:
co-authored by
Claude Sonnet 5
parent
2cc1d27f19
commit
c07184e984
@@ -22,15 +22,17 @@
|
||||
|
||||
/**
|
||||
* homeblocks_sig.h - Home-blocks drive signature format (FABRIC-3.md,
|
||||
* Milestone 4, Phase 8 kickoff)
|
||||
* Milestone 4, Phase 8 kickoff; relocated + GPT dropped §F.13/§F.8,
|
||||
* 2026-08-28)
|
||||
*
|
||||
* Identifies and authenticates a physical thumb drive as a legitimate
|
||||
* LithosAnanke home-blocks drive, before any write path touches it.
|
||||
* Lives at the first 4KiB devblock of the drive's GPT metadata partition
|
||||
* (the ~1GB partition decided 2026-08-22) -- this header's own format does
|
||||
* not depend on the GPT parser that locates that partition; it is simply
|
||||
* what gets written starting at that partition's first devblock, once
|
||||
* something can find it.
|
||||
* Lives at forth-block HOMEBLOCKS_SIG_START_FBLOCK (devblock 1) of the raw
|
||||
* device -- GPT partitioning was decided against permanently (§F.8): this
|
||||
* is the real, final on-disk location, not an interim stand-in. Devblock 0
|
||||
* is left alone for the block-subsystem's own generic 'STFR'/v2 volume
|
||||
* header (block_subsystem.h) -- the two formats would otherwise collide
|
||||
* (§F.13, found while scoping BMAPREAD).
|
||||
*
|
||||
* Mirrors two existing precedents exactly, not invented fresh:
|
||||
* - CAPSULE_MAGIC_PACK's bit-packed magic (starkernel/capsule.h)
|
||||
@@ -38,11 +40,10 @@
|
||||
* convention (block_subsystem.h)
|
||||
*
|
||||
* Deliberately narrow in scope: this header identifies/authenticates the
|
||||
* DRIVE only. It does not invent the on-drive block-map format (Milestone
|
||||
* 3, still undesigned) or the credential/cert format (Milestone 6, blocked
|
||||
* on a real CA that does not exist yet) -- it only reserves offset/size
|
||||
* pointers to where those will attach, so this format does not need to be
|
||||
* revisited when those get designed.
|
||||
* DRIVE only. It reserves offset/size pointers to where the cert
|
||||
* (CERTVERIFY, §F.7) and this identity's own personality/init source
|
||||
* (RUNCAP/MINT, §F.6/§F.8) attach, so this format doesn't need revisiting
|
||||
* when those get built -- it does not itself decide their content.
|
||||
*/
|
||||
|
||||
#ifndef STARKERNEL_HOMEBLOCKS_SIG_H
|
||||
@@ -72,6 +73,15 @@ extern "C" {
|
||||
#define HOMEBLOCKS_SIG_GET_MAGIC(m) ((uint32_t)((m) & 0xFFFFFFFFULL))
|
||||
#define HOMEBLOCKS_SIG_GET_VERSION(m) ((uint8_t)(((m) >> 32) & 0xFF))
|
||||
|
||||
/* Where this header actually lives on a home-blocks drive: forth-block 4
|
||||
* (devblock 1), NOT devblock 0 -- FABRIC-3.md §F.13, decided 2026-08-28.
|
||||
* Devblock 0 is reserved for the block-subsystem's own generic 'STFR'/v2
|
||||
* volume header (block_subsystem.c); the two formats collide if both try
|
||||
* to occupy devblock 0 of the same raw device. GPT is permanently dropped
|
||||
* (§F.8) -- this is not an interim stand-in pending a GPT parser, it's the
|
||||
* real, final location. */
|
||||
#define HOMEBLOCKS_SIG_START_FBLOCK 4u
|
||||
|
||||
/*===========================================================================
|
||||
* homeblocks_sig_t - drive signature header (exactly one 4KiB devblock)
|
||||
*===========================================================================*/
|
||||
@@ -81,18 +91,26 @@ typedef struct {
|
||||
uint8_t drive_uuid[16]; /* Unique per-mint instance id -- Phase 8 mints multiple
|
||||
* distinct drives, needs something to tell them apart. */
|
||||
uint64_t minted_time_ns; /* Monotonic timestamp at mint time. */
|
||||
uint64_t metadata_devblocks; /* Size of this GPT metadata partition, in 4KiB devblocks --
|
||||
* sanity/bounds check against the GPT entry once a parser
|
||||
* exists. */
|
||||
uint64_t metadata_devblocks; /* Size of the metadata region at the start of this raw
|
||||
* device (sig header + cert + identity-source regions),
|
||||
* in 4KiB devblocks -- everything past this is the owning
|
||||
* identity's own general block-storage pool directly (§F.6
|
||||
* decision 3), no partition boundary involved. */
|
||||
|
||||
uint32_t cert_offset; /* Devblock offset within this partition where the CA-signed
|
||||
* cert blob starts; 0 = not yet minted. Format not decided --
|
||||
* Milestone 6's real CA does not exist yet. */
|
||||
uint32_t cert_offset; /* Devblock offset from this device's start where this
|
||||
* identity's Zuse-signed cert blob starts (§F.7); 0 = not
|
||||
* yet minted. */
|
||||
uint32_t cert_devblocks; /* Size reserved for the cert blob, in devblocks. */
|
||||
|
||||
uint32_t blockmap_offset; /* Devblock offset where the block-map starts; 0 = not yet
|
||||
* minted. Format not decided -- Milestone 3, still open. */
|
||||
uint32_t blockmap_devblocks; /* Size reserved for the block-map, in devblocks. */
|
||||
uint32_t identity_src_offset; /* Devblock offset where this identity's own record
|
||||
* starts (RUNCAP/MINT, FABRIC-3.md §F.6/§F.8): first
|
||||
* devblock is a user_identity_seed_t, remainder is raw
|
||||
* FORTH personality/init source. Renamed from
|
||||
* blockmap_offset -- BMAPFMT (§F.4) repurposed blk_meta_t
|
||||
* instead of a centralized block-map, making the original
|
||||
* field unnecessary; this reuses the same reserved bytes
|
||||
* rather than adding new ones. 0 = not yet minted. */
|
||||
uint32_t identity_src_devblocks; /* Size reserved for the identity record, in devblocks. */
|
||||
|
||||
uint64_t hdr_crc; /* REAL from day one, not a placeholder like
|
||||
* blk_volume_meta_t's "unused yet" hdr_crc -- this header's
|
||||
@@ -109,7 +127,7 @@ typedef struct {
|
||||
8 + /* minted_time_ns */
|
||||
8 + /* metadata_devblocks */
|
||||
4 + 4 + /* cert_offset, cert_devblocks */
|
||||
4 + 4 + /* blockmap_offset, blockmap_devblocks */
|
||||
4 + 4 + /* identity_src_offset, identity_src_devblocks */
|
||||
8 /* hdr_crc */
|
||||
)];
|
||||
} homeblocks_sig_t;
|
||||
@@ -141,13 +159,15 @@ struct blkio_dev;
|
||||
* Reads 4 consecutive 1KB "forth blocks" (dev->read()'s own unit) starting
|
||||
* at sig_start_fblock into a local 4KB buffer and interprets it as a
|
||||
* homeblocks_sig_t. Deliberately takes the starting block as a plain
|
||||
* parameter rather than resolving it internally -- this function verifies a
|
||||
* signature given a location; finding that location (GPT-partition-relative
|
||||
* today, once a GPT parser exists) is the caller's job, not invented here.
|
||||
* parameter rather than resolving it internally, even though every real
|
||||
* caller now passes the same fixed HOMEBLOCKS_SIG_START_FBLOCK (GPT was
|
||||
* dropped, §F.8) -- keeps this function's own job (verify a signature
|
||||
* given a location) separate from callers deciding what that location is.
|
||||
*
|
||||
* @param dev Open block device to read from.
|
||||
* @param sig_start_fblock First of 4 consecutive forth-blocks holding the
|
||||
* 4KB header.
|
||||
* 4KB header -- HOMEBLOCKS_SIG_START_FBLOCK for
|
||||
* every real caller today.
|
||||
* @param out_sig On HOMEBLOCKS_SIG_OK, populated with the verified
|
||||
* header. Left unspecified on any other result.
|
||||
* @return HOMEBLOCKS_SIG_OK, or the specific reason for refusal.
|
||||
|
||||
@@ -0,0 +1,90 @@
|
||||
/*
|
||||
StarForth — Steady-State Virtual Machine Runtime
|
||||
|
||||
Copyright (c) 2023–2025 Robert A. James
|
||||
All rights reserved.
|
||||
|
||||
This file is part of the StarForth project.
|
||||
|
||||
Licensed under the StarForth License, Version 1.0 (the "License");
|
||||
you may not use this file except in compliance with the License.
|
||||
|
||||
You may obtain a copy of the License at:
|
||||
https://github.com/star.4th@proton.me/StarForth/LICENSE.txt
|
||||
|
||||
This software is provided "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
||||
express or implied, including but not limited to the warranties of
|
||||
merchantability, fitness for a particular purpose, and noninfringement.
|
||||
|
||||
See the License for the specific language governing permissions and
|
||||
limitations under the License.
|
||||
*/
|
||||
|
||||
/**
|
||||
* vm_identity.h - Per-VM owner identity + ACL capabilities (FABRIC-3.md
|
||||
* §F.2/§F.16, decided 2026-08-27/28)
|
||||
*
|
||||
* Holds only what a VM needs to prove *who owns it* and *what that owner
|
||||
* is allowed to do* -- never a private key. A regular VM's lock never
|
||||
* signs anything itself, so no seed/private material belongs here at all
|
||||
* (unlike Zuse's own zuse_cert_seed/zuse_cert_pubkey pair, which does need
|
||||
* one because she actively signs). Deliberately its own header rather
|
||||
* than inline fields on struct VM, mirroring VMUuid's own precedent
|
||||
* (vm_uuid.h) -- standing instruction: give real-shaped data its own
|
||||
* header and integrate as a field, don't grow struct VM ad hoc.
|
||||
*
|
||||
* acl_caps is a capability bitmask, not an ordered privilege tier
|
||||
* (decided 2026-08-28) -- independent bits, not a nested hierarchy. Zuse
|
||||
* is not a structurally special VM: her identity just has every bit set.
|
||||
* No bit values are assigned yet -- deliberate slack, per this project's
|
||||
* "flexibility until we understand the recipe" precedent (see
|
||||
* blk_meta_t's own acl_reserved bytes, FABRIC-3.md §F.4) -- real bits get
|
||||
* names only once the operation they gate actually gets built (BINDSTEP,
|
||||
* MINT, ...), not speculatively here.
|
||||
*/
|
||||
|
||||
#ifndef STARKERNEL_VM_IDENTITY_H
|
||||
#define STARKERNEL_VM_IDENTITY_H
|
||||
|
||||
#ifdef __STARKERNEL__
|
||||
|
||||
#include <stdint.h>
|
||||
|
||||
typedef struct {
|
||||
uint8_t owner_pubkey[32]; /**< Ed25519 public key of this VM's owning
|
||||
* identity. Meaningless unless installed
|
||||
* is set. */
|
||||
uint8_t installed; /**< 0 = no identity installed yet (e.g.
|
||||
* Hera/Hermes/Artemis today, before
|
||||
* D.5's per-VM-identity work lands) --
|
||||
* BINDSTEP-style checks must treat this
|
||||
* as "no lock, allow freely," matching
|
||||
* §F.9 decision 2. 1 = owner_pubkey/
|
||||
* acl_caps are real. */
|
||||
uint32_t acl_caps; /**< Capability bitmask. All-zero until a
|
||||
* real caller defines and checks a bit;
|
||||
* VM_IDENTITY_CAP_ALL for Zuse's own
|
||||
* identity ("her ACL just grants
|
||||
* everything," not a special VM type). */
|
||||
} VMIdentity;
|
||||
|
||||
/** Every capability bit set -- Zuse's own identity uses this, not a
|
||||
* distinct "is this Zuse" flag anywhere else in the system. */
|
||||
#define VM_IDENTITY_CAP_ALL 0xFFFFFFFFu
|
||||
|
||||
/**
|
||||
* vm_identity_has_cap - Check whether an installed identity holds a
|
||||
* capability. Returns 0 (denied) if identity isn't installed at all --
|
||||
* callers that mean "no lock, allow freely" (§F.9 decision 2) must check
|
||||
* installed themselves first, not call this and treat 0 as a denial in
|
||||
* that case.
|
||||
*
|
||||
* @param id Identity to check.
|
||||
* @param cap A single capability bit (or bits) to test for.
|
||||
* @return Non-zero if id is installed and every bit in cap is set.
|
||||
*/
|
||||
int vm_identity_has_cap(const VMIdentity *id, uint32_t cap);
|
||||
|
||||
#endif /* __STARKERNEL__ */
|
||||
|
||||
#endif /* STARKERNEL_VM_IDENTITY_H */
|
||||
@@ -359,6 +359,7 @@ typedef enum
|
||||
|
||||
#ifdef __STARKERNEL__
|
||||
#include "starkernel/vm_uuid.h" /* VMUuid -- item 4.2, VM.stadium_vm_id */
|
||||
#include "starkernel/vm_identity.h" /* VMIdentity -- FABRIC-3.md §F.2/§F.16 */
|
||||
|
||||
/* Saved interpreter state for VM lifecycle calls (BIRTH, VM-EXEC, START).
|
||||
* Dynamically allocated; grows on demand via sf_realloc. */
|
||||
@@ -554,6 +555,15 @@ typedef struct VM
|
||||
* ran the word, instead of item 4.1's hardcoded
|
||||
* vm_uuid_hera(). */
|
||||
/** @} */
|
||||
|
||||
/** @name Owner identity + ACL capabilities (FABRIC-3.md §F.2/§F.16)
|
||||
* @{
|
||||
*/
|
||||
VMIdentity identity; /**< This VM's owning identity. installed=0 (the
|
||||
* zero-init default) means no lock -- every
|
||||
* VM today, until D.5's per-VM-identity work
|
||||
* and CERTVERIFY/MINT actually populate it. */
|
||||
/** @} */
|
||||
#endif
|
||||
} VM;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user