Session.parent now comes from the actual birthing VM's own stadium_vm_id, not a hardcoded vm_uuid_hera(). Added a VMUuid parent parameter to capsule_birth_baby() and, one level up, to capsule_console_birth()/capsule_runcap_birth() (neither had a VM* in their own signature, but every caller did). Updated all 6 real call sites: BIRTH, CAPSULE-BIRTH, CONNECT-ARTEMIS, CONNECT-HERMES, RUNCAP-TEST, PAIR-TEST (mama_forth_words.c) and the console+user birth pair in capsule_wirebind_try_attach() (capsule_wirebind.c). Two functions had their vm parameter marked __attribute__((unused)), now genuinely used -- attribute removed. Steps 8 (Session.name from capsule name) and 9 (identity defaults to installed=0) were already satisfied by step 5's existing session_register() call and its identity-zeroing -- confirmed by inspection, no further code needed. Verified 3-arch boot to ok> (amd64/aarch64/riscv64). Co-Authored-By: Claude Opus 5 <noreply@anthropic.com>
79 lines
3.1 KiB
C
79 lines
3.1 KiB
C
/*
|
||
StarForth — Steady-State Virtual Machine Runtime
|
||
|
||
Copyright (c) 2023–2025 Robert A. James
|
||
All rights reserved.
|
||
|
||
Licensed under the StarForth License, Version 1.0
|
||
*/
|
||
|
||
/**
|
||
* capsule_runcap.h - RUNCAP: runtime capsule construction from thumbdrive
|
||
* content (FABRIC-3.md §F.6/§F.18).
|
||
*
|
||
* A user's identity source (raw FORTH init/personality text, minted by
|
||
* MINT into a home-blocks drive's identity_src region) never exists at
|
||
* build time, so it can never appear in the compile-time-baked capsule
|
||
* directory. This builds a heap-only, single-entry CapsuleDirHeader +
|
||
* CapsuleDesc + CapsuleNameEntry + arena from that region and hands it to
|
||
* the existing, unmodified capsule_birth_baby() -- no new birth mechanism,
|
||
* per §F.6's own trace ("capsule_birth_baby() is already generic").
|
||
*
|
||
* Does not verify the caller has already run CERTVERIFY -- that's the
|
||
* caller's responsibility (WIREBIND, not yet built). This function's own
|
||
* job is narrow: read the region, construct the directory, birth it.
|
||
*/
|
||
|
||
#ifndef STARKERNEL_CAPSULE_RUNCAP_H
|
||
#define STARKERNEL_CAPSULE_RUNCAP_H
|
||
|
||
#ifdef __STARKERNEL__
|
||
|
||
#include <stdint.h>
|
||
#include "starkernel/capsule_run.h" /* CapsuleRunResult */
|
||
#include "starkernel/vm_uuid.h" /* VMUuid */
|
||
#include "starkernel/homeblocks_sig.h" /* homeblocks_sig_t */
|
||
|
||
struct blkio_dev;
|
||
|
||
/**
|
||
* capsule_runcap_birth - Birth a VM from a home-blocks drive's own
|
||
* identity_src region.
|
||
*
|
||
* Reads sig->identity_src_devblocks devblocks starting at
|
||
* sig->identity_src_offset. The first devblock is the identity's own
|
||
* user_identity_seed_t record (MINT, §F.8) and is skipped here -- RUNCAP
|
||
* only cares about the FORTH source that follows it. Refuses cleanly
|
||
* (CAPSULE_RUN_ERR_INVALID) if identity_src_offset is 0 (never minted) or
|
||
* identity_src_devblocks < 2 (no source content beyond the seed record).
|
||
*
|
||
* The heap-allocated directory/descriptor/name/arena are never freed --
|
||
* deliberate, matching kernel_main.c's own compile-time-directory-to-heap
|
||
* copy at Mama's own birth (also never freed): a VM's IDENTITY exec reads
|
||
* directly from this arena, and nothing in this codebase frees capsule
|
||
* arenas after a successful birth today.
|
||
*
|
||
* @param dev Already-open block device for the attached drive.
|
||
* @param sig Already-verified homeblocks_sig_t read from it.
|
||
* @param vm_name Symbolic name for the new VM (becomes both the
|
||
* capsule's own single directory entry name and the
|
||
* VM registry name).
|
||
* @param parent Who is birthing this VM (FABRIC-3.md §H.12 step 7) --
|
||
* passed straight through to capsule_birth_baby().
|
||
* @param out_vm_id Output: assigned VM ID.
|
||
* @param out_vm_ctx Output: new VM context (may be NULL if not needed).
|
||
* @return CAPSULE_RUN_OK on success, error code otherwise.
|
||
*/
|
||
CapsuleRunResult capsule_runcap_birth(
|
||
struct blkio_dev *dev,
|
||
const homeblocks_sig_t *sig,
|
||
const char *vm_name,
|
||
VMUuid parent,
|
||
VMUuid *out_vm_id,
|
||
void **out_vm_ctx
|
||
);
|
||
|
||
#endif /* __STARKERNEL__ */
|
||
|
||
#endif /* STARKERNEL_CAPSULE_RUNCAP_H */
|