#!/usr/bin/env bash
# cosecha-cron.sh — el LATIDO de la granja: recoger + sembrar, en bucle, sin agente ni tokens.
#
# QUÉ HACE cada ciclo, por cada worker vivo en scripts/farm/.fleet:
#   1. SIEMBRA (sube): rsync de código + recetas laptop→worker (el laptop es canónico; si autoré
#      recetas nuevas —p.ej. openrc— el worker las empieza a moler sin que yo intervenga).
#   2. RECOGE (baja): rsync del store sellado worker→laptop (CAS ⇒ merge seguro, sin conflicto).
#   3. Regenera el GRAFO DE ESTADO (build-state{,-kde,-gnome,-cosmic}.json) desde el store ya
#      cosechado, pasa los VIGÍAS (fuentes, contrato del kernel, y el audit de enlace estático con
#      puerta diaria) y commitea SÓLO esos ficheros firmes. El `git log` de docs/state/ ES el avance
#      que el humano ve y sigue (huecos, fallos, qué se selló entre dos ciclos).
#
# LO QUE **NO** HACE (a propósito): NO promueve incoming-kde→recipes/ canónico (esa es decisión de
# clasificación humana — "el hub clasifica", ver granja-promote-colisiones) ni firma el índice. Sólo
# captura al store del laptop y deja el veredicto para la mañana. Idempotente y re-corrible.
#
# INFINITO: vive en el crontab hasta que lo saques (`crontab -e`, borrar la línea cosecha-cron).
# Robusto a worker-ausente: si el dead-man ya mató al worker (cola seca ⇒ €0), el paso 1/2 falla
# suave, se loguea y igual regenera+commitea el estado local. NO relanza workers (eso gasta €;
# es decisión explícita con farm-up).
#
# Uso:    scripts/farm/cosecha-cron.sh                 # un ciclo (lo que dispara el cron)
#         */30 * * * * cd /home/sergio/takana && scripts/farm/cosecha-cron.sh >>work/cosecha-cron.log 2>&1
# Env:    SSH_KEY (def ~/.ssh/github5), REMOTE (def /opt/takana), NO_COMMIT=1 (regenera pero no commitea)
set -uo pipefail

ROOT="$(cd "$(dirname "$0")/../.." && pwd)"
# Ruta absoluta a MÍ MISMO, capturada ANTES del `cd`: se usa para re-ejecutarse bajo el lock, y
# un `$0` relativo dejaría de resolver en cuanto cambiamos de directorio.
YO="$(cd "$(dirname "$0")" && pwd)/$(basename "$0")"
cd "$ROOT"

# LOCK (2026-07-22): el latido ya no viene sólo del crontab — `latido.sh` lo lanza desde la sesión
# porque el laptop arranca a veces con arje-zero y a veces con OpenRC, y cronie sólo existe en uno
# de los dos. Con dos disparadores posibles, dos ciclos pueden solaparse: ambos hacen rsync sobre el
# mismo store y, peor, `git commit`+`push` a la vez (index.lock, o un push que pisa al otro). El lock
# va ACÁ y no en el llamador para que valga venga de donde venga: cron, latido o a mano.
# -n = no esperar: si ya hay un ciclo corriendo, este sobra (el próximo tick recoge lo mismo).
LOCKFILE="${LOCKFILE:-$ROOT/work/.cosecha-cron.lock}"
mkdir -p "$(dirname "$LOCKFILE")"
# ⚠ EL LOCK LO SOSTIENE EL fd, Y LOS HIJOS LO HEREDAN (medido 2026-09-08). Con `exec 9>` + `flock 9`
# cualquier descendiente que se fugue retiene el lock DESPUÉS de que el script termine, y el próximo
# que lo pida espera para siempre sin que nada falle. Pasó: dos `firefox` colgados de una caza de
# bugs sobrevivieron al `kill` de su `bwrap` y dejaron a la granja hora y media sin poder compilar,
# en silencio. `fuser -v <lock>` es lo que lo delata.
#   El arreglo es `flock -o`, que cierra el fd antes de ejecutar ⇒ el lock lo sostiene SÓLO el
# proceso `flock`, y ningún nieto puede prolongarlo. Como acá la sección crítica es el script
# ENTERO, se re-ejecuta bajo `flock -o` en vez de ir poniendo `9>&-` comando por comando, que es
# jugar a los topos y se olvida uno. `-E 77` distingue «el lock estaba ocupado» de «el trabajo
# falló», que con el `9>` de antes no se podían separar.
#   Comprobado con control positivo y negativo: sin `-o` el nieto retiene; con `-o` no. Y que la
# exclusión mutua SIGUE funcionando, que es lo que un arreglo de locks puede romper sin avisar.
#   ⚠ Ojo: `exec {L}>` (fd automático de bash) NO sirve — bash no lo marca close-on-exec. Medido.
if [ -z "${COSECHA_CRON_CON_LOCK:-}" ]; then
  export COSECHA_CRON_CON_LOCK=1
  rc=0; flock -n -E 77 -o "$LOCKFILE" "$YO" "$@" || rc=$?
  if [ "$rc" = 77 ]; then
    echo "── $(date -u +%FT%TZ) cosecha-cron: ya hay un ciclo en curso ⇒ salgo (no me solapo)"
    exit 0
  fi
  exit "$rc"
fi

SSH_KEY="${SSH_KEY:-$HOME/.ssh/github5}"
REMOTE="${REMOTE:-/opt/takana}"
FLEET="$ROOT/scripts/farm/.fleet"
# ── SIEMBRA DE LA FLOTA FIJA ────────────────────────────────────────────────────────────────────
# `.fleet` es estado de EJECUCIÓN (gitignored, lo reescribe el reaper cada ciclo); `flota-permanente`
# es la parte versionada. Sin esto, un hub recién clonado nace con la flota vacía y la granja queda
# desconectada EN SILENCIO: «flota vacía» cada 30 min, los artefactos del worker no vuelven, y nada
# falla. Se unen por NOMBRE (el fijo gana) para que lo efímero de hcloud conviva sin duplicarse.
FLEET_FIJA="$ROOT/scripts/farm/flota-permanente"
if [ -s "$FLEET_FIJA" ]; then
  # Los `|| true` NO son adorno: este script corre con `set -o pipefail`, y un `.fleet` ausente
  # —que es EXACTAMENTE el caso que esta siembra existe para arreglar— hace fallar al `cat`, la
  # tubería hereda ese estado y el `&& mv` no dispara. Resultado medido: el fichero se generaba
  # bien y se quedaba sin mover, o sea que la siembra fallaba justo en el único caso que importa.
  { grep -vE '^[[:space:]]*(#|$)' "$FLEET_FIJA" || true; cat "$FLEET" 2>/dev/null || true; } \
    | awk 'NF && !visto[$1]++' > "$FLEET.seed" && mv "$FLEET.seed" "$FLEET"
fi
HAMMER="${TAKANA:-${HAMMER:-$ROOT/target/release/takana}}"
# Workers efímeros reciclan IPs ⇒ no fijar known_hosts (hub-and-spoke, worker sin secretos).
SSH="ssh -i $SSH_KEY -o UserKnownHostsFile=/dev/null -o StrictHostKeyChecking=no -o BatchMode=yes -o LogLevel=ERROR -o ConnectTimeout=15"

ts() { date -u +%FT%TZ; }
echo "── $(ts) cosecha-cron arranca"

