sergio/takana
> Una distribución Linux construida con un laboratorio funcional y hermético en el > sótano, y una terminal mutable, clásica y anárquica en el piso de arriba — diseñada > desde el suelo para que una IA programadora entienda, modifique y co…
⎇ 68dc9cc2de628d0426a889a271e145bc78d39fb4
crates/takana-bootstrap/src/lib.rs
Ñawpa willay
Pi imata llamkarqan
ch'uya
SDD 30 §4b: la seed de producto ya sale de la RECETA — y openssh reproduce bit a bit
1//! Bootstrap from-scratch de takana — el track posterior del [SDD 11](../../docs/11-bootstrap.md).
2//!
3//! Esta primera entrega cubre el **Stage 0**: ingerir un toolchain semilla ya construido
4//! (no se compila; ver [ADR 0008](../../docs/adr/0008-bootstrap-stages.md)) como una *fuente
5//! fijada por sha256* y sellarlo en el `Store`. El `ArtifactHash` resultante se deriva de la
6//! **identidad pinned** de la semilla (clase + versión + sha256), no de rutas del host, así
7//! que el resto del bootstrap depende de un artefacto reproducible y auditable.
8//!
9//! Stage 1 (userland mínimo cross-compilado) y Stage 2 (rebuild nativo + diff de hashes)
10//! llegan en entregas siguientes y reusan este mismo store.
11//!
12//! Cada etapa anota su línea en el [`manifest`] de bootstrap (`bootstrap.json`), el embrión del
13//! log de transparencia ([SDD 11 §4](../../docs/11-bootstrap.md)).
14
15pub mod manifest;
16
17use std::path::{Path, PathBuf};
18use std::process::Command;
19
20use takana_build::download;
21use takana_core::{ArtifactHash, Recipe, Store};
22
23pub use manifest::{BootstrapManifest, StageEntry};
24
25#[derive(Debug, thiserror::Error)]
26pub enum Error {
27 #[error("io: {0}")]
28 Io(#[from] std::io::Error),
29 #[error("core: {0}")]
30 Core(#[from] takana_core::Error),
31 #[error("tar -x de la semilla falló (exit {0:?})")]
32 Untar(Option<i32>),
33 #[error("bootstrap: {0}")]
34 Other(String),
35}
36
37pub type Result<T> = std::result::Result<T, Error>;
38
39/// Qué toolchain semilla usamos. `zig` es la semilla primaria (ADR 0003/0007); `musl-cross-make`
40/// (gcc + musl) es la escotilla para paquetes con gcc-ismos.
41#[derive(Debug, Clone, Copy, PartialEq, Eq, serde::Serialize, serde::Deserialize)]
42#[serde(rename_all = "kebab-case")]
43pub enum SeedKind {
44 Zig,
45 MuslCrossMake,
46}
47
48impl SeedKind {
49 pub fn as_str(self) -> &'static str {
50 match self {
51 SeedKind::Zig => "zig",
52 SeedKind::MuslCrossMake => "musl-cross-make",
53 }
54 }
55}
56
57/// Especificación de una semilla: su identidad pinned. La integridad la garantiza `sha256`
58/// (fijado, [ADR 0006](../../docs/adr/0006-pinned-commits.md)); `url` puede ser cualquier
59/// esquema que entienda curl, incluido `file://` para ingestión offline.
60#[derive(Debug, Clone, PartialEq, Eq, serde::Serialize, serde::Deserialize)]
61pub struct SeedSpec {
62 pub kind: SeedKind,
63 pub version: String,
64 pub url: String,
65 /// sha256 hex del tarball, fijado. Se verifica **antes** de extraer y sellar.
66 pub sha256: String,
67}
68
69impl SeedSpec {
70 /// Hash del artefacto del store para esta semilla. Función pura de la identidad pinned:
71 /// misma `(kind, version, sha256)` ⇒ mismo hash, en cualquier máquina. El `url` queda
72 /// fuera a propósito (un espejo distinto del mismo tarball produce el mismo artefacto).
73 pub fn seed_hash(&self) -> ArtifactHash {
74 ArtifactHash::of_inputs(&[
75 b"hammer-seed-v1",
76 self.kind.as_str().as_bytes(),
77 self.version.as_bytes(),
78 self.sha256.as_bytes(),
79 ])
80 }
81
82 /// Nombre del artefacto en el store: `seed-<kind>`.
83 pub fn store_name(&self) -> String {
84 format!("seed-{}", self.kind.as_str())
85 }
86
87 /// Directorio del toolchain **dentro de la semilla sellada**, listo para que el sandbox lo
88 /// bindee como `/opt/zig`. Stage 0 sella el árbol del tarball tal cual (ingesta pura, sin
89 /// aplanar): este método lo resuelve al usarlo, localizando el dir que contiene el ejecutable
90 /// `zig` —en la raíz si el tarball lo trae plano, o en el único hijo si trae el típico
91 /// top-level versionado `zig-linux-x86_64-<ver>/`—. Falla si la semilla no está sellada o si
92 /// el ejecutable no aparece (o es ambiguo).
93 pub fn toolchain_dir(&self, store: &Store) -> Result<PathBuf> {
94 seed_toolchain_dir(store, &self.seed_hash(), self.kind)
95 }
96}
97
98/// Igual que [`SeedSpec::toolchain_dir`] pero sólo desde la identidad mínima `(seed_hash, kind)`:
99/// lo que basta para localizar la semilla ya sellada sin re-pasar `url`/`sha256`. Lo usa Stage 1,
100/// que conoce el `seed_hash` (de Stage 0 o del manifiesto) pero no necesariamente el `SeedSpec`.
101pub fn seed_toolchain_dir(
102 store: &Store,
103 seed_hash: &ArtifactHash,
104 kind: SeedKind,
105) -> Result<PathBuf> {
106 let base = store.path_of(seed_hash, &format!("seed-{}", kind.as_str()));
107 if !base.is_dir() {
108 return Err(Error::Other(format!(
109 "semilla '{}' no sellada en {}; corre `hammer bootstrap stage0` primero",
110 kind.as_str(),
111 base.display()
112 )));
113 }
114 match kind {
115 SeedKind::Zig => locate_tool_dir(&base, "zig"),
116 SeedKind::MuslCrossMake => Err(Error::Other(
117 "toolchain_dir para musl-cross-make aún no implementado (escotilla diferida)".into(),
118 )),
119 }
120}
121
122/// Localiza, dentro de `base`, el directorio que contiene **directamente** el ejecutable `tool`.
123/// Mira la raíz primero y luego los hijos inmediatos; exige exactamente una coincidencia para no
124/// elegir a ciegas entre layouts ambiguos.
125fn locate_tool_dir(base: &Path, tool: &str) -> Result<PathBuf> {
126 if base.join(tool).is_file() {
127 return Ok(base.to_path_buf());
128 }
129 let mut hits = Vec::new();
130 for entry in std::fs::read_dir(base)? {
131 let path = entry?.path();
132 if path.is_dir() && path.join(tool).is_file() {
133 hits.push(path);
134 }
135 }
136 hits.sort();
137 match hits.len() {
138 1 => Ok(hits.pop().unwrap()),
139 0 => Err(Error::Other(format!(
140 "no encontré el ejecutable '{tool}' en la raíz ni en los hijos inmediatos de {}",
141 base.display()
142 ))),
143 _ => Err(Error::Other(format!(
144 "ambiguo: '{tool}' aparece en varios directorios de {}: {hits:?}",
145 base.display()
146 ))),
147 }
148}
149
150/// Deriva una [`takana_build::BuildConfig`] desde `base` cuyo `zig_dir` apunta a la **semilla
151/// sellada** en vez del toolchain del host: así las recetas del Stage 1 cross-compilan con el
152/// toolchain fijado por hash (`seed_hash`), no con el `.dev-fs/tools/zig` de desarrollo. El resto
153/// de la config (rootfs, work, cache) se hereda intacto.
154pub fn seed_build_config(
155 base: &takana_build::BuildConfig,
156 seed: &SeedSpec,
157 store: &Store,
158) -> Result<takana_build::BuildConfig> {
159 let zig_dir = seed.toolchain_dir(store)?;
160 Ok(takana_build::BuildConfig { zig_dir, ..base.clone() })
161}
162
163/// Hash de un rootfs sellado por Stage 1. Es un `ArtifactHash` derivado del **contenido lógico**
164/// (los hashes de sus componentes + el init), no del árbol en disco: así dos ensamblados de los
165/// mismos artefactos producen el mismo hash aunque difieran en inodes o timestamps.
166pub type RootfsHash = ArtifactHash;
167
168/// Los componentes del userland mínimo, en orden de ensamblado: `musl` (libc), `busybox`
169/// (coreutils + sh), `hammerd` (daemon, receta Cargo) y `arje-zero` (el init PID 1, ADR 0007).
170/// arje-zero es PID 1 vía el symlink `/sbin/init`; supervisa a `hammerd` y a la getty por la
171/// seed card ([SDD 12](../../docs/12-init-real.md)) — su muerte es el `CRASHED` real.
172const STAGE1_COMPONENTS: &[&str] = &["musl", "busybox", "hammerd", "arje-zero"];
173
174/// La **seed card** que arje-zero lee en `/ente/seed.card.json` al boot ([SDD 12 §4](../../docs/12-init-real.md)):
175/// un `Card` `Virtual` cuyos `genesis` son `hammerd` (servicio `Native` con `Restart` — el
176/// `CRASHED` real) y una `console-getty` supervisada. La forma replica una seed real de arje
177/// (`seeds/arje-qemu.card.json`) para que `Card::validate()` la acepte; los ULID son fijos para que
178/// el `RootfsHash` sea reproducible. Template autocontenido (opción A del SDD): takana no depende de
179/// `card-core` como librería; el pin a arje-zero + el boot en VM cubren el drift de schema.
180const STAGE1_SEED_CARD: &str = r#"{
181 "schema_version": 1,
182 "id": "01HQAR53D4M2NBV8KZTYXFQA00",
183 "lineage": null,
184 "label": "hammer-stage1",
185 "provides": ["Spawn", "Journal"],
186 "requires": [],
187 "permissions": { "networking": "full", "filesystem": "read-write", "ipc": { "allow": [] }, "processes": true },
188 "soma": {
189 "namespaces": { "mount": false, "pid": false, "net": false, "uts": false, "ipc": false, "user": false, "cgroup": false },
190 "rlimits": { "mem_bytes": null, "nproc": null, "nofile": null },
191 "cgroup": { "path": "arje.slice/hammer", "cpu_weight": null, "io_weight": null },
192 "cpu_affinity": null
193 },
194 "payload": "Virtual",
195 "supervision": "OneShot",
196 "lifecycle": "daemon",
197 "priority": "normal",
198 "flow": { "input": [], "output": [] },
199 "genesis": [
200 {
201 "schema_version": 1,
202 "id": "01HQAR53D4M2NBV8KZTYXFQA01",
203 "lineage": null,
204 "label": "hammerd",
205 "provides": [],
206 "requires": [],
207 "permissions": { "networking": "full", "filesystem": "read-write", "ipc": { "allow": [] }, "processes": true },
208 "soma": {
209 "namespaces": { "mount": false, "pid": false, "net": false, "uts": false, "ipc": false, "user": false, "cgroup": false },
210 "rlimits": { "mem_bytes": null, "nproc": null, "nofile": null },
211 "cgroup": { "path": "arje.slice/hammerd", "cpu_weight": null, "io_weight": null },
212 "cpu_affinity": null
213 },
214 "payload": { "Native": {
215 "exec": "/usr/bin/hammerd",
216 "argv": ["--store", "/store", "--journal", "/var/lib/hammer/journal"],
217 "envp": [["RUST_LOG", "info"], ["ENTE_BUS_SOCK", "/run/ente-bus.sock"]]
218 }},
219 "supervision": { "Restart": { "initial": 200, "max": 10000 } },
220 "lifecycle": "daemon",
221 "priority": "normal",
222 "flow": { "input": [], "output": [] },
223 "genesis": []
224 },
225 {
226 "schema_version": 1,
227 "id": "01HQAR53D4M2NBV8KZTYXFQA02",
228 "lineage": null,
229 "label": "console-getty",
230 "provides": [],
231 "requires": [],
232 "permissions": { "networking": "none", "filesystem": "read-write", "ipc": { "allow": [] }, "processes": true },
233 "soma": {
234 "namespaces": { "mount": false, "pid": false, "net": false, "uts": false, "ipc": false, "user": false, "cgroup": false },
235 "rlimits": { "mem_bytes": null, "nproc": null, "nofile": null },
236 "cgroup": { "path": "arje.slice/getty", "cpu_weight": null, "io_weight": null },
237 "cpu_affinity": null
238 },
239 "payload": { "Native": {
240 "exec": "/bin/busybox",
241 "argv": ["getty", "-n", "-l", "/bin/sh", "115200", "console"],
242 "envp": []
243 }},
244 "supervision": { "Restart": { "initial": 200, "max": 10000 } },
245 "lifecycle": "daemon",
246 "priority": "normal",
247 "flow": { "input": [], "output": [] },
248 "genesis": []
249 }
250 ]
251}
252"#;
253
254/// Qué construir para Stage 1: la semilla ya sellada (por `(seed_hash, seed_kind)`) y el directorio
255/// de recetas donde viven `musl.toml` / `busybox.toml`.
256#[derive(Debug, Clone)]
257pub struct Stage1Spec {
258 pub seed_hash: ArtifactHash,
259 pub seed_kind: SeedKind,
260 pub recipes_dir: PathBuf,
261}
262
263/// **Stage 1** — cross-compila el userland mínimo con la semilla de Stage 0, ensambla un rootfs
264/// FHS y lo sella. Devuelve el [`RootfsHash`] y anota la línea del manifiesto.
265///
266/// Idempotente: si el rootfs (mismo hash de contenido) ya está sellado, no reconstruye. El
267/// cross-compile real requiere el rootfs base + toolchain del lab; en una máquina sin `.dev-fs`
268/// `takana_build::build` falla limpio antes de ensamblar nada.
269pub fn stage1(
270 spec: &Stage1Spec,
271 base_cfg: &takana_build::BuildConfig,
272 store: &Store,
273) -> Result<RootfsHash> {
274 // Toolchain = la semilla sellada, no el zig del host.
275 let zig_dir = seed_toolchain_dir(store, &spec.seed_hash, spec.seed_kind)?;
276 let cfg = takana_build::BuildConfig { zig_dir, ..base_cfg.clone() };
277
278 // 1) Construir cada componente (cacheado por el lab si ya existe).
279 let mut components: Vec<(String, ArtifactHash)> = Vec::with_capacity(STAGE1_COMPONENTS.len());
280 for name in STAGE1_COMPONENTS {
281 let recipe_path = spec.recipes_dir.join(format!("{name}.toml"));
282 let recipe = Recipe::load_from_path(&recipe_path).map_err(|e| {
283 Error::Other(format!("receta '{name}' ({}): {e}", recipe_path.display()))
284 })?;
285 let h = takana_build::build(&recipe, &cfg, store)?;
286 components.push((name.to_string(), h));
287 }
288
289 // 2) Hash del rootfs = función pura de sus componentes (reproducible, sin tocar disco).
290 let rootfs_hash = rootfs_hash(&components);
291 let store_name = "stage1-rootfs";
292
293 // 3) Ensamblar + sellar (si no estaba ya). Staging bajo el store ⇒ rename atómico en seal.
294 if !store.has(&rootfs_hash, store_name) {
295 let staging = store
296 .root()
297 .join(".bootstrap-tmp")
298 .join(rootfs_hash.store_dir_name(store_name));
299 let _ = std::fs::remove_dir_all(&staging);
300 std::fs::create_dir_all(&staging)?;
301 let result = assemble_and_seal(store, &components, &rootfs_hash, store_name, &staging);
302 let _ = std::fs::remove_dir_all(&staging);
303 result?;
304 } else {
305 tracing::info!(hash = %rootfs_hash, "stage1: rootfs ya sellado (idempotente)");
306 }
307
308 // 4) Línea del manifiesto. `recipe_hash = None`: el rootfs es un ensamblado de varias recetas,
309 // no de una sola; el `seed_hash` ancla de qué toolchain salió.
310 manifest::append_line(
311 store,
312 StageEntry {
313 stage: 1,
314 recipe_hash: None,
315 artifact_hash: rootfs_hash.clone(),
316 seed_hash: Some(spec.seed_hash.clone()),
317 ts: now_unix(),
318 },
319 )?;
320 Ok(rootfs_hash)
321}
322
323/// Hash de contenido del rootfs: tag de versión + `(name, hash)` de cada componente en orden + la
324/// seed card del init. Cambiar un componente, el orden o la seed re-hashea el rootfs. El tag `v2`
325/// marca el corte respecto al rootfs con init provisional (`v1`).
326fn rootfs_hash(components: &[(String, ArtifactHash)]) -> RootfsHash {
327 let mut inputs: Vec<Vec<u8>> = vec![b"hammer-stage1-rootfs-v2".to_vec()];
328 for (name, h) in components {
329 inputs.push(name.as_bytes().to_vec());
330 inputs.push(h.as_str().as_bytes().to_vec());
331 }
332 inputs.push(STAGE1_SEED_CARD.as_bytes().to_vec());
333 let refs: Vec<&[u8]> = inputs.iter().map(|v| v.as_slice()).collect();
334 ArtifactHash::of_inputs(&refs)
335}
336
337fn assemble_and_seal(
338 store: &Store,
339 components: &[(String, ArtifactHash)],
340 rootfs_hash: &RootfsHash,
341 store_name: &str,
342 staging: &Path,
343) -> Result<()> {
344 assemble_rootfs(store, components, staging)?;
345 store.seal(staging, rootfs_hash, store_name)?;
346 tracing::info!(hash = %rootfs_hash, "stage1: rootfs sellado");
347 Ok(())
348}
349
350/// Ensambla el árbol FHS del rootfs en `staging`: esqueleto de directorios, hidratación de cada
351/// componente sellado (hardlinks), la seed card de arje y `/sbin/init`→arje-zero. Es la pieza
352/// testeable sin build real ([SDD 12](../../docs/12-init-real.md)).
353fn assemble_rootfs(
354 store: &Store,
355 components: &[(String, ArtifactHash)],
356 staging: &Path,
357) -> Result<()> {
358 // Esqueleto FHS. arje-zero monta él mismo los pseudo-FS (arje-kernel), así que sólo deben
359 // existir como puntos de montaje vacíos; `/ente` lleva la seed, `/var/lib/hammer` el diario.
360 for d in [
361 "proc", "sys", "sys/fs/cgroup", "dev", "dev/pts", "dev/shm", "run", "tmp", "etc", "root",
362 "var", "var/lib/hammer", "ente", "usr/bin", "bin", "sbin",
363 ] {
364 std::fs::create_dir_all(staging.join(d))?;
365 }
366
367 // Cada componente se proyecta al rootfs por hardlink (mismo store, mismo filesystem).
368 for (name, h) in components {
369 let dir = store.path_of(h, name);
370 takana_build::run_hydrate(&dir, staging, takana_core::LinkMode::Static, None)?;
371 }
372
373 // El sidecar de provenance de cada receta (`.hammer/recipe.toml`) no pertenece al rootfs
374 // ejecutable: lo quitamos para que la imagen quede limpia y su hash no dependa de cuál
375 // componente lo escribió último.
376 let _ = std::fs::remove_dir_all(staging.join(".hammer"));
377
378 // La seed card que arje-zero lee al boot.
379 std::fs::write(staging.join("ente/seed.card.json"), STAGE1_SEED_CARD)?;
380
381 // arje-zero es PID 1 vía `/sbin/init`. Symlink absoluto: el kernel lo sigue sea cual sea el
382 // cmdline, sin exigir `init=`. Idempotente: si ya existe (re-ensamblado), lo reemplazamos.
383 let init_link = staging.join("sbin/init");
384 let _ = std::fs::remove_file(&init_link);
385 std::os::unix::fs::symlink("/usr/bin/arje-zero", &init_link)?;
386 Ok(())
387}
388
389// ── Capa de servicios: el PRODUCTO (Separación Mecanismo/Política) ──────────────────────────────
390//
391// `STAGE1_COMPONENTS` + `STAGE1_SEED_CARD` son el **mecanismo base**: el núcleo atómico que el
392// selfhost-verify reconstruye bit a bit (`of_tree` 9adefb82/7fa6cb4e). Inmutable y blindado. Los
393// **servicios** (sshd, …) son **política de producto**: NO entran al núcleo (no contaminan el
394// `of_tree` ni obligan a un rebuild pesado de openssl/zlib dentro de la VM). Se inyectan por
395// **hidratación tardía** sobre el rootfs base ya sellado, produciendo un `product-rootfs` APARTE.
396// Así, meter más servicios mañana no toca jamás el núcleo verificado.
397
398/// Componentes de servicio inyectados sobre el 4/4 verificado: `netup` (red) + `openssh` (sshd/ssh).
399/// Daemons ⇒ llevan card en la seed de producto. Crecer esta lista NO toca `STAGE1_COMPONENTS`.
400const SERVICE_COMPONENTS: &[&str] = &["netup", "openssh"];
401
402/// Userland Rust-nativo ADOPTADO (Etapa C): multicall `uutils`/coreutils + `find`/`xargs` + `diff`/`cmp`
403/// + `rg`. Se hidrata sobre la base DESPUÉS de busybox, así que sus symlinks en `/usr/bin` ENSOMBRECEN
404/// los applets de busybox (con `PATH` `/usr/bin:/bin` gana la tool Rust). Es el "adelgazar busybox" del
405/// producto SIN tocar el núcleo: busybox sigue en el 4/4 (self-host) y queda de fallback para lo aún no
406/// reemplazado (`sh`/ash, `tar`, …). NO son daemons ⇒ no llevan card en la seed (sólo ficheros).
407const USERLAND_COMPONENTS: &[&str] =
408 &["uutils", "findutils", "findutils-xargs", "diffutils", "ripgrep"];
409
410/// Card de servicio `sshd` (genesis `Native`/`Restart`): el comando levanta la red (`netup`, DHCP),
411/// genera host keys al primer boot (`ssh-keygen -A`) y `exec`uta `sshd -D`. Todo dentro del card para
412/// no asumir orden de genesis. Mismo esquema validado de [`STAGE1_SEED_CARD`]; ULID propio. Se inyecta
413/// en el `genesis` de la seed de producto. Verificado E2E en QEMU (`scripts/ssh-e2e-test.sh`).
414const SSHD_SERVICE_CARD: &str = r#"{
415 "schema_version": 1,
416 "id": "01HQAR53D4M2NBV8KZTYXFQA12",
417 "lineage": null,
418 "label": "sshd",
419 "provides": [],
420 "requires": [],
421 "permissions": { "networking": "full", "filesystem": "read-write", "ipc": { "allow": [] }, "processes": true },
422 "soma": {
423 "namespaces": { "mount": false, "pid": false, "net": false, "uts": false, "ipc": false, "user": false, "cgroup": false },
424 "rlimits": { "mem_bytes": null, "nproc": null, "nofile": null },
425 "cgroup": { "path": "arje.slice/sshd", "cpu_weight": null, "io_weight": null },
426 "cpu_affinity": null
427 },
428 "payload": { "Native": {
429 "exec": "/bin/busybox",
430 "argv": ["sh", "-c", "/usr/bin/netup; /usr/bin/ssh-keygen -A; exec /usr/sbin/sshd -D -e"],
431 "envp": [["HOME", "/root"]]
432 }},
433 "supervision": { "Restart": { "initial": 500, "max": 20000 } },
434 "lifecycle": "daemon",
435 "priority": "normal",
436 "flow": { "input": [], "output": [] },
437 "genesis": []
438}"#;
439
440/// `/etc/passwd` del producto: `root` (login por llave) + `sshd` (usuario de privsep, shell inerte).
441const PRODUCT_PASSWD: &str = "root:x:0:0:root:/root:/bin/sh\nsshd:x:74:74:sshd privsep:/var/empty:/bin/false\n";
442/// `/etc/group` del producto.
443const PRODUCT_GROUP: &str = "root:x:0:\nsshd:x:74:\n";
444/// `/etc/ssh/sshd_config` del producto: sólo por llave (sin password), pidfile en `/run` (tmpfs que
445/// arje monta), authorized_keys provisionadas en deploy.
446const SSHD_CONFIG: &str = "Port 22\nListenAddress 0.0.0.0\nPermitRootLogin prohibit-password\nPubkeyAuthentication yes\nPasswordAuthentication no\nAuthorizedKeysFile /root/.ssh/authorized_keys\nPidFile /run/sshd.pid\nSubsystem sftp /usr/libexec/sftp-server\n";
447
448// ── Atestación de integridad al arranque (I4 / Etapa D, mitad de HAMMER) ─────────────────────────
449//
450// Por la regla de oro del [plan arje↔takana] (`PLAN-ATESTACION-Y-HAMMER.md` §B.1): takana es dueño del
451// **`expected_hash` + firma + TrustStore**; arje es dueño del **gate al boot** (computa `blake3` de cada
452// binario crítico ANTES de incarnar y, si no casa, `halt`). Esta es la mitad de takana: PRODUCIR el
453// manifiesto de hashes esperados (`/ente/attest.json`) que el gate A2 de arje verifica — "el
454// `expected_hash` de un `.swm` ES el BLAKE3 que arje atesta". El hash es `blake3` CRUDO del fichero
455// (`ArtifactHash::of_file`), el mismo que computa `arje-cas::blake3_of`. La firma con la rootkey del
456// seed (A1, `arje-packager`) es una capa posterior; el manifiesto ya es verificable hoy por `takana
457// attest` (auto-validación: "reproducir, no confiar"). Es un fichero APARTE de la seed card ⇒ no toca
458// el schema de `card-core` y el producto bootea igual con el arje-zero actual (que aún ignora A2).
459
460/// Binarios críticos cuyo BLAKE3 hammer atesta (la raíz-de-confianza-ejecutable del producto): PID 1,
461/// el diario, el shell/getty, el daemon de red expuesto, el configurador de red y el userland multicall.
462const ATTEST_PATHS: &[&str] = &[
463 "usr/bin/arje-zero", // PID 1 — la raíz
464 "usr/bin/hammerd", // diario + bus
465 "bin/busybox", // shell/getty + exec de varios cards
466 "usr/sbin/sshd", // daemon SSH (superficie de red)
467 "usr/bin/netup", // configurador de red
468 "usr/bin/coreutils", // userland Rust multicall
469];
470
471/// Una entrada del manifiesto de atestación: ruta (relativa a la raíz) → BLAKE3 esperado del fichero.
472#[derive(Debug, Clone, serde::Serialize, serde::Deserialize)]
473pub struct AttestEntry {
474 pub path: String,
475 pub b3: String,
476}
477
478/// Manifiesto de atestación que takana emite en `/ente/attest.json`. `algo` fijo a `blake3` (crudo).
479#[derive(Debug, Clone, serde::Serialize, serde::Deserialize)]
480pub struct AttestManifest {
481 pub schema_version: u32,
482 pub algo: String,
483 pub entries: Vec<AttestEntry>,
484}
485
486/// Veredicto de [`verify_attestation`]: qué binarios casaron, cuáles divergieron y cuáles faltan.
487#[derive(Debug, Clone, Default)]
488pub struct AttestReport {
489 pub ok: Vec<String>,
490 pub mismatched: Vec<String>,
491 pub missing: Vec<String>,
492}
493
494impl AttestReport {
495 /// Pasa sólo si todo binario listado existe y su BLAKE3 casa.
496 pub fn passed(&self) -> bool {
497 self.mismatched.is_empty() && self.missing.is_empty()
498 }
499}
500
501/// Construye el manifiesto de atestación de un árbol `root`: para cada ruta crítica PRESENTE, su BLAKE3
502/// crudo. Determinista (función pura de los bytes del binario).
503fn build_attestation(root: &Path) -> Result<AttestManifest> {
504 let mut entries = Vec::new();
505 for rel in ATTEST_PATHS {
506 let p = root.join(rel);
507 if p.is_file() {
508 let h = ArtifactHash::of_file(&p).map_err(Error::Io)?;
509 entries.push(AttestEntry { path: format!("/{rel}"), b3: h.as_str().to_string() });
510 }
511 }
512 Ok(AttestManifest { schema_version: 1, algo: "blake3".into(), entries })
513}
514
515/// Verifica un árbol FHS (`rootfs_dir`, p.ej. un product-rootfs hidratado) contra su propio
516/// `/ente/attest.json`: recomputa el BLAKE3 de cada binario listado y lo compara. Es lo que el gate de
517/// arje hará al boot, hecho hoy por takana (auto-validación de integridad del producto).
518pub fn verify_attestation(rootfs_dir: &Path) -> Result<AttestReport> {
519 let manifest_path = rootfs_dir.join("ente/attest.json");
520 let raw = std::fs::read_to_string(&manifest_path).map_err(|e| {
521 Error::Other(format!("no pude leer {}: {e}", manifest_path.display()))
522 })?;
523 let manifest: AttestManifest = serde_json::from_str(&raw)
524 .map_err(|e| Error::Other(format!("attest.json inválido: {e}")))?;
525 let mut report = AttestReport::default();
526 for entry in &manifest.entries {
527 let rel = entry.path.trim_start_matches('/');
528 let p = rootfs_dir.join(rel);
529 if !p.is_file() {
530 report.missing.push(entry.path.clone());
531 continue;
532 }
533 let got = ArtifactHash::of_file(&p).map_err(Error::Io)?;
534 if got.as_str() == entry.b3 {
535 report.ok.push(entry.path.clone());
536 } else {
537 report.mismatched.push(entry.path.clone());
538 }
539 }
540 Ok(report)
541}
542
543/// Las Cards de servicio que aportan los componentes de servicio, **leídas de la receta que viaja
544/// DENTRO de cada artefacto sellado** (el sidecar de provenance `.hammer/recipe.toml`).
545///
546/// Por qué del sidecar y no del directorio de recetas: [`seal_product_rootfs`] sirve a las DOS
547/// vetas —`product` desde recetas locales y `product_from_repo` desde el repo firmado— y sólo una
548/// tiene `recipes/` a mano. El sidecar es la única fuente que ambas comparten, y así las dos
549/// convergen al mismo `product-rootfs`, que es la propiedad que esa función existe para sostener.
550///
551/// Sólo entran las de `scope = "system"`: una Card de sesión en el `genesis` arrancaría antes de que
552/// exista `XDG_RUNTIME_DIR` o un usuario logueado (ver `takana_core::service::Scope`).
553///
554/// ⚠ **Falla RUIDOSAMENTE si no sale ninguna**, y la razón es una trampa concreta: el sidecar **no
555/// entra en el `ArtifactHash`**, así que un artefacto sellado antes de que la receta declarara sus
556/// servicios sigue siendo un cache-hit válido y **no se reconstruye solo**. Si esto devolviera una
557/// lista vacía sin protestar, el producto saldría sin sshd —booteando, verde y sin acceso— que es
558/// exactamente la clase de fallo que este proyecto ya pagó con los artefactos vacíos.
559fn service_cards(
560 store: &Store,
561 services: &[(String, ArtifactHash)],
562) -> Result<Vec<serde_json::Value>> {
563 let mut cards = Vec::new();
564 let mut sin_sidecar = Vec::new();
565 for (nombre, hash) in services {
566 let recipe = match store.recipe_for_hash(hash.as_str()) {
567 Ok(Some(r)) => r,
568 Ok(None) => {
569 sin_sidecar.push(nombre.clone());
570 continue;
571 }
572 Err(e) => return Err(Error::Other(format!("sidecar de `{nombre}` ilegible: {e}"))),
573 };
574 for s in &recipe.services {
575 if s.scope == takana_core::service::Scope::System {
576 cards.push(s.card());
577 }
578 }
579 }
580 if cards.is_empty() {
581 return Err(Error::Other(format!(
582 "ningún componente de servicio ({}) declara un servicio de sistema.\n\
583 Casi seguro los artefactos son ANTERIORES al bloque `[[service]]`: el sidecar no entra \
584 en el ArtifactHash, así que siguen siendo cache-hit válidos y no se reconstruyen solos.\n\
585 Arreglo: borrar el artefacto del store y reconstruirlo (`flock -o work/.farm-build.lock \
586 takana build recipes/<receta>.toml`), comparando el árbol nuevo con el viejo.{}",
587 services.iter().map(|(n, _)| n.as_str()).collect::<Vec<_>>().join(", "),
588 if sin_sidecar.is_empty() {
589 String::new()
590 } else {
591 format!("\nSin sidecar siquiera: {}", sin_sidecar.join(", "))
592 }
593 )));
594 }
595 Ok(cards)
596}
597
598/// Seed de producto = la seed base con los cards de servicio APENDADOS al `genesis`. Composición vía
599/// `serde_json` (takana sigue autocontenido: no depende de `card-core`). Determinista ⇒ el
600/// `product-rootfs` es reproducible. El núcleo (hammerd + getty) se preserva tal cual.
601fn product_seed_card(cards: &[serde_json::Value]) -> Result<String> {
602 let mut seed: serde_json::Value = serde_json::from_str(STAGE1_SEED_CARD)
603 .map_err(|e| Error::Other(format!("seed base inválida: {e}")))?;
604 seed["label"] = serde_json::Value::String("hammer-product".into());
605 let genesis = seed
606 .get_mut("genesis")
607 .and_then(|g| g.as_array_mut())
608 .ok_or_else(|| Error::Other("seed base sin array `genesis`".into()))?;
609 for c in cards {
610 genesis.push(c.clone());
611 }
612 serde_json::to_string_pretty(&seed).map_err(|e| Error::Other(format!("serializar seed: {e}")))
613}
614
615/// Identidad del `product-rootfs`: tag + el `RootfsHash` del 4/4 base + `(nombre,hash)` de cada
616/// componente userland y de servicio (en orden) + la seed de producto + las configs. Cambiar
617/// cualquiera re-hashea (reproducible). El tag `v2` marca el corte respecto al producto sólo-servicios.
618fn product_rootfs_hash(
619 base: &RootfsHash,
620 userland: &[(String, ArtifactHash)],
621 services: &[(String, ArtifactHash)],
622 seed: &str,
623) -> RootfsHash {
624 let mut inputs: Vec<Vec<u8>> = vec![
625 b"hammer-product-rootfs-v3".to_vec(), // v3: + manifiesto de atestación (/ente/attest.json)
626 base.as_str().as_bytes().to_vec(),
627 ];
628 for (name, h) in userland.iter().chain(services.iter()) {
629 inputs.push(name.as_bytes().to_vec());
630 inputs.push(h.as_str().as_bytes().to_vec());
631 }
632 inputs.push(ATTEST_PATHS.join(",").into_bytes()); // el set atestado entra al hash
633 inputs.push(seed.as_bytes().to_vec());
634 inputs.push(PRODUCT_PASSWD.as_bytes().to_vec());
635 inputs.push(PRODUCT_GROUP.as_bytes().to_vec());
636 inputs.push(SSHD_CONFIG.as_bytes().to_vec());
637 let refs: Vec<&[u8]> = inputs.iter().map(|v| v.as_slice()).collect();
638 ArtifactHash::of_inputs(&refs)
639}
640
641/// Ensambla el árbol de producto en `staging`: hidrata el rootfs base sellado (4/4), luego el userland
642/// Rust (ENSOMBRECE los applets de busybox en `/usr/bin`) y los componentes de servicio ENCIMA
643/// (hidratación tardía); sobrescribe la seed con la de producto y escribe las configs de servicio
644/// (passwd/group/sshd_config + `/var/empty` 0711, `/etc/ssh`, `/root/.ssh` 0700). Testeable sin build.
645fn assemble_product_rootfs(
646 store: &Store,
647 base: &RootfsHash,
648 userland: &[(String, ArtifactHash)],
649 services: &[(String, ArtifactHash)],
650 seed: &str,
651 staging: &Path,
652) -> Result<()> {
653 use std::os::unix::fs::PermissionsExt;
654
655 // 1) base verificado (4/4): hidratación por hardlinks del árbol ya sellado (incl. mountpoints
656 // vacíos, /sbin/init y la seed base, que sobrescribimos en el paso 3).
657 let base_dir = store.path_of(base, "stage1-rootfs");
658 if !base_dir.is_dir() {
659 return Err(Error::Other(format!(
660 "rootfs base no sellado en {}",
661 base_dir.display()
662 )));
663 }
664 takana_build::run_hydrate(&base_dir, staging, takana_core::LinkMode::Static, None)?;
665
666 // 2) userland Rust + servicios ENCIMA (hardlink). El userland va DESPUÉS de la base: sus symlinks
667 // en /usr/bin reemplazan a los de busybox (run_hydrate sustituye el symlink existente) ⇒ el
668 // producto corre las tools Rust. Orden userland→servicios (sin colisiones entre sí).
669 for (name, h) in userland.iter().chain(services.iter()) {
670 let dir = store.path_of(h, name);
671 takana_build::run_hydrate(&dir, staging, takana_core::LinkMode::Static, None)?;
672 }
673 let _ = std::fs::remove_dir_all(staging.join(".hammer"));
674
675 // ADELGAZAR BUSYBOX (determinista, sin depender del orden de PATH del shell): por cada nombre que
676 // el userland Rust provee en `/usr/bin`, retirar el symlink homónimo de busybox en los OTROS dirs
677 // (`/bin`, `/sbin`, `/usr/sbin`) — busybox suele instalar `ls` en `/bin`, fuera del `/usr/bin` que
678 // la hidratación ya ensombreció. Así la tool Rust es la ÚNICA en PATH. El binario busybox queda
679 // (sh/ash, tar, mount, … lo no reemplazado); sólo se quitan los applets ya cubiertos por Rust.
680 let mut applet_names: std::collections::BTreeSet<String> = std::collections::BTreeSet::new();
681 for (name, h) in userland {
682 let ub = store.path_of(h, name).join("usr/bin");
683 if let Ok(rd) = std::fs::read_dir(&ub) {
684 for e in rd.flatten() {
685 applet_names.insert(e.file_name().to_string_lossy().into_owned());
686 }
687 }
688 }
689 for applet in &applet_names {
690 for d in ["bin", "sbin", "usr/sbin"] {
691 let p = staging.join(d).join(applet);
692 if std::fs::symlink_metadata(&p).is_ok() {
693 let _ = std::fs::remove_file(&p);
694 }
695 }
696 }
697
698 // 3) seed de producto (sobrescribe la base) + configs + dirs de runtime de sshd.
699 // Los ficheros hidratados son HARDLINKS al store sellado (read-only); escribir encima daría
700 // EACCES y `chmod` mutaría el inodo del store. Hay que ROMPER el hardlink: remove + write nuevo.
701 let write_fresh = |rel: &str, data: &str| -> Result<()> {
702 let p = staging.join(rel);
703 if let Some(parent) = p.parent() {
704 std::fs::create_dir_all(parent)?;
705 }
706 let _ = std::fs::remove_file(&p);
707 std::fs::write(&p, data)?;
708 Ok(())
709 };
710 write_fresh("ente/seed.card.json", seed)?;
711 write_fresh("etc/passwd", PRODUCT_PASSWD)?;
712 write_fresh("etc/group", PRODUCT_GROUP)?;
713 write_fresh("etc/ssh/sshd_config", SSHD_CONFIG)?;
714 let empty = staging.join("var/empty"); // jaula de privsep: root, no group/world-writable.
715 std::fs::create_dir_all(&empty)?;
716 std::fs::set_permissions(&empty, std::fs::Permissions::from_mode(0o711))?;
717 let dotssh = staging.join("root/.ssh"); // authorized_keys provisionadas en deploy.
718 std::fs::create_dir_all(&dotssh)?;
719 std::fs::set_permissions(&dotssh, std::fs::Permissions::from_mode(0o700))?;
720 // Mountpoints de las particiones dedicadas del disco de producto (vacíos; el wrapper /sbin/init de
721 // la imagen monta vda3→/store y vda4→/var/lib/hammer). `/var/lib/hammer` ya viene de la base.
722 std::fs::create_dir_all(staging.join("store"))?;
723 std::fs::create_dir_all(staging.join("var/lib/hammer"))?;
724
725 // Manifiesto de atestación (I4): BLAKE3 esperado de los binarios críticos ya hidratados ⇒ el gate
726 // de arje lo verifica al boot. Se computa al final, sobre el árbol ya ensamblado. Fichero aparte de
727 // la seed card (no toca el schema de card-core).
728 let attest = build_attestation(staging)?;
729 let attest_json = serde_json::to_string_pretty(&attest)
730 .map_err(|e| Error::Other(format!("serializar attest.json: {e}")))?;
731 std::fs::write(staging.join("ente/attest.json"), attest_json)?;
732 Ok(())
733}
734
735/// Construye/cachea (idempotente vía el lab) una lista de componentes nombrados, devolviendo sus
736/// `(nombre, hash)` sellados. Cada receta usa su propia config de build (p.ej. `zig_version`).
737fn build_components(
738 names: &[&str],
739 recipes_dir: &Path,
740 cfg: &takana_build::BuildConfig,
741 store: &Store,
742) -> Result<Vec<(String, ArtifactHash)>> {
743 let mut out = Vec::with_capacity(names.len());
744 for name in names {
745 let recipe_path = recipes_dir.join(format!("{name}.toml"));
746 let recipe = Recipe::load_from_path(&recipe_path).map_err(|e| {
747 Error::Other(format!("receta '{name}' ({}): {e}", recipe_path.display()))
748 })?;
749 let h = takana_build::build(&recipe, cfg, store)?;
750 out.push((name.to_string(), h));
751 }
752 Ok(out)
753}
754
755/// **Producto** — toma el rootfs base verificado (`base`, el `stage1-rootfs` del 4/4) y le inyecta por
756/// hidratación tardía el userland Rust (adelgaza busybox) + la capa de servicios, sellando un
757/// `product-rootfs`. El mecanismo base queda intacto: este árbol NO es el que reconstruye el
758/// selfhost-verify (su `of_tree` sigue blindado). Idempotente. `base_cfg` apunta el zig del lab (no la
759/// semilla): cada componente usa su `zig_version` propia, y si ya está sellado sale cacheado.
760pub fn product(
761 base: &RootfsHash,
762 base_cfg: &takana_build::BuildConfig,
763 recipes_dir: &Path,
764 store: &Store,
765) -> Result<RootfsHash> {
766 // 1) construir/cachear el userland Rust + los servicios DESDE LAS RECETAS LOCALES.
767 let userland = build_components(USERLAND_COMPONENTS, recipes_dir, base_cfg, store)?;
768 let services = build_components(SERVICE_COMPONENTS, recipes_dir, base_cfg, store)?;
769 // 2-3) ensamblar + sellar.
770 seal_product_rootfs(base, &userland, &services, store)
771}
772
773/// **Producto desde un REPO FIRMADO** — cierra el dogfood de [[etapa-f]]: la imagen de producto arma
774/// su userland vía la cadena de suministro de paquetes (no recetas locales hardcodeadas). Verifica la
775/// firma del release, REPRODUCE cada componente desde su `.swm` (`build_source_patch` chequea el
776/// `expected_hash` anclado) y lo hidrata. Como el hash es por-CONTENIDO, los `(nombre,hash)` que
777/// reproduce desde el repo son IDÉNTICOS a los que `build_components` construye de la receta ⇒ el
778/// `product-rootfs` resultante es BIT-IDÉNTICO al de [`product`]: la prueba de que el dogfood es fiel
779/// ("verificar, no confiar" aplicado al propio ensamblado del producto). El núcleo sigue blindado.
780pub fn product_from_repo(
781 base: &RootfsHash,
782 repo_dir: &Path,
783 trust_dir: &Path,
784 base_cfg: &takana_build::BuildConfig,
785 store: &Store,
786) -> Result<RootfsHash> {
787 // 1) userland + servicios REPRODUCIDOS desde el repo firmado (mismo shape que build_components).
788 let userland = install_components_from_repo(USERLAND_COMPONENTS, repo_dir, trust_dir, base_cfg, store)?;
789 let services = install_components_from_repo(SERVICE_COMPONENTS, repo_dir, trust_dir, base_cfg, store)?;
790 // 2-3) ensamblar + sellar (idéntico a `product`).
791 seal_product_rootfs(base, &userland, &services, store)
792}
793
794/// Pasos 2-3 comunes a [`product`] y [`product_from_repo`]: seed de producto + hash de identidad +
795/// ensamblado + sellado idempotente. Sólo varía la PROCEDENCIA de los `(nombre,hash)` (recetas
796/// locales vs repo firmado); el árbol sellado es función de ellos ⇒ ambas vetas convergen al mismo
797/// `product-rootfs` si los hashes coinciden (lo hacen: el hash es por-contenido).
798fn seal_product_rootfs(
799 base: &RootfsHash,
800 userland: &[(String, ArtifactHash)],
801 services: &[(String, ArtifactHash)],
802 store: &Store,
803) -> Result<RootfsHash> {
804 let seed = product_seed_card(&service_cards(store, services)?)?;
805 let phash = product_rootfs_hash(base, userland, services, &seed);
806 let store_name = "product-rootfs";
807
808 if !store.has(&phash, store_name) {
809 let staging = store
810 .root()
811 .join(".bootstrap-tmp")
812 .join(phash.store_dir_name(store_name));
813 let _ = std::fs::remove_dir_all(&staging);
814 std::fs::create_dir_all(&staging)?;
815 let result = (|| -> Result<()> {
816 assemble_product_rootfs(store, base, userland, services, &seed, &staging)?;
817 store.seal(&staging, &phash, store_name)?;
818 Ok(())
819 })();
820 let _ = std::fs::remove_dir_all(&staging);
821 result?;
822 tracing::info!(hash = %phash, "product: rootfs (userland Rust + servicios) sellado");
823 } else {
824 tracing::info!(hash = %phash, "product: rootfs ya sellado (idempotente)");
825 }
826 Ok(phash)
827}
828
829/// Reproduce un conjunto de componentes DESDE UN REPO FIRMADO, devolviendo sus `(nombre,hash)` sellados
830/// — el MISMO shape que [`build_components`], así [`assemble_product_rootfs`] los hidrata igual. Por cada
831/// componente: resuelve su cierre de deps del índice, puebla el catálogo con los `{dep}.toml` (para que
832/// el lab materialice build-deps al reproducir, igual que `takana install`), y REPRODUCE su `source_patch`
833/// con `build_source_patch` (que sella y CHEQUEA el `expected_hash` anclado en el índice). Verifica la
834/// firma del release ANTES de tocar nada: el producto NO se ensambla desde un repo no confiado.
835pub fn install_components_from_repo(
836 names: &[&str],
837 repo_dir: &Path,
838 trust_dir: &Path,
839 cfg: &takana_build::BuildConfig,
840 store: &Store,
841) -> Result<Vec<(String, ArtifactHash)>> {
842 use takana_core::{RepoIndex, SigStatus, TrustStore};
843
844 let index = RepoIndex::load(repo_dir)?;
845 // Firma del release: exigimos TRUSTED. Un release no firmado / con clave desconocida / con firma
846 // mala NO ensambla un producto (la cadena de suministro debe ser confiable y no manipulada).
847 let ts = TrustStore::load(trust_dir)?;
848 match index.verify_signature(&ts) {
849 SigStatus::Trusted { by } => {
850 tracing::info!(%by, "product: release del repo firmado y TRUSTED");
851 }
852 other => {
853 return Err(Error::Other(format!(
854 "el producto exige un repo firmado por clave confiada en {}; estado: {other:?}",
855 trust_dir.display()
856 )));
857 }
858 }
859
860 let catalog_dir = takana_build::swm_bridge::catalog_dir_for(cfg, None);
861 std::fs::create_dir_all(&catalog_dir)?;
862
863 let mut out = Vec::with_capacity(names.len());
864 for name in names {
865 let entry = index.find(name).ok_or_else(|| {
866 Error::Other(format!("'{name}' no está en el repo firmado {}", repo_dir.display()))
867 })?;
868 // Poblar el catálogo con las DEPS del cierre (deps antes del target), igual que `install`:
869 // el lab resuelve build-deps por nombre leyendo `{dep}.toml` del catalog_dir.
870 let closure = index.resolve_closure(name)?;
871 for dep in closure.iter().filter(|p| p.name != *name) {
872 let dep_swm = load_swm_file(&RepoIndex::swm_path(repo_dir, dep))?;
873 let mutation = source_patch_of(&dep_swm).ok_or_else(|| {
874 Error::Other(format!("la dep '{}' no es un paquete source_patch", dep.name))
875 })?;
876 let dep_recipe = takana_build::swm_bridge::recipe_from_source_patch(
877 mutation,
878 Some(&dep.name),
879 &catalog_dir,
880 )?;
881 std::fs::write(catalog_dir.join(format!("{}.toml", dep.name)), dep_recipe.to_toml()?)?;
882 }
883 // Reproducir el target: build_source_patch sella + chequea el expected_hash del índice.
884 let swm = load_swm_file(&RepoIndex::swm_path(repo_dir, entry))?;
885 let mutation = source_patch_of(&swm).ok_or_else(|| {
886 Error::Other(format!("'{name}' no es un paquete source_patch"))
887 })?;
888 let hash = takana_build::swm_bridge::build_source_patch(mutation, cfg, store, None, Some(name))?;
889 tracing::info!(%name, %hash, "product: componente reproducido desde el repo firmado");
890 out.push((name.to_string(), hash));
891 }
892 Ok(out)
893}
894
895/// Lee un `.swm` (YAML) de disco a `Swm`. Equivalente al helper homónimo de la CLI (privado allí).
896fn load_swm_file(path: &Path) -> Result<takana_core::Swm> {
897 let yaml = std::fs::read_to_string(path)
898 .map_err(|e| Error::Other(format!("no pude leer {}: {e}", path.display())))?;
899 takana_core::Swm::from_yaml(&yaml)
900 .map_err(|e| Error::Other(format!("no pude parsear {}: {e}", path.display())))
901}
902
903/// Primera mutación `SourcePatch` de un `.swm` (un paquete takana es un único source_patch).
904fn source_patch_of(swm: &takana_core::Swm) -> Option<&takana_core::Mutation> {
905 swm.mutations
906 .iter()
907 .find(|m| matches!(m, takana_core::Mutation::SourcePatch { .. }))
908}
909
910// ── Producto ATESTADO: la capa FIRMADA que el gate de arje verifica al boot (I4 / Etapa D) ───────
911//
912// `product()` sella el `product-rootfs` con el arje-zero del núcleo + un `/ente/attest.json` de
913// AUTO-verificación (esquema paralelo que `takana attest` valida, pero que el gate de arje NO lee).
914// El producto ATESTADO cierra el lazo canónico: hidrata el arje-zero CON gate (`arje-zero-attest`),
915// FIRMA la seed con `arje-packager` (una concesión Ed25519 por binario crítico, sobre su BLAKE3, bajo
916// una rootkey) y la sella como `product-attested-rootfs`. Booteado, el gate (política `halt`) recomputa
917// el BLAKE3 de cada exec crítico y aborta antes de incarnar si algo no casa la concesión firmada.
918//
919// Esto reemplaza el spike `scripts/attest-boot-test.sh` (que overlayeaba a mano): ahora takana-bootstrap
920// produce el producto atestado de forma estructurada. Reusa la cripto canónica (arje-attest/agora vía el
921// packager) — cero criptografía nueva en takana. La rootkey por defecto es determinista ⇒ las firmas
922// Ed25519 (RFC 8032, nonce derivado del mensaje) son reproducibles bit a bit.
923
924/// Rootkey de desarrollo (32 bytes) con la que takana firma la atestación por defecto. Determinista ⇒
925/// firmas reproducibles ⇒ `product-attested-rootfs` reproducible. El endurecimiento soberano (rootkey
926/// fuera del árbol, `/etc/arje/rootkey.pub` / `ARJE_ATTEST_ROOTKEY_FILE`) es una capa posterior
927/// (roadmap Etapa D, hardening #3); por ahora se inyecta como override de [`AttestConfig::rootkey`].
928pub const DEV_ATTEST_ROOTKEY: &[u8; 32] = b"hammer-attest-dev-rootkey-0001!!";
929
930/// Recetas de la capa de atestación: el init CON gate (variante SÓLO producto, núcleo intacto) y el
931/// firmador (herramienta de build-time, estático musl, corre en el host y NO se embarca).
932const GATED_INIT_COMPONENT: &str = "arje-zero-attest";
933const PACKAGER_COMPONENT: &str = "arje-packager";
934
935/// Configuración de la firma de atestación del producto.
936#[derive(Debug, Clone)]
937pub struct AttestConfig {
938 /// Política que el gate aplica si un binario no atesta: `"halt"` | `"degraded"` | `"warn"`.
939 pub policy: String,
940 /// Rootkey de 32 bytes para firmar las concesiones. Determinista ⇒ producto reproducible.
941 pub rootkey: [u8; 32],
942}
943
944impl Default for AttestConfig {
945 /// Política `halt` (la integridad comprometida NO levanta el entorno) + la rootkey de desarrollo.
946 fn default() -> Self {
947 Self { policy: "halt".into(), rootkey: *DEV_ATTEST_ROOTKEY }
948 }
949}
950
951/// Identidad del `product-attested-rootfs`: el producto base + el init con gate + el firmador + la
952/// política + la rootkey. Cambiar cualquiera re-hashea; como las firmas Ed25519 son deterministas en
953/// estos insumos, el árbol sellado es reproducible.
954fn product_attested_hash(
955 base_product: &RootfsHash,
956 gated_init: &ArtifactHash,
957 packager: &ArtifactHash,
958 cfg: &AttestConfig,
959) -> RootfsHash {
960 ArtifactHash::of_inputs(&[
961 b"hammer-product-attested-v2", // v2: + ancla soberana externa /etc/arje/rootkey.pub (hardening #3)
962 base_product.as_str().as_bytes(),
963 gated_init.as_str().as_bytes(),
964 packager.as_str().as_bytes(),
965 cfg.policy.as_bytes(),
966 &cfg.rootkey,
967 ])
968}
969
970/// Binarios críticos que el gate atesta, derivados de la PROPIA seed (no una lista fija): el ejecutable
971/// de PID 1 (`arje-zero`, el `current_exe` del gate) + el `exec` de cada card `Native` del fractal
972/// `genesis` (recursivo), mapeado a su ruta dentro de `staging`. Así, añadir un servicio a la seed lo
973/// firma automáticamente. Devuelve `(label, ruta_host)` para alimentar `--bin label=path` del packager —
974/// el `label` debe casar el de la card (lo que el gate busca en las concesiones). El orden es estable
975/// (PID 1 primero, luego DFS del genesis) ⇒ los flags `--bin` son deterministas.
976fn critical_bins_from_seed(seed: &serde_json::Value, staging: &Path) -> Vec<(String, PathBuf)> {
977 fn walk(card: &serde_json::Value, staging: &Path, out: &mut Vec<(String, PathBuf)>) {
978 let exec = card
979 .get("payload")
980 .and_then(|p| p.get("Native"))
981 .and_then(|n| n.get("exec"))
982 .and_then(|e| e.as_str());
983 if let (Some(exec), Some(label)) = (exec, card.get("label").and_then(|l| l.as_str())) {
984 out.push((label.to_string(), staging.join(exec.trim_start_matches('/'))));
985 }
986 if let Some(g) = card.get("genesis").and_then(|g| g.as_array()) {
987 for c in g {
988 walk(c, staging, out);
989 }
990 }
991 }
992 let mut out = vec![("arje-zero".to_string(), staging.join("usr/bin/arje-zero"))];
993 if let Some(g) = seed.get("genesis").and_then(|g| g.as_array()) {
994 for c in g {
995 walk(c, staging, &mut out);
996 }
997 }
998 out
999}
1000
1001/// Ensambla el producto ATESTADO en `staging`: hidrata el `product-rootfs` base, PISA `/usr/bin/arje-zero`
1002/// con el init CON gate, fija `attest_policy` en la seed, la FIRMA con el packager (una concesión por
1003/// binario crítico sobre su BLAKE3), ancla la pubkey en `/etc/arje/rootkey.pub` (ancla soberana externa,
1004/// hardening #3) y regenera `/ente/attest.json` (la auto-verificación de takana, ahora coherente con el
1005/// arje-zero nuevo). El packager corre en el host (estático musl, sin loader, como busybox/bwrap). La
1006/// firma se valida E2E en QEMU (`scripts/attest-boot-test.sh`).
1007fn assemble_attested_product_rootfs(
1008 store: &Store,
1009 base_product: &RootfsHash,
1010 gated_init_bin: &Path,
1011 packager_bin: &Path,
1012 cfg: &AttestConfig,
1013 staging: &Path,
1014) -> Result<()> {
1015 use std::os::unix::fs::PermissionsExt;
1016
1017 // 1) producto base hidratado (hardlinks read-only del árbol sellado).
1018 let base_dir = store.path_of(base_product, "product-rootfs");
1019 if !base_dir.is_dir() {
1020 return Err(Error::Other(format!(
1021 "product-rootfs base no sellado en {}",
1022 base_dir.display()
1023 )));
1024 }
1025 takana_build::run_hydrate(&base_dir, staging, takana_core::LinkMode::Static, None)?;
1026 let _ = std::fs::remove_dir_all(staging.join(".hammer"));
1027
1028 // 2) PISAR /usr/bin/arje-zero con el init CON gate. Es un hardlink read-only al store ⇒ romper el
1029 // hardlink (remove + copy), nunca `chmod` (mutaría el inodo del store).
1030 let init_dst = staging.join("usr/bin/arje-zero");
1031 let _ = std::fs::remove_file(&init_dst);
1032 std::fs::copy(gated_init_bin, &init_dst)?;
1033 std::fs::set_permissions(&init_dst, std::fs::Permissions::from_mode(0o755))?;
1034
1035 // 3) seed de producto: fijar `attest_policy` como ENTRADA del firmador. La mutamos y la dejamos en un
1036 // tmp FUERA del árbol a sellar (el seed-out lo escribe el packager sobre /ente/seed.card.json).
1037 let seed_path = staging.join("ente/seed.card.json");
1038 let raw = std::fs::read_to_string(&seed_path)
1039 .map_err(|e| Error::Other(format!("leer seed de producto: {e}")))?;
1040 let mut seed: serde_json::Value =
1041 serde_json::from_str(&raw).map_err(|e| Error::Other(format!("seed inválida: {e}")))?;
1042 seed["attest_policy"] = serde_json::Value::String(cfg.policy.clone());
1043
1044 let tmp = staging.join(".attest-build"); // se borra antes de sellar (no entra al árbol).
1045 std::fs::create_dir_all(&tmp)?;
1046 let seed_in = tmp.join("seed-in.json");
1047 std::fs::write(
1048 &seed_in,
1049 serde_json::to_string_pretty(&seed)
1050 .map_err(|e| Error::Other(format!("serializar seed-in: {e}")))?,
1051 )?;
1052 let rootkey_path = tmp.join("rootkey.bin");
1053 std::fs::write(&rootkey_path, cfg.rootkey)?;
1054 std::fs::set_permissions(&rootkey_path, std::fs::Permissions::from_mode(0o600))?;
1055
1056 // 4) bins críticos derivados de la seed → un --bin por exec Native + el PID 1.
1057 let bins = critical_bins_from_seed(&seed, staging);
1058
1059 // 5) FIRMAR: el packager escribe el seed firmado (Card::attest + attest_rootkey + attest_policy)
1060 // directamente sobre /ente/seed.card.json. El fichero hidratado es un HARDLINK read-only al
1061 // store ⇒ el packager no puede abrirlo para escribir (EACCES): romper el hardlink primero.
1062 let _ = std::fs::remove_file(&seed_path);
1063 let mut cmd = Command::new(packager_bin);
1064 cmd.arg("--seed")
1065 .arg(&seed_in)
1066 .arg("--rootkey")
1067 .arg(&rootkey_path)
1068 .arg("--seed-out")
1069 .arg(&seed_path);
1070 for (label, path) in &bins {
1071 cmd.arg("--bin").arg(format!("{label}={}", path.display()));
1072 }
1073 let out = cmd
1074 .output()
1075 .map_err(|e| Error::Other(format!("spawn arje-packager: {e}")))?;
1076 if !out.status.success() {
1077 return Err(Error::Other(format!(
1078 "arje-packager falló (exit {:?}): {}",
1079 out.status.code(),
1080 String::from_utf8_lossy(&out.stderr).trim()
1081 )));
1082 }
1083
1084 // 5b) ANCLA SOBERANA EXTERNA (hardening #3): escribir la pubkey de la rootkey en /etc/arje/rootkey.pub
1085 // (32 bytes raw). El gate (`ancla_externa()` en attest_gate.rs) la prefiere sobre la
1086 // `attest_rootkey` declarada en el seed ⇒ un seed reescrito con OTRA rootkey cae en AutorNoConfiable
1087 // (las concesiones no las firmó el ancla). Cierra el hueco que el WARN "sin ancla soberana externa"
1088 // señala. La pubkey se LEE del seed ya firmado (`attest_rootkey`, lo que el packager computó de
1089 // nuestra rootkey privada) ⇒ cero criptografía nueva en takana.
1090 let signed_raw = std::fs::read_to_string(&seed_path)
1091 .map_err(|e| Error::Other(format!("releer seed firmado: {e}")))?;
1092 let signed: serde_json::Value = serde_json::from_str(&signed_raw)
1093 .map_err(|e| Error::Other(format!("seed firmado inválido: {e}")))?;
1094 let pubkey: Vec<u8> = signed
1095 .get("attest_rootkey")
1096 .and_then(|v| v.as_array())
1097 .map(|a| a.iter().filter_map(|x| x.as_u64().map(|n| n as u8)).collect::<Vec<u8>>())
1098 .ok_or_else(|| Error::Other("seed firmado sin attest_rootkey de 32 bytes".into()))?;
1099 if pubkey.len() != 32 {
1100 return Err(Error::Other(format!(
1101 "attest_rootkey del seed firmado no es de 32 bytes (es {})",
1102 pubkey.len()
1103 )));
1104 }
1105 std::fs::create_dir_all(staging.join("etc/arje"))?;
1106 std::fs::write(staging.join("etc/arje/rootkey.pub"), &pubkey)?;
1107
1108 // 6) regenerar /ente/attest.json: el arje-zero cambió ⇒ su BLAKE3 también, así que el manifiesto de
1109 // auto-verificación de takana (`takana attest`) debe casar el árbol nuevo. El producto base lo
1110 // trae hidratado (hardlink read-only): romperlo antes de reescribir.
1111 let attest = build_attestation(staging)?;
1112 let attest_json = serde_json::to_string_pretty(&attest)
1113 .map_err(|e| Error::Other(format!("serializar attest.json: {e}")))?;
1114 let attest_path = staging.join("ente/attest.json");
1115 let _ = std::fs::remove_file(&attest_path);
1116 std::fs::write(&attest_path, attest_json)?;
1117
1118 // 7) limpiar el tmp de build (no debe quedar en el árbol sellado).
1119 let _ = std::fs::remove_dir_all(&tmp);
1120 Ok(())
1121}
1122
1123/// **Producto atestado** — toma el rootfs base verificado (`base`, el `stage1-rootfs` del 4/4), sella el
1124/// `product-rootfs` (vía [`product`], idempotente) y produce el `product-attested-rootfs`: init CON gate
1125/// + seed FIRMADA, listo para que el gate de arje lo verifique al boot (A2). Construye/cachea las recetas
1126/// de la capa de atestación (`arje-zero-attest`, `arje-packager`). Idempotente. El núcleo y el producto
1127/// base quedan intactos (Separación Mecanismo/Política): el atestado es un sello APARTE.
1128pub fn product_attested(
1129 base: &RootfsHash,
1130 base_cfg: &takana_build::BuildConfig,
1131 recipes_dir: &Path,
1132 store: &Store,
1133 cfg: &AttestConfig,
1134) -> Result<RootfsHash> {
1135 // 0) el producto base (idempotente: si ya está sellado, sale cacheado).
1136 let base_product = product(base, base_cfg, recipes_dir, store)?;
1137
1138 // 1) recetas de la capa de atestación (idempotentes/cacheadas por el lab).
1139 let gated = build_components(&[GATED_INIT_COMPONENT], recipes_dir, base_cfg, store)?
1140 .pop()
1141 .map(|(_, h)| h)
1142 .ok_or_else(|| Error::Other("build de arje-zero-attest no devolvió hash".into()))?;
1143 let packager = build_components(&[PACKAGER_COMPONENT], recipes_dir, base_cfg, store)?
1144 .pop()
1145 .map(|(_, h)| h)
1146 .ok_or_else(|| Error::Other("build de arje-packager no devolvió hash".into()))?;
1147
1148 let gated_bin = store.path_of(&gated, GATED_INIT_COMPONENT).join("usr/bin/arje-zero");
1149 let packager_bin = store.path_of(&packager, PACKAGER_COMPONENT).join("usr/bin/arje-packager");
1150 if !gated_bin.is_file() {
1151 return Err(Error::Other(format!(
1152 "arje-zero (con gate) ausente en {}",
1153 gated_bin.display()
1154 )));
1155 }
1156 if !packager_bin.is_file() {
1157 return Err(Error::Other(format!(
1158 "arje-packager ausente en {}",
1159 packager_bin.display()
1160 )));
1161 }
1162
1163 // 2) identidad + ensamblado + sellado (si no estaba ya).
1164 let phash = product_attested_hash(&base_product, &gated, &packager, cfg);
1165 let store_name = "product-attested-rootfs";
1166 if !store.has(&phash, store_name) {
1167 let staging = store
1168 .root()
1169 .join(".bootstrap-tmp")
1170 .join(phash.store_dir_name(store_name));
1171 let _ = std::fs::remove_dir_all(&staging);
1172 std::fs::create_dir_all(&staging)?;
1173 let result = (|| -> Result<()> {
1174 assemble_attested_product_rootfs(
1175 store,
1176 &base_product,
1177 &gated_bin,
1178 &packager_bin,
1179 cfg,
1180 &staging,
1181 )?;
1182 store.seal(&staging, &phash, store_name)?;
1183 Ok(())
1184 })();
1185 let _ = std::fs::remove_dir_all(&staging);
1186 result?;
1187 tracing::info!(hash = %phash, "product: rootfs ATESTADO (init con gate + seed firmada) sellado");
1188 } else {
1189 tracing::info!(hash = %phash, "product: rootfs atestado ya sellado (idempotente)");
1190 }
1191 Ok(phash)
1192}
1193
1194// ── Stage 2: rebuild nativo + verificación de auto-alojamiento (SDD 11 §3) ──────────────────────
1195//
1196// El corte del cordón: dentro del rootfs de Stage 1 se reconstruyen Stage 0' y Stage 1' usando
1197// **sólo** las herramientas de Stage 1, y se compara el **content-hash** (`of_tree`, no el hash
1198// input-addressed del store) de stage1 vs stage1'. Iguales ⇒ el sistema se compila a sí mismo bit
1199// a bit (auto-alojado y reproducible). El rebuild **dentro del rootfs** (bwrap/chroot/VM) corre en
1200// la VM destino; lo que vive en takana es la **referencia** (content-hash de stage1) y la
1201// comparación. Ver `docs/runbooks/stage1-vm-boot.md`.
1202
1203/// Veredicto de la verificación de auto-alojamiento de Stage 2.
1204#[derive(Debug, Clone, PartialEq, Eq, serde::Serialize, serde::Deserialize)]
1205pub enum Reproducibility {
1206 /// stage1 y stage1' tienen el mismo content-hash: el sistema se reconstruye bit-idéntico.
1207 Reproducible,
1208 /// Difieren: hay no-determinismo que cazar ([SDD 09 §2](../../docs/09-trust-model.md)).
1209 Divergent { stage1: ArtifactHash, rebuilt: ArtifactHash },
1210 /// El rebuild nativo dentro del rootfs aún no corrió (se hace en la VM); sólo se ancló el
1211 /// content-hash de stage1 como referencia a reproducir.
1212 RebuildPending,
1213}
1214
1215/// Reporte de Stage 2: la referencia (content-hash de stage1) y el veredicto.
1216#[derive(Debug, Clone, PartialEq, Eq, serde::Serialize, serde::Deserialize)]
1217pub struct VerifyReport {
1218 /// Hash input-addressed del rootfs en el store (el que devolvió `stage1`).
1219 pub stage1_rootfs: RootfsHash,
1220 /// Content-hash (`of_tree`) de stage1: los bytes reales que stage1' debe reproducir.
1221 pub stage1_content: ArtifactHash,
1222 pub verdict: Reproducibility,
1223}
1224
1225/// Content-hash (`ArtifactHash::of_tree`) del artefacto sellado `(hash, name)` en el store.
1226pub fn artifact_content_hash(
1227 store: &Store,
1228 hash: &ArtifactHash,
1229 name: &str,
1230) -> Result<ArtifactHash> {
1231 let dir = store.path_of(hash, name);
1232 if !dir.is_dir() {
1233 return Err(Error::Other(format!(
1234 "artefacto '{name}' no sellado en {}",
1235 dir.display()
1236 )));
1237 }
1238 ArtifactHash::of_tree(&dir).map_err(Error::Io)
1239}
1240
1241/// **Stage 2** (referencia + manifiesto). Ancla el **content-hash** del rootfs de Stage 1 como la
1242/// referencia a reproducir y lo anota en el manifiesto (línea stage 2). El rebuild nativo DENTRO
1243/// del rootfs corre en la VM (SDD 11 §3); cuando produzca stage1', se compara con [`verify_against`].
1244pub fn stage2(stage1: &RootfsHash, store: &Store) -> Result<VerifyReport> {
1245 let content = artifact_content_hash(store, stage1, "stage1-rootfs")?;
1246 manifest::append_line(
1247 store,
1248 StageEntry {
1249 stage: 2,
1250 recipe_hash: None,
1251 artifact_hash: content.clone(),
1252 seed_hash: None,
1253 ts: now_unix(),
1254 },
1255 )?;
1256 tracing::info!(content = %content, "stage2: content-hash de stage1 anclado (referencia)");
1257 Ok(VerifyReport {
1258 stage1_rootfs: stage1.clone(),
1259 stage1_content: content,
1260 verdict: Reproducibility::RebuildPending,
1261 })
1262}
1263
1264/// Compara la referencia (`report.stage1_content`) con el content-hash de un rebuild stage1'
1265/// producido en la VM, y emite el veredicto de reproducibilidad.
1266pub fn verify_against(report: &VerifyReport, rebuilt_content: ArtifactHash) -> Reproducibility {
1267 if report.stage1_content == rebuilt_content {
1268 Reproducibility::Reproducible
1269 } else {
1270 Reproducibility::Divergent {
1271 stage1: report.stage1_content.clone(),
1272 rebuilt: rebuilt_content,
1273 }
1274 }
1275}
1276
1277/// Reporte de [`all`]: los tres hashes de las etapas + el manifiesto ya poblado. El veredicto de
1278/// auto-alojamiento NO va aquí (es `RebuildPending` en el host): el rebuild nativo que lo decide corre
1279/// **dentro** del rootfs, en la VM destino (`scripts/selfhost-verify.sh`, runbook §8).
1280#[derive(Debug, Clone)]
1281pub struct AllReport {
1282 pub seed_hash: ArtifactHash,
1283 pub stage1_rootfs: RootfsHash,
1284 pub stage2: VerifyReport,
1285 pub manifest: BootstrapManifest,
1286}
1287
1288/// **`bootstrap --all`** ([SDD 11 §5](../../docs/11-bootstrap.md)) — encadena las tres etapas en una
1289/// sola corrida del host: ingiere la semilla (Stage 0), construye y sella el rootfs del userland mínimo
1290/// (Stage 1) y ancla su content-hash como referencia de reproducibilidad (Stage 2). Devuelve los tres
1291/// hashes y el [`BootstrapManifest`] (`bootstrap.json`) resultante: el embrión del log de transparencia
1292/// ([SDD 11 §4](../../docs/11-bootstrap.md)), listo para publicar.
1293///
1294/// El **corte del cordón** (el veredicto `✓ REPRODUCIBLE`) no se emite aquí: el rebuild nativo que lo
1295/// decide corre con las herramientas de **dentro** del rootfs (en la VM), no las del host. `all` deja la
1296/// referencia anclada (`stage2.stage1_content`) lista para que ese rebuild la compare vía `stage2
1297/// --verify` (ver [`verify_against`] y `scripts/selfhost-verify.sh`).
1298///
1299/// Idempotente componiendo idempotencias: cada etapa no rehace lo ya sellado ni duplica su línea de
1300/// manifiesto, así que re-correr `all` sobre un store ya poblado sólo recolecta los hashes.
1301pub fn all(
1302 seed: &SeedSpec,
1303 recipes_dir: &Path,
1304 base_cfg: &takana_build::BuildConfig,
1305 store: &Store,
1306) -> Result<AllReport> {
1307 let seed_hash = stage0(seed, store)?;
1308 let stage1_spec = Stage1Spec {
1309 seed_hash: seed_hash.clone(),
1310 seed_kind: seed.kind,
1311 recipes_dir: recipes_dir.to_path_buf(),
1312 };
1313 let stage1_rootfs = stage1(&stage1_spec, base_cfg, store)?;
1314 let stage2 = stage2(&stage1_rootfs, store)?;
1315 let manifest = BootstrapManifest::load(store)?;
1316 Ok(AllReport { seed_hash, stage1_rootfs, stage2, manifest })
1317}
1318
1319// ── Builder rootfs: el camino al rebuild in-rootfs (Stage 2 pleno, SDD 11 §7) ────────────────────
1320//
1321// El Stage 1 que booteamos es un *runtime* (musl+busybox+hammerd+arje-zero): no trae compilador, no
1322// puede reconstruirse. El **builder rootfs** es Stage 1 **+ el toolchain adentro** — la imagen que,
1323// booteada en la VM, corre `takana bootstrap stage1` dentro de sí misma y produce `stage1'`. Compara
1324// su content-hash con la referencia anclada por `stage2`: iguales ⇒ auto-alojamiento bit a bit.
1325//
1326// Variante (a) **pragmática** (SDD 11 §7.2): el toolchain entra desde Alpine (no construido por
1327// takana). Demuestra el *mecanismo* y cierra la reproducibilidad end-to-end; no es aún el
1328// auto-alojamiento *puro* (variante b: el toolchain construido por takana desde fuente, incremental).
1329//
1330// El builder NO se sella en el store (su /toolchain Alpine no es content-addressed y abultaría): se
1331// ensambla en un `out_dir` que se empaqueta como initramfs (ver runbook §8c). Su identidad sí es
1332// reproducible: un `ArtifactHash` *lógico* de sus insumos (stage1 + semilla + recetas + binario +
1333// tag del toolchain + el propio driver), apto para el log de transparencia.
1334
1335/// Driver embebido en `/usr/bin/rebuild-stage1`: corre el rebuild dentro del propio rootfs. Lee
1336/// `/etc/hammer/rebuild.env` (`SEED_HASH`/`SEED_KIND`/`REF_CONTENT`), apunta el sandbox de build al
1337/// toolchain de adentro (`/toolchain`) y compara `stage1'` contra la referencia. Si `REF_CONTENT` va
1338/// vacío, sólo imprime el content-hash de `stage1'` para comparación manual.
1339///
1340/// El toolchain es Alpine **dinámico**: sus binarios (bwrap/git/curl/cargo/make) no corren desde el
1341/// userland Stage 1, que es **estático** (no hay loader en `/lib`). El driver instala un *shim* del
1342/// loader musl (`cp` a `/lib`) + `LD_LIBRARY_PATH`/`PATH` al toolchain, y a partir de ahí esas
1343/// herramientas son ejecutables; el `takana` estático vive en `/usr/bin/hammer`. El sandbox de build
1344/// (bwrap) anida en `/toolchain`. (El shim sólo se usa para *invocar* el toolchain desde fuera del
1345/// sandbox: fetch git/tarball; dentro del sandbox el loader está en su sitio.)
1346const REBUILD_DRIVER: &str = r#"#!/bin/sh
1347# rebuild-stage1 — rebuild de Stage 1 con el toolchain del propio rootfs (auto-alojamiento, SDD 11 §7).
1348# Booteado en la VM (builder rootfs), reconstruye stage1' usando SÓLO las herramientas de adentro y
1349# compara su content-hash con la referencia que `hammer bootstrap stage2` ancló afuera.
1350set -eu
1351. /etc/hammer/rebuild.env # SEED_HASH, SEED_KIND, REF_CONTENT (REF_CONTENT puede ir vacío)
1352# Shim del loader musl: deja correr los binarios *dinámicos* del toolchain (bwrap/git/curl/cargo/make)
1353# desde el root Stage 1 estático. Usa el busybox estático (rutas absolutas) ANTES de tocar el PATH.
1354/bin/mkdir -p /lib
1355/bin/cp -f /toolchain/lib/ld-musl-x86_64.so.1 /lib/ld-musl-x86_64.so.1
1356export LD_LIBRARY_PATH=/toolchain/lib:/toolchain/usr/lib
1357export PATH=/toolchain/usr/bin:/toolchain/usr/sbin:/toolchain/bin:/toolchain/sbin:/usr/bin:/bin:/sbin
1358# overlay es módulo (CONFIG_OVERLAY_FS=m) y el initramfs arranca sin módulos cargados: el sandbox de
1359# build (bwrap --tmp-overlay) lo exige ⇒ ENODEV sin esto. Lo cargamos del toolchain (insmod=kmod,
1360# vermagic del kernel destino). Idempotente: si ya está, insmod falla y lo ignoramos.
1361insmod /toolchain/lib/overlay.ko 2>/dev/null || true
1362# Red para el vendoring de crates (los componentes Rust hacen `cargo vendor`, que baja de crates.io).
1363# NIC e1000 (qemu user-mode 10.0.2.0/24, módulo del kernel) + config estática + DNS de slirp. La VM
1364# sin NIC ⇒ todo esto es no-op (los componentes C no necesitan red). `ip` sale del toolchain (shim).
1365insmod /toolchain/lib/e1000.ko 2>/dev/null || true
1366if ip link show eth0 >/dev/null 2>&1; then
1367 ip link set eth0 up
1368 ip addr add 10.0.2.15/24 dev eth0 2>/dev/null || true
1369 ip route add default via 10.0.2.2 2>/dev/null || true
1370 printf 'nameserver 10.0.2.3\n' > /etc/resolv.conf
1371 echo ">> red eth0: $(ip -4 -o addr show eth0 2>/dev/null | grep -o 'inet [0-9.]*' || echo down)"
1372 # CA bundle para el TLS de cargo/curl/git (crates.io). El toolchain trae el bundle de Alpine;
1373 # lo exponemos en la ruta estándar y por env (cargo usa libcurl/openssl según el build).
1374 mkdir -p /etc/ssl/certs
1375 cp -f /toolchain/etc/ssl/certs/ca-certificates.crt /etc/ssl/certs/ca-certificates.crt 2>/dev/null || true
1376 export SSL_CERT_FILE=/etc/ssl/certs/ca-certificates.crt
1377 export CURL_CA_BUNDLE=/etc/ssl/certs/ca-certificates.crt
1378 export GIT_SSL_CAINFO=/etc/ssl/certs/ca-certificates.crt
1379fi
1380# NOTA: el initramfs debe empaquetarse con `cpio --owner=root:root`. Si los ficheros del toolchain
1381# quedan con el uid del que armó el builder (p. ej. 1000), ese uid no está mapeado en el userns de
1382# bwrap (que mapea sólo 0→0) y el copy-up de overlay falla con EACCES al crear /opt/zig. Ver §8c.
1383# Se exportan LAS DOS formas a propósito (ADR 0016): el binario que corre acá adentro es
1384# `/usr/bin/hammer`, que puede ser el pinado del baseline y sólo conoce los nombres viejos.
1385# Un lector nuevo prefiere TAKANA_*; uno viejo usa HAMMER_*. Las dos se retiran en la etapa 6.
1386export TAKANA_ROOTFS=/toolchain # el sandbox de build: el toolchain (variante a, desde Alpine)
1387export TAKANA_WORK=/work
1388export TAKANA_CACHE=
1389export HAMMER_ROOTFS=/toolchain
1390export HAMMER_WORK=/work
1391export HAMMER_CACHE=
1392echo ">> rebuild stage1 (toolchain in-rootfs, semilla $SEED_HASH)"
1393PRIME=$(/usr/bin/hammer --store /store bootstrap stage1 --seed-hash "$SEED_HASH" --seed "$SEED_KIND" --recipes /etc/hammer/recipes)
1394echo ">> stage1' = $PRIME"
1395if [ -n "${REF_CONTENT:-}" ]; then
1396 /usr/bin/hammer --store /store bootstrap stage2 --rootfs "$PRIME" --verify "$REF_CONTENT"
1397else
1398 /usr/bin/hammer --store /store bootstrap stage2 --rootfs "$PRIME"
1399fi
1400"#;
1401
1402/// Qué ensamblar en el builder rootfs (variante a, SDD 11 §7).
1403#[derive(Debug, Clone)]
1404pub struct BuilderSpec {
1405 /// Stage 1 rootfs ya sellado (nombre store `stage1-rootfs`) que el builder extiende — la base
1406 /// runtime sobre la que se hidrata el toolchain.
1407 pub stage1_rootfs: RootfsHash,
1408 /// Semilla zig sellada (Stage 0). Se replica en el `/store` del builder para que el `takana`
1409 /// de adentro resuelva el toolchain por hash, igual que afuera.
1410 pub seed_hash: ArtifactHash,
1411 pub seed_kind: SeedKind,
1412 /// Recetas a embeber en `/etc/hammer/recipes` (las que `stage1` rehidrata el rebuild).
1413 pub recipes_dir: PathBuf,
1414 /// Binario `takana` estático → `/usr/bin/hammer`. Variante (a): el del host; (b): el que takana
1415 /// construye desde fuente.
1416 pub hammer_bin: PathBuf,
1417 /// Toolchain del sandbox de build → `/toolchain` (variante a: el rootfs Alpine de `.dev-fs`).
1418 pub toolchain_src: PathBuf,
1419 /// Etiqueta de identidad del toolchain (p. ej. `alpine-3.23.4`) — entra al hash lógico del
1420 /// builder sin tener que hashear el árbol Alpine entero.
1421 pub toolchain_tag: String,
1422 /// Referencia `of_tree(stage1)` anclada por `stage2`, embebida para que el rebuild se
1423 /// auto-verifique. `None` ⇒ el driver sólo imprime el content-hash de `stage1'`.
1424 pub ref_content: Option<ArtifactHash>,
1425 /// Caché de fuentes (`work/repos`, `work/tarballs`) → `/work`, para un rebuild **offline** y
1426 /// determinista en la VM. `None` ⇒ el rebuild fetchea por red (la seed card trae `networking: full`).
1427 pub work_cache: Option<PathBuf>,
1428 /// Piezas del toolchain **construidas por takana desde fuente** (variante b, SDD 11 §7.2b) que se
1429 /// montan sobre el path Alpine en `/toolchain`. Vacío ⇒ variante (a) pura-Alpine. Cada swap entra
1430 /// al hash lógico del builder: la procedencia deja de ser "todo Alpine" y se vuelve auditable.
1431 pub swaps: Vec<ToolchainSwap>,
1432}
1433
1434/// Una herramienta del toolchain reemplazada por su build takana desde fuente (SDD 11 §7.2b). El
1435/// binario sellado se monta sobre `rel_path` dentro de `/toolchain`, pisando la versión Alpine; su
1436/// hash sellado se ancla en el hash lógico del builder para que el swap sea reproducible y auditable.
1437#[derive(Debug, Clone)]
1438pub struct ToolchainSwap {
1439 /// Nombre del componente/receta (p. ej. `make`); también el nombre store del artefacto sellado.
1440 pub name: String,
1441 /// `of_tree` del build takana (el artefacto sellado del que sale el binario).
1442 pub artifact: ArtifactHash,
1443 /// Path relativo del binario dentro del artefacto **y** dentro de `/toolchain` (p. ej.
1444 /// `usr/bin/make`). El mismo en origen y destino: el layout del artefacto imita al de Alpine.
1445 pub rel_path: String,
1446}
1447
1448/// Resultado de [`builder_rootfs`]: la identidad lógica del builder y dónde quedó ensamblado.
1449#[derive(Debug, Clone)]
1450pub struct BuilderReport {
1451 pub builder_hash: ArtifactHash,
1452 pub out_dir: PathBuf,
1453}
1454
1455/// Hash **lógico** del builder: función pura de sus insumos. No es `of_tree` del árbol (el toolchain
1456/// Alpine no es content-addressed); identifica de forma reproducible *de qué* se ensambló el builder.
1457fn builder_hash(
1458 stage1: &RootfsHash,
1459 seed: &ArtifactHash,
1460 toolchain_tag: &str,
1461 recipes_digest: &str,
1462 hammer_digest: &str,
1463 swaps_digest: &str,
1464) -> ArtifactHash {
1465 ArtifactHash::of_inputs(&[
1466 b"hammer-builder-rootfs-v1",
1467 stage1.as_str().as_bytes(),
1468 seed.as_str().as_bytes(),
1469 toolchain_tag.as_bytes(),
1470 recipes_digest.as_bytes(),
1471 hammer_digest.as_bytes(),
1472 swaps_digest.as_bytes(),
1473 REBUILD_DRIVER.as_bytes(),
1474 ])
1475}
1476
1477/// Digest de los swaps del toolchain (variante b): sha256 sobre los `(name, artifact, rel_path)` en
1478/// orden por nombre. Sin swaps ⇒ string vacío, así el hash lógico de un builder pura-Alpine no cambia
1479/// respecto a antes de existir el mecanismo (compatibilidad hacia atrás de la línea de manifiesto).
1480fn swaps_digest(swaps: &[ToolchainSwap]) -> String {
1481 if swaps.is_empty() {
1482 return String::new();
1483 }
1484 use sha2::{Digest, Sha256};
1485 let mut sorted: Vec<&ToolchainSwap> = swaps.iter().collect();
1486 sorted.sort_by(|a, b| a.name.cmp(&b.name));
1487 let mut h = Sha256::new();
1488 for s in sorted {
1489 for field in [s.name.as_str(), s.artifact.as_str(), s.rel_path.as_str()] {
1490 h.update(field.as_bytes());
1491 h.update([0u8]);
1492 }
1493 }
1494 hex::encode(h.finalize())
1495}
1496
1497/// sha256 hex del contenido de un archivo.
1498fn sha256_file(path: &Path) -> Result<String> {
1499 use sha2::{Digest, Sha256};
1500 let bytes = std::fs::read(path)?;
1501 let mut h = Sha256::new();
1502 h.update(&bytes);
1503 Ok(hex::encode(h.finalize()))
1504}
1505
1506/// Digest de un directorio de recetas: sha256 sobre los `(nombre, bytes)` de cada `*.toml` en orden.
1507/// Cambiar una receta, añadir o quitar una, re-hashea el builder.
1508fn recipes_digest(dir: &Path) -> Result<String> {
1509 use sha2::{Digest, Sha256};
1510 let mut tomls: Vec<PathBuf> = std::fs::read_dir(dir)?
1511 .filter_map(|e| e.ok().map(|e| e.path()))
1512 .filter(|p| p.extension().and_then(|x| x.to_str()) == Some("toml"))
1513 .collect();
1514 tomls.sort();
1515 let mut h = Sha256::new();
1516 for p in &tomls {
1517 let name = p.file_name().and_then(|n| n.to_str()).unwrap_or_default();
1518 h.update(name.as_bytes());
1519 h.update([0u8]);
1520 h.update(std::fs::read(p)?);
1521 h.update([0u8]);
1522 }
1523 Ok(hex::encode(h.finalize()))
1524}
1525
1526/// Copia recursiva `src`→`dst` preferendo **hardlink** (mismo filesystem, sin coste de bytes) y
1527/// cayendo a copia cuando cruza filesystems. Recrea symlinks tal cual. No hace `chmod`: el builder
1528/// no se sella, así que los hardlinks no deben tocar permisos del origen (p. ej. el `.dev-fs`).
1529///
1530/// `skip` es un path a no descender: imprescindible cuando `dst` vive **dentro** de `src` (p. ej.
1531/// `--work-cache work --out work/builder-rootfs`), donde copiar `src` ciegamente se tragaría el
1532/// propio destino en una recursión infinita. Se compara por path canónico.
1533fn link_or_copy_tree(src: &Path, dst: &Path, skip: Option<&Path>) -> Result<()> {
1534 if let Some(skip) = skip {
1535 if src.canonicalize().ok().as_deref() == Some(skip) {
1536 return Ok(());
1537 }
1538 }
1539 let meta = std::fs::symlink_metadata(src)?;
1540 let ft = meta.file_type();
1541 if ft.is_symlink() {
1542 let target = std::fs::read_link(src)?;
1543 let _ = std::fs::remove_file(dst);
1544 std::os::unix::fs::symlink(target, dst)?;
1545 } else if ft.is_dir() {
1546 std::fs::create_dir_all(dst)?;
1547 for entry in std::fs::read_dir(src)? {
1548 let entry = entry?;
1549 link_or_copy_tree(&entry.path(), &dst.join(entry.file_name()), skip)?;
1550 }
1551 } else if ft.is_file() && std::fs::hard_link(src, dst).is_err() {
1552 std::fs::copy(src, dst)?;
1553 }
1554 Ok(())
1555}
1556
1557/// Ensambla el árbol del builder en `staging` (la pieza testeable, sin VM ni Alpine real): hidrata el
1558/// Stage 1 rootfs como base, monta el toolchain en `/toolchain`, replica la semilla en `/store`,
1559/// instala `takana` + recetas + el driver `rebuild-stage1` y, opcionalmente, la caché de fuentes.
1560fn assemble_builder(spec: &BuilderSpec, store: &Store, staging: &Path) -> Result<()> {
1561 // 1) Base: el Stage 1 rootfs sellado (read-only en el store ⇒ hardlinks seguros).
1562 let stage1_dir = store.path_of(&spec.stage1_rootfs, "stage1-rootfs");
1563 if !stage1_dir.is_dir() {
1564 return Err(Error::Other(format!(
1565 "stage1-rootfs '{}' no sellado en {}; corre `hammer bootstrap stage1` primero",
1566 spec.stage1_rootfs,
1567 stage1_dir.display()
1568 )));
1569 }
1570 takana_build::run_hydrate(&stage1_dir, staging, takana_core::LinkMode::Static, None)?;
1571
1572 // 2) Esqueleto del builder: el sandbox de build (/toolchain), el store, el work y la config.
1573 for d in ["toolchain", "store", "work", "usr/bin", "etc/hammer/recipes"] {
1574 std::fs::create_dir_all(staging.join(d))?;
1575 }
1576
1577 // 3) Toolchain → /toolchain (variante a: el rootfs Alpine de .dev-fs).
1578 if !spec.toolchain_src.is_dir() {
1579 return Err(Error::Other(format!(
1580 "toolchain '{}' no es un directorio (¿corriste bootstrap-devfs.sh?)",
1581 spec.toolchain_src.display()
1582 )));
1583 }
1584 link_or_copy_tree(&spec.toolchain_src, &staging.join("toolchain"), None)?;
1585
1586 // 3b) Swaps de variante (b): piezas construidas por takana desde fuente pisan su versión Alpine
1587 // en /toolchain. Un `rel_path` puede apuntar a un BINARIO (estático musl ⇒ corre sin el shim
1588 // del loader; p.ej. make, busybox) o a un DIRECTORIO (un árbol de headers; p.ej. los
1589 // `usr/include/{linux,asm,…}` de linux-headers). En el caso directorio se reemplaza el árbol
1590 // entero (remove + copy) para no dejar archivos Alpine huérfanos.
1591 for swap in &spec.swaps {
1592 let art_dir = store.path_of(&swap.artifact, &swap.name);
1593 let src = art_dir.join(&swap.rel_path);
1594 let dst = staging.join("toolchain").join(&swap.rel_path);
1595 if src.is_dir() {
1596 let _ = std::fs::remove_dir_all(&dst);
1597 std::fs::create_dir_all(&dst)?;
1598 link_or_copy_tree(&src, &dst, None)?;
1599 } else if src.is_file() {
1600 if let Some(parent) = dst.parent() {
1601 std::fs::create_dir_all(parent)?;
1602 }
1603 let _ = std::fs::remove_file(&dst);
1604 if std::fs::hard_link(&src, &dst).is_err() {
1605 std::fs::copy(&src, &dst)?;
1606 }
1607 set_executable(&dst)?;
1608 } else {
1609 return Err(Error::Other(format!(
1610 "swap '{}': '{}' no existe (ni archivo ni directorio) en el artefacto sellado {} ({})",
1611 swap.name,
1612 swap.rel_path,
1613 swap.artifact,
1614 src.display(),
1615 )));
1616 }
1617 }
1618
1619 // 4) Semilla → /store/<hash>-seed-<kind>, tal cual está sellada afuera, para que el `takana` de
1620 // adentro resuelva el toolchain por hash sin re-ingerirla.
1621 let seed_name = format!("seed-{}", spec.seed_kind.as_str());
1622 let seed_dir = store.path_of(&spec.seed_hash, &seed_name);
1623 if !seed_dir.is_dir() {
1624 return Err(Error::Other(format!(
1625 "semilla '{}' no sellada en {}; corre `hammer bootstrap stage0` primero",
1626 seed_name,
1627 seed_dir.display()
1628 )));
1629 }
1630 link_or_copy_tree(
1631 &seed_dir,
1632 &staging.join("store").join(spec.seed_hash.store_dir_name(&seed_name)),
1633 None,
1634 )?;
1635
1636 // 5) Binario takana → /usr/bin/hammer (+x).
1637 let hammer_dst = staging.join("usr/bin/hammer");
1638 if std::fs::hard_link(&spec.hammer_bin, &hammer_dst).is_err() {
1639 std::fs::copy(&spec.hammer_bin, &hammer_dst)?;
1640 }
1641 set_executable(&hammer_dst)?;
1642
1643 // 6) Recetas → /etc/hammer/recipes.
1644 for entry in std::fs::read_dir(&spec.recipes_dir)? {
1645 let path = entry?.path();
1646 if path.extension().and_then(|x| x.to_str()) == Some("toml") {
1647 let name = path.file_name().unwrap();
1648 std::fs::copy(&path, staging.join("etc/hammer/recipes").join(name))?;
1649 }
1650 }
1651
1652 // 7) Caché de fetch → /work (opcional, para rebuild offline). Sólo `repos/` (mirrors git) y
1653 // `tarballs/` (descargas verificadas): de ahí `fetch` rematerializa los árboles fuente. NO se
1654 // copia `sources/` (los árboles ya materializados) — es regenerable y pesado (varios GB). El
1655 // `skip = staging` es defensa extra contra `--work-cache work --out work/builder-rootfs`.
1656 if let Some(cache) = &spec.work_cache {
1657 let skip = staging.canonicalize().ok();
1658 for sub in ["repos", "tarballs"] {
1659 let src = cache.join(sub);
1660 if src.is_dir() {
1661 link_or_copy_tree(&src, &staging.join("work").join(sub), skip.as_deref())?;
1662 }
1663 }
1664 }
1665
1666 // 8) Config del rebuild + driver. REF_CONTENT vacío si no hay referencia (rebuild informativo).
1667 let ref_content = spec.ref_content.as_ref().map(|h| h.as_str()).unwrap_or("");
1668 let env = format!(
1669 "SEED_HASH={}\nSEED_KIND={}\nREF_CONTENT={}\n",
1670 spec.seed_hash,
1671 spec.seed_kind.as_str(),
1672 ref_content,
1673 );
1674 std::fs::write(staging.join("etc/hammer/rebuild.env"), env)?;
1675 let driver = staging.join("usr/bin/rebuild-stage1");
1676 std::fs::write(&driver, REBUILD_DRIVER)?;
1677 set_executable(&driver)?;
1678 Ok(())
1679}
1680
1681/// Marca un archivo como ejecutable (0o755).
1682fn set_executable(path: &Path) -> Result<()> {
1683 use std::os::unix::fs::PermissionsExt;
1684 std::fs::set_permissions(path, std::fs::Permissions::from_mode(0o755))?;
1685 Ok(())
1686}
1687
1688/// **Builder rootfs** (SDD 11 §7) — ensambla en `out_dir` la imagen Stage 1 + toolchain que, booteada
1689/// en la VM, reconstruye `stage1'` con sus propias herramientas (auto-alojamiento). Devuelve el hash
1690/// lógico del builder y anota la línea del manifiesto. `out_dir` se reensambla limpio en cada corrida.
1691pub fn builder_rootfs(spec: &BuilderSpec, store: &Store, out_dir: &Path) -> Result<BuilderReport> {
1692 // Hash lógico (insumos), independiente del ensamblado en disco.
1693 let rdigest = recipes_digest(&spec.recipes_dir)?;
1694 let hdigest = sha256_file(&spec.hammer_bin)?;
1695 let sdigest = swaps_digest(&spec.swaps);
1696 let bhash = builder_hash(
1697 &spec.stage1_rootfs,
1698 &spec.seed_hash,
1699 &spec.toolchain_tag,
1700 &rdigest,
1701 &hdigest,
1702 &sdigest,
1703 );
1704
1705 let _ = std::fs::remove_dir_all(out_dir);
1706 std::fs::create_dir_all(out_dir)?;
1707 assemble_builder(spec, store, out_dir)?;
1708
1709 manifest::append_line(
1710 store,
1711 StageEntry {
1712 stage: 2,
1713 recipe_hash: None,
1714 artifact_hash: bhash.clone(),
1715 seed_hash: Some(spec.seed_hash.clone()),
1716 ts: now_unix(),
1717 },
1718 )?;
1719 tracing::info!(hash = %bhash, out = %out_dir.display(), "builder: rootfs ensamblado");
1720 Ok(BuilderReport { builder_hash: bhash, out_dir: out_dir.to_path_buf() })
1721}
1722
1723/// **Stage 0** — ingiere la semilla al store y devuelve su `ArtifactHash`.
1724///
1725/// Idempotente: si la semilla ya está sellada (mismo hash de identidad), no la vuelve a
1726/// descargar. El sha256 se verifica **antes** de extraer, así que un tarball envenenado nunca
1727/// llega al árbol que se sella.
1728pub fn stage0(seed: &SeedSpec, store: &Store) -> Result<ArtifactHash> {
1729 let h = seed.seed_hash();
1730 let name = seed.store_name();
1731 if store.has(&h, &name) {
1732 tracing::info!(hash = %h, seed = %seed.kind.as_str(), "stage0: semilla ya sellada (idempotente)");
1733 } else {
1734 // Staging bajo el root del store ⇒ mismo filesystem que el destino, para que `seal` pueda
1735 // hacer el rename atómico.
1736 let work = store.root().join(".bootstrap-tmp").join(h.store_dir_name(&name));
1737 let _ = std::fs::remove_dir_all(&work);
1738 std::fs::create_dir_all(&work)?;
1739
1740 // El cuerpo fallible va aparte para limpiar el staging pase lo que pase (un sha erróneo
1741 // no debe dejar el tarball a medio descargar bajo el store). Si falla, salimos antes de
1742 // anotar el manifiesto: una semilla que no se selló no genera línea.
1743 let result = stage0_into(seed, store, &h, &name, &work);
1744 let _ = std::fs::remove_dir_all(&work);
1745 result?;
1746 }
1747
1748 // La semilla es a la vez insumo y producto de Stage 0: `artifact_hash == seed_hash`, sin
1749 // receta (se ingiere, no se compila). Idempotente en disco: re-correr no duplica la línea.
1750 manifest::append_line(
1751 store,
1752 StageEntry {
1753 stage: 0,
1754 recipe_hash: None,
1755 artifact_hash: h.clone(),
1756 seed_hash: Some(h.clone()),
1757 ts: now_unix(),
1758 },
1759 )?;
1760 Ok(h)
1761}
1762
1763/// Segundos Unix actuales para el `ts` del manifiesto. Best-effort: un reloj anterior a la época
1764/// (imposible en la práctica) cae a 0. No entra en ningún hash, así que su precisión no afecta a
1765/// la reproducibilidad.
1766fn now_unix() -> u64 {
1767 std::time::SystemTime::now()
1768 .duration_since(std::time::UNIX_EPOCH)
1769 .map(|d| d.as_secs())
1770 .unwrap_or(0)
1771}
1772
1773fn stage0_into(
1774 seed: &SeedSpec,
1775 store: &Store,
1776 h: &ArtifactHash,
1777 name: &str,
1778 work: &Path,
1779) -> Result<ArtifactHash> {
1780 let tarball = work.join("seed.tar");
1781 download::fetch_url_to_file(&seed.url, &tarball)?;
1782 // Integridad antes de tocar nada: hash erróneo ⇒ no se extrae ni se sella.
1783 download::verify_sha256(&tarball, &seed.sha256)?;
1784
1785 let tree = work.join("tree");
1786 std::fs::create_dir_all(&tree)?;
1787 untar(&tarball, &tree)?;
1788
1789 let sealed = store.seal(&tree, h, name)?;
1790 tracing::info!(path = %sealed.display(), hash = %h, "stage0: semilla sellada");
1791 Ok(h.clone())
1792}
1793
1794/// Extrae `tarball` dentro de `into`. `tar -xf` autodetecta gzip/xz/zstd según lo instalado.
1795fn untar(tarball: &Path, into: &Path) -> Result<()> {
1796 let st = Command::new("tar")
1797 .arg("-xf")
1798 .arg(tarball)
1799 .arg("-C")
1800 .arg(into)
1801 .status()
1802 .map_err(|e| Error::Other(format!("spawn tar: {e}")))?;
1803 if !st.success() {
1804 return Err(Error::Untar(st.code()));
1805 }
1806 Ok(())
1807}
1808
1809#[cfg(test)]
1810mod tests {
1811 use super::*;
1812
1813 fn spec(url: &str, sha256: &str) -> SeedSpec {
1814 SeedSpec {
1815 kind: SeedKind::Zig,
1816 version: "0.13.0".into(),
1817 url: url.into(),
1818 sha256: sha256.into(),
1819 }
1820 }
1821
1822 fn sha256_hex(bytes: &[u8]) -> String {
1823 use sha2::{Digest, Sha256};
1824 let mut h = Sha256::new();
1825 h.update(bytes);
1826 hex::encode(h.finalize())
1827 }
1828
1829 /// Crea un tarball con un archivo `bin/zig` dentro y devuelve `(url file://, sha256 hex)`.
1830 fn make_seed_tarball(dir: &Path) -> (String, String) {
1831 let src = dir.join("src");
1832 std::fs::create_dir_all(src.join("bin")).unwrap();
1833 std::fs::write(src.join("bin/zig"), b"#!/bin/sh\necho fake zig\n").unwrap();
1834 let tarball = dir.join("seed.tar.gz");
1835 let st = Command::new("tar")
1836 .arg("-czf")
1837 .arg(&tarball)
1838 .arg("-C")
1839 .arg(&src)
1840 .arg(".")
1841 .status()
1842 .unwrap();
1843 assert!(st.success(), "tar -c falló");
1844 let sha = sha256_hex(&std::fs::read(&tarball).unwrap());
1845 (format!("file://{}", tarball.display()), sha)
1846 }
1847
1848 #[test]
1849 fn seed_hash_is_identity_based() {
1850 let a = spec("file:///mirror-a.tar", "abc123");
1851 let b = spec("file:///mirror-b.tar", "abc123"); // mismo sha, distinto espejo
1852 assert_eq!(a.seed_hash(), b.seed_hash(), "el url no entra al hash");
1853
1854 let c = spec("file:///mirror-a.tar", "deadbeef"); // sha distinto
1855 assert_ne!(a.seed_hash(), c.seed_hash(), "el sha256 sí cambia el hash");
1856
1857 let mut d = spec("file:///mirror-a.tar", "abc123");
1858 d.kind = SeedKind::MuslCrossMake;
1859 assert_ne!(a.seed_hash(), d.seed_hash(), "la clase cambia el hash");
1860 }
1861
1862 #[test]
1863 fn stage0_ingests_and_seals() {
1864 let tmp = tempfile::tempdir().unwrap();
1865 let (url, sha) = make_seed_tarball(tmp.path());
1866 let store = Store::open(tmp.path().join("store")).unwrap();
1867 let seed = spec(&url, &sha);
1868
1869 let h = stage0(&seed, &store).expect("stage0");
1870 assert_eq!(h, seed.seed_hash());
1871 assert!(store.has(&h, &seed.store_name()), "la semilla debe quedar sellada");
1872
1873 // El contenido extraído está presente y de sólo-lectura (sellado).
1874 let zig = store.path_of(&h, &seed.store_name()).join("bin/zig");
1875 assert!(zig.is_file(), "bin/zig debe existir en el artefacto");
1876 use std::os::unix::fs::PermissionsExt;
1877 let mode = std::fs::metadata(&zig).unwrap().permissions().mode();
1878 assert_eq!(mode & 0o222, 0, "el árbol sellado no debe ser escribible");
1879 }
1880
1881 #[test]
1882 fn stage0_is_idempotent() {
1883 let tmp = tempfile::tempdir().unwrap();
1884 let (url, sha) = make_seed_tarball(tmp.path());
1885 let store = Store::open(tmp.path().join("store")).unwrap();
1886 let seed = spec(&url, &sha);
1887
1888 let h1 = stage0(&seed, &store).unwrap();
1889 let h2 = stage0(&seed, &store).unwrap(); // segunda vez: short-circuit
1890 assert_eq!(h1, h2);
1891 }
1892
1893 #[test]
1894 fn stage0_records_one_manifest_line() {
1895 let tmp = tempfile::tempdir().unwrap();
1896 let (url, sha) = make_seed_tarball(tmp.path());
1897 let store = Store::open(tmp.path().join("store")).unwrap();
1898 let seed = spec(&url, &sha);
1899
1900 let h = stage0(&seed, &store).unwrap();
1901 stage0(&seed, &store).unwrap(); // re-correr no debe duplicar la línea
1902
1903 let m = BootstrapManifest::load(&store).unwrap();
1904 assert_eq!(m.entries.len(), 1, "una sola línea para Stage 0");
1905 let e = &m.entries[0];
1906 assert_eq!(e.stage, 0);
1907 assert_eq!(e.recipe_hash, None, "la semilla se ingiere, no se compila");
1908 assert_eq!(e.artifact_hash, h);
1909 assert_eq!(e.seed_hash, Some(h), "en Stage 0 la semilla es su propio artefacto");
1910 }
1911
1912 #[test]
1913 fn stage0_bad_sha_records_no_manifest_line() {
1914 let tmp = tempfile::tempdir().unwrap();
1915 let (url, _real_sha) = make_seed_tarball(tmp.path());
1916 let store = Store::open(tmp.path().join("store")).unwrap();
1917 let seed = spec(&url, &"0".repeat(64));
1918
1919 assert!(stage0(&seed, &store).is_err());
1920 // Un fallo de integridad no debe dejar ni artefacto ni línea de manifiesto.
1921 assert!(!BootstrapManifest::path_for(&store).exists(), "no debe escribir bootstrap.json");
1922 }
1923
1924 #[test]
1925 fn stage0_rejects_bad_sha256_and_seals_nothing() {
1926 let tmp = tempfile::tempdir().unwrap();
1927 let (url, _real_sha) = make_seed_tarball(tmp.path());
1928 let store = Store::open(tmp.path().join("store")).unwrap();
1929 let seed = spec(&url, &"0".repeat(64)); // sha intencionalmente equivocado
1930
1931 let err = stage0(&seed, &store).unwrap_err();
1932 assert!(
1933 err.to_string().contains("sha256 mismatch"),
1934 "esperaba mismatch de sha256, vino: {err}"
1935 );
1936 assert!(
1937 !store.has(&seed.seed_hash(), &seed.store_name()),
1938 "un sha erróneo no debe sellar nada"
1939 );
1940 // Tampoco debe dejar staging a medio descargar bajo el store.
1941 assert!(
1942 !store.root().join(".bootstrap-tmp").exists()
1943 || std::fs::read_dir(store.root().join(".bootstrap-tmp")).unwrap().next().is_none(),
1944 "el staging debe quedar limpio tras el fallo"
1945 );
1946 }
1947
1948 /// Sella una semilla cuyo tarball coloca un `zig` ejecutable en `zig_rel` (relativo a la raíz
1949 /// del árbol) y devuelve `(store, seed)` listos para resolver el toolchain.
1950 fn seal_seed_with_zig_at(dir: &Path, zig_rel: &str) -> (Store, SeedSpec) {
1951 let src = dir.join("src");
1952 let zig = src.join(zig_rel);
1953 std::fs::create_dir_all(zig.parent().unwrap()).unwrap();
1954 std::fs::write(&zig, b"#!/bin/sh\necho fake zig\n").unwrap();
1955 let tarball = dir.join("seed.tar.gz");
1956 let st = Command::new("tar")
1957 .args(["-czf"])
1958 .arg(&tarball)
1959 .arg("-C")
1960 .arg(&src)
1961 .arg(".")
1962 .status()
1963 .unwrap();
1964 assert!(st.success());
1965 let sha = sha256_hex(&std::fs::read(&tarball).unwrap());
1966 let store = Store::open(dir.join("store")).unwrap();
1967 let seed = spec(&format!("file://{}", tarball.display()), &sha);
1968 stage0(&seed, &store).unwrap();
1969 (store, seed)
1970 }
1971
1972 #[test]
1973 fn toolchain_dir_finds_zig_in_versioned_subdir() {
1974 let tmp = tempfile::tempdir().unwrap();
1975 let (store, seed) = seal_seed_with_zig_at(tmp.path(), "zig-linux-x86_64-0.13.0/zig");
1976 let dir = seed.toolchain_dir(&store).unwrap();
1977 assert!(dir.join("zig").is_file(), "el dir resuelto debe contener zig: {}", dir.display());
1978 assert!(dir.ends_with("zig-linux-x86_64-0.13.0"), "debe elegir el hijo versionado: {}", dir.display());
1979 }
1980
1981 #[test]
1982 fn toolchain_dir_finds_zig_at_root() {
1983 let tmp = tempfile::tempdir().unwrap();
1984 let (store, seed) = seal_seed_with_zig_at(tmp.path(), "zig");
1985 let dir = seed.toolchain_dir(&store).unwrap();
1986 let base = store.path_of(&seed.seed_hash(), &seed.store_name());
1987 assert_eq!(dir, base, "zig en la raíz ⇒ el dir es la raíz de la semilla");
1988 }
1989
1990 #[test]
1991 fn toolchain_dir_errors_when_unsealed() {
1992 let tmp = tempfile::tempdir().unwrap();
1993 let store = Store::open(tmp.path().join("store")).unwrap();
1994 let seed = spec("file:///nope.tar", &"0".repeat(64)); // nunca sellada
1995 let err = seed.toolchain_dir(&store).unwrap_err().to_string();
1996 assert!(err.contains("no sellada"), "esperaba 'no sellada': {err}");
1997 }
1998
1999 #[test]
2000 fn toolchain_dir_errors_when_ambiguous() {
2001 let tmp = tempfile::tempdir().unwrap();
2002 // Dos hijos, cada uno con su `zig`: el resolutor no debe elegir a ciegas.
2003 let (store, seed) = seal_seed_with_zig_at(tmp.path(), "a/zig");
2004 let base = store.path_of(&seed.seed_hash(), &seed.store_name());
2005 // El store sella read-only; relajamos permisos para inyectar el segundo `zig` del test.
2006 let b = base.join("b");
2007 let _ = std::process::Command::new("chmod").arg("-R").arg("u+w").arg(&base).status();
2008 std::fs::create_dir_all(&b).unwrap();
2009 std::fs::write(b.join("zig"), b"x").unwrap();
2010 let err = seed.toolchain_dir(&store).unwrap_err().to_string();
2011 assert!(err.contains("ambiguo"), "esperaba 'ambiguo': {err}");
2012 }
2013
2014 #[test]
2015 fn seed_build_config_points_zig_dir_at_seed() {
2016 let tmp = tempfile::tempdir().unwrap();
2017 let (store, seed) = seal_seed_with_zig_at(tmp.path(), "zig-linux-x86_64-0.13.0/zig");
2018 let base = takana_build::BuildConfig::defaults_for_store(store.root());
2019 let cfg = seed_build_config(&base, &seed, &store).unwrap();
2020 assert_eq!(cfg.zig_dir, seed.toolchain_dir(&store).unwrap());
2021 // El resto de la config se hereda sin cambios.
2022 assert_eq!(cfg.rootfs, base.rootfs);
2023 assert_eq!(cfg.work_root, base.work_root);
2024 }
2025
2026 // --- Stage 1 (Lote 5): hash del rootfs + ensamblado, testeables sin build real ---
2027
2028 /// Sella un componente sintético en el store y devuelve su hash. `build` puebla el árbol
2029 /// antes del `seal` (que lo marca read-only).
2030 fn seal_component(store: &Store, name: &str, hex: &str, build: impl Fn(&Path)) -> ArtifactHash {
2031 let h = ArtifactHash::from_hex(hex);
2032 let work = store.root().join(".bootstrap-tmp").join(h.store_dir_name(name));
2033 std::fs::create_dir_all(&work).unwrap();
2034 build(&work);
2035 store.seal(&work, &h, name).unwrap();
2036 h
2037 }
2038
2039 #[test]
2040 fn rootfs_hash_is_deterministic_and_sensitive() {
2041 let base = [
2042 ("musl".to_string(), ArtifactHash::from_hex("11")),
2043 ("busybox".to_string(), ArtifactHash::from_hex("22")),
2044 ];
2045 let a = rootfs_hash(&base);
2046 assert_eq!(a, rootfs_hash(&base), "mismos componentes ⇒ mismo hash");
2047
2048 let changed = [base[0].clone(), ("busybox".to_string(), ArtifactHash::from_hex("33"))];
2049 assert_ne!(a, rootfs_hash(&changed), "cambiar un componente re-hashea");
2050
2051 let reordered = [base[1].clone(), base[0].clone()];
2052 assert_ne!(a, rootfs_hash(&reordered), "el orden de ensamblado importa");
2053 }
2054
2055 #[test]
2056 fn assemble_rootfs_hydrates_and_installs_arje_init() {
2057 let tmp = tempfile::tempdir().unwrap();
2058 let store = Store::open(tmp.path().join("store")).unwrap();
2059
2060 let hmusl = seal_component(&store, "musl", "aa11", |w| {
2061 std::fs::create_dir_all(w.join("usr/lib")).unwrap();
2062 std::fs::write(w.join("usr/lib/libc.a"), b"!<arch>\n").unwrap();
2063 });
2064 let hbb = seal_component(&store, "busybox", "bb22", |w| {
2065 std::fs::create_dir_all(w.join("bin")).unwrap();
2066 std::fs::write(w.join("bin/busybox"), b"\x7fELFfake").unwrap();
2067 std::os::unix::fs::symlink("busybox", w.join("bin/sh")).unwrap();
2068 // Sidecar de provenance que NO debe terminar en el rootfs.
2069 std::fs::create_dir_all(w.join(".hammer")).unwrap();
2070 std::fs::write(w.join(".hammer/recipe.toml"), b"name = 'busybox'\n").unwrap();
2071 });
2072 let harje = seal_component(&store, "arje-zero", "cc33", |w| {
2073 std::fs::create_dir_all(w.join("usr/bin")).unwrap();
2074 std::fs::write(w.join("usr/bin/arje-zero"), b"\x7fELFfake").unwrap();
2075 });
2076
2077 let staging = store.root().join("staging");
2078 std::fs::create_dir_all(&staging).unwrap();
2079 let components = [
2080 ("musl".to_string(), hmusl),
2081 ("busybox".to_string(), hbb),
2082 ("arje-zero".to_string(), harje),
2083 ];
2084 assemble_rootfs(&store, &components, &staging).unwrap();
2085
2086 assert!(staging.join("usr/lib/libc.a").is_file(), "musl hidratado");
2087 assert!(staging.join("bin/busybox").is_file(), "busybox hidratado");
2088 assert!(staging.join("usr/bin/arje-zero").is_file(), "arje-zero hidratado");
2089 // arje-zero es PID 1 vía /sbin/init.
2090 assert_eq!(
2091 std::fs::read_link(staging.join("sbin/init")).unwrap(),
2092 std::path::PathBuf::from("/usr/bin/arje-zero"),
2093 "/sbin/init apunta a arje-zero"
2094 );
2095 // La seed card está en su lugar y es JSON válido con los genesis esperados.
2096 let seed = std::fs::read_to_string(staging.join("ente/seed.card.json")).unwrap();
2097 let v: serde_json::Value = serde_json::from_str(&seed).unwrap();
2098 assert_eq!(v["label"], "hammer-stage1");
2099 let labels: Vec<&str> = v["genesis"].as_array().unwrap()
2100 .iter().map(|g| g["label"].as_str().unwrap()).collect();
2101 assert_eq!(labels, vec!["hammerd", "console-getty"]);
2102 // Puntos de montaje que arje monta solos, presentes como dirs vacíos.
2103 assert!(staging.join("sys/fs/cgroup").is_dir() && staging.join("dev/pts").is_dir());
2104 assert!(!staging.join(".hammer").exists(), "el sidecar no debe quedar en el rootfs");
2105 // Ya no hay init provisional de busybox.
2106 assert!(!staging.join("etc/inittab").exists(), "el inittab provisional fue retirado");
2107 }
2108
2109 #[test]
2110 fn stage1_seed_card_is_valid_json_with_native_hammerd() {
2111 // La seed embebida debe ser JSON válido y declarar hammerd como servicio Native Restart
2112 // (el CRASHED real) — un template roto rompería el boot de arje-zero.
2113 let v: serde_json::Value = serde_json::from_str(STAGE1_SEED_CARD).unwrap();
2114 assert_eq!(v["payload"], "Virtual", "la semilla es Virtual");
2115 let hammerd = &v["genesis"][0];
2116 assert_eq!(hammerd["label"], "hammerd");
2117 assert_eq!(hammerd["payload"]["Native"]["exec"], "/usr/bin/hammerd");
2118 assert!(hammerd["supervision"]["Restart"]["initial"].is_number(), "hammerd es Restart");
2119 let getty = &v["genesis"][1];
2120 assert_eq!(getty["payload"]["Native"]["exec"], "/bin/busybox");
2121 }
2122
2123 // --- Capa de servicios (producto): composición de seed + hidratación tardía ---
2124
2125 #[test]
2126 fn product_seed_appends_sshd_to_base_genesis() {
2127 // La seed de producto = base + sshd; el núcleo (hammerd, getty) se preserva intacto y el
2128 // resultado es JSON válido (lo que arje-zero validará al boot).
2129 let seed = product_seed_card(&[card_sshd_esperada()]).unwrap();
2130 let v: serde_json::Value = serde_json::from_str(&seed).unwrap();
2131 assert_eq!(v["label"], "hammer-product");
2132 assert_eq!(v["payload"], "Virtual");
2133 let labels: Vec<&str> = v["genesis"].as_array().unwrap()
2134 .iter().map(|g| g["label"].as_str().unwrap()).collect();
2135 assert_eq!(labels, vec!["hammerd", "console-getty", "sshd"], "núcleo intacto + sshd añadido");
2136 let sshd = &v["genesis"][2];
2137 assert_eq!(sshd["payload"]["Native"]["exec"], "/bin/busybox");
2138 assert!(sshd["payload"]["Native"]["argv"][2].as_str().unwrap().contains("/usr/sbin/sshd"));
2139 assert!(sshd["supervision"]["Restart"]["initial"].is_number(), "sshd es Restart (lifecycle)");
2140 }
2141
2142 /// **El sidecar rancio NO puede pasar en silencio.**
2143 ///
2144 /// Es la trampa que este mecanismo tiene incorporada y que hay que dejar armada: el sidecar de
2145 /// provenance **no entra en el `ArtifactHash`**, así que un artefacto sellado antes de que su
2146 /// receta declarara servicios sigue siendo un cache-hit perfectamente válido y no se reconstruye
2147 /// nunca solo. Si `service_cards` devolviera una lista vacía sin protestar, el producto saldría
2148 /// **booteando, verde y sin sshd**. Un ausente falla ruidosamente; un vacío llega hasta el final
2149 /// diciendo que todo fue bien — regla 3 del CLAUDE.md, aplicada acá antes de pagarla.
2150 #[test]
2151 fn service_cards_falla_ruidosamente_con_sidecar_rancio() {
2152 let tmp = tempfile::tempdir().unwrap();
2153 let store = Store::open(tmp.path().join("store")).unwrap();
2154 // Un store sin ese artefacto ⇒ sin sidecar ⇒ sin servicios: exactamente lo que se ve cuando
2155 // el artefacto es anterior al bloque `[[service]]`.
2156 let servicios = [("openssh".to_string(), ArtifactHash::from_hex("ab"))];
2157 let e = service_cards(&store, &servicios).unwrap_err().to_string();
2158 assert!(e.contains("ningún componente de servicio"), "{e}");
2159 assert!(e.contains("ArtifactHash"), "el error tiene que EXPLICAR la trampa: {e}");
2160 assert!(e.contains("borrar el artefacto del store"), "y decir el arreglo: {e}");
2161 }
2162
2163 /// La Card de `sshd` de referencia: la constante que el producto **ya bootea en QEMU**. Los
2164 /// tests componen la seed con ella (no con la derivada del sidecar) a propósito: así el
2165 /// esqueleto de la seed se prueba sin necesitar un store, y la equivalencia
2166 /// «receta ⇒ esta misma card» la prueba `la_receta_de_openssh_reproduce_la_card_hardcodeada`.
2167 fn card_sshd_esperada() -> serde_json::Value {
2168 serde_json::from_str(SSHD_SERVICE_CARD).unwrap()
2169 }
2170
2171 /// **La receta produce la MISMA Card que la constante hardcodeada.**
2172 ///
2173 /// Esta es la prueba que autoriza a mover el servicio de un literal de Rust a `[[service]]` en
2174 /// `recipes/openssh.toml`: no compara «una card parecida», compara el `serde_json::Value`
2175 /// entero contra [`SSHD_SERVICE_CARD`], que es **la card que el producto ya bootea en QEMU**
2176 /// (verificada e2e por `scripts/ssh-e2e-test.sh`). Si empatan, declarar el servicio en la
2177 /// receta no cambia ni un byte de la seed — y por lo tanto tampoco el `product_rootfs_hash`.
2178 ///
2179 /// Lee la receta REAL del repo a propósito: un fixture inline probaría el emisor contra sí
2180 /// mismo y no detectaría que alguien editó la receta y la sacó de sincronía con el producto.
2181 #[test]
2182 fn la_receta_de_openssh_reproduce_la_card_hardcodeada() {
2183 let repo = Path::new(env!("CARGO_MANIFEST_DIR")).join("../..");
2184 let r = takana_core::Recipe::load_from_path(repo.join("recipes/openssh.toml")).unwrap();
2185 assert_eq!(r.services.len(), 1, "openssh declara exactamente un servicio");
2186
2187 let generada = r.services[0].card();
2188 let hardcodeada: serde_json::Value = serde_json::from_str(SSHD_SERVICE_CARD).unwrap();
2189 assert_eq!(
2190 generada, hardcodeada,
2191 "la card generada desde recipes/openssh.toml difiere de SSHD_SERVICE_CARD: \
2192 mover el servicio a la receta CAMBIARÍA la seed de producto"
2193 );
2194 }
2195
2196 #[test]
2197 fn product_rootfs_hash_is_deterministic_and_sensitive() {
2198 let base = ArtifactHash::from_hex("ab");
2199 let userland = [("uutils".to_string(), ArtifactHash::from_hex("11"))];
2200 let svcs = [("openssh".to_string(), ArtifactHash::from_hex("cd"))];
2201 let seed = product_seed_card(&[card_sshd_esperada()]).unwrap();
2202 let a = product_rootfs_hash(&base, &userland, &svcs, &seed);
2203 assert_eq!(a, product_rootfs_hash(&base, &userland, &svcs, &seed), "determinista");
2204 let other_base = ArtifactHash::from_hex("ef");
2205 assert_ne!(a, product_rootfs_hash(&other_base, &userland, &svcs, &seed), "cambiar la base re-hashea");
2206 let other_userland = [("uutils".to_string(), ArtifactHash::from_hex("22"))];
2207 assert_ne!(a, product_rootfs_hash(&base, &other_userland, &svcs, &seed), "cambiar el userland re-hashea");
2208 let other_svc = [("openssh".to_string(), ArtifactHash::from_hex("99"))];
2209 assert_ne!(a, product_rootfs_hash(&base, &userland, &other_svc, &seed), "cambiar un servicio re-hashea");
2210 }
2211
2212 #[test]
2213 fn assemble_product_injects_services_over_base() {
2214 let tmp = tempfile::tempdir().unwrap();
2215 let store = Store::open(tmp.path().join("store")).unwrap();
2216
2217 // Un rootfs base sintético sellado como `stage1-rootfs` (el 4/4 ya verificado): trae la seed
2218 // base, /sbin/init, un mountpoint vacío, un binario del núcleo y un applet busybox `ls`.
2219 let base = seal_component(&store, "stage1-rootfs", "ba5e", |w| {
2220 std::fs::create_dir_all(w.join("usr/bin")).unwrap();
2221 std::fs::create_dir_all(w.join("bin")).unwrap();
2222 std::fs::create_dir_all(w.join("ente")).unwrap();
2223 std::fs::create_dir_all(w.join("proc")).unwrap();
2224 std::fs::create_dir_all(w.join("var")).unwrap();
2225 std::fs::create_dir_all(w.join("root")).unwrap();
2226 std::fs::write(w.join("usr/bin/hammerd"), b"\x7fELFfake").unwrap();
2227 std::fs::write(w.join("bin/busybox"), b"\x7fELFbb").unwrap();
2228 // busybox instala el applet `ls` como symlink en /usr/bin (lo ensombrece la hidratación) y
2229 // `cat` en /bin (lo debe RETIRAR el adelgazamiento). `sh` en /bin NO se reemplaza (queda).
2230 std::os::unix::fs::symlink("../../bin/busybox", w.join("usr/bin/ls")).unwrap();
2231 std::os::unix::fs::symlink("busybox", w.join("bin/cat")).unwrap();
2232 std::os::unix::fs::symlink("busybox", w.join("bin/sh")).unwrap();
2233 std::fs::write(w.join("ente/seed.card.json"), STAGE1_SEED_CARD).unwrap();
2234 std::os::unix::fs::symlink("/usr/bin/arje-zero", w.join("sbin_init_tmp")).unwrap();
2235 });
2236 // Userland Rust sintético (uutils): coreutils multicall + symlink `ls`→coreutils.
2237 let huu = seal_component(&store, "uutils", "c0re", |w| {
2238 std::fs::create_dir_all(w.join("usr/bin")).unwrap();
2239 std::fs::write(w.join("usr/bin/coreutils"), b"\x7fELFuu").unwrap();
2240 std::os::unix::fs::symlink("coreutils", w.join("usr/bin/ls")).unwrap();
2241 std::os::unix::fs::symlink("coreutils", w.join("usr/bin/cat")).unwrap();
2242 });
2243 // Componentes de servicio sintéticos.
2244 let hossh = seal_component(&store, "openssh", "0551", |w| {
2245 std::fs::create_dir_all(w.join("usr/sbin")).unwrap();
2246 std::fs::write(w.join("usr/sbin/sshd"), b"\x7fELFfake").unwrap();
2247 });
2248 let hnet = seal_component(&store, "netup", "9e72", |w| {
2249 std::fs::create_dir_all(w.join("usr/bin")).unwrap();
2250 std::fs::write(w.join("usr/bin/netup"), b"\x7fELFfake").unwrap();
2251 });
2252
2253 let seed = product_seed_card(&[card_sshd_esperada()]).unwrap();
2254 let userland = [("uutils".to_string(), huu)];
2255 let services = [("openssh".to_string(), hossh), ("netup".to_string(), hnet)];
2256 let staging = store.root().join("prod-staging");
2257 std::fs::create_dir_all(&staging).unwrap();
2258 assemble_product_rootfs(&store, &base, &userland, &services, &seed, &staging).unwrap();
2259
2260 // base hidratada + userland + servicios inyectados.
2261 assert!(staging.join("usr/bin/hammerd").is_file(), "núcleo presente");
2262 assert!(staging.join("proc").is_dir(), "mountpoint vacío recreado");
2263 assert!(staging.join("usr/bin/coreutils").is_file(), "uutils inyectado");
2264 assert!(staging.join("usr/sbin/sshd").is_file(), "openssh inyectado");
2265 assert!(staging.join("usr/bin/netup").is_file(), "netup inyectado");
2266 // ADELGAZAR BUSYBOX: /usr/bin/ls apunta ahora a coreutils (Rust), no a busybox.
2267 assert_eq!(
2268 std::fs::read_link(staging.join("usr/bin/ls")).unwrap(),
2269 std::path::PathBuf::from("coreutils"),
2270 "el userland Rust ensombrece el applet busybox en /usr/bin"
2271 );
2272 // El applet busybox `cat` en /bin fue RETIRADO (uutils provee cat) ⇒ no compite en PATH.
2273 assert!(!staging.join("bin/cat").exists(), "el applet busybox /bin/cat reemplazado fue retirado");
2274 // Lo NO reemplazado por Rust (sh) y el binario busybox quedan intactos.
2275 assert!(staging.join("bin/sh").exists(), "/bin/sh (ash) interino se preserva");
2276 assert!(staging.join("bin/busybox").is_file(), "el binario busybox queda (fallback)");
2277 // la seed fue sobrescrita con la de producto (3 cards).
2278 let got = std::fs::read_to_string(staging.join("ente/seed.card.json")).unwrap();
2279 let v: serde_json::Value = serde_json::from_str(&got).unwrap();
2280 assert_eq!(v["label"], "hammer-product");
2281 assert_eq!(v["genesis"].as_array().unwrap().len(), 3);
2282 // configs de servicio.
2283 assert!(std::fs::read_to_string(staging.join("etc/passwd")).unwrap().contains("sshd:"));
2284 assert!(std::fs::read_to_string(staging.join("etc/ssh/sshd_config")).unwrap().contains("Port 22"));
2285 // /var/empty con permisos 0711 (privsep no acepta group/world-writable).
2286 use std::os::unix::fs::PermissionsExt;
2287 let mode = std::fs::metadata(staging.join("var/empty")).unwrap().permissions().mode() & 0o777;
2288 assert_eq!(mode, 0o711, "/var/empty debe ser 0711");
2289 assert!(staging.join("root/.ssh").is_dir(), "/root/.ssh para authorized_keys");
2290 // Mountpoints de disco (el producto es disk-ready): /store + /var/lib/hammer existen vacíos.
2291 assert!(staging.join("store").is_dir() && staging.join("var/lib/hammer").is_dir(),
2292 "/store y /var/lib/hammer como mountpoints del disco de producto");
2293 // Atestación: el producto emite /ente/attest.json y se auto-verifica íntegro.
2294 assert!(staging.join("ente/attest.json").is_file(), "manifiesto de atestación emitido");
2295 let att = verify_attestation(&staging).unwrap();
2296 assert!(att.passed(), "el product-rootfs recién ensamblado pasa su propia atestación");
2297 // cubre los binarios presentes del set crítico (hammerd, busybox, sshd, netup, coreutils).
2298 assert!(att.ok.iter().any(|p| p == "/usr/sbin/sshd") && att.ok.iter().any(|p| p == "/usr/bin/coreutils"));
2299 }
2300
2301 #[test]
2302 fn attestation_manifest_emits_and_verifies_and_catches_tamper() {
2303 let tmp = tempfile::tempdir().unwrap();
2304 let root = tmp.path().join("rootfs");
2305 for d in ["usr/bin", "bin", "usr/sbin", "ente"] {
2306 std::fs::create_dir_all(root.join(d)).unwrap();
2307 }
2308 std::fs::write(root.join("usr/bin/hammerd"), b"\x7fELF-hammerd").unwrap();
2309 std::fs::write(root.join("bin/busybox"), b"\x7fELF-busybox").unwrap();
2310 std::fs::write(root.join("usr/sbin/sshd"), b"\x7fELF-sshd").unwrap();
2311 // arje-zero/netup/coreutils ausentes ⇒ no se listan (sólo binarios presentes).
2312
2313 let manifest = build_attestation(&root).unwrap();
2314 assert_eq!(manifest.algo, "blake3");
2315 let paths: Vec<&str> = manifest.entries.iter().map(|e| e.path.as_str()).collect();
2316 assert!(paths.contains(&"/usr/bin/hammerd") && paths.contains(&"/bin/busybox") && paths.contains(&"/usr/sbin/sshd"));
2317 assert!(!paths.contains(&"/usr/bin/arje-zero"), "binario ausente no se atesta");
2318 std::fs::write(root.join("ente/attest.json"), serde_json::to_string_pretty(&manifest).unwrap()).unwrap();
2319
2320 // verificación íntegra: pasa.
2321 let rep = verify_attestation(&root).unwrap();
2322 assert!(rep.passed() && rep.ok.len() == manifest.entries.len());
2323
2324 // manipular un binario ⇒ DIVERGE (el gate de arje haría halt).
2325 std::fs::write(root.join("bin/busybox"), b"\x7fELF-TAMPERED-longer").unwrap();
2326 let rep2 = verify_attestation(&root).unwrap();
2327 assert!(!rep2.passed());
2328 assert_eq!(rep2.mismatched, vec!["/bin/busybox".to_string()]);
2329
2330 // borrar un binario crítico ⇒ FALTA.
2331 std::fs::remove_file(root.join("usr/sbin/sshd")).unwrap();
2332 let rep3 = verify_attestation(&root).unwrap();
2333 assert!(rep3.missing.contains(&"/usr/sbin/sshd".to_string()) && !rep3.passed());
2334 }
2335
2336 #[test]
2337 fn assemble_attested_swaps_gate_signs_seed_and_regenerates_attest() {
2338 // Hermético: un `arje-packager` SINTÉTICO (script python) simula la firma — añade `attest`/
2339 // `attest_rootkey` al seed-out. Valida el CABLEADO de takana (pisar el init, romper hardlinks,
2340 // fijar attest_policy, derivar los --bin de la seed, regenerar /ente/attest.json), sin la cripto
2341 // real (eso lo cubre E2E `scripts/attest-boot-test.sh` en QEMU).
2342 use std::os::unix::fs::PermissionsExt;
2343 let tmp = tempfile::tempdir().unwrap();
2344 let store = Store::open(tmp.path().join("store")).unwrap();
2345
2346 // product-rootfs base sellado: seed de producto + /ente/attest.json + los bins críticos.
2347 let base = seal_component(&store, "product-rootfs", "9a07", |w| {
2348 std::fs::create_dir_all(w.join("usr/bin")).unwrap();
2349 std::fs::create_dir_all(w.join("bin")).unwrap();
2350 std::fs::create_dir_all(w.join("ente")).unwrap();
2351 std::fs::write(w.join("usr/bin/arje-zero"), b"\x7fELF-arje-zero-CORE").unwrap();
2352 std::fs::write(w.join("usr/bin/hammerd"), b"\x7fELF-hammerd").unwrap();
2353 std::fs::write(w.join("bin/busybox"), b"\x7fELF-busybox").unwrap();
2354 std::fs::write(w.join("ente/seed.card.json"), product_seed_card(&[card_sshd_esperada()]).unwrap()).unwrap();
2355 // attest.json del producto base (con el arje-zero del NÚCLEO) — debe regenerarse.
2356 let a = build_attestation(w).unwrap();
2357 std::fs::write(w.join("ente/attest.json"), serde_json::to_string(&a).unwrap()).unwrap();
2358 });
2359
2360 // init CON gate (bytes distintos al del núcleo) y packager sintético, fuera del store.
2361 let gated_bin = tmp.path().join("arje-zero-gated");
2362 std::fs::write(&gated_bin, b"\x7fELF-arje-zero-GATED-bigger").unwrap();
2363 let pkgr = tmp.path().join("fake-packager");
2364 std::fs::write(&pkgr, FAKE_PACKAGER).unwrap();
2365 std::fs::set_permissions(&pkgr, std::fs::Permissions::from_mode(0o755)).unwrap();
2366
2367 let staging = store.root().join(".bootstrap-tmp/test-attested");
2368 std::fs::create_dir_all(&staging).unwrap();
2369 let cfg = AttestConfig { policy: "halt".into(), rootkey: [3u8; 32] };
2370 assemble_attested_product_rootfs(&store, &base, &gated_bin, &pkgr, &cfg, &staging).unwrap();
2371
2372 // 1) /usr/bin/arje-zero ahora es el del gate (hardlink roto, no mutó el inodo del store).
2373 assert_eq!(
2374 std::fs::read(staging.join("usr/bin/arje-zero")).unwrap(),
2375 b"\x7fELF-arje-zero-GATED-bigger",
2376 "el init con gate pisó al del núcleo"
2377 );
2378 // El sello del store NO se tocó (su arje-zero sigue siendo el del núcleo).
2379 assert_eq!(
2380 std::fs::read(store.path_of(&base, "product-rootfs").join("usr/bin/arje-zero")).unwrap(),
2381 b"\x7fELF-arje-zero-CORE",
2382 "romper el hardlink no mutó el store"
2383 );
2384 // 2) seed firmada: el packager recibió attest_policy=halt y los 4 --bin derivados de la seed.
2385 let seed: serde_json::Value =
2386 serde_json::from_str(&std::fs::read_to_string(staging.join("ente/seed.card.json")).unwrap()).unwrap();
2387 assert_eq!(seed["attest_policy"], "halt");
2388 assert!(seed["attest"].is_array(), "el packager firmó (Card::attest)");
2389 let bins_seen = std::fs::read_to_string(staging.join("..").join("bins-seen.txt")).unwrap();
2390 for label in ["arje-zero", "hammerd", "console-getty", "sshd"] {
2391 assert!(bins_seen.contains(&format!("{label}=")), "--bin {label} pasado al packager:\n{bins_seen}");
2392 }
2393 // 3) ANCLA SOBERANA EXTERNA: /etc/arje/rootkey.pub = la pubkey del seed firmado (32 bytes raw).
2394 let anchor = std::fs::read(staging.join("etc/arje/rootkey.pub")).unwrap();
2395 assert_eq!(anchor.len(), 32, "rootkey.pub son 32 bytes raw");
2396 assert_eq!(anchor, vec![7u8; 32], "la pubkey del seed firmado anclada fuera de la Card");
2397 // 4) /ente/attest.json regenerado: pasa con el arje-zero NUEVO (el del núcleo divergiría).
2398 assert!(verify_attestation(&staging).unwrap().passed(), "attest.json regenerado y coherente");
2399 // 5) el tmp de build se limpió.
2400 assert!(!staging.join(".attest-build").exists());
2401 }
2402
2403 /// `arje-packager` sintético para el test hermético: copia `--seed`→`--seed-out` inyectando
2404 /// `attest`/`attest_rootkey` (simula la firma) y vuelca los `--bin` vistos a `../bins-seen.txt`.
2405 const FAKE_PACKAGER: &str = r#"#!/usr/bin/env python3
2406import json, sys
2407seed=out=None; bins=[]
2408a=sys.argv[1:]
2409while a:
2410 f=a.pop(0)
2411 if f=="--seed": seed=a.pop(0)
2412 elif f=="--seed-out": out=a.pop(0)
2413 elif f=="--rootkey": a.pop(0)
2414 elif f=="--bin": bins.append(a.pop(0))
2415 else: pass
2416d=json.load(open(seed))
2417d["attest"]=[{"label":b.split("=",1)[0]} for b in bins]
2418d["attest_rootkey"]=[7]*32 # pubkey de 32 bytes (como la del packager real)
2419json.dump(d, open(out,"w"), indent=2)
2420import os
2421open(os.path.join(os.path.dirname(out),"..","..","bins-seen.txt"),"w").write("\n".join(bins))
2422"#;
2423
2424 #[test]
2425 fn product_attested_hash_is_deterministic_and_sensitive() {
2426 let base = ArtifactHash::from_hex("ab");
2427 let gated = ArtifactHash::from_hex("cd");
2428 let pkgr = ArtifactHash::from_hex("ef");
2429 let cfg = AttestConfig::default();
2430 let a = product_attested_hash(&base, &gated, &pkgr, &cfg);
2431 assert_eq!(a, product_attested_hash(&base, &gated, &pkgr, &cfg), "determinista");
2432 // Cada insumo re-hashea.
2433 assert_ne!(a, product_attested_hash(&ArtifactHash::from_hex("11"), &gated, &pkgr, &cfg), "base");
2434 assert_ne!(a, product_attested_hash(&base, &ArtifactHash::from_hex("22"), &pkgr, &cfg), "gate");
2435 assert_ne!(a, product_attested_hash(&base, &gated, &ArtifactHash::from_hex("33"), &cfg), "packager");
2436 let other_policy = AttestConfig { policy: "warn".into(), ..AttestConfig::default() };
2437 assert_ne!(a, product_attested_hash(&base, &gated, &pkgr, &other_policy), "política");
2438 let other_key = AttestConfig { rootkey: [7u8; 32], ..AttestConfig::default() };
2439 assert_ne!(a, product_attested_hash(&base, &gated, &pkgr, &other_key), "rootkey");
2440 // El producto atestado es un sello DISTINTO del producto base (no colisionan).
2441 assert_ne!(a.as_str(), base.as_str(), "el atestado no es el producto base");
2442 }
2443
2444 #[test]
2445 fn critical_bins_are_derived_from_the_seed_native_execs() {
2446 // De la seed de producto real: PID 1 (arje-zero, el current_exe del gate) + un --bin por cada
2447 // exec Native del genesis (hammerd, console-getty, sshd). Los labels deben casar los de las cards
2448 // (lo que el gate busca en las concesiones firmadas) y las rutas resolver dentro del staging.
2449 let staging = Path::new("/tmp/fake-staging");
2450 let seed: serde_json::Value =
2451 serde_json::from_str(&product_seed_card(&[card_sshd_esperada()]).unwrap()).unwrap();
2452 let bins = critical_bins_from_seed(&seed, staging);
2453 let labels: Vec<&str> = bins.iter().map(|(l, _)| l.as_str()).collect();
2454 assert_eq!(
2455 labels,
2456 vec!["arje-zero", "hammerd", "console-getty", "sshd"],
2457 "PID 1 primero, luego DFS del genesis"
2458 );
2459 // El exec de cada card se mapea a su ruta absoluta dentro del staging.
2460 let by_label = |l: &str| bins.iter().find(|(x, _)| x == l).map(|(_, p)| p.clone()).unwrap();
2461 assert_eq!(by_label("arje-zero"), staging.join("usr/bin/arje-zero"));
2462 assert_eq!(by_label("hammerd"), staging.join("usr/bin/hammerd"));
2463 // console-getty y sshd ejecutan ambos /bin/busybox ⇒ misma ruta, labels distintos.
2464 assert_eq!(by_label("console-getty"), staging.join("bin/busybox"));
2465 assert_eq!(by_label("sshd"), staging.join("bin/busybox"));
2466 }
2467
2468 #[test]
2469 fn shipped_product_recipes_parse_and_hash() {
2470 // Las recetas de producto reales (userland Rust + servicios) cargan y hashean — viven fuera
2471 // del núcleo (no entran a STAGE1_COMPONENTS ni al selfhost-verify).
2472 let recipes_dir = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../recipes");
2473 let tmp = tempfile::tempdir().unwrap();
2474 let store = Store::open(tmp.path().join("store")).unwrap();
2475 for name in USERLAND_COMPONENTS.iter().chain(SERVICE_COMPONENTS.iter()) {
2476 let path = recipes_dir.join(format!("{name}.toml"));
2477 let r = Recipe::load_from_path(&path).unwrap_or_else(|e| panic!("parse {name}: {e}"));
2478 assert_eq!(&r.name, name);
2479 let h = takana_build::artifact_hash(&r, &store, &takana_core::lab::LabFingerprint::for_tests()).expect("hash");
2480 assert!(h.as_str().starts_with("b3:"));
2481 }
2482 }
2483
2484 #[test]
2485 fn shipped_stage1_recipes_parse_and_hash() {
2486 // Las recetas reales del repo (Lote 4) deben cargar y hashear (sha256 pinned, parse OK).
2487 let recipes_dir = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../recipes");
2488 let tmp = tempfile::tempdir().unwrap();
2489 let store = Store::open(tmp.path().join("store")).unwrap();
2490 for name in STAGE1_COMPONENTS {
2491 let path = recipes_dir.join(format!("{name}.toml"));
2492 let r = Recipe::load_from_path(&path).unwrap_or_else(|e| panic!("parse {name}: {e}"));
2493 assert_eq!(&r.name, name);
2494 let h = takana_build::artifact_hash(&r, &store, &takana_core::lab::LabFingerprint::for_tests()).expect("hash");
2495 assert!(h.as_str().starts_with("b3:"), "hash con prefijo b3:");
2496 }
2497 }
2498
2499 #[test]
2500 fn stage2_anchors_content_hash_and_verifies() {
2501 let tmp = tempfile::tempdir().unwrap();
2502 let store = Store::open(tmp.path().join("store")).unwrap();
2503 // Sella un "rootfs" sintético con el nombre que espera stage2.
2504 let h = seal_component(&store, "stage1-rootfs", "abcd", |w| {
2505 std::fs::create_dir_all(w.join("usr/bin")).unwrap();
2506 std::fs::write(w.join("usr/bin/arje-zero"), b"\x7fELFfake-init").unwrap();
2507 });
2508
2509 let report = stage2(&h, &store).unwrap();
2510 assert_eq!(report.stage1_rootfs, h);
2511 assert!(report.stage1_content.as_str().starts_with("b3:"));
2512 assert_eq!(report.verdict, Reproducibility::RebuildPending);
2513
2514 // El manifiesto anotó la línea stage 2 con el content-hash como artefacto.
2515 let m = BootstrapManifest::load(&store).unwrap();
2516 let e2 = m.entries.iter().find(|e| e.stage == 2).expect("línea stage 2");
2517 assert_eq!(e2.artifact_hash, report.stage1_content);
2518
2519 // verify_against: un rebuild idéntico ⇒ Reproducible; distinto ⇒ Divergent.
2520 assert_eq!(
2521 verify_against(&report, report.stage1_content.clone()),
2522 Reproducibility::Reproducible
2523 );
2524 match verify_against(&report, ArtifactHash::from_hex("ffff")) {
2525 Reproducibility::Divergent { stage1, rebuilt } => {
2526 assert_eq!(stage1, report.stage1_content);
2527 assert_eq!(rebuilt, ArtifactHash::from_hex("ffff"));
2528 }
2529 v => panic!("esperaba Divergent, vino {v:?}"),
2530 }
2531 }
2532
2533 // --- Builder rootfs (SDD 11 §7): ensamblado testeable sin Alpine ni VM ---
2534
2535 /// Monta los insumos mínimos de un builder en `dir` y devuelve `(store, spec)` listos.
2536 fn builder_fixture(dir: &Path) -> (Store, BuilderSpec) {
2537 let store = Store::open(dir.join("store")).unwrap();
2538
2539 // Stage 1 rootfs sellado (con el nombre que espera el builder).
2540 let stage1 = seal_component(&store, "stage1-rootfs", "5111", |w| {
2541 std::fs::create_dir_all(w.join("usr/bin")).unwrap();
2542 std::fs::write(w.join("usr/bin/arje-zero"), b"\x7fELFinit").unwrap();
2543 std::fs::create_dir_all(w.join("sbin")).unwrap();
2544 std::os::unix::fs::symlink("/usr/bin/arje-zero", w.join("sbin/init")).unwrap();
2545 });
2546
2547 // Semilla zig sellada con bin/zig (nombre store seed-zig).
2548 let seed = seal_component(&store, "seed-zig", "5ee0", |w| {
2549 std::fs::create_dir_all(w.join("bin")).unwrap();
2550 std::fs::write(w.join("bin/zig"), b"#!/bin/sh\necho zig\n").unwrap();
2551 });
2552
2553 // Recetas, binario takana y toolchain (Alpine sintético), fuera del store.
2554 let recipes = dir.join("recipes");
2555 std::fs::create_dir_all(&recipes).unwrap();
2556 std::fs::write(recipes.join("musl.toml"), b"name = 'musl'\n").unwrap();
2557 std::fs::write(recipes.join("busybox.toml"), b"name = 'busybox'\n").unwrap();
2558
2559 let hammer_bin = dir.join("hammer");
2560 std::fs::write(&hammer_bin, b"\x7fELF-hammer-static").unwrap();
2561
2562 let toolchain = dir.join("alpine");
2563 std::fs::create_dir_all(toolchain.join("usr/bin")).unwrap();
2564 std::fs::write(toolchain.join("usr/bin/make"), b"\x7fELFmake").unwrap();
2565
2566 let spec = BuilderSpec {
2567 stage1_rootfs: stage1,
2568 seed_hash: seed,
2569 seed_kind: SeedKind::Zig,
2570 recipes_dir: recipes,
2571 hammer_bin,
2572 toolchain_src: toolchain,
2573 toolchain_tag: "alpine-test".into(),
2574 ref_content: Some(ArtifactHash::from_hex("dead")),
2575 work_cache: None,
2576 swaps: vec![],
2577 };
2578 (store, spec)
2579 }
2580
2581 #[test]
2582 fn builder_rootfs_assembles_full_image() {
2583 let tmp = tempfile::tempdir().unwrap();
2584 let (store, spec) = builder_fixture(tmp.path());
2585 let out = tmp.path().join("builder-out");
2586
2587 let report = builder_rootfs(&spec, &store, &out).unwrap();
2588 assert!(report.builder_hash.as_str().starts_with("b3:"));
2589 assert_eq!(report.out_dir, out);
2590
2591 // Base Stage 1 hidratada (init + symlink).
2592 assert!(out.join("usr/bin/arje-zero").is_file(), "stage1 hidratado");
2593 assert_eq!(
2594 std::fs::read_link(out.join("sbin/init")).unwrap(),
2595 PathBuf::from("/usr/bin/arje-zero"),
2596 );
2597 // Toolchain en /toolchain, semilla en /store, takana + recetas + driver.
2598 assert!(out.join("toolchain/usr/bin/make").is_file(), "toolchain montado");
2599 assert!(
2600 out.join("store").join(spec.seed_hash.store_dir_name("seed-zig")).join("bin/zig").is_file(),
2601 "semilla replicada en /store",
2602 );
2603 assert!(out.join("usr/bin/hammer").is_file(), "binario hammer");
2604 assert!(out.join("etc/hammer/recipes/musl.toml").is_file(), "recetas embebidas");
2605 assert!(out.join("usr/bin/rebuild-stage1").is_file(), "driver de rebuild");
2606
2607 // El driver y takana son ejecutables.
2608 use std::os::unix::fs::PermissionsExt;
2609 let m = std::fs::metadata(out.join("usr/bin/rebuild-stage1")).unwrap();
2610 assert_eq!(m.permissions().mode() & 0o111, 0o111, "driver +x");
2611
2612 // rebuild.env lleva la semilla, la clase y la referencia embebidas.
2613 let env = std::fs::read_to_string(out.join("etc/hammer/rebuild.env")).unwrap();
2614 assert!(env.contains(&format!("SEED_HASH={}", spec.seed_hash)), "{env}");
2615 assert!(env.contains("SEED_KIND=zig"), "{env}");
2616 assert!(env.contains("REF_CONTENT=b3:dead"), "{env}");
2617
2618 // Línea de manifiesto (stage 2) con el hash lógico del builder.
2619 let man = BootstrapManifest::load(&store).unwrap();
2620 assert!(
2621 man.entries.iter().any(|e| e.stage == 2 && e.artifact_hash == report.builder_hash),
2622 "el builder debe anotar su línea en el manifiesto",
2623 );
2624 }
2625
2626 #[test]
2627 fn builder_hash_is_deterministic_and_sensitive() {
2628 let s1 = ArtifactHash::from_hex("11");
2629 let seed = ArtifactHash::from_hex("22");
2630 let a = builder_hash(&s1, &seed, "alpine-3.23.4", "rd", "hd", "");
2631 assert_eq!(a, builder_hash(&s1, &seed, "alpine-3.23.4", "rd", "hd", ""), "puro");
2632 assert_ne!(a, builder_hash(&s1, &seed, "alpine-3.24.0", "rd", "hd", ""), "tag del toolchain");
2633 assert_ne!(a, builder_hash(&s1, &seed, "alpine-3.23.4", "rd2", "hd", ""), "recetas");
2634 assert_ne!(a, builder_hash(&s1, &seed, "alpine-3.23.4", "rd", "hd2", ""), "binario hammer");
2635 assert_ne!(a, builder_hash(&s1, &seed, "alpine-3.23.4", "rd", "hd", "sd"), "swaps del toolchain");
2636 }
2637
2638 #[test]
2639 fn swaps_digest_empty_is_blank_and_order_insensitive() {
2640 assert_eq!(swaps_digest(&[]), "", "sin swaps ⇒ digest vacío (compat hacia atrás)");
2641 let mk = |n: &str, h: &str| ToolchainSwap {
2642 name: n.into(),
2643 artifact: ArtifactHash::from_hex(h),
2644 rel_path: format!("usr/bin/{n}"),
2645 };
2646 let a = swaps_digest(&[mk("make", "aa"), mk("bwrap", "bb")]);
2647 let b = swaps_digest(&[mk("bwrap", "bb"), mk("make", "aa")]);
2648 assert_eq!(a, b, "el digest se ordena por nombre ⇒ insensible al orden de entrada");
2649 assert!(!a.is_empty());
2650 assert_ne!(a, swaps_digest(&[mk("make", "ac"), mk("bwrap", "bb")]), "cambia con el hash");
2651 }
2652
2653 #[test]
2654 fn builder_rootfs_swaps_toolchain_tool_from_source() {
2655 let tmp = tempfile::tempdir().unwrap();
2656 let (store, mut spec) = builder_fixture(tmp.path());
2657
2658 // Artefacto sellado de un `make` "construido por hammer" con un binario distinto al de Alpine.
2659 let make = seal_component(&store, "make", "fbad", |w| {
2660 std::fs::create_dir_all(w.join("usr/bin")).unwrap();
2661 std::fs::write(w.join("usr/bin/make"), b"\x7fELF-hammer-make-static").unwrap();
2662 });
2663 spec.swaps = vec![ToolchainSwap {
2664 name: "make".into(),
2665 artifact: make,
2666 rel_path: "usr/bin/make".into(),
2667 }];
2668
2669 let out = tmp.path().join("builder-out");
2670 let report = builder_rootfs(&spec, &store, &out).unwrap();
2671
2672 // El make de /toolchain es ahora el de takana, no el de Alpine.
2673 let got = std::fs::read(out.join("toolchain/usr/bin/make")).unwrap();
2674 assert_eq!(got, b"\x7fELF-hammer-make-static", "el swap pisó el make de Alpine");
2675
2676 // El hash lógico cambia respecto a un builder pura-Alpine (la procedencia es auditable).
2677 let mut pure = spec.clone();
2678 pure.swaps = vec![];
2679 let pure_report = builder_rootfs(&pure, &store, &tmp.path().join("builder-pure")).unwrap();
2680 assert_ne!(report.builder_hash, pure_report.builder_hash, "el swap entra al hash lógico");
2681 }
2682
2683 #[test]
2684 fn builder_rootfs_errors_when_swap_artifact_missing_binary() {
2685 let tmp = tempfile::tempdir().unwrap();
2686 let (store, mut spec) = builder_fixture(tmp.path());
2687 // Artefacto sellado pero SIN el binario esperado en rel_path.
2688 let make = seal_component(&store, "make", "fbad", |w| {
2689 std::fs::create_dir_all(w.join("usr/share")).unwrap();
2690 std::fs::write(w.join("usr/share/x"), b"no-binary").unwrap();
2691 });
2692 spec.swaps = vec![ToolchainSwap {
2693 name: "make".into(),
2694 artifact: make,
2695 rel_path: "usr/bin/make".into(),
2696 }];
2697 let out = tmp.path().join("builder-out");
2698 let err = builder_rootfs(&spec, &store, &out).unwrap_err().to_string();
2699 assert!(err.contains("no existe") && err.contains("artefacto sellado"), "{err}");
2700 }
2701
2702 #[test]
2703 fn builder_rootfs_swaps_toolchain_header_tree_from_source() {
2704 let tmp = tempfile::tempdir().unwrap();
2705 let (store, mut spec) = builder_fixture(tmp.path());
2706
2707 // Artefacto sellado de un `linux-headers` con un árbol `usr/include/linux` propio.
2708 let headers = seal_component(&store, "linux-headers", "abcd", |w| {
2709 std::fs::create_dir_all(w.join("usr/include/linux")).unwrap();
2710 std::fs::write(w.join("usr/include/linux/version.h"), b"#define HAMMER 1\n").unwrap();
2711 std::fs::write(w.join("usr/include/linux/stat.h"), b"struct hammer_stat;\n").unwrap();
2712 });
2713 // El toolchain Alpine tiene un linux/ con un archivo huérfano que el swap debe borrar.
2714 let tc_linux = spec.toolchain_src.join("usr/include/linux");
2715 std::fs::create_dir_all(&tc_linux).unwrap();
2716 std::fs::write(tc_linux.join("version.h"), b"#define ALPINE 1\n").unwrap();
2717 std::fs::write(tc_linux.join("orphan.h"), b"alpine-only\n").unwrap();
2718
2719 spec.swaps = vec![ToolchainSwap {
2720 name: "linux-headers".into(),
2721 artifact: headers,
2722 rel_path: "usr/include/linux".into(),
2723 }];
2724
2725 let out = tmp.path().join("builder-out");
2726 builder_rootfs(&spec, &store, &out).unwrap();
2727
2728 let v = std::fs::read(out.join("toolchain/usr/include/linux/version.h")).unwrap();
2729 assert_eq!(v, b"#define HAMMER 1\n", "el swap pisó el version.h de Alpine");
2730 assert!(out.join("toolchain/usr/include/linux/stat.h").is_file(), "copió el árbol entero");
2731 assert!(
2732 !out.join("toolchain/usr/include/linux/orphan.h").exists(),
2733 "el swap-directorio borró el huérfano de Alpine"
2734 );
2735 }
2736
2737 #[test]
2738 fn builder_rootfs_without_ref_leaves_empty_ref_content() {
2739 let tmp = tempfile::tempdir().unwrap();
2740 let (store, mut spec) = builder_fixture(tmp.path());
2741 spec.ref_content = None;
2742 let out = tmp.path().join("builder-out");
2743 builder_rootfs(&spec, &store, &out).unwrap();
2744 let env = std::fs::read_to_string(out.join("etc/hammer/rebuild.env")).unwrap();
2745 assert!(env.contains("REF_CONTENT=\n"), "sin referencia ⇒ REF_CONTENT vacío: {env:?}");
2746 }
2747
2748 #[test]
2749 fn builder_rootfs_with_work_cache_containing_out_dir_terminates() {
2750 // Regresión: --work-cache work --out work/builder-rootfs. Copiar la caché no debe tragarse
2751 // el propio destino (recursión infinita que llena el disco). El skip lo corta.
2752 let tmp = tempfile::tempdir().unwrap();
2753 let (store, mut spec) = builder_fixture(tmp.path());
2754
2755 // Caché de fetch con un mirror sintético + un árbol sources/ regenerable (no debe viajar).
2756 let work = tmp.path().join("work");
2757 std::fs::create_dir_all(work.join("repos/musl.git")).unwrap();
2758 std::fs::write(work.join("repos/musl.git/HEAD"), b"ref: refs/heads/master\n").unwrap();
2759 std::fs::create_dir_all(work.join("sources/musl-abc")).unwrap();
2760 std::fs::write(work.join("sources/musl-abc/configure"), b"#!/bin/sh\n").unwrap();
2761 spec.work_cache = Some(work.clone());
2762
2763 // out_dir vive DENTRO de la caché: el caso que disparaba la recursión.
2764 let out = work.join("builder-rootfs");
2765 let report = builder_rootfs(&spec, &store, &out).unwrap();
2766 assert!(report.builder_hash.as_str().starts_with("b3:"));
2767
2768 // Sólo viajan los mirrors; el destino NO se copió en sí mismo; sources/ NO se embebe.
2769 assert!(out.join("work/repos/musl.git/HEAD").is_file(), "los mirrors git se embeben");
2770 assert!(
2771 !out.join("work/builder-rootfs").exists(),
2772 "el out_dir no debe haberse copiado en su propio /work (recursión)",
2773 );
2774 assert!(
2775 !out.join("work/sources").exists(),
2776 "sources/ es regenerable y pesado: no debe viajar en el builder",
2777 );
2778 }
2779
2780 #[test]
2781 fn builder_rootfs_errors_when_stage1_unsealed() {
2782 let tmp = tempfile::tempdir().unwrap();
2783 let (store, mut spec) = builder_fixture(tmp.path());
2784 spec.stage1_rootfs = ArtifactHash::from_hex("0000"); // nunca sellado
2785 let out = tmp.path().join("builder-out");
2786 let err = builder_rootfs(&spec, &store, &out).unwrap_err().to_string();
2787 assert!(err.contains("no sellado"), "{err}");
2788 }
2789
2790 #[test]
2791 fn artifact_content_hash_errors_when_unsealed() {
2792 let tmp = tempfile::tempdir().unwrap();
2793 let store = Store::open(tmp.path().join("store")).unwrap();
2794 let err = artifact_content_hash(&store, &ArtifactHash::from_hex("00"), "stage1-rootfs")
2795 .unwrap_err()
2796 .to_string();
2797 assert!(err.contains("no sellado"), "{err}");
2798 }
2799
2800 #[test]
2801 fn all_shipped_recipes_parse_and_hash() {
2802 // Toda receta en recipes/ (incluida arje-zero, el puente Cargo a tawasuyu) debe parsear y
2803 // hashear offline. Cubre las que no están en STAGE1_COMPONENTS y futuras.
2804 let recipes_dir = Path::new(env!("CARGO_MANIFEST_DIR")).join("../../recipes");
2805 let tmp = tempfile::tempdir().unwrap();
2806 let store = Store::open(tmp.path().join("store")).unwrap();
2807 let mut count = 0;
2808 for entry in std::fs::read_dir(&recipes_dir).unwrap() {
2809 let path = entry.unwrap().path();
2810 if path.extension().and_then(|e| e.to_str()) != Some("toml") {
2811 continue;
2812 }
2813 let r = Recipe::load_from_path(&path)
2814 .unwrap_or_else(|e| panic!("parse {}: {e}", path.display()));
2815 let h = takana_build::artifact_hash(&r, &store, &takana_core::lab::LabFingerprint::for_tests())
2816 .unwrap_or_else(|e| panic!("hash {}: {e}", path.display()));
2817 assert!(h.as_str().starts_with("b3:"), "{}: hash con prefijo b3:", path.display());
2818 count += 1;
2819 }
2820 assert!(count >= 5, "esperaba ≥5 recetas (grep/musl/busybox/hammerd/arje-zero), vi {count}");
2821 }
2822}