sergio/takana

1#!/usr/bin/env bash
2# reconstruir-corpus.sh — reconstruye TODO lo que esté en deuda, en serie y de forma reanudable.
3#
4# ── CUÁNDO SE USA ───────────────────────────────────────────────────────────────────────────────
5# Cuando algo mueve el `ArtifactHash` de todo el corpus a la vez. Hoy eso es UNA cosa: cambiar la
6# imagen del lab (`scripts/lab-image.sh --crear` + pinear el sha nuevo), porque desde el 2026-08-10
7# el toolchain entra en `hash_inputs`. No es un accidente que sea caro: ése es el precio explícito
8# de cambiar de compilador, y antes se pagaba sin enterarse (dos labs sellaban bytes distintos en
9# la misma dirección).
10#
11# ── POR QUÉ EN SERIE, Y NO ES NEGOCIABLE ────────────────────────────────────────────────────────
12# `hammer build` comparte `work/sources/<dep>-<sha>`. Dos builds que compartan una dep se pisan el
13# árbol y queda ROTO PARA SIEMPRE (ADR 0012, sin decidir; ~93 de 205 recetas KDE murieron así al
14# invalidar libdrm). Todo el run va bajo UN `flock work/.farm-build.lock`, el mismo que toman los
15# scripts de la granja, así que también nos serializa con ellos y con cualquier otro agente.
16#
17# ── REANUDABLE POR CONSTRUCCIÓN ─────────────────────────────────────────────────────────────────
18# No lleva estado propio: la pregunta "¿esto ya está?" se la hace al store con `hammer hash --check`
19# (~2 ms, sin construir). Matarlo y relanzarlo continúa donde iba. Un run entero sobre un corpus ya
20# construido son unos segundos de puros --check.
21#
22# ── EL DISCO ES EL LÍMITE REAL, NO LA CPU ───────────────────────────────────────────────────────
23# Cada sellado añade un artefacto y cada build deja su árbol en `work/sources/`. Entre receta y
24# receta —con NADA corriendo, que es cuando es trivialmente seguro— se purgan los árboles si el
25# disco baja del umbral. Purgar CON un build en vuelo le arranca los ficheros al compilador: pasó
26# el 2026-08-10 y se llevó por delante un kernel a medias.
27#
28# Uso:   scripts/reconstruir-corpus.sh [--seco]
29# Env:   MIN_LIBRE_GB (def 40) umbral de purga · ABORT_GB (def 15) aborta antes de llenar el disco
30#        CARGO_HOME (def ~/.cargo) — se VIGILA su sistema de ficheros además del del repo
31set -uo pipefail
32
33ROOT="$(cd "$(dirname "$0")/.." && pwd)"; cd "$ROOT"
34HAMMER="${HAMMER:-$ROOT/target/release/hammer}"
35STORE="${STORE:-./store}"
36LOCK="$ROOT/work/.farm-build.lock"
37LOG="${LOG:-$ROOT/work/reconstruccion.log}"
38# 25/10 SE QUEDÓ CORTO: el 2026-08-13 la tanda abortó con 7 G tras purgar a los 25 — o sea que UNA
39# sola receta se comió >18 G entre purga y purga. Son los `cargo vendor` de las recetas Rust grandes,
40# que sueltan varios GB cada una. Con 40/15 hay margen para que la purga ocurra ANTES de que una
41# receta gorda agote lo que queda, en vez de justo después.
42MIN_LIBRE_GB="${MIN_LIBRE_GB:-40}"
43ABORT_GB="${ABORT_GB:-15}"
44SECO=0; [ "${1:-}" = "--seco" ] && SECO=1
45
46# ── EL VIGÍA MIRA DOS SISTEMAS DE FICHEROS, NO UNO ──────────────────────────────────────────────
47# Medía sólo el FS del repo, y las recetas Rust no gastan sólo ahí: `cargo vendor` copia DESDE
48# `~/.cargo/registry`, que en gioser está en `/` (74 G) y no en `/mnt/vvv` (255 G). El 2026-08-20 eso
49# era 138 G libres en el repo y 19 G en `/`, o sea que el vigía habría dado luz verde mientras el que
50# se llenaba de verdad era el otro — y llenar `/` no rompe una tanda, rompe la máquina. Se toma el
51# MÍNIMO de los dos. Si comparten FS, `df` devuelve lo mismo dos veces y esto es inocuo.
52CARGO_H="${CARGO_HOME:-$HOME/.cargo}"
53avail_gb() { df -BG --output=avail "$1" 2>/dev/null | tail -1 | tr -dc 0-9; }
54libre_gb() {
55  local a b
56  a=$(avail_gb "$ROOT"); b=$(avail_gb "$CARGO_H")
57  [ -z "${a:-}" ] && a=999999
58  [ -z "${b:-}" ] && b=999999
59  [ "$a" -le "$b" ] && echo "$a" || echo "$b"
60}
61ts() { date -u +%Y-%m-%dT%H:%M:%SZ; }
62
63# EL ORDEN IMPORTA, aunque las deps se resuelvan solas. `hammer build` construye recursivamente lo
64# que le falta, así que cualquier orden termina — pero no cualquier orden es útil a mitad de camino.
65# Hay 1186 ficheros de receta y sólo ~440 alcanzan alguna imagen; el resto son catálogo y colas de
66# staging. Construyendo por orden alfabético, tras un día de máquina no habría NI UNA imagen
67# completa. Se ordena por objetivo: primero las clausuras de los perfiles de `targets.toml`
68# (base, cli, escritorio-*), después todo lo demás. Así cada perfil que cierra es utilizable ya.
69# ORDEN se puede IMPONER desde fuera (2026-08-23): `ORDEN=work/faltan-perfiles.txt` corre una lista
70# concreta en vez del corpus entero, y hereda gratis el flock, el vigía de disco y el log de acá.
71# Nació de tener 17 recetas sueltas —las que cierran las seis imágenes— y ninguna forma de pasarlas
72# sin reconstruir 780. Si el fichero ya existe y no está vacío, NO se regenera: la lista del que
73# llama manda. Admite tanto rutas `recipes/…/x.toml` como nombres a secas.
74ORDEN="${ORDEN:-$ROOT/work/reconstruccion-orden.txt}"
75if [ -s "$ORDEN" ] && [ -n "${ORDEN_IMPUESTO:-}" ]; then
76  echo "   orden IMPUESTO desde $ORDEN ($(grep -c . "$ORDEN") entradas) — no regenero"
77else
78python3 - "$ORDEN" <<'PY'
79import json, os, sys, subprocess
80# Las raíces salen de `targets.toml` vía su expansor oficial (scripts/targets.py), NO de los nodos
81# de build-state: ese grafo es el corpus ENTERO, así que usarlo marcaba 1161 de 1161 como
82# prioritarias y el orden no ordenaba nada. `targets.py` da lo que una imagen pide por nombre.
83PERFILES = ["base", "cli", "escritorio-mirada", "escritorio-sway",
84            "escritorio-cosmic", "escritorio-kde", "escritorio-gnome"]
85prioritarios, orden_perfil = set(), []
86for p in PERFILES:
87    r = subprocess.run(["python3", "scripts/targets.py", p], capture_output=True, text=True)
88    if r.returncode != 0:
89        continue
90    nombres = [l.strip() for l in r.stdout.split() if l.strip()]
91    orden_perfil.append((p, len(nombres)))
92    prioritarios.update(nombres)
93# La CLAUSURA (las libs de las que cuelgan las raíces) se saca del grafo siguiendo las aristas.
94d = json.load(open("docs/state/build-state.json"))
95nodos = d.get("nodes", {})
96pila, vistos = list(prioritarios), set()
97while pila:
98    x = pila.pop()
99    if x in vistos:
100        continue
101    vistos.add(x)
102    pila += nodos.get(x, {}).get("deps", [])
103prioritarios = vistos
104# os.walk y no glob: `recipes/**/*.toml` se dejaba 25 ficheros fuera y no se nota mirando el total.
105#
106# `.deferred/` FUERA: son recetas APARCADAS por diseño y no construyen sueltas — sus `deps.build`
107# resuelven contra el directorio hermano, que ahí no existe, así que fallan al instante con
108# «no pude cargar la dep de build 'zlib' de 'git' (recipes/incoming/.deferred/zlib.toml)».
109# Son 25 y cada una gasta un intento. Intentarlas no es sólo inútil: mete 25 FALLA en el log que
110# parecen roturas del corpus y esconden las de verdad.
111todas = []
112for dirpath, _, files in os.walk("recipes"):
113    if ".deferred" in dirpath.split(os.sep):
114        continue
115    todas += [os.path.join(dirpath, f) for f in files if f.endswith(".toml")]
116todas.sort()
117# El nombre del artefacto es el campo `name`, no el del fichero (17 recetas difieren), pero para
118# ORDENAR alcanza el basename: equivocarse acá sólo cambia la prioridad, nunca la corrección.
119pri = [f for f in todas if os.path.basename(f)[:-5] in prioritarios]
120resto = [f for f in todas if os.path.basename(f)[:-5] not in prioritarios]
121with open(sys.argv[1], "w") as fh:
122    fh.write("\n".join(pri + resto) + "\n")
123print(f"   orden: {len(pri)} de perfil primero, {len(resto)} de catálogo después")
124PY
125fi
126mapfile -t RECETAS < "$ORDEN"
127
128# ── PARTICIÓN ENTRE WORKERS: SHARD=i/N ──────────────────────────────────────────────────────────
129# Con un worker el corpus son ~7 días (medido: ~9 min/receta sobre 1161). Repartirlo es la única
130# forma de bajarlo, y no hace falta planificador central: cada worker construye SU parte y las deps
131# que le falten se las construye `hammer build` solo. Al cosechar, todo converge en el mismo store
132# porque las direcciones coinciden — eso está PROBADO por el paso 4 de `farm-lab-sync.sh`, no
133# supuesto.
134#
135# El reparto es por ÍNDICE (i-1, i-1+N, i-1+2N…), no por bloques contiguos: el orden ya está por
136# objetivo, así que bloques contiguos le darían a un worker todo el tramo GUI —el más lento— y a
137# otro sólo hojas rápidas. Intercalando, los cuatro avanzan por el mismo terreno a la vez.
138#
139# ⚠ HAY TRABAJO DUPLICADO y es deliberado: si a dos workers les tocan recetas que cuelgan de
140# `qtbase`, los dos lo construyen. Sale a cuenta igual frente a serializar, pero no esperes
141# aceleración lineal — con 4 workers no son 4×, son ~3×.
142if [ -n "${SHARD:-}" ]; then
143  SH_I="${SHARD%%/*}"; SH_N="${SHARD##*/}"
144  case "$SH_I$SH_N" in *[!0-9]*|"") echo "SHARD debe ser i/N (ej. 2/4)" >&2; exit 1;; esac
145  [ "$SH_I" -ge 1 ] && [ "$SH_I" -le "$SH_N" ] || { echo "SHARD fuera de rango: $SHARD" >&2; exit 1; }
146  SUB=(); k=0
147  for f in "${RECETAS[@]}"; do
148    [ $(( k % SH_N )) -eq $(( SH_I - 1 )) ] && SUB+=("$f")
149    k=$((k + 1))
150  done
151  RECETAS=("${SUB[@]}")
152  LOG="${LOG%.log}-$SH_I-de-$SH_N.log"   # un log por shard, o se pisan entre workers
153  echo "== SHARD $SH_I/$SH_N ⇒ ${#RECETAS[@]} recetas de este worker" | tee -a "$LOG"
154fi
155echo "== $(ts) reconstrucción: ${#RECETAS[@]} recetas · libre $(libre_gb) G" | tee -a "$LOG"
156
157if [ "$SECO" = "1" ]; then
158  pend=0
159  for f in "${RECETAS[@]}"; do
160    "$HAMMER" --store "$STORE" hash "$f" --check >/dev/null 2>&1 || pend=$((pend+1))
161  done
162  echo "   en deuda: $pend de ${#RECETAS[@]}" | tee -a "$LOG"
163  exit 0
164fi
165
166exec 9>"$LOCK"
167echo "== esperando el lock de build…" | tee -a "$LOG"
168flock 9
169echo "== $(ts) lock tomado" | tee -a "$LOG"
170
171ok=0; falla=0; cache=0; i=0
172for f in "${RECETAS[@]}"; do
173  i=$((i+1))
174  n="$(basename "$f" .toml)"
175
176  if "$HAMMER" --store "$STORE" hash "$f" --check >/dev/null 2>&1; then
177    cache=$((cache+1)); continue
178  fi
179
180  l=$(libre_gb)
181  if [ "${l:-0}" -lt "$ABORT_GB" ]; then
182    echo "!! $(ts) ABORTO: quedan ${l} G (< ${ABORT_GB}). Sellado $ok, fallo $falla." | tee -a "$LOG"
183    exit 1
184  fi
185  if [ "${l:-0}" -lt "$MIN_LIBRE_GB" ]; then
186    # Seguro por construcción: acá NO hay ningún build corriendo (somos el único, y en serie).
187    echo "   [$(ts)] libre ${l} G < ${MIN_LIBRE_GB} ⇒ purgo work/sources y work/repos" | tee -a "$LOG"
188    rm -rf work/sources/* 2>/dev/null
189    # `work/repos` son los clones `--mirror` de gitea de las recetas hub-only. Se re-clonan; el coste
190    # es red, no trabajo perdido.
191    rm -rf work/repos/* 2>/dev/null
192    # El registry de cargo es lo ÚLTIMO, y va con guarda: el act-runner de tawasuyu corre como el
193    # mismo usuario y comparte este `~/.cargo`. Purgarlo con un `cargo` ajeno en vuelo le arranca los
194    # ficheros a SU compilador — el mismo accidente del kernel a medias, sólo que en el vecino. Se
195    # pregunta por el CÓDIGO DE SALIDA de `pgrep`, nunca por su stdout.
196    if [ "$(libre_gb)" -lt "$MIN_LIBRE_GB" ]; then
197      if pgrep -x cargo >/dev/null 2>&1 || pgrep -x rustc >/dev/null 2>&1; then
198        echo "   sigue corto, pero hay cargo/rustc ajeno en vuelo ⇒ NO toco $CARGO_H/registry" | tee -a "$LOG"
199      else
200        echo "   sigue corto ⇒ purgo $CARGO_H/registry (caché, se re-descarga)" | tee -a "$LOG"
201        rm -rf "$CARGO_H"/registry/cache/* "$CARGO_H"/registry/src/* 2>/dev/null
202      fi
203    fi
204    echo "   libre tras purgar: $(libre_gb) G" | tee -a "$LOG"
205  fi
206
207  t0=$(date +%s)
208  if "$HAMMER" --store "$STORE" build "$f" >>"$ROOT/work/reconstruccion-detalle.log" 2>&1; then
209    ok=$((ok+1)); estado=OK
210  else
211    falla=$((falla+1)); estado=FALLA
212  fi
213  printf '%s [%4d/%4d] %-6s %-40s %4ds  libre %sG\n' \
214    "$(ts)" "$i" "${#RECETAS[@]}" "$estado" "$n" "$(( $(date +%s) - t0 ))" "$(libre_gb)" | tee -a "$LOG"
215done
216
217echo "== $(ts) FIN · sellado $ok · fallo $falla · ya-estaba $cache · libre $(libre_gb) G" | tee -a "$LOG"