# ── ⚠ LO QUE SE SIEMBRA TIENE QUE SER UN COMMIT ─────────────────────────────────────────────────
# La siembra de abajo es `rsync ./` del ÁRBOL DE TRABAJO de este clon, sin `.git`: el worker
# construye lo que hay en el disco de acá, no lo que hay en `origin/main`. Y desde el 2026-10-07
# —cuando la publicación se desacopló del árbol y de la rama para que el latido no dejara de
# publicar por un fichero sucio— ya no queda NADA que ponga esta rama al día. El desacople era
# correcto; lo que se perdió sin que nadie lo notara es el único mecanismo que mantenía el árbol
# sembrado igual a lo publicado.
#
# MEDIDO el 2026-10-15: este clon llevaba **106 commits y dos días** sin avanzar, y su árbol tenía
# 13 recetas que no estaban en NINGÚN commit — un pin de `mirada*`/`shuma*` a otro commit de
# tawasuyu y las deps medidas de `churay-metal`/`pata-*`. La granja las construyó y las selló: el
# store del hub terminó con artefactos (churay-metal 7,7M, pata-centro 27M, mirada-compositor 18M)
# cuya receta no existía en el repo, o sea irreproducibles por cualquiera que clonara. Y al revés:
# `recipes/firmware-intel.toml`, retirada del hub ese mismo día, seguía viva acá, así que el grafo
# publicaba un nodo `never` de una receta que ya no existe. Nadie se enteró porque lo único que se
# decía era una línea del publicador —«la rama local queda detrás … lo publicado NO depende de
# eso»— que es CIERTA sobre la publicación y muda sobre la siembra, que sí depende.
#
# Este guardián no arregla la deriva: la hace imposible de no ver, con nombres y en la primera
# pantalla del log. Comparar CONTENIDO y no `git diff` a secas es deliberado: un fichero sin seguir
# —y acá hay recetas sin commitear a propósito, de otro agente— sale en `git diff` como borrado y
# daría un falso positivo eterno, que es como se mata a un guardián.
deriva_de_la_siembra() {
  # El alcance son las rutas ESCRITAS A MANO. `docs/state/` queda deliberadamente afuera aunque se
  # siembre: lo regenera este mismo ciclo, así que un ciclo que no llegue a publicar dejaría al
  # siguiente avisando de una deriva que no es deriva — y un aviso que sale siempre se deja de leer.
  # Es el mismo bloqueo circular que `publicar-estado.sh` ya documentó con `cierres.json`.
  local rutas="recipes crates scripts Cargo.toml Cargo.lock"
  git fetch -q origin "+main:refs/siembra-chequeo" 2>/dev/null \
    || { echo "   ⚠ no pude traer origin/main — no sé si lo que siembro es un commit"; return 0; }
  local base=refs/siembra-chequeo
  local detras ofensores=""
  detras=$(git rev-list --count "HEAD..$base" 2>/dev/null || echo '?')
  local f
  for f in $(git diff --name-only "$base" -- $rutas 2>/dev/null); do
    # Sin seguir y ausente de lo publicado ⇒ trabajo deliberado en vuelo, no deriva.
    git cat-file -e "$base:$f" 2>/dev/null || continue
    git show "$base:$f" 2>/dev/null | cmp -s - "$f" 2>/dev/null || ofensores="$ofensores $f"
  done
  # Y el otro lado de la misma moneda: una receta que sólo existe como fichero SIN SEGUIR en este
  # clon se siembra igual, la granja la construye y la sella, y el store termina con un artefacto
  # que ningún clon puede reproducir porque su receta no está en el repo. No es ⚠⚠ —editar acá y
  # commitear después es un orden de trabajo legítimo— pero tiene que decirse con nombre y apellido,
  # porque es exactamente así como `churay` llegó a estar sellado sin receta publicada (2026-10-15).
  local sueltas
  sueltas=$(git ls-files --others --exclude-standard -- recipes 2>/dev/null | grep -E '\.toml$' || true)
  if [ -z "$ofensores" ]; then
    echo "   siembra = origin/main en recetas y código ✓ (rama $detras commit(s) detrás, da igual: el árbol coincide)"
  else
    echo "   ⚠⚠ LO QUE SIEMBRO NO ES NINGÚN COMMIT — $(printf '%s\n' $ofensores | wc -l) fichero(s) difieren de origin/main:"
    printf '        %s\n' $ofensores | head -8
    [ "$(printf '%s\n' $ofensores | wc -l)" -gt 8 ] && echo "        … y más"
    echo "   ⇒ el worker va a construir eso y a sellarlo. Publicalo o descartalo; el store no puede"
    echo "     tener artefactos sin receta en el repo. Rama: $detras commit(s) detrás de origin/main."
  fi
  if [ -n "$sueltas" ]; then
    echo "   · $(printf '%s\n' "$sueltas" | wc -l) receta(s) SIN COMMITEAR van a la granja — lo que sellen queda sin receta en el repo:"
    printf '        %s\n' $sueltas | head -5
  fi
  # ── Y UN CASO QUE SÍ ROMPE EL HASH, no sólo la trazabilidad ─────────────────────────────────────
  # Seis recetas traen `[source] dir` (atuq, firmware-metal, firmware-tigerlake, linux-firmware,
  # os-release, wasi-sdk) y takana hashea ESE ÁRBOL ENTERO (`dir:<hash>` en takana-core/recipe.rs).
  # ⇒ un fichero de más ahí dentro —el típico respaldo `X.antes-de-algo` que todos dejamos al editar
  # en este clon— hace que el worker calcule OTRO ArtifactHash que el hub, y entonces no puede
  # coincidir con él ni construyendo bien. Medido el 2026-10-15 con un dotfile vacío dentro de
  # `recipes/firmware-metal/`: el hash pasó de `b3:51908c36…` a `b3:95418832…`. Es exactamente el
  # apagón del PNG de `atuq` del 2026-09-06, por la otra puerta.
  # ⚠ SIN `--exclude-standard`, y es un agujero MEDIDO del guardián anterior (2026-10-19). Con esa
  # bandera git oculta lo que el `.gitignore` tapa — y takana hashea el árbol ENTERO, ignorado
  # incluido. Resultado: `recipes/atuq/tools/__pycache__/rebrand.cpython-312.pyc`, invisible para
  # `git status` y para este guardián, movía el hash de `atuq` de `fdb92aa3…` a `e42ccea7…` y los
  # cuatro escritorios salían «clausura incompleta: atuq estado=debt». Es el mismo apagón que el
  # commit `0f46c097` ya documentó («el hub sellaba algo que un clon limpio no reproduce»), y lo
  # que lo hace peor es justamente que está ignorado: nada lo nombra en ningún sitio.
  # ⇒ `--others` a secas lista también lo ignorado. Un fichero ignorado dentro de un `[source] dir`
  # NO es inocuo, y es la única clase de basura que el repo no puede ver por sí mismo.
  local dentro
  dentro=$(git ls-files --others -- recipes 2>/dev/null | awk -F/ 'NF>2' || true)
  if [ -n "$dentro" ]; then
    echo "   ⚠⚠ $(printf '%s\n' "$dentro" | wc -l) fichero(s) SIN SEGUIR dentro del árbol de una receta —"
    echo "      eso cambia su ArtifactHash y el worker deja de poder coincidir con el hub:"
    printf '        %s\n' $dentro | head -6
  fi
}
deriva_de_la_siembra

if [ ! -s "$FLEET" ]; then
  echo "   flota vacía (scripts/farm/.fleet) — nada que cosechar este ciclo"
