sergio/takana

1#!/usr/bin/env bash
2# cosecha-cron.sh — el LATIDO de la granja: recoger + sembrar, en bucle, sin agente ni tokens.
3#
4# QUÉ HACE cada ciclo, por cada worker vivo en scripts/farm/.fleet:
5#   1. SIEMBRA (sube): rsync de código + recetas laptop→worker (el laptop es canónico; si autoré
6#      recetas nuevas —p.ej. openrc— el worker las empieza a moler sin que yo intervenga).
7#   2. RECOGE (baja): rsync del store sellado worker→laptop (CAS ⇒ merge seguro, sin conflicto).
8#   3. Regenera el GRAFO DE ESTADO (build-state{,-kde,-gnome,-cosmic}.json) desde el store ya
9#      cosechado, pasa los VIGÍAS (fuentes, contrato del kernel, y el audit de enlace estático con
10#      puerta diaria) y commitea SÓLO esos ficheros firmes. El `git log` de docs/state/ ES el avance
11#      que el humano ve y sigue (huecos, fallos, qué se selló entre dos ciclos).
12#
13# LO QUE **NO** HACE (a propósito): NO promueve incoming-kde→recipes/ canónico (esa es decisión de
14# clasificación humana — "el hub clasifica", ver granja-promote-colisiones) ni firma el índice. Sólo
15# captura al store del laptop y deja el veredicto para la mañana. Idempotente y re-corrible.
16#
17# INFINITO: vive en el crontab hasta que lo saques (`crontab -e`, borrar la línea cosecha-cron).
18# Robusto a worker-ausente: si el dead-man ya mató al worker (cola seca ⇒ €0), el paso 1/2 falla
19# suave, se loguea y igual regenera+commitea el estado local. NO relanza workers (eso gasta €;
20# es decisión explícita con farm-up).
21#
22# Uso:    scripts/farm/cosecha-cron.sh                 # un ciclo (lo que dispara el cron)
23#         */30 * * * * cd /home/sergio/hammer && scripts/farm/cosecha-cron.sh >>work/cosecha-cron.log 2>&1
24# Env:    SSH_KEY (def ~/.ssh/github5), REMOTE (def /opt/hammer), NO_COMMIT=1 (regenera pero no commitea)
25set -uo pipefail
26
27ROOT="$(cd "$(dirname "$0")/../.." && pwd)"
28# Ruta absoluta a MÍ MISMO, capturada ANTES del `cd`: se usa para re-ejecutarse bajo el lock, y
29# un `$0` relativo dejaría de resolver en cuanto cambiamos de directorio.
30YO="$(cd "$(dirname "$0")" && pwd)/$(basename "$0")"
31cd "$ROOT"
32
33# LOCK (2026-07-22): el latido ya no viene sólo del crontab — `latido.sh` lo lanza desde la sesión
34# porque el laptop arranca a veces con arje-zero y a veces con OpenRC, y cronie sólo existe en uno
35# de los dos. Con dos disparadores posibles, dos ciclos pueden solaparse: ambos hacen rsync sobre el
36# mismo store y, peor, `git commit`+`push` a la vez (index.lock, o un push que pisa al otro). El lock
37# va ACÁ y no en el llamador para que valga venga de donde venga: cron, latido o a mano.
38# -n = no esperar: si ya hay un ciclo corriendo, este sobra (el próximo tick recoge lo mismo).
39LOCKFILE="${LOCKFILE:-$ROOT/work/.cosecha-cron.lock}"
40mkdir -p "$(dirname "$LOCKFILE")"
41# ⚠ EL LOCK LO SOSTIENE EL fd, Y LOS HIJOS LO HEREDAN (medido 2026-09-08). Con `exec 9>` + `flock 9`
42# cualquier descendiente que se fugue retiene el lock DESPUÉS de que el script termine, y el próximo
43# que lo pida espera para siempre sin que nada falle. Pasó: dos `firefox` colgados de una caza de
44# bugs sobrevivieron al `kill` de su `bwrap` y dejaron a la granja hora y media sin poder compilar,
45# en silencio. `fuser -v <lock>` es lo que lo delata.
46#   El arreglo es `flock -o`, que cierra el fd antes de ejecutar ⇒ el lock lo sostiene SÓLO el
47# proceso `flock`, y ningún nieto puede prolongarlo. Como acá la sección crítica es el script
48# ENTERO, se re-ejecuta bajo `flock -o` en vez de ir poniendo `9>&-` comando por comando, que es
49# jugar a los topos y se olvida uno. `-E 77` distingue «el lock estaba ocupado» de «el trabajo
50# falló», que con el `9>` de antes no se podían separar.
51#   Comprobado con control positivo y negativo: sin `-o` el nieto retiene; con `-o` no. Y que la
52# exclusión mutua SIGUE funcionando, que es lo que un arreglo de locks puede romper sin avisar.
53#   ⚠ Ojo: `exec {L}>` (fd automático de bash) NO sirve — bash no lo marca close-on-exec. Medido.
54if [ -z "${COSECHA_CRON_CON_LOCK:-}" ]; then
55  export COSECHA_CRON_CON_LOCK=1
56  rc=0; flock -n -E 77 -o "$LOCKFILE" "$YO" "$@" || rc=$?
57  if [ "$rc" = 77 ]; then
58    echo "── $(date -u +%FT%TZ) cosecha-cron: ya hay un ciclo en curso ⇒ salgo (no me solapo)"
59    exit 0
60  fi
61  exit "$rc"
62fi
63
64SSH_KEY="${SSH_KEY:-$HOME/.ssh/github5}"
65REMOTE="${REMOTE:-/opt/hammer}"
66FLEET="$ROOT/scripts/farm/.fleet"
67# ── SIEMBRA DE LA FLOTA FIJA ────────────────────────────────────────────────────────────────────
68# `.fleet` es estado de EJECUCIÓN (gitignored, lo reescribe el reaper cada ciclo); `flota-permanente`
69# es la parte versionada. Sin esto, un hub recién clonado nace con la flota vacía y la granja queda
70# desconectada EN SILENCIO: «flota vacía» cada 30 min, los artefactos del worker no vuelven, y nada
71# falla. Se unen por NOMBRE (el fijo gana) para que lo efímero de hcloud conviva sin duplicarse.
72FLEET_FIJA="$ROOT/scripts/farm/flota-permanente"
73if [ -s "$FLEET_FIJA" ]; then
74  # Los `|| true` NO son adorno: este script corre con `set -o pipefail`, y un `.fleet` ausente
75  # —que es EXACTAMENTE el caso que esta siembra existe para arreglar— hace fallar al `cat`, la
76  # tubería hereda ese estado y el `&& mv` no dispara. Resultado medido: el fichero se generaba
77  # bien y se quedaba sin mover, o sea que la siembra fallaba justo en el único caso que importa.
78  { grep -vE '^[[:space:]]*(#|$)' "$FLEET_FIJA" || true; cat "$FLEET" 2>/dev/null || true; } \
79    | awk 'NF && !visto[$1]++' > "$FLEET.seed" && mv "$FLEET.seed" "$FLEET"
80fi
81HAMMER="${TAKANA:-${HAMMER:-$ROOT/target/release/takana}}"
82# Workers efímeros reciclan IPs ⇒ no fijar known_hosts (hub-and-spoke, worker sin secretos).
83SSH="ssh -i $SSH_KEY -o UserKnownHostsFile=/dev/null -o StrictHostKeyChecking=no -o BatchMode=yes -o LogLevel=ERROR -o ConnectTimeout=15"
84
85ts() { date -u +%FT%TZ; }
86echo "── $(ts) cosecha-cron arranca"
87
88if [ ! -s "$FLEET" ]; then
89  echo "   flota vacía (scripts/farm/.fleet) — nada que cosechar este ciclo"
90else
91  while read -r name ip; do
92    [ -n "${name:-}" ] || continue
93    echo "==> $name ($ip)"
94    # 1. SIEMBRA: código + recetas laptop→worker (--delete: el laptop manda; nunca toca work/store/target).
95    # ⚠ LA EXCLUSIÓN DE PNG VA ANCLADA, Y NO ES ESTILO (2026-09-06). Antes decía `--exclude '*.png'`,
96    # sin anclar, o sea PNG en CUALQUIER sitio — incluido `recipes/`. Dos consecuencias, las dos malas:
97    #
98    #   a) rsync PROTEGE DE BORRADO lo que excluye. Un directorio cuyo único resto es un `.png` no se
99    #      puede vaciar y por lo tanto no se puede borrar NUNCA, aunque el hub lo haya eliminado.
100    #      Medido: `recipes/atuq/extension/atuq128.png` sobrevivió a un rename hecho en el hub y el
101    #      log de la siembra repetía `cannot delete non-empty directory: recipes/atuq/extension`.
102    #   b) Un PNG NUEVO de una receta tampoco viaja. Y hay recetas cuyo `[source] dir` tiene PNG
103    #      dentro: los 9 iconos de `recipes/atuq/branding/icons/`.
104    #
105    # Como takana SÍ hashea el árbol de un `[source] dir` (`recipe.rs`, `dir:<hash>`), el efecto no es
106    # silencioso —bendito sea—: el worker calcula OTRO ArtifactHash. Medido el mismo día,
107    # `atuq` daba `b3:f2960991` en el hub y `b3:b33e81a5` en el worker por ESE único fichero de más.
108    # O sea que el worker no podía coincidir con el hub ni construyendo bien.
109    #
110    # Lo que se quería ahorrar eran las capturas: `docs/evidencia/` (4,4 M) y el PNG suelto de la raíz
111    # (1 M). Eso se excluye por RUTA. Los PNG de `recipes/` viajan, que es lo correcto: son fuente.
112    if rsync -az --delete -e "$SSH" \
113        --exclude /work --exclude /store --exclude '/store-*' --exclude /target \
114        --exclude /dist --exclude /.dev-fs --exclude /.git --exclude /.scratch \
115        --exclude '/docs/evidencia/' --exclude '/*.png' --exclude '/content*' \
116        ./ "root@$ip:$REMOTE/" 2>&1 | tail -2; then
117      echo "   siembra ✓"
118    else
119      echo "   ⚠ siembra falló (worker ausente/idle-muerto?) — sigo con el siguiente"
120      continue
121    fi
122    # 2. RECOGE: store sellado worker→laptop (CAS, merge seguro).
123    # ── ⚠ EXCLUIR LO YA PODADO, O LA POda SE DESHACE SOLA ─────────────────────────────────────
124    # El worker NO se poda nunca, así que conserva los artefactos superados y este rsync los
125    # devolvía enteros. Con el latido cada 30 min, una poda de 24 G quedaba deshecha en menos de
126    # una hora: medido el 2026-08-07, tres podas seguidas borraron LOS MISMOS 362 artefactos.
127    #
128    # El mismo arreglo está en `farm-sync.sh` — y ahí estuvo el error de método: lo puse allí, di el
129    # bucle por cerrado, y la churn siguió porque **hay DOS rutas que bajan el store** y el latido
130    # usa ésta. Arreglar una de dos copias y declarar victoria es peor que no arreglar: el síntoma
131    # se atenúa lo justo para dejar de mirar. Si aparece una tercera copia, va con el mismo exclude.
132    #
133    # ── 2026-08-09: EL STORE YA NO BAJA. BAJA EL MANIFIESTO ───────────────────────────────────
134    # El store se mudó al VOLUMEN de la granja y el laptop se quedó con lo que la granja no puede
135    # rehacer. Seguir bajando el store acá desharía esa mudanza cada 30 minutos — la misma forma
136    # exacta del bucle de churn que este bloque documenta arriba, y la razón por la que el exclude
137    # de abajo dejó de alcanzar: ya no se trata de filtrar QUÉ baja, sino de que no baja.
138    #
139    # Lo que el hub sí necesita es SABER qué hay sellado, para que el grafo de estado no reporte
140    # `never` sobre artefactos que existen. Eso son kilobytes: la lista de nombres. Se acumula en
141    # el manifiesto (nunca se pisa) porque el volumen es una sola foto y el hub recuerda todas.
142    if $SSH "root@$ip" "ls $REMOTE/store 2>/dev/null | grep -E '^[0-9a-f]{64}-'" \
143         > "$ROOT/work/.sellados-worker" 2>/dev/null && [ -s "$ROOT/work/.sellados-worker" ]; then
144      N_W=$(wc -l < "$ROOT/work/.sellados-worker")
145      cat "$ROOT/work/farm-sellados.txt" "$ROOT/work/.sellados-worker" 2>/dev/null \
146        | grep -E '^[0-9a-f]{64}-' | sort -u > "$ROOT/work/farm-sellados.txt.new"
147      mv "$ROOT/work/farm-sellados.txt.new" "$ROOT/work/farm-sellados.txt"
148      rm -f "$ROOT/work/.sellados-worker"
149      echo "   manifiesto ✓ (worker: $N_W · total: $(wc -l < "$ROOT/work/farm-sellados.txt"))"
150    else
151      echo "   ⚠ no pude leer el manifiesto del worker — sigo"
152    fi
153    # ⚠ Lo que NO cubre esto: los artefactos nuevos quedan SÓLO en el volumen hasta que alguien
154    # haga una pasada de respaldo. El volumen tiene borrado protegido, pero es UNA copia.
155  done < "$FLEET"
156fi
157
158# 2.5 REAPER HUB-SIDE (2026-07-23). El dead-man DEL WORKER probó FRÁGIL: un worker quedó 3.5h idle
159# quemando € porque su `/etc/hammer-deadman.env` no tenía token válido ⇒ el dead-man llegaba a
160# matarse pero salía 1 "sin HCLOUD_TOKEN" cada tick. La garantía "un vps idle es inadmisible" NO
161# puede depender de que cada worker se auto-provisione bien un token (falla en silencio). El HUB sí
162# tiene un token que funciona, y este latido corre cada 30 min aunque no haya sesión (setsid) ⇒ el
163# hub es la AUTORIDAD de vida del worker. Es defensa en profundidad: el dead-man del worker cubre
164# "hub caído"; esto cubre "dead-man del worker roto". Un worker sin trabajo activo REAPER_MAX ciclos
165# seguidos se BORRA desde acá, con el MISMO blindaje que el dead-man (label role=takana-worker;
166# gioser no tiene label ⇒ jamás pasa, ni por accidente).
167REAPER_MAX="${REAPER_MAX:-2}"   # 2 ciclos × 30 min ≈ 1 h idle, igual que el dead-man del worker
168if [ -s "$FLEET" ] && command -v hcloud >/dev/null 2>&1; then
169  mkdir -p "$ROOT/work/.reaper"; sobreviven=""
170  while read -r name ip; do
171    [ -n "${name:-}" ] || continue
172    # LISTA NEGRA (capa 1 de 2, igual que el dead-man): gioser JAMÁS se toca, pase lo que pase.
173    # Segunda capa = el chequeo de label abajo. gioser no tiene label Y no matchea worker de la
174    # granja ⇒ imposible que muera por acá. "Ahí está nuestra vida" (2026-07-23).
175    case "$name" in *gioser*) echo "==> reaper: $name en LISTA NEGRA ⇒ intocable"; sobreviven="${sobreviven}${name} ${ip}
176"; continue;; esac
177    strike_f="$ROOT/work/.reaper/$name"
178    # ¿el server siquiera existe? Si ya no está en hcloud (borrado a mano o por un ciclo previo),
179    # NO cuesta € y no debe quedar en .fleet para siempre. Se dropea (no entra a `sobreviven`).
180    if ! hcloud server describe "$name" -o format='{{.Name}}' >/dev/null 2>&1; then
181      # ⚠ «No está en hcloud» son DOS casos muy distintos, y antes se trataban igual (2026-09-08):
182      #   · un worker PERMANENTE que no es de Hetzner — hoy el LXC prestado `dev.gioser.net`, que
183      #     no cuesta € ⇒ NO HAY NADA QUE SEGAR, y sacarlo de .fleet desconecta la granja EN
184      #     SILENCIO: la cosecha pasa a decir «flota vacía» y los artefactos del worker dejan de
185      #     volver, sin que nada falle. Es el mismo fallo mudo que este fichero ya tuvo.
186      #   · un server efímero ya borrado a mano ⇒ ése sí sobra en .fleet para siempre.
187      # Se distinguen preguntándole a la MÁQUINA, no al nombre. Antes el LXC sólo se salvaba porque
188      # su nombre contiene la subcadena «gioser» y caía en la lista negra de arriba — una lista que
189      # existe para proteger al HUB de Hetzner y no tiene nada que ver con él. Medido: el mismo host
190      # llamado `pruebasia-lxc` era expulsado de .fleet en el primer ciclo.
191      if $SSH root@"$ip" true 2>/dev/null; then
192        echo "==> reaper: $name no es de hcloud pero RESPONDE ⇒ worker permanente, se queda (€0)"
193        sobreviven="${sobreviven}${name} ${ip}
194"
195      else
196        echo "==> reaper: $name no está en hcloud y no responde ⇒ lo saco de .fleet"; rm -f "$strike_f"
197      fi
198      continue
199    fi
200    if $SSH root@"$ip" 'pgrep -f "hammer build|campana-deuda|farm-worker-loop" >/dev/null 2>&1'; then
201      echo 0 > "$strike_f"; sobreviven="${sobreviven}${name} ${ip}
202"; continue
203    fi
204    strikes=$(( $(cat "$strike_f" 2>/dev/null || echo 0) + 1 )); echo "$strikes" > "$strike_f"
205    echo "==> reaper: $name SIN trabajo activo — strike $strikes/$REAPER_MAX"
206    if [ "$strikes" -lt "$REAPER_MAX" ]; then sobreviven="${sobreviven}${name} ${ip}
207"; continue; fi
208    # BLINDAJE (igual que el dead-man): sólo se borra un server con label role=takana-worker.
209    if hcloud server describe "$name" -o format='{{.Labels}}' 2>/dev/null | grep -q hammer-worker; then
210      echo "   ☠ IDLE $strikes ciclos ⇒ el HUB borra $name (label verificado; gioser protegido)"
211      if hcloud server delete "$name" >/dev/null 2>&1; then rm -f "$strike_f"
212      else echo "   ⚠ delete falló — sobrevive, reintenta próximo ciclo"; sobreviven="${sobreviven}${name} ${ip}
213"; fi
214    else
215      echo "   ⛔ $name SIN label hammer-worker ⇒ NO se borra (protegido)"; sobreviven="${sobreviven}${name} ${ip}
216"
217    fi
218  done < "$FLEET"
219  printf '%s' "$sobreviven" | grep -v '^[[:space:]]*$' > "$FLEET.tmp" 2>/dev/null; mv "$FLEET.tmp" "$FLEET" 2>/dev/null || true
220fi
221
222# 2.7 PODA DE `work/sources` (2026-08-31). Cuarto vigía, y el único que no emite veredicto: su
223# salida es que el disco se quede plano.
224#
225# POR QUÉ EXISTE: ese día el volumen del store (`/dev/sdb`, 246 G) estaba al **97%, 8,8 G libres**,
226# y el gordo NO era el store — eran **79 G de `work/sources`**, 106 árboles con el `target/` de
227# cargo y los `.o` dentro (el árbol de fuentes es también el directorio de compilación). Nada en la
228# granja podaba eso: `store-gc.sh` mira el store, la poda de caché de CI mira la caché de CI, y este
229# tercer montón crecía sin dueño desde que el store se mudó al volumen. Se recuperaron 70 G.
230#
231# POR QUÉ ES SEGURO: no es una caché. Los dos caminos de `takana-build/src/fetch.rs` borran el árbol
232# y lo re-extraen en CADA build, sin una sola rama que reutilice ⇒ un árbol viejo no acelera nada y
233# borrarlo no cuesta ni la re-extracción. Lo único que se pierde es el post-mortem del último build
234# de esa receta, y por eso el suelo son 24 h y no cero.
235#
236# CADA CICLO, no con puerta diaria como el audit: el `find` sobre ~100 directorios es instantáneo y
237# el `rm` cuesta en proporción a la basura que haya. Con puerta diaria la basura de un día entero de
238# granja llegaría junta, que es justo lo que se quiere evitar.
239#
240# El script toma `work/.farm-build.lock` por dentro y con espera acotada: borrar el árbol que un
241# `bwrap` está compilando es el ADR 0012 en su forma más directa, y el mtime no distingue "viejo" de
242# "build lento". Si hay algo en vuelo, salta el ciclo y sale 0.
243if [ -x "$ROOT/scripts/poda-fuentes.sh" ]; then
244  "$ROOT/scripts/poda-fuentes.sh" --aplicar || echo "   ⚠ poda de fuentes falló (rc=$?) — sigo"
245fi
246
247# 3. Regenerar el grafo de estado desde el store ya cosechado (usa el takana del laptop, que tiene
248# el subcomando `hash`). Barato (~14s cada uno). El corpus canónico y el frente KDE, por separado.
249echo "==> regenerando grafo de estado"
250if [ -x "$HAMMER" ]; then
251  scripts/build-state.py >/dev/null 2>&1 && echo "   build-state.json ✓" || echo "   ⚠ build-state.py falló"
252  scripts/build-state.py --kde >/dev/null 2>&1 && echo "   build-state-kde.json ✓" || echo "   ⚠ build-state.py --kde falló"
253  # GNOME faltaba acá (2026-07-27): el latido regeneraba base+KDE y NUNCA el grafo GNOME, así que
254  # build-state-gnome.json envejecía en silencio y reportaba `never` sobre recetas selladas hacía
255  # días (gobject-introspection, toda la onda 2). Un grafo viejo miente con la misma cara que uno
256  # fresco — por eso lo regenera el latido y no la mano.
257  scripts/build-state.py --gnome >/dev/null 2>&1 && echo "   build-state-gnome.json ✓" || echo "   ⚠ build-state.py --gnome falló"
258  # COSMIC (2026-08-03), por la MISMA razón por la que se agregó GNOME arriba: un frente que no
259  # regenera el latido envejece en silencio, y un grafo viejo miente con la misma cara que uno fresco.
260  scripts/build-state.py --cosmic >/dev/null 2>&1 && echo "   build-state-cosmic.json ✓" || echo "   ⚠ build-state.py --cosmic falló"
261  # wlr/sway (2026-08-26), TERCERA vez que cae el mismo cable. El flag `--wlr` se escribió el día que
262  # se abrió el frente, y su propio comentario en build-state.py dice «sin esto el frente es INVISIBLE
263  # para el khipu» — pero la línea nunca se agregó ACÁ. Resultado medido: build-state-wlr.json se
264  # quedó congelado el 2026-08-09 diciendo `escritorio-sway 121/121`, y 17 días después la realidad
265  # era 108/122: freetype, make, python3 y libpng-pic se re-hashearon en el medio y arrastraron a 14
266  # dependientes a deuda. Nadie lo vio porque el número que todo el mundo mira estaba perfecto.
267  # Un grafo viejo miente con la misma cara que uno fresco — y el que nadie regenera miente MÁS,
268  # porque envejece en la dirección optimista: sólo puede sobreestimar lo que hay sellado.
269  scripts/build-state.py --wlr >/dev/null 2>&1 && echo "   build-state-wlr.json ✓" || echo "   ⚠ build-state.py --wlr falló"
270  # keystones y duplicados (2026-09-08). CUARTA vez que cae el mismo cable: los comentarios de
271  # arriba lo cuentan ya para GNOME (2026-07-27), COSMIC (2026-08-03) y wlr/sway (2026-08-26), y
272  # estos dos se habían quedado congelados el 2026-09-05 — TRES DÍAS. Con un agravante que los
273  # otros no tenían: `keystones` es el fichero que responde «¿qué construyo después?», así que
274  # rancio no se limita a envejecer, DESINFORMA. Medido: decía «1 nudo en deuda, camino crítico
275  # corpus/firefox → corpus/atuq» con los dos sellados hacía horas. Un grafo viejo miente con la
276  # misma cara que uno fresco, y éste además manda a trabajar en lo que ya está hecho.
277  scripts/yupana.py keystones  >/dev/null 2>&1 && echo "   keystones.json ✓"  || echo "   ⚠ yupana keystones falló"
278  scripts/yupana.py duplicados >/dev/null 2>&1 && echo "   duplicados.json ✓" || echo "   ⚠ yupana duplicados falló"
279  # Cola DERIVADA del grafo (P4): el orden de masticado por imagen, en ondas topológicas. No lanza
280  # ningún build — sólo deja escrito qué conviene moler primero, para que la cola deje de ser una
281  # lista escrita a mano. Barato (lee JSON, no hashea).
282  # NO se traga la salida entera: drenar.py sale 1 cuando alguna imagen quedó SIN MEDIR (una cola
283  # nueva sin su línea en GRAFOS), y con `>/dev/null 2>&1` eso llegaba al log como un "falló" mudo
284  # que no dice cuál. Se filtran las líneas ⚠, que son las únicas accionables.
285  if drenaje_out="$(scripts/drenar.py --todos 2>&1)"; then
286    echo "   drenaje.json ✓"
287  else
288    echo "   ⚠ drenar.py falló"
289    echo "$drenaje_out" | grep '⚠' | sed 's/^/   /'
290  fi
291  # VIGÍA DE FUENTES (ADR 0013 §3). Desde que el mirror propio se consulta ANTES que upstream,
292  # `takana build` deja de avisar cuando una URL de terceros muere: sirve los bytes del mirror y
293  # sigue. Eso es lo correcto para construir y sería CIEGO sin este contrapeso — las URLs se irían
294  # muriendo una a una y el corpus resultaría irreconstruible el día que falte el mirror, con todo
295  # en verde hasta ese momento. Igual que el grafo de wlr, que pasó 17 días anunciando un 121/121
296  # que ya era falso: lo que nadie refresca envejece hacia el optimismo.
297  # No descarga: pide cabeceras. Primera corrida (2026-08-26): 8 muertas de 1167, y TRES de ellas
298  # —busybox, freetype, freetype-shared— selladas y en uso.
299  scripts/fuentes/fuentes-vigia.sh >/dev/null 2>&1 && echo "   fuentes-vigia.json ✓" || echo "   ⚠ fuentes-vigia falló"
300  # CONTRATO DE CAPACIDADES DEL KERNEL (SDD 25 §4.ter). Mismo cable que el vigía de fuentes y por la
301  # misma razón: el gate existía y NADIE lo corría. Un kernel reconstruido sin `MEMCG` volvería a
302  # pasar inadvertido, y ese fallo **no se ve del lado del desarrollo** —el kernel de esta máquina sí
303  # lo trae—, sólo comprobando el artefacto. Acá el veredicto queda en docs/state/ y el `git log` lo
304  # muestra solo, como el resto del khipu.
305  # Se escribe por temporal y sólo se mueve si tiene contenido: `contract` sale != 0 cuando el
306  # contrato NO se cumple —y ese rojo es justo lo que hay que guardar—, pero un fichero VACÍO se
307  # leería como «nada que objetar», que es el fallo de CLAUDE.md §3.
308  "$HAMMER" --store ./store kernel contract --sealed > work/.kernel-contract.tmp 2>&1
309  if [ -s work/.kernel-contract.tmp ]; then
310    mv work/.kernel-contract.tmp docs/state/kernel-contract.txt
311    echo "   kernel-contract.txt ✓ $(grep -m1 '^resumen' docs/state/kernel-contract.txt || echo '(sin resumen)')"
312  else
313    rm -f work/.kernel-contract.tmp
314    echo "   ⚠ kernel contract no produjo salida — NO piso el veredicto anterior"
315  fi
316  # AUDIT DE ENLACE ESTÁTICO (`link = "static"`), CON PUERTA DIARIA. Tercer cable de la misma
317  # familia que el vigía de fuentes y el contrato del kernel, y por la misma razón exacta: el gate
318  # existía desde julio, nadie lo re-corría, y el 2026-08-31 el "MIENTEN: 0" con el que se había
319  # cerrado el frente resultó ser 4 — dwarves, htop, wlr-randr y gtk4, todas selladas DESPUÉS del
320  # cierre. Un frente que se cierra en cero y no se vuelve a medir no se queda en cero.
321  # Lo que costaba ese silencio, medido ese mismo día: `bash` —el shell de los perfiles base, cli y
322  # dos escritorios— no ARRANCABA fuera del sandbox, y las cuatro apps GTK4 del corpus
323  # (hammer-edit incluida) segfalteaban en `gtk_init`. Todo sellado y en verde.
324  #
325  # PUERTA DIARIA, no cada ciclo: el barrido recorre los ~750 sellados leyendo cada ejecutable con
326  # `file`+`readelf` y tarda ~8 min de CPU en 4 vCPU que además comparte con el worker. Cada 30 min
327  # sería más de un cuarto de core para siempre vigilando algo que sólo cambia cuando se re-sella
328  # una receta. Con la puerta, es 8 min al día.
329  #
330  # El sello es un LIMITADOR DE RITMO, no una marca de éxito ⇒ se toca en cuanto el barrido termina,
331  # salga como salga. Si sólo se tocara al acertar, un fallo que tarde los 8 min se repetiría cada
332  # 30 y el cable pasaría de vigilancia a sangría. El veredicto anterior está protegido aparte, por
333  # el mismo temporal-no-vacío del contrato del kernel.
334  # Para forzarlo a mano: `rm work/.static-audit.sello` y esperar al próximo ciclo.
335  #
336  # NO toma `work/.farm-build.lock` a propósito: sólo LEE el store, y retener el lock 8 min pararía
337  # la granja entera. `nice -n 19` porque la prioridad la tiene construir, no auditar.
338  AUDIT_SELLO="work/.static-audit.sello"
339  if [ ! -f "$AUDIT_SELLO" ] || [ -n "$(find "$AUDIT_SELLO" -mtime +0 2>/dev/null)" ]; then
340  # ── VIGÍA DE SONAMES (2026-09-06) ────────────────────────────────────────────────────────────
341  # `vigia-sonames.py` existía desde antes y contesta la pregunta que el grafo NO contesta: no
342  # «¿está sellado?» sino «¿arranca?». Encuentra los `NEEDED` que ningún artefacto del cierre
343  # publica y que el rootfs hidratado resolvía contra el sysroot del LAB.
344  #
345  # NADIE LO CORRÍA. Por eso `libstdc++.so.6` —que rompía el navegador en los CUATRO perfiles—
346  # estuvo en su salida sin que nadie lo leyera, y se redescubrió el 2026-09-06 arrancando `atuq`
347  # a mano. Un vigía que hay que acordarse de invocar no se distingue de no tenerlo: es el mismo
348  # argumento que `scripts/test-atuq-politica.py` hace sobre los guardianes.
349  # Deja fichero de estado para que la salida quede en el repo y se vea si empeora entre cosechas.
350  python3 scripts/vigia-sonames.py > docs/state/sonames.txt 2>&1 \
351    && echo "   sonames.txt ✓ $(grep -c 'FALTA' docs/state/sonames.txt) hueco(s) sin proveedor" \
352    || echo "   ⚠ vigia-sonames.py falló"
353
354    echo "   static-audit: puerta diaria abierta, barriendo el store (~8 min, nice 19)…"
355    nice -n 19 scripts/static-audit.sh > work/.static-audit.salida 2>&1
356    audit_rc=$?
357    touch "$AUDIT_SELLO"
358    if [ -s work/.static-audit.salida ]; then
359      # La primera línea lleva la FECHA DE MEDICIÓN, y no es decoración. Con el frente en verde el
360      # texto del audit es constante ("MIENTEN: 0") ⇒ `git diff --cached --quiet` no vería cambio,
361      # no se commitearía nada, y dentro de tres meses este fichero sería indistinguible de uno
362      # rancio de hoy. Con la fecha, cada barrido deja huella en el `git log`: el khipu muestra que
363      # el vigía sigue vivo, no sólo que el último veredicto fue bueno. Es la misma trampa que el
364      # build-state-wlr congelado 17 días — un fichero que nadie refresca envejece hacia el
365      # optimismo, y acá la prueba de frescura es lo único que distingue "verde" de "sin mirar".
366      { echo "audit de enlace estático · medido $(date -u +%FT%TZ) · rc=$audit_rc"
367        cat work/.static-audit.salida
368      } > work/.static-audit.tmp
369      mv work/.static-audit.tmp docs/state/static-audit.txt
370      echo "   static-audit.txt ✓ (rc=$audit_rc) $(grep -m1 '^══' docs/state/static-audit.txt || echo '(sin resumen)')"
371    else
372      echo "   ⚠ static-audit no produjo salida (rc=$audit_rc) — NO piso el veredicto anterior"
373    fi
374    rm -f work/.static-audit.salida work/.static-audit.tmp
375  else
376    echo "   static-audit: sello de hoy, no toca (puerta diaria)"
377  fi
378else
379  echo "   ⚠ sin binario hammer en $HAMMER — no regenero estado"
380fi
381
382# 4. Commitear SÓLO el estado firme (el avance que el humano sigue). Recetas nuevas que YO autoré se
383# commitean aparte, a mano, para no meter autoría a medias en un commit de cron.
384if [ "${NO_COMMIT:-}" != "1" ]; then
385  git add docs/state/sonames.txt docs/state/build-state.json docs/state/build-state-kde.json docs/state/build-state-gnome.json docs/state/build-state-cosmic.json docs/state/build-state-wlr.json docs/state/drenaje.json docs/state/fuentes-vigia.json docs/state/kernel-contract.txt docs/state/static-audit.txt docs/state/keystones.json docs/state/duplicados.json 2>/dev/null || true
386  if ! git diff --cached --quiet 2>/dev/null; then
387    # ⚠ ACOTADO POR PATHSPEC (`-- <rutas>`), no sólo por el `git add` de arriba: el índice es
388    # estado COMPARTIDO y `git commit` a secas commitea el índice ENTERO, así que lo que otro
389    # agente dejara en `git add` viajaría dentro del commit del cron. Es la regla 2 de CLAUDE.md,
390    # y acá pesa más que en ningún lado: esto corre desatendido cada 30 min mientras se trabaja.
391    git commit -q -m "estado: cosecha granja $(ts) — avance del árbol KDE" -- docs/state/sonames.txt docs/state/build-state.json docs/state/build-state-kde.json docs/state/build-state-gnome.json docs/state/build-state-cosmic.json docs/state/build-state-wlr.json docs/state/drenaje.json docs/state/fuentes-vigia.json docs/state/kernel-contract.txt docs/state/static-audit.txt docs/state/keystones.json docs/state/duplicados.json 2>/dev/null \
392      && { git push -q origin main 2>/dev/null && echo "==> estado commiteado+pusheado" \
393           || echo "==> estado commiteado (push falló, reintenta próximo ciclo)"; }
394  else
395    echo "==> sin cambios de estado este ciclo"
396  fi
397fi
398echo "── $(ts) cosecha-cron fin"