else
  while read -r name ip; do
    [ -n "${name:-}" ] || continue
    echo "==> $name ($ip)"
    # 1. SIEMBRA: código + recetas laptop→worker (--delete: el laptop manda; nunca toca work/store/target).
    # ⚠ LA EXCLUSIÓN DE PNG VA ANCLADA, Y NO ES ESTILO (2026-09-06). Antes decía `--exclude '*.png'`,
    # sin anclar, o sea PNG en CUALQUIER sitio — incluido `recipes/`. Dos consecuencias, las dos malas:
    #
    #   a) rsync PROTEGE DE BORRADO lo que excluye. Un directorio cuyo único resto es un `.png` no se
    #      puede vaciar y por lo tanto no se puede borrar NUNCA, aunque el hub lo haya eliminado.
    #      Medido: `recipes/atuq/extension/atuq128.png` sobrevivió a un rename hecho en el hub y el
    #      log de la siembra repetía `cannot delete non-empty directory: recipes/atuq/extension`.
    #   b) Un PNG NUEVO de una receta tampoco viaja. Y hay recetas cuyo `[source] dir` tiene PNG
    #      dentro: los 9 iconos de `recipes/atuq/branding/icons/`.
    #
    # Como takana SÍ hashea el árbol de un `[source] dir` (`recipe.rs`, `dir:<hash>`), el efecto no es
    # silencioso —bendito sea—: el worker calcula OTRO ArtifactHash. Medido el mismo día,
    # `atuq` daba `b3:f2960991` en el hub y `b3:b33e81a5` en el worker por ESE único fichero de más.
    # O sea que el worker no podía coincidir con el hub ni construyendo bien.
    #
    # Lo que se quería ahorrar eran las capturas: `docs/evidencia/` (4,4 M) y el PNG suelto de la raíz
    # (1 M). Eso se excluye por RUTA. Los PNG de `recipes/` viajan, que es lo correcto: son fuente.
    if rsync -az --delete -e "$SSH" \
        --exclude /work --exclude /store --exclude '/store-*' --exclude /target \
        --exclude /dist --exclude /.dev-fs --exclude /.git --exclude /.scratch \
        --exclude '/docs/evidencia/' --exclude '/*.png' --exclude '/content*' \
        ./ "root@$ip:$REMOTE/" 2>&1 | tail -2; then
      echo "   siembra ✓"
    else
      echo "   ⚠ siembra falló (worker ausente/idle-muerto?) — sigo con el siguiente"
      continue
    fi
    # 2. RECOGE: store sellado worker→laptop (CAS, merge seguro).
    # ── ⚠ EXCLUIR LO YA PODADO, O LA POda SE DESHACE SOLA ─────────────────────────────────────
    # El worker NO se poda nunca, así que conserva los artefactos superados y este rsync los
    # devolvía enteros. Con el latido cada 30 min, una poda de 24 G quedaba deshecha en menos de
    # una hora: medido el 2026-08-07, tres podas seguidas borraron LOS MISMOS 362 artefactos.
    #
    # El mismo arreglo está en `farm-sync.sh` — y ahí estuvo el error de método: lo puse allí, di el
    # bucle por cerrado, y la churn siguió porque **hay DOS rutas que bajan el store** y el latido
    # usa ésta. Arreglar una de dos copias y declarar victoria es peor que no arreglar: el síntoma
    # se atenúa lo justo para dejar de mirar. Si aparece una tercera copia, va con el mismo exclude.
    #
    # ── 2026-08-09: EL STORE YA NO BAJA. BAJA EL MANIFIESTO ───────────────────────────────────
    # El store se mudó al VOLUMEN de la granja y el laptop se quedó con lo que la granja no puede
    # rehacer. Seguir bajando el store acá desharía esa mudanza cada 30 minutos — la misma forma
    # exacta del bucle de churn que este bloque documenta arriba, y la razón por la que el exclude
    # de abajo dejó de alcanzar: ya no se trata de filtrar QUÉ baja, sino de que no baja.
    #
    # Lo que el hub sí necesita es SABER qué hay sellado, para que el grafo de estado no reporte
    # `never` sobre artefactos que existen. Eso son kilobytes: la lista de nombres. Se acumula en
    # el manifiesto (nunca se pisa) porque el volumen es una sola foto y el hub recuerda todas.
    if $SSH "root@$ip" "ls $REMOTE/store 2>/dev/null | grep -E '^[0-9a-f]{64}-'" \
         > "$ROOT/work/.sellados-worker" 2>/dev/null && [ -s "$ROOT/work/.sellados-worker" ]; then
      N_W=$(wc -l < "$ROOT/work/.sellados-worker")
      cat "$ROOT/work/farm-sellados.txt" "$ROOT/work/.sellados-worker" 2>/dev/null \
        | grep -E '^[0-9a-f]{64}-' | sort -u > "$ROOT/work/farm-sellados.txt.new"
      mv "$ROOT/work/farm-sellados.txt.new" "$ROOT/work/farm-sellados.txt"
      rm -f "$ROOT/work/.sellados-worker"
      echo "   manifiesto ✓ (worker: $N_W · total: $(wc -l < "$ROOT/work/farm-sellados.txt"))"
    else
      echo "   ⚠ no pude leer el manifiesto del worker — sigo"
    fi
    # ── ⚠ EL DISCO DEL WORKER, QUE NADIE MIRABA ─────────────────────────────────────────────────
    # El latido informaba del worker sólo por su manifiesto —cuántos artefactos tiene— y nunca por
    # su disco, así que la caja se llenó sin que ningún log lo dijera: medido el 2026-10-15, **90 %
    # (20 G libres de 196)** con una tanda en vuelo. Y «el worker no se poda nunca» es una regla
    # real, pero su motivo es que la COSECHA no deshaga la poda (su rsync devolvía el store entero),
    # no que el store no deba podarse: `scripts/store-gc.sh` existe para eso y trae el mecanismo que
    # evita ese churn —`work/store-gc-superados.txt`, registro acumulado de lo que NO debe volver—.
    # Nunca se había corrido allá. Al hacerlo: 465 artefactos superados, **18 G → 43 G libres**.
    #
    # ⇒ un número por ciclo, y el comando sólo cuando hace falta. El suelo son 25 G porque un árbol
    # de fuentes del monorepo cuesta ~2,7 G y una tanda de seis encadenadas no puede quedarse sin
    # sitio a mitad: el disco lleno NO se lee como disco lleno, se lee como receta rota (y eso ya
    # costó ocho recetas KDE marcadas «deuda» sin tener nada roto).
    libres_w=$($SSH "root@$ip" "df -Pm /opt/takana 2>/dev/null | awk 'NR==2{print \$4}'" 2>/dev/null || echo "")
    # ⚠ Se valida que sea un ENTERO, y no es paranoia de estilo: con basura ahí el `[ -lt ]` falla,
    # el `elif` sale falso y la ejecución cae en el `else`, o sea que un `df` ilegible se informaría
    # como «✓ libres». Un control que falla hacia «todo bien» es exactamente el que no sirve.
    case "$libres_w" in (*[!0-9]*|"") libres_w="" ;; esac
    if [ -z "$libres_w" ]; then
      echo "   ⚠ no pude leer el disco del worker (df ilegible o caja ausente)"
    elif [ "$libres_w" -lt 25600 ]; then
      echo "   ⚠⚠ disco del worker: $((libres_w/1024)) G libres — bajo el suelo de 25 G."
      echo "      Un árbol de fuentes del monorepo cuesta ~2,7 G: una tanda se queda sin sitio a"
      echo "      mitad y el fallo se lee como receta rota. El GC del store mide antes de borrar:"
      echo "        ssh root@$ip 'cd /opt/takana && STORE=./store bash scripts/store-gc.sh'"
      echo "        …y con --aplicar borra SÓLO los superados (los huérfanos hay que quererlos)."
    else
      echo "   disco del worker: $((libres_w/1024)) G libres ✓"
    fi
    # ⚠ Lo que NO cubre esto: los artefactos nuevos quedan SÓLO en el volumen hasta que alguien
    # haga una pasada de respaldo. El volumen tiene borrado protegido, pero es UNA copia.
  done < "$FLEET"
fi

# 2.5 REAPER HUB-SIDE (2026-07-23). El dead-man DEL WORKER probó FRÁGIL: un worker quedó 3.5h idle
# quemando € porque su `/etc/takana-deadman.env` no tenía token válido ⇒ el dead-man llegaba a
# matarse pero salía 1 "sin HCLOUD_TOKEN" cada tick. La garantía "un vps idle es inadmisible" NO
# puede depender de que cada worker se auto-provisione bien un token (falla en silencio). El HUB sí
# tiene un token que funciona, y este latido corre cada 30 min aunque no haya sesión (setsid) ⇒ el
# hub es la AUTORIDAD de vida del worker. Es defensa en profundidad: el dead-man del worker cubre
# "hub caído"; esto cubre "dead-man del worker roto". Un worker sin trabajo activo REAPER_MAX ciclos
# seguidos se BORRA desde acá, con el MISMO blindaje que el dead-man (label role=takana-worker;
# gioser no tiene label ⇒ jamás pasa, ni por accidente).
REAPER_MAX="${REAPER_MAX:-2}"   # 2 ciclos × 30 min ≈ 1 h idle, igual que el dead-man del worker
if [ -s "$FLEET" ] && command -v hcloud >/dev/null 2>&1; then
  mkdir -p "$ROOT/work/.reaper"; sobreviven=""
  while read -r name ip; do
    [ -n "${name:-}" ] || continue
    # LISTA NEGRA (capa 1 de 2, igual que el dead-man): gioser JAMÁS se toca, pase lo que pase.
    # Segunda capa = el chequeo de label abajo. gioser no tiene label Y no matchea worker de la
    # granja ⇒ imposible que muera por acá. "Ahí está nuestra vida" (2026-07-23).
    case "$name" in *gioser*) echo "==> reaper: $name en LISTA NEGRA ⇒ intocable"; sobreviven="${sobreviven}${name} ${ip}
"; continue;; esac
    strike_f="$ROOT/work/.reaper/$name"
    # ¿el server siquiera existe? Si ya no está en hcloud (borrado a mano o por un ciclo previo),
    # NO cuesta € y no debe quedar en .fleet para siempre. Se dropea (no entra a `sobreviven`).
    if ! hcloud server describe "$name" -o format='{{.Name}}' >/dev/null 2>&1; then
      # ⚠ «No está en hcloud» son DOS casos muy distintos, y antes se trataban igual (2026-09-08):
      #   · un worker PERMANENTE que no es de Hetzner — hoy el LXC prestado `dev.gioser.net`, que
      #     no cuesta € ⇒ NO HAY NADA QUE SEGAR, y sacarlo de .fleet desconecta la granja EN
      #     SILENCIO: la cosecha pasa a decir «flota vacía» y los artefactos del worker dejan de
      #     volver, sin que nada falle. Es el mismo fallo mudo que este fichero ya tuvo.
      #   · un server efímero ya borrado a mano ⇒ ése sí sobra en .fleet para siempre.
      # Se distinguen preguntándole a la MÁQUINA, no al nombre. Antes el LXC sólo se salvaba porque
      # su nombre contiene la subcadena «gioser» y caía en la lista negra de arriba — una lista que
      # existe para proteger al HUB de Hetzner y no tiene nada que ver con él. Medido: el mismo host
      # llamado `pruebasia-lxc` era expulsado de .fleet en el primer ciclo.
      if $SSH root@"$ip" true 2>/dev/null; then
        echo "==> reaper: $name no es de hcloud pero RESPONDE ⇒ worker permanente, se queda (€0)"
        sobreviven="${sobreviven}${name} ${ip}
"
      else
        echo "==> reaper: $name no está en hcloud y no responde ⇒ lo saco de .fleet"; rm -f "$strike_f"
      fi
      continue
    fi
    if $SSH root@"$ip" 'pgrep -f "hammer build|campana-deuda|farm-worker-loop" >/dev/null 2>&1'; then
      echo 0 > "$strike_f"; sobreviven="${sobreviven}${name} ${ip}
"; continue
    fi
    strikes=$(( $(cat "$strike_f" 2>/dev/null || echo 0) + 1 )); echo "$strikes" > "$strike_f"
    echo "==> reaper: $name SIN trabajo activo — strike $strikes/$REAPER_MAX"
    if [ "$strikes" -lt "$REAPER_MAX" ]; then sobreviven="${sobreviven}${name} ${ip}
"; continue; fi
    # BLINDAJE (igual que el dead-man): sólo se borra un server con label role=takana-worker.
    if hcloud server describe "$name" -o format='{{.Labels}}' 2>/dev/null | grep -q hammer-worker; then
      echo "   ☠ IDLE $strikes ciclos ⇒ el HUB borra $name (label verificado; gioser protegido)"
      if hcloud server delete "$name" >/dev/null 2>&1; then rm -f "$strike_f"
      else echo "   ⚠ delete falló — sobrevive, reintenta próximo ciclo"; sobreviven="${sobreviven}${name} ${ip}
"; fi
    else
      echo "   ⛔ $name SIN label hammer-worker ⇒ NO se borra (protegido)"; sobreviven="${sobreviven}${name} ${ip}
"
    fi
  done < "$FLEET"
  printf '%s' "$sobreviven" | grep -v '^[[:space:]]*$' > "$FLEET.tmp" 2>/dev/null; mv "$FLEET.tmp" "$FLEET" 2>/dev/null || true
fi

# 2.7 PODA DE `work/sources` (2026-08-31). Cuarto vigía, y el único que no emite veredicto: su
# salida es que el disco se quede plano.
#
# POR QUÉ EXISTE: ese día el volumen del store (`/dev/sdb`, 246 G) estaba al **97%, 8,8 G libres**,
# y el gordo NO era el store — eran **79 G de `work/sources`**, 106 árboles con el `target/` de
# cargo y los `.o` dentro (el árbol de fuentes es también el directorio de compilación). Nada en la
# granja podaba eso: `store-gc.sh` mira el store, la poda de caché de CI mira la caché de CI, y este
# tercer montón crecía sin dueño desde que el store se mudó al volumen. Se recuperaron 70 G.
#
# POR QUÉ ES SEGURO: no es una caché. Los dos caminos de `takana-build/src/fetch.rs` borran el árbol
# y lo re-extraen en CADA build, sin una sola rama que reutilice ⇒ un árbol viejo no acelera nada y
# borrarlo no cuesta ni la re-extracción. Lo único que se pierde es el post-mortem del último build
# de esa receta, y por eso el suelo son 24 h y no cero.
#
# CADA CICLO, no con puerta diaria como el audit: el `find` sobre ~100 directorios es instantáneo y
# el `rm` cuesta en proporción a la basura que haya. Con puerta diaria la basura de un día entero de
# granja llegaría junta, que es justo lo que se quiere evitar.
#
# El script toma `work/.farm-build.lock` por dentro y con espera acotada: borrar el árbol que un
# `bwrap` está compilando es el ADR 0012 en su forma más directa, y el mtime no distingue "viejo" de
# "build lento". Si hay algo en vuelo, salta el ciclo y sale 0.
if [ -x "$ROOT/scripts/poda-fuentes.sh" ]; then
  "$ROOT/scripts/poda-fuentes.sh" --aplicar || echo "   ⚠ poda de fuentes falló (rc=$?) — sigo"
fi

# 3. Regenerar el grafo de estado desde el store ya cosechado (usa el takana del laptop, que tiene
# el subcomando `hash`). Barato (~14s cada uno). El corpus canónico y el frente KDE, por separado.
echo "==> regenerando grafo de estado"
if [ -x "$HAMMER" ]; then
  scripts/build-state.py >/dev/null 2>&1 && echo "   build-state.json ✓" || echo "   ⚠ build-state.py falló"
  scripts/build-state.py --kde >/dev/null 2>&1 && echo "   build-state-kde.json ✓" || echo "   ⚠ build-state.py --kde falló"
  # GNOME faltaba acá (2026-07-27): el latido regeneraba base+KDE y NUNCA el grafo GNOME, así que
  # build-state-gnome.json envejecía en silencio y reportaba `never` sobre recetas selladas hacía
  # días (gobject-introspection, toda la onda 2). Un grafo viejo miente con la misma cara que uno
  # fresco — por eso lo regenera el latido y no la mano.
  scripts/build-state.py --gnome >/dev/null 2>&1 && echo "   build-state-gnome.json ✓" || echo "   ⚠ build-state.py --gnome falló"
  # COSMIC (2026-08-03), por la MISMA razón por la que se agregó GNOME arriba: un frente que no
  # regenera el latido envejece en silencio, y un grafo viejo miente con la misma cara que uno fresco.
  scripts/build-state.py --cosmic >/dev/null 2>&1 && echo "   build-state-cosmic.json ✓" || echo "   ⚠ build-state.py --cosmic falló"
  # wlr/sway (2026-08-26), TERCERA vez que cae el mismo cable. El flag `--wlr` se escribió el día que
  # se abrió el frente, y su propio comentario en build-state.py dice «sin esto el frente es INVISIBLE
  # para el khipu» — pero la línea nunca se agregó ACÁ. Resultado medido: build-state-wlr.json se
  # quedó congelado el 2026-08-09 diciendo `escritorio-sway 121/121`, y 17 días después la realidad
  # era 108/122: freetype, make, python3 y libpng-pic se re-hashearon en el medio y arrastraron a 14
  # dependientes a deuda. Nadie lo vio porque el número que todo el mundo mira estaba perfecto.
  # Un grafo viejo miente con la misma cara que uno fresco — y el que nadie regenera miente MÁS,
  # porque envejece en la dirección optimista: sólo puede sobreestimar lo que hay sellado.
  scripts/build-state.py --wlr >/dev/null 2>&1 && echo "   build-state-wlr.json ✓" || echo "   ⚠ build-state.py --wlr falló"
  # keystones y duplicados (2026-09-08). CUARTA vez que cae el mismo cable: los comentarios de
  # arriba lo cuentan ya para GNOME (2026-07-27), COSMIC (2026-08-03) y wlr/sway (2026-08-26), y
  # estos dos se habían quedado congelados el 2026-09-05 — TRES DÍAS. Con un agravante que los
  # otros no tenían: `keystones` es el fichero que responde «¿qué construyo después?», así que
  # rancio no se limita a envejecer, DESINFORMA. Medido: decía «1 nudo en deuda, camino crítico
  # corpus/firefox → corpus/atuq» con los dos sellados hacía horas. Un grafo viejo miente con la
  # misma cara que uno fresco, y éste además manda a trabajar en lo que ya está hecho.
  scripts/yupana.py keystones  >/dev/null 2>&1 && echo "   keystones.json ✓"  || echo "   ⚠ yupana keystones falló"
  scripts/yupana.py duplicados >/dev/null 2>&1 && echo "   duplicados.json ✓" || echo "   ⚠ yupana duplicados falló"
  # Cola DERIVADA del grafo (P4): el orden de masticado por imagen, en ondas topológicas. No lanza
  # ningún build — sólo deja escrito qué conviene moler primero, para que la cola deje de ser una
  # lista escrita a mano. Barato (lee JSON, no hashea).
  # NO se traga la salida entera: drenar.py sale 1 cuando alguna imagen quedó SIN MEDIR (una cola
  # nueva sin su línea en GRAFOS), y con `>/dev/null 2>&1` eso llegaba al log como un "falló" mudo
  # que no dice cuál. Se filtran las líneas ⚠, que son las únicas accionables.
  if drenaje_out="$(scripts/drenar.py --todos 2>&1)"; then
    echo "   drenaje.json ✓"
  else
    echo "   ⚠ drenar.py falló"
    echo "$drenaje_out" | grep '⚠' | sed 's/^/   /'
  fi
  # VIGÍA DE FUENTES (ADR 0013 §3). Desde que el mirror propio se consulta ANTES que upstream,
  # `takana build` deja de avisar cuando una URL de terceros muere: sirve los bytes del mirror y
  # sigue. Eso es lo correcto para construir y sería CIEGO sin este contrapeso — las URLs se irían
  # muriendo una a una y el corpus resultaría irreconstruible el día que falte el mirror, con todo
  # en verde hasta ese momento. Igual que el grafo de wlr, que pasó 17 días anunciando un 121/121
  # que ya era falso: lo que nadie refresca envejece hacia el optimismo.
  # No descarga: pide cabeceras. Primera corrida (2026-08-26): 8 muertas de 1167, y TRES de ellas
  # —busybox, freetype, freetype-shared— selladas y en uso.
  scripts/fuentes/fuentes-vigia.sh >/dev/null 2>&1 && echo "   fuentes-vigia.json ✓" || echo "   ⚠ fuentes-vigia falló"
  # CONTRATO DE CAPACIDADES DEL KERNEL (SDD 25 §4.ter). Mismo cable que el vigía de fuentes y por la
  # misma razón: el gate existía y NADIE lo corría. Un kernel reconstruido sin `MEMCG` volvería a
  # pasar inadvertido, y ese fallo **no se ve del lado del desarrollo** —el kernel de esta máquina sí
  # lo trae—, sólo comprobando el artefacto. Acá el veredicto queda en docs/state/ y el `git log` lo
  # muestra solo, como el resto del khipu.
  # Se escribe por temporal y sólo se mueve si tiene contenido: `contract` sale != 0 cuando el
  # contrato NO se cumple —y ese rojo es justo lo que hay que guardar—, pero un fichero VACÍO se
  # leería como «nada que objetar», que es el fallo de CLAUDE.md §3.
  "$HAMMER" --store ./store kernel contract --sealed > work/.kernel-contract.tmp 2>&1
  if [ -s work/.kernel-contract.tmp ]; then
    mv work/.kernel-contract.tmp docs/state/kernel-contract.txt
    echo "   kernel-contract.txt ✓ $(grep -m1 '^resumen' docs/state/kernel-contract.txt || echo '(sin resumen)')"
  else
    rm -f work/.kernel-contract.tmp
    echo "   ⚠ kernel contract no produjo salida — NO piso el veredicto anterior"
  fi
  # AUDIT DE ENLACE ESTÁTICO (`link = "static"`), CON PUERTA DIARIA. Tercer cable de la misma
  # familia que el vigía de fuentes y el contrato del kernel, y por la misma razón exacta: el gate
  # existía desde julio, nadie lo re-corría, y el 2026-08-31 el "MIENTEN: 0" con el que se había
  # cerrado el frente resultó ser 4 — dwarves, htop, wlr-randr y gtk4, todas selladas DESPUÉS del
  # cierre. Un frente que se cierra en cero y no se vuelve a medir no se queda en cero.
  # Lo que costaba ese silencio, medido ese mismo día: `bash` —el shell de los perfiles base, cli y
  # dos escritorios— no ARRANCABA fuera del sandbox, y las cuatro apps GTK4 del corpus
  # (hammer-edit incluida) segfalteaban en `gtk_init`. Todo sellado y en verde.
  #
  # PUERTA DIARIA, no cada ciclo: el barrido recorre los ~750 sellados leyendo cada ejecutable con
  # `file`+`readelf` y tarda ~8 min de CPU en 4 vCPU que además comparte con el worker. Cada 30 min
  # sería más de un cuarto de core para siempre vigilando algo que sólo cambia cuando se re-sella
  # una receta. Con la puerta, es 8 min al día.
  #
  # El sello es un LIMITADOR DE RITMO, no una marca de éxito ⇒ se toca en cuanto el barrido termina,
  # salga como salga. Si sólo se tocara al acertar, un fallo que tarde los 8 min se repetiría cada
  # 30 y el cable pasaría de vigilancia a sangría. El veredicto anterior está protegido aparte, por
  # el mismo temporal-no-vacío del contrato del kernel.
  # Para forzarlo a mano: `rm work/.static-audit.sello` y esperar al próximo ciclo.
  #
  # NO toma `work/.farm-build.lock` a propósito: sólo LEE el store, y retener el lock 8 min pararía
  # la granja entera. `nice -n 19` porque la prioridad la tiene construir, no auditar.
  # ── LOS DOS VIGÍAS NUEVOS (2026-09-12) ───────────────────────────────────────────────────────
  # Van FUERA de la puerta diaria porque son baratos —medidos: 4 s y 22 s— y dentro del `if` del
  # sello sólo correrían una vez al día sin motivo.
  #
  # El argumento para cablearlos es el mismo que dejó escrito `vigia-sonames` tres líneas más
  # abajo, y que costó `libstdc++.so.6` roto en los cuatro perfiles: **un vigía que hay que
  # acordarse de invocar no se distingue de no tenerlo**. Los dos nacieron hoy encontrando cosas
  # reales —46 binarios inertes por falta de driver; 4 comandos de bzip2 apuntando a `/out`— y las
  # dos las encontré a mano. Eso no se repite solo.
  #
  # Dejan fichero en `docs/state/` con la FECHA DE MEDICIÓN por delante, por la misma razón que el
  # static-audit: con el frente en verde el texto es constante, `git diff --cached --quiet` no vería
  # cambio, y dentro de tres meses el fichero sería indistinguible de uno rancio. Con la fecha, cada
  # ciclo deja huella en el `git log` ⇒ se ve que el vigía sigue VIVO, no sólo que el último
  # veredicto fue bueno.
  { echo "subcomandos sin driver · medido $(date -u +%FT%TZ)"
    python3 scripts/vigia-subcomandos.py 2>&1; } > work/.subcomandos.tmp
  mv work/.subcomandos.tmp docs/state/subcomandos.txt
  echo "   subcomandos.txt ✓ $(grep -m1 'TOTAL:' docs/state/subcomandos.txt || echo '0 inertes')"

  # ── EL CENSO DE APPLETS, QUE EXISTÍA Y NADIE CORRÍA ──────────────────────────────────────────
  # `busybox-censo-proveedores.py` mide, contra los artefactos del store, quién provee de verdad
  # cada applet de busybox — y trae un `--guardian` que sale ≠0 si alguno PIERDE el proveedor que
  # el TSV registra. Estaba escrito para esto y **nunca se cableó**: la medición sólo existía
  # cuando alguien la lanzaba a mano, o sea casi nunca.
  #
  # Medido el 2026-10-16 al correrlo: de los 401 applets, 215 ya tienen dueño real y **47 los
  # provee SÓLO busybox**. Y el titular no es «faltan recetas» —faltan dos: `getty`/`cttyhack` y
  # el `nslookup`— sino que **`arje-zero` (PID 1) y `brush` (el shell, `sh`/`ash`/`hush`) están
  # SELLADOS y en NINGÚN perfil**, igual que `busybox` y `chrony`. O sea que la imagen toma su init
  # del piso y su `/bin/sh` de busybox, y la clausura no contiene ninguna de las dos piezas más
  # básicas del sistema. Es el censo del piso (`docs/state/piso.json`) por el otro lado.
  #
  # Una línea por ciclo, y el detalle sólo cuando el guardián se queja: lo que el número tiene que
  # hacer es BAJAR, y para eso hay que verlo todos los días.
  if python3 scripts/busybox-censo-proveedores.py --guardian > work/.applets.salida 2>&1; then
    echo "   applets ✓ $(grep -m1 'SÓLO lo provee busybox' work/.applets.salida \
         | sed 's/^ *//; s/  */ /g' || echo '(sin resumen)')"
  else
    echo "   ⚠⚠ un applet PERDIÓ el proveedor que el TSV registra — el reemplazo dejó de instalarlo:"
    grep -E 'PERDIÓ|perdió|✗' work/.applets.salida | head -6 | sed 's/^/      /'
  fi
  rm -f work/.applets.salida

  # ── EL CENSO DE LO QUE FALTA PARA USARLA (2026-10-19) ────────────────────────────────────────
  # Las otras métricas contestan «¿está completo lo que ya nombramos?» — y las tres pueden estar en
  # verde (1158/1158, deuda 0, clausura 10 de 10) con la distro mostrando cuadraditos en chino.
  # Ésta contesta la otra pregunta, y su número tiene que BAJAR: el `git diff` de
  # `docs/state/distro-huecos.json` ES el avance del frente de producto.
  #
  # Va sin puerta diaria porque cuesta ~2 s y su valor es ir al ritmo del catálogo: el día que
  # alguien declare un paquete, la línea lo refleja en el ciclo siguiente. Y sale SIEMPRE, incluso
  # sin cambios, porque un contador que sólo aparece cuando se mueve no se usa para decidir.
  if python3 scripts/censo-distro.py --json work/.distro.tmp > work/.distro.salida 2>&1 \
     && [ -s work/.distro.tmp ]; then
    mv work/.distro.tmp docs/state/distro-huecos.json
    echo "   distro-huecos.json ✓ $(grep -m1 'resumen:' work/.distro.salida | sed 's/^ *resumen: //')"
    # Lo que YA está cubierto por otro nombre y lo que tiene muro medido: dos listas cortas que
    # cambian el presupuesto de un hueco, y por eso valen más que el total.
    sed -n '/CAPACIDAD YA CUBIERTA/,/^   —/p;/MUROS MEDIDOS/,$p' work/.distro.salida \
      | grep -E '^        ' | head -6 | sed 's/^      /     /'
  else
    echo "   ⚠ censo-distro falló — NO piso el informe anterior"
    tail -2 work/.distro.salida 2>/dev/null | sed 's/^/      /'
  fi
  rm -f work/.distro.tmp work/.distro.salida

  { echo "raíces sucias y symlinks al lab · medido $(date -u +%FT%TZ)"
    python3 scripts/hydrate-profile.py --auditar-raices 2>&1; } > work/.raices.tmp
  mv work/.raices.tmp docs/state/raices.txt
  echo "   raices.txt ✓ $(grep -m1 'ofensor' docs/state/raices.txt || echo '(sin resumen)')"

  # ── VIGÍA DE RÍO ARRIBA (2026-10-07, SDD 33 §2.1) ────────────────────────────────────────────
  # Contesta lo que `fuentes-vigia` NO contesta. Aquél pregunta si la fuente SIGUE VIVA; ésta
  # pregunta si hay **algo más nuevo que lo que tenemos clavado**. Se confunden y son las dos
  # mitades: una fuente viva puede llevar dos años sin tocarse, y una que se movió ayer puede
  # desaparecer mañana.
  #
  # Se cablea por la lección que este guion ya tiene escrita dos veces —**un vigía que hay que
  # acordarse de invocar no se distingue de no tenerlo**—: nació el 2026-09-23 con el SDD 33,
  # corrió UNA vez a mano, y el 2026-10-07 su informe seguía siendo el de aquel día. En esos
  # 14 días las recetas con un tag más nuevo pasaron de 462 a 479 y nadie lo supo.
  #
  # ⚠ PUERTA DIARIA, y acá no es por coste de CPU sino por EDUCACIÓN: son 660 `git ls-remote`
  # contra servidores ajenos (607 en github). A 30 min serían ~31.000 consultas al día, que no es
  # vigilar sino martillear. El SDD 33 le pone un día de reloj y un día es.
  #
  # NO modifica ninguna receta, y eso es política, no pereza: una versión nueva de upstream puede
  # cambiar el sistema de build, las banderas, las deps y el resultado (SDD 33 §3.2 — el kernel
  # 7.3 es el ejemplo). Propone; quien decide aplica con `bump-repo.py` o `takana pin` y construye.
  # ── CIERRE DE PERFILES (2026-10-10, SDD 33 §4) ───────────────────────────────────────────────
  # El §4 decide rearmar los medios **por el CIERRE, no por el calendario**, y para eso hacía falta
  # un número que no existía: el hash de la clausura de cada perfil. Esto lo calcula sin construir
  # nada —lee los grafos que las líneas de arriba acaban de regenerar— así que va aquí y no en una
  # puerta diaria: cuesta menos de un segundo y su valor es justamente ir al ritmo del grafo.
  #
  # El `git log` de `docs/state/cierres.json` ES la señal «este perfil se movió ⇒ su imagen quedó
  # rancia». Hoy no hay imágenes publicadas con las que comparar, así que esta mitad es la que se
  # puede tener: saber QUÉ cambió sin rearmar para averiguarlo.
  #
  # ⚠ `--contra` apunta al informe ANTERIOR (el que todavía está en disco) para que la salida diga
  # qué se movió respecto de la última cosecha. Se lee antes de sobrescribirlo, y por eso el fichero
  # temporal: escribir directo sobre `cierres.json` borraría la base de la comparación.
  if python3 scripts/cierre-perfiles.py --contra docs/state/cierres.json \
       --json work/.cierres.tmp > work/.cierres.salida 2>&1 && [ -s work/.cierres.tmp ]; then
    mv work/.cierres.tmp docs/state/cierres.json
    echo "   cierres.json ✓ $(sed -n '1s/^== //;1s/ ==$//;1p' work/.cierres.salida)"
    grep -c "SE MOVIÓ" work/.cierres.salida >/dev/null 2>&1 && \
      sed -n '/SE MOVIÓ/p' work/.cierres.salida | sed 's/^   /      /' | head -6

    # ── Y LO QUE HAY QUE HACER CON ESE NÚMERO ────────────────────────────────────────────────────
    # «3 de 10 con clausura completa» es una medición, no un encargo, y así estuvo durante días sin
    # que nadie la convirtiera en trabajo. Medido el 2026-10-15: los SIETE perfiles incompletos lo
    # estaban por las MISMAS 7 recetas en deuda del corpus —`wireplumber` llevaba 8 días, desde que
    # una dep le movió el hash el 07-oct—, y ninguna tenía quien la construyera: el bucle del worker
    # (`takana-farm.service`) sólo muele `recipes/incoming/`, y la deuda del CORPUS se salda a mano
    # con `campana-deuda.sh`, que es manual **a propósito** (el store del worker es parcial: si
    # midiera la deuda él mismo se pondría a reconstruir media distro — ver su cabecera).
    #
    # O sea que el eslabón que faltaba no era una herramienta: era que el latido, que ya tiene la
    # medición, dijera la lista y el comando. Sale sólo cuando hay algo que hacer.
    python3 - docs/state/cierres.json <<'PY' || true
import json, sys
try:
    d = json.load(open(sys.argv[1]))
except Exception:
    sys.exit(0)
culpables, perfiles, recortados = {}, 0, 0
for p in d.get('perfiles', []):
    imp = p.get('impedidos') or []
    if not imp:
        continue
    perfiles += 1
    # `cierre-perfiles.py` guarda a lo sumo 10 impedidos por perfil y el total aparte. Si recortó,
    # esta lista cuenta de menos y hay que decirlo: un recorte callado se lee como «lo cubrí todo».
    if (p.get('n_impedidos') or len(imp)) > len(imp):
        recortados += 1
    for linea in imp:
        ruta = linea.split(' ')[0]
        cola, _, nombre = ruta.partition('/')
        culpables.setdefault((cola, nombre), set()).add(p['perfil'])
if not culpables:
    sys.exit(0)
# Orden por cuántos perfiles destraba cada una: la primera es la que más paga.
orden = sorted(culpables, key=lambda k: (-len(culpables[k]), k[1]))
print('   ⇒ %d receta(s) en deuda bloquean la clausura de %d perfil(es):' % (len(orden), perfiles))
for cola, nombre in orden[:10]:
    print('        %-22s destraba %d perfil(es): %s'
          % (nombre, len(culpables[(cola, nombre)]), ', '.join(sorted(culpables[(cola, nombre)]))))
delcorpus = [n for c, n in orden if c == 'corpus']
if recortados:
    print('     ⚠ %d perfil(es) traen MÁS impedidos de los que el informe guarda (tope de 10):'
          ' la lista de arriba cuenta de menos.' % recortados)
if delcorpus:
    print('     Nadie las construye solo (el bucle del worker muele incoming/, no el corpus):')
    print('        ssh root@<worker> "systemd-run --unit=campana-deuda --working-directory=/opt/takana \\')
    print('          /opt/takana/scripts/farm/campana-deuda.sh %s"' % ' '.join(delcorpus[:10]))
PY
  else
    echo "   ⚠ cierre-perfiles falló — NO piso el informe anterior"
    tail -2 work/.cierres.salida 2>/dev/null | sed 's/^/      /'
  fi
  rm -f work/.cierres.tmp work/.cierres.salida

  # ── ¿ALGUNA IMAGEN QUEDÓ RANCIA? (2026-10-10, SDD 33 §4) ─────────────────────────────────────
  # Cierra el bucle del §4: `cierre-perfiles.py` dice cuál es el cierre de hoy, `hydrate-profile.py`
  # hace que la imagen declare el suyo, y esto COMPARA. Sin este paso las otras dos piezas son dos
  # ficheros que no se encuentran.
  #
  # ⚠ PUERTA DIARIA, y no por coste —son milisegundos— sino para no imprimir «0 imágenes» 48 veces
  # al día. Hoy el registro está vacío a propósito: no hay imágenes publicadas. Una línea diaria
  # mantiene la capacidad VIVA y visible; 48 la vuelven invisible, que es el modo de fallo que este
  # guion ya sufrió con el aviso del repo (una línea por hora durante 18 días en un log sin lector).
  IMG_SELLO="work/.imagen-rancia.sello"
  if [ ! -f "$IMG_SELLO" ] || [ -n "$(find "$IMG_SELLO" -mtime +0 2>/dev/null)" ]; then
    touch "$IMG_SELLO"
    if python3 scripts/imagen-rancia.py --registro docs/state/imagenes.txt \
         > work/.imagen-rancia.salida 2>&1; then
      echo "   imagen-rancia ✓ $(sed -n '1s/^== //;1s/ ==$//;1p' work/.imagen-rancia.salida)"
      sed -n '/RANCIA\|a rearmar\|sin declarar/p' work/.imagen-rancia.salida | sed 's/^/      /' | head -6
    else
      echo "   ⚠ imagen-rancia falló"
      tail -2 work/.imagen-rancia.salida | sed 's/^/      /'
    fi
    rm -f work/.imagen-rancia.salida
  fi

  RIO_SELLO="work/.upstream-vigia.sello"
  if [ ! -f "$RIO_SELLO" ] || [ -n "$(find "$RIO_SELLO" -mtime +0 2>/dev/null)" ]; then
    echo "   río arriba: puerta diaria abierta, preguntando a 660 fuentes git (~20 s)…"
    touch "$RIO_SELLO"   # sello = LIMITADOR DE RITMO, no marca de éxito: se toca salga como salga,
                         # o un fallo de red lo reintentaría cada 30 min contra servidores ajenos.
    # A un temporal, y `mv` sólo si tiene contenido: un informe VACÍO publicado borraría el
    # anterior y el khipu diría «sin novedad» por un hueco (regla 3 de CLAUDE.md).
    if nice -n 19 python3 scripts/fuentes/upstream-vigia.py --json work/.upstream.tmp \
         > work/.upstream-vigia.salida 2>&1 && [ -s work/.upstream.tmp ]; then
      mv work/.upstream.tmp docs/state/upstream.json
      echo "   upstream.json ✓ $(python3 -c "
import json; d=json.load(open('docs/state/upstream.json'))
print(f\"{d['con_tag_nuevo']} git con tag nuevo · {d.get('tarballs_con_version_nueva','?')} tarballs con version nueva · {d.get('tarballs_indicio_con_fecha','?')}+{d.get('tarballs_indicio_sin_fecha','?')} indicios (con/sin fecha) · {d['tarballs_sin_mirar']} sin mirar\")" 2>/dev/null || echo '(sin resumen)')"
    else
      echo "   ⚠ upstream-vigia falló o salió vacío — NO piso el informe anterior"
      sed -n '$p' work/.upstream-vigia.salida 2>/dev/null | sed 's/^/      /'
    fi
    rm -f work/.upstream.tmp work/.upstream-vigia.salida
  else
    echo "   río arriba: sello de hoy, no toca (puerta diaria)"
  fi

  AUDIT_SELLO="work/.static-audit.sello"
  if [ ! -f "$AUDIT_SELLO" ] || [ -n "$(find "$AUDIT_SELLO" -mtime +0 2>/dev/null)" ]; then
  # ── VIGÍA DE SONAMES (2026-09-06) ────────────────────────────────────────────────────────────
  # `vigia-sonames.py` existía desde antes y contesta la pregunta que el grafo NO contesta: no
  # «¿está sellado?» sino «¿arranca?». Encuentra los `NEEDED` que ningún artefacto del cierre
  # publica y que el rootfs hidratado resolvía contra el sysroot del LAB.
  #
  # NADIE LO CORRÍA. Por eso `libstdc++.so.6` —que rompía el navegador en los CUATRO perfiles—
  # estuvo en su salida sin que nadie lo leyera, y se redescubrió el 2026-09-06 arrancando `atuq`
  # a mano. Un vigía que hay que acordarse de invocar no se distingue de no tenerlo: es el mismo
  # argumento que `scripts/test-atuq-politica.py` hace sobre los guardianes.
  # Deja fichero de estado para que la salida quede en el repo y se vea si empeora entre cosechas.
  python3 scripts/vigia-sonames.py > docs/state/sonames.txt 2>&1 \
    && echo "   sonames.txt ✓ $(grep -c 'FALTA' docs/state/sonames.txt) hueco(s) sin proveedor" \
    || echo "   ⚠ vigia-sonames.py falló"

  # ── VIGÍA DE SERVICIOS (2026-09-12, SDD 30 §4a) ──────────────────────────────────────────────
  # Contesta la pregunta que ni el grafo ni `vigia-sonames` contestan: no «¿está sellado?» ni
  # «¿arranca el binario?» sino **«¿hay alguien que lo LEVANTE?»**. Un demonio puede estar sellado,
  # con contenido, con todos sus sonames resueltos… y que ninguna imagen lo arranque nunca.
  #
  # Va al latido por la misma lección que dejó escrita `vigia-sonames` doce líneas más arriba —un
  # vigía que hay que acordarse de invocar no se distingue de no tenerlo— y con más motivo: su
  # entrada son DOS ficheros que cambian por separado (las recetas y `targets.toml`), así que la
  # divergencia entre «declarado» y «habilitado» aparece sin que nadie toque el vigía.
  #
  # Corre PRIMERO su propio `--selftest`: si el guardián está roto, su silencio no es una respuesta.
  { echo "servicios por imagen · medido $(ts)"
    echo "── autoprueba del vigía (el primer caso es el CONTROL, tiene que pasar)"
    python3 scripts/targets.py --selftest 2>&1 | sed 's/^/   /'
    for perf in $(python3 scripts/targets.py --lista 2>/dev/null | awk '{print $1}'); do
      echo "── $perf"
      python3 scripts/targets.py --services "$perf" 2>&1 | sed 's/^/   /'
    done
  } > work/.servicios.tmp 2>&1 && mv work/.servicios.tmp docs/state/servicios.txt \
    && echo "   servicios.txt ✓ $(grep -c '^   ERROR' docs/state/servicios.txt) error(es), $(grep -c '^   AVISO' docs/state/servicios.txt) aviso(s)" \
    || echo "   ⚠ vigía de servicios falló"

    echo "   static-audit: puerta diaria abierta, barriendo el store (~8 min, nice 19)…"
    nice -n 19 scripts/static-audit.sh > work/.static-audit.salida 2>&1
    audit_rc=$?
    touch "$AUDIT_SELLO"
    if [ -s work/.static-audit.salida ]; then
      # La primera línea lleva la FECHA DE MEDICIÓN, y no es decoración. Con el frente en verde el
      # texto del audit es constante ("MIENTEN: 0") ⇒ `git diff --cached --quiet` no vería cambio,
      # no se commitearía nada, y dentro de tres meses este fichero sería indistinguible de uno
      # rancio de hoy. Con la fecha, cada barrido deja huella en el `git log`: el khipu muestra que
      # el vigía sigue vivo, no sólo que el último veredicto fue bueno. Es la misma trampa que el
      # build-state-wlr congelado 17 días — un fichero que nadie refresca envejece hacia el
      # optimismo, y acá la prueba de frescura es lo único que distingue "verde" de "sin mirar".
      { echo "audit de enlace estático · medido $(date -u +%FT%TZ) · rc=$audit_rc"
        cat work/.static-audit.salida
      } > work/.static-audit.tmp
      mv work/.static-audit.tmp docs/state/static-audit.txt
      echo "   static-audit.txt ✓ (rc=$audit_rc) $(grep -m1 '^══' docs/state/static-audit.txt || echo '(sin resumen)')"
    else
      echo "   ⚠ static-audit no produjo salida (rc=$audit_rc) — NO piso el veredicto anterior"
    fi
    rm -f work/.static-audit.salida work/.static-audit.tmp
  else
    echo "   static-audit: sello de hoy, no toca (puerta diaria)"
  fi
else
  echo "   ⚠ sin binario hammer en $HAMMER — no regenero estado"
fi

# 4. Commitear SÓLO el estado firme (el avance que el humano sigue). Recetas nuevas que YO autoré se
# commitean aparte, a mano, para no meter autoría a medias en un commit de cron.
if [ "${NO_COMMIT:-}" != "1" ]; then
  # ── PUBLICAR SIN DEPENDER DEL ÁRBOL NI DE LA RAMA LOCAL (2026-10-07) ─────────────────────────
  # Acá había `pull --ff-only` + `git add` + `git commit -- <rutas>` + `push`, con
  # `git-sincronizar.sh` de plan B. Eso ataba la publicación a dos estados que el latido NO
  # controla —el árbol de trabajo y la rama local— y los dos se ensucian solos en una caja
  # compartida. El plan B tampoco servía: `git-sincronizar.sh` hace `pull --rebase`, que se niega
  # con el árbol sucio.
  #
  # MEDIDO el 2026-10-07: `/opt/takana` llevaba **580 commits locales y 12 días sin publicar**.
  # Causa doble — un `scripts/servidor/claude-caja.sh` modificado (que resultó ser BYTE A BYTE lo
  # que ya estaba en origin, o sea trabajo duplicado de otro clon) y la rama divergida, que deja
  # el `--ff-only` sin vuelta posible para siempre. Y el `--ff-only` es a propósito: regla 2 ter,
  # donde un `pull --rebase` en este árbol se llevó un commit por delante.
  #
  # El latido latía cada 30 min diciendo «NO pude publicar el estado — queda local», y nadie lo
  # leía: es la forma exacta de fallo que este guion ya documentó una vez («un latido que late y
  # no publica, para siempre») y que volvió por otra puerta. Los 580 commits contenían, en total,
  # CUATRO LÍNEAS de timestamp.
  #
  # `publicar-estado.sh` arma el commit con plumbing sobre el `origin/main` recién traído, en un
  # índice TEMPORAL: no toca el árbol, no toca el índice compartido (regla 2), no le hace falta que
  # la rama local esté al día, y si otro empuja en el medio reconstruye sobre la cabeza nueva.
  # Nunca fuerza — el rechazo ES la señal, y forzar pisaría al otro.
  "$ROOT/scripts/farm/publicar-estado.sh" \
      --message "estado: cosecha granja $(ts) — avance del árbol KDE" \
    || echo "==> ⚠ no pude publicar el estado — el informe de arriba dice por qué"
fi

echo "── $(ts) cosecha-cron fin"