sergio/takana

1#!/bin/sh
2# takana-install — instalador a disco DESDE el medio live (Etapa E5 / refinamiento #1).
3#
4# Se inyecta en el rootfs del producto como /usr/bin/takana-install (ver scripts/iso-image.sh
5# INSTALLER=1). Corre DENTRO del live, como root real (arje-zero es PID1) ⇒ NO necesita unshare -r
6# ni los rodeos rootless de install-image.sh: particiona, formatea, monta y copia con privilegios
7# reales, usando sólo herramientas que el producto ya trae (busybox fdisk/mke2fs/mount/dd + uutils cp).
8#
9# El sistema que se instala es EL PROPIO LIVE: la raíz en RAM se copia al disco (autoinstalador). El
10# payload de arranque (kernel + GRUB) viaja en /usr/lib/hammer/install/, armado en build-time (el host
11# tiene grub-mkimage; el live no lo necesita).
12#
13# Layout en disco (MBR, no GPT — más simple y busybox-friendly; GRUB va en el hueco post-MBR):
14#   /dev/<dev>1  /                ext2(montable ext4)   + /boot/bzImage + /boot/grub + wrapper /sbin/init
15#   /dev/<dev>2  /store           ext2
16#   /dev/<dev>3  /var/lib/hammer  ext2
17#
18# Cadena de arranque del disco resultante: BIOS → MBR (boot.img) → core.img (hueco post-MBR) →
19# (hd0,msdos1)/boot/grub/grub.cfg → linux /boot/bzImage root=/dev/<dev>1 → wrapper /sbin/init.
20#
21# Modo de uso:
22#   INTERACTIVO (sin argumentos, con TTY):  takana-install
23#       TUI en busybox sh: detecta discos, el usuario elige destino + confirma el borrado, recoge
24#       hostname / credencial de root / zona horaria / teclado / tamaños de partición, y recién ahí
25#       particiona+instala. Es la cara humana del instalador (el /init del ISO installer lo lanza).
26#   DESATENDIDO (con device):  takana-install /dev/vdb [ROOT_MB] [STORE_MB]
27#       Autoinstalador (lo usa iso-install-test.sh con AUTO_INSTALL). La config sale de env:
28#       TAKANA_HOSTNAME / TAKANA_ROOT_PW / TAKANA_ROOT_AUTHKEYS / TAKANA_TZ / TAKANA_KEYMAP.
29#       Los nombres viejos HAMMER_* se siguen aceptando (ADR 0016); gana el nuevo si están los dos.
30set -eu
31
32DEV="${1:-}"
33ROOT_MB="${2:-}"
34STORE_MB="${3:-}"        # /var/lib/hammer toma el resto
35PAYLOAD=/usr/lib/hammer/install
36BB="${BB:-/bin/busybox}"
37SYS_BLOCK="${SYS_BLOCK:-/sys/block}"   # override para tests
38MOUNTS="${MOUNTS:-/proc/mounts}"       # override para tests
39
40# bb: usa el busybox del live si existe; si no (p.ej. tests en el host), cae a las herramientas del PATH.
41# Sólo lo usan las funciones NUEVAS (config/TUI). Las ramas EFI/BIOS validadas siguen con "$BB" literal
42# y jamás corren en el host (el dry-run sale antes).
43bb() { if [ -x "$BB" ]; then "$BB" "$@"; else "$@"; fi; }
44
45_human() {  # bytes → humano
46    _b="$1"
47    if   [ "$_b" -ge 1073741824 ]; then printf '%s.%s GiB' "$((_b/1073741824))" "$(( (_b%1073741824)*10/1073741824 ))"
48    elif [ "$_b" -ge 1048576    ]; then printf '%s MiB' "$((_b/1048576))"
49    else printf '%s B' "$_b"; fi
50}
51
52_is_mounted() {  # ¿alguna partición del disco $1 aparece en MOUNTS? (heurística "es el medio live")
53    _d="$1"
54    while read -r _src _rest; do
55        case "$_src" in "/dev/$_d"|"/dev/$_d"[0-9]*|"/dev/$_d"p[0-9]*) return 0 ;; esac
56    done < "$MOUNTS" 2>/dev/null
57    return 1
58}
59
60list_disks() {  # emite por disco candidato:  name<TAB>bytes<TAB>model<TAB>mounted(0|1)
61    for _p in "$SYS_BLOCK"/*; do
62        [ -d "$_p" ] || continue
63        _n=${_p##*/}
64        case "$_n" in loop*|ram*|sr*|fd*|dm-*|md*|zram*) continue ;; esac
65        [ -r "$_p/size" ] || continue
66        _sz=$(cat "$_p/size" 2>/dev/null || echo 0); [ "$_sz" -gt 0 ] || continue
67        _model=$(cat "$_p/device/model" 2>/dev/null | tr -d '\n'); _model=$(printf '%s' "$_model" | sed 's/[[:space:]]*$//')
68        _m=0; _is_mounted "$_n" && _m=1
69        printf '%s\t%s\t%s\t%s\n' "$_n" "$((_sz*512))" "${_model:-disco}" "$_m"
70    done
71}
72
73ask() {  # ask VAR "prompt" "default"
74    if [ -n "$3" ]; then printf '%s [%s]: ' "$2" "$3"; else printf '%s: ' "$2"; fi
75    IFS= read -r _ans || _ans=""
76    [ -n "$_ans" ] || _ans="$3"
77    eval "$1=\$_ans"
78}
79
80read_secret() {  # read_secret VAR "prompt"  (sin eco si hay stty)
81    printf '%s: ' "$2"
82    bb stty -echo 2>/dev/null || true
83    IFS= read -r _sec || _sec=""
84    bb stty echo 2>/dev/null || true
85    echo
86    eval "$1=\$_sec"
87}
88
89have_cryptpw() { bb 2>&1 | grep -qw cryptpw; }
90
91# ── LA CUENTA DE QUIEN VA A USAR LA MÁQUINA (lib/cuenta.sh) ───────────────────────────────────────
92# Este instalador preguntaba hostname, zona, teclado y la credencial de ROOT — y ningún usuario. En
93# una imagen de escritorio eso es una máquina donde el greeter no puede autenticar a nadie, porque
94# no hay nadie. La sección es compartida con `takana-install-partition.sh` y vive en la librería:
95# son DOS caminos y UNA pregunta, el mismo argumento que escribe `lib/usuarios-del-home.sh`.
96#
97# ⚠ Se busca en dos sitios porque este script **se inyecta como `/usr/bin/takana-install`** dentro
98# del producto (`iso-image.sh`), donde `scripts/lib/` no existe: ahí la librería viaja a
99# `/usr/lib/takana/cuenta.sh`. Y si no viajó, no se muere el instalador — se dice en el resumen,
100# que es donde alguien lo va a leer antes de apretar.
101for _lib_cuenta in "$(dirname "$0")/lib/cuenta.sh" /usr/lib/takana/cuenta.sh; do
102    [ -r "$_lib_cuenta" ] && { . "$_lib_cuenta"; break; }
103done
104if ! command -v cuenta_preguntar >/dev/null 2>&1; then
105    cuenta_preguntar() { :; }
106    cuenta_aplicar() { :; }
107    cuenta_resumen() { printf 'NINGUNA — lib/cuenta.sh no viajó en este medio'; }
108fi
109
110# Reescribe el campo de contraseña de un usuario en $mnt/etc/shadow (o crea el fichero).
111_set_shadow() {
112    _u="$1"; _h="$2"; _f="$3/etc/shadow"
113    if [ ! -f "$_f" ]; then
114        bb mkdir -p "$3/etc"
115        printf '%s:%s:19000:0:99999:7:::\n' "$_u" "$_h" > "$_f"; bb chmod 600 "$_f"; return
116    fi
117    _t="$_f.hammer-tmp"
118    bb awk -F: -v u="$_u" -v h="$_h" 'BEGIN{OFS=":"}
119        { if ($1==u){ $2=h; seen=1 } print }
120        END{ if(!seen) print u,h,"19000","0","99999","7","","","" }' "$_f" > "$_t" && bb mv "$_t" "$_f"
121    bb chmod 600 "$_f"
122}
123
124# Aplica la config recogida al rootfs YA copiado y montado en $1 (llamada por ambas ramas tras la copia).
125apply_post_install_config() {
126    _mnt="$1"
127    bb mkdir -p "$_mnt/etc/hammer"
128    if [ -n "${CFG_HOSTNAME:-}" ]; then
129        printf '%s\n' "$CFG_HOSTNAME" > "$_mnt/etc/hostname"
130        if ! grep -q "[[:space:]]$CFG_HOSTNAME\$" "$_mnt/etc/hosts" 2>/dev/null; then
131            printf '127.0.0.1\tlocalhost %s\n::1\t\tlocalhost %s\n' "$CFG_HOSTNAME" "$CFG_HOSTNAME" >> "$_mnt/etc/hosts"
132        fi
133    fi
134    if [ -n "${CFG_ROOT_HASH:-}" ]; then _set_shadow root "$CFG_ROOT_HASH" "$_mnt"; fi
135    # La cuenta: usuario, su contraseña, su hogar, los grupos del hardware y la regla de doas. Lleva
136    # su propio brazo de control adentro y devuelve ≠0 si no quedó escrita — se dice fuerte, porque
137    # una cuenta que no quedó sólo se descubre al primer arranque, y arreglarla desde ahí pide montar
138    # el disco desde otro sistema.
139    cuenta_aplicar "$_mnt" || echo "  ⚠ LA CUENTA NO QUEDÓ ESCRITA: revisá /etc/passwd y /etc/shadow antes de reiniciar" >&2
140    if [ -n "${CFG_ROOT_AUTHKEYS:-}" ]; then
141        bb mkdir -p "$_mnt/root/.ssh"; bb chmod 700 "$_mnt/root/.ssh"
142        printf '%s\n' "$CFG_ROOT_AUTHKEYS" >> "$_mnt/root/.ssh/authorized_keys"
143        bb chmod 600 "$_mnt/root/.ssh/authorized_keys"
144    fi
145    if [ -n "${CFG_TZ:-}" ] && [ -e "$_mnt/usr/share/zoneinfo/$CFG_TZ" ]; then
146        bb ln -sf "/usr/share/zoneinfo/$CFG_TZ" "$_mnt/etc/localtime"
147        printf '%s\n' "$CFG_TZ" > "$_mnt/etc/timezone"
148    fi
149    _ts=$(bb date -u +%FT%TZ 2>/dev/null || echo unknown)
150    {
151        echo "# escrito por takana-install en $_ts"
152        echo "HOSTNAME=${CFG_HOSTNAME:-}"
153        echo "TIMEZONE=${CFG_TZ:-}"
154        echo "KEYMAP=${CFG_KEYMAP:-}"     # best-effort: el producto aún no trae kbd/loadkeys
155        echo "TARGET=${DEV:-}"
156    } > "$_mnt/etc/hammer/install.conf"
157}
158
159# ---- recolección de config: interactiva (TUI) o desde env (desatendido) ----
160CFG_HOSTNAME="${TAKANA_HOSTNAME:-${HAMMER_HOSTNAME:-takana}}"
161CFG_ROOT_AUTHKEYS="${TAKANA_ROOT_AUTHKEYS:-${HAMMER_ROOT_AUTHKEYS:-}}"
162CFG_ROOT_HASH="${TAKANA_ROOT_HASH:-${HAMMER_ROOT_HASH:-}}"
163CFG_TZ="${TAKANA_TZ:-${HAMMER_TZ:-}}"
164CFG_KEYMAP="${TAKANA_KEYMAP:-${HAMMER_KEYMAP:-us}}"
165
166interactive_setup() {
167    echo
168    echo "   #  instalador de hammer"
169    echo "   ─────────────────────────"
170    echo
171    _disks=$(list_disks)
172    [ -n "$_disks" ] || { echo "No detecté discos instalables (¿el medio live es el único dispositivo?)."; exit 1; }
173    echo "Discos detectados:"
174    OLDIFS=$IFS; IFS='
175'; set --
176    for _l in $_disks; do set -- "$@" "$_l"; done
177    IFS=$OLDIFS
178    _i=1
179    for _l in "$@"; do
180        _n=$(printf '%s' "$_l" | cut -f1); _by=$(printf '%s' "$_l" | cut -f2)
181        _mo=$(printf '%s' "$_l" | cut -f3); _mm=$(printf '%s' "$_l" | cut -f4)
182        _w=""; [ "$_mm" = 1 ] && _w="   ⚠ montado (¿medio live?)"
183        printf '  %s) /dev/%-8s %10s   %s%s\n' "$_i" "$_n" "$(_human "$_by")" "$_mo" "$_w"
184        _i=$((_i+1))
185    done
186    _total=$#
187    while :; do
188        ask _sel "Disco destino (1-$_total)" ""
189        case "$_sel" in ''|*[!0-9]*) echo "  número inválido"; continue ;; esac
190        [ "$_sel" -ge 1 ] && [ "$_sel" -le "$_total" ] && break
191        echo "  fuera de rango"
192    done
193    eval "_line=\${$_sel}"
194    _name=$(printf '%s' "$_line" | cut -f1); _bytes=$(printf '%s' "$_line" | cut -f2)
195    DEV="/dev/$_name"
196    _disk_mb=$((_bytes/1048576))
197
198    # --- tamaños de partición ---
199    _esp=64; _slack=16; _avail=$((_disk_mb - _esp - _slack))
200    [ "$_avail" -ge 600 ] || { echo "Disco demasiado chico ($(_human "$_bytes")); se necesitan ~700 MiB."; exit 1; }
201    _defr=4096; [ "$_defr" -gt $((_avail*6/10)) ] && _defr=$((_avail*6/10))
202    _defs=1024; [ "$_defs" -gt $((_avail/5)) ] && _defs=$((_avail/5))
203    while :; do
204        ask ROOT_MB  "Tamaño de / en MB"      "$_defr"
205        ask STORE_MB "Tamaño de /store en MB" "$_defs"
206        case "$ROOT_MB$STORE_MB" in *[!0-9]*) echo "  usá sólo números"; continue ;; esac
207        if [ $((ROOT_MB + STORE_MB + _esp + _slack)) -le "$_disk_mb" ]; then break; fi
208        echo "  no entra en el disco ($_disk_mb MiB) — / + /store + ESP deben sumar menos"
209    done
210
211    # --- identidad ---
212    ask CFG_HOSTNAME "Hostname" "${CFG_HOSTNAME:-hammer}"
213    echo "Credencial de root:"
214    echo "  1) contraseña"
215    echo "  2) clave SSH (authorized_keys)"
216    echo "  3) omitir"
217    ask _cred "Opción" "1"
218    case "$_cred" in
219        1)  if have_cryptpw; then
220                while :; do
221                    read_secret _pw1 "Contraseña de root"
222                    read_secret _pw2 "Repetir"
223                    [ "$_pw1" = "$_pw2" ] && [ -n "$_pw1" ] && break
224                    echo "  no coinciden (o vacía) — reintentá"
225                done
226                CFG_ROOT_HASH=$(printf '%s' "$_pw1" | bb cryptpw -m sha512 2>/dev/null || true)
227                [ -n "$CFG_ROOT_HASH" ] || echo "  ⚠ no pude generar el hash; root queda como está"
228            else
229                echo "  (cryptpw no disponible en este busybox — usá la opción de clave SSH)"
230                ask CFG_ROOT_AUTHKEYS "Pegá una línea authorized_keys" ""
231            fi ;;
232        2)  ask CFG_ROOT_AUTHKEYS "Pegá una línea authorized_keys (o ruta a un fichero .pub)" ""
233            if [ -n "$CFG_ROOT_AUTHKEYS" ] && [ -f "$CFG_ROOT_AUTHKEYS" ]; then
234                CFG_ROOT_AUTHKEYS=$(cat "$CFG_ROOT_AUTHKEYS")
235            fi ;;
236        *)  echo "  (root sin credencial nueva)" ;;
237    esac
238
239    # --- la cuenta de quien va a usar la máquina ---
240    # Va después de la credencial de root y le pasa lo ya decidido, para no preguntar dos veces por
241    # lo mismo: la librería sólo insiste con root si NADIE puede escalar, que es la única
242    # combinación que deja una máquina inadministrable.
243    CUENTA_ROOT_HASH="$CFG_ROOT_HASH"
244    # La raíz que se MIRA para saber si hay con qué escalar. En producción es "/" —el medio live es
245    # el sistema que se copia—; en el arnés es el rootfs de scratch, porque si no el test
246    # dependería de si la máquina que lo corre tiene sudo instalado.
247    cuenta_preguntar "${TAKANA_INSTALL_TESTROOT:-${HAMMER_INSTALL_TESTROOT:-/}}"
248    CFG_ROOT_HASH="$CUENTA_ROOT_HASH"
249
250    # --- locale (best-effort) ---
251    _zi="${ZONEINFO:-/usr/share/zoneinfo}"
252    if [ -d "$_zi" ]; then
253        ask CFG_TZ "Zona horaria (ej. America/La_Paz; vacío = UTC)" "${CFG_TZ:-}"
254        if [ -n "$CFG_TZ" ] && [ ! -e "$_zi/$CFG_TZ" ]; then
255            echo "  ⚠ zona desconocida, se ignora"; CFG_TZ=""
256        fi
257    else
258        echo "(tzdata no instalado — la zona horaria se omite)"; CFG_TZ=""
259    fi
260    ask CFG_KEYMAP "Layout de teclado" "${CFG_KEYMAP:-us}"
261
262    # --- resumen + confirmación fuerte ---
263    _cd="sin cambios"; [ -n "$CFG_ROOT_HASH" ] && _cd="contraseña"; [ -n "$CFG_ROOT_AUTHKEYS" ] && _cd="clave SSH"
264    echo
265    echo "Resumen de instalación:"
266    echo "  destino : $DEV   ($(_human "$_bytes"))"
267    echo "  / = ${ROOT_MB} MiB    /store = ${STORE_MB} MiB    /var/lib/hammer = resto"
268    echo "  hostname: $CFG_HOSTNAME"
269    echo "  root    : $_cd"
270    echo "  usuario : $(cuenta_resumen)"
271    echo "  zona    : ${CFG_TZ:-UTC}    teclado: $CFG_KEYMAP"
272    echo
273    echo "  ⚠  ESTO BORRA TODO EN $DEV."
274    ask _ok "Escribí el nombre del disco ($DEV) para confirmar, o Enter para cancelar" ""
275    [ "$_ok" = "$DEV" ] || { echo "Cancelado — no se tocó ningún disco."; exit 1; }
276}
277
278# --- resolución del modo: interactivo (sin device + TTY) vs desatendido (device dado) ---
279if [ -z "$DEV" ]; then
280    if [ -t 0 ] || [ "${TAKANA_INSTALL_INTERACTIVE:-${HAMMER_INSTALL_INTERACTIVE:-}}" = 1 ]; then
281        interactive_setup
282    else
283        echo "uso: takana-install <device> [ROOT_MB] [STORE_MB]   (o sin args con un TTY para el modo interactivo)" >&2
284        exit 2
285    fi
286fi
287ROOT_MB="${ROOT_MB:-1500}"
288STORE_MB="${STORE_MB:-400}"
289# En modo desatendido con contraseña por env, derivar el hash acá (interactivo ya lo hizo).
290if [ -z "$CFG_ROOT_HASH" ] && [ -n "${TAKANA_ROOT_PW:-${HAMMER_ROOT_PW:-}}" ] && have_cryptpw; then
291    CFG_ROOT_HASH=$(printf '%s' "${TAKANA_ROOT_PW:-$HAMMER_ROOT_PW}" | bb cryptpw -m sha512 2>/dev/null || true)
292fi
293
294# --- gancho de prueba: valida TUI + config sin tocar disco (TAKANA_INSTALL_DRYRUN=1) ---
295if [ "${TAKANA_INSTALL_DRYRUN:-${HAMMER_INSTALL_DRYRUN:-}}" = 1 ]; then
296    echo "== DRYRUN: plan de instalación =="
297    echo "  DEV=$DEV  ROOT_MB=$ROOT_MB  STORE_MB=$STORE_MB"
298    echo "  HOSTNAME=$CFG_HOSTNAME  TZ=${CFG_TZ:-UTC}  KEYMAP=$CFG_KEYMAP"
299    echo "  ROOT_HASH=$([ -n "$CFG_ROOT_HASH" ] && echo set || echo -)  AUTHKEYS=$([ -n "$CFG_ROOT_AUTHKEYS" ] && echo set || echo -)"
300    _testroot="${TAKANA_INSTALL_TESTROOT:-${HAMMER_INSTALL_TESTROOT:-}}"
301    if [ -n "$_testroot" ]; then
302        apply_post_install_config "$_testroot"
303        echo "  config aplicada a $_testroot"
304    fi
305    exit 0
306fi
307
308[ -b "$DEV" ] || { echo "takana-install: $DEV no es un block device" >&2; exit 1; }
309[ -d "$PAYLOAD" ] || { echo "takana-install: falta el payload $PAYLOAD (¿ISO sin INSTALLER=1?)" >&2; exit 1; }
310
311# --- Detección de firmware: UEFI ⇒ rama EFI-stub SOBERANA (ADR 0010 paso 5); BIOS ⇒ MBR+GRUB (abajo) ---
312# La rama EFI usa una ESP tipo 0xEF en tabla MBR (UEFI arranca \EFI\BOOT\BOOTX64.EFI de una ESP MBR igual
313# que de GPT) ⇒ alcanza con busybox fdisk/mkfs.vfat/mount, sin GPT-tool ni mtools. El bzImage metal ES el
314# binario EFI (EFI-stub, cmdline horneada carga el initrd); un initramfs mínimo pivota por LABEL. Mismos
315# artefactos que scripts/install-image-efi.sh (validado en OVMF), armados desde dentro del live.
316if [ -d /sys/firmware/efi ]; then
317    [ -r "$PAYLOAD/kernel/bzImage-efi" ] || { echo "takana-install: live en UEFI pero falta $PAYLOAD/kernel/bzImage-efi (ISO sin kernel metal)" >&2; exit 1; }
318    ESP_MB="${ESP_MB:-64}"
319    echo "==> takana-install (UEFI): EFI-stub soberano en $DEV (ESP ${ESP_MB}M, root ${ROOT_MB}M, store ${STORE_MB}M, estado=resto)"
320    echo "    ¡esto BORRA $DEV!"
321
322    # Informe del terreno ANTES de tocar nada (ADR 0018 §4). Esta rama se lleva el disco ENTERO, así
323    # que lo que hay que decir en voz alta no es sólo «cuánto espacio hay»: es **con qué se va a
324    # llevar puesto**. Si en la ESP de este disco hay un `\EFI\Microsoft`, el survey lo nombra, y el
325    # usuario se entera ANTES y no después de que su Windows dejó de arrancar.
326    #
327    # No escribe nada y no puede fallar el instalador: `|| true`. Su trabajo es informar.
328    if [ -x "$PAYLOAD/hammer" ]; then
329        echo "==> terreno actual de $DEV (nada de esto se ha tocado todavía):"
330        "$PAYLOAD/hammer" boot entry survey --disk "$DEV" 2>&1 | "$BB" sed 's/^/    /' || true
331    fi
332
333    # MBR, 4 primarias: p1=ESP(0xEF) p2=root p3=store p4=estado. Sectores explícitos (como la rama BIOS).
334    SPM=2048
335    P1S=2048;            P1E=$(( P1S + ESP_MB  * SPM - 1 ))
336    P2S=$(( P1E + 1 ));  P2E=$(( P2S + ROOT_MB * SPM - 1 ))
337    P3S=$(( P2E + 1 ));  P3E=$(( P3S + STORE_MB* SPM - 1 ))
338    P4S=$(( P3E + 1 ))   # estado = resto del disco
339    echo "==> particionando $DEV (MBR: ESP ${P1S}-${P1E} tipo ef, root ${P2S}-${P2E}, store ${P3S}-${P3E}, estado ${P4S}-fin)"
340    "$BB" fdisk "$DEV" >/dev/null 2>&1 <<FDISK || true
341o
342n
343p
3441
345$P1S
346$P1E
347n
348p
3492
350$P2S
351$P2E
352n
353p
3543
355$P3S
356$P3E
357n
358p
3594
360$P4S
361
362t
3631
364ef
365a
3661
367w
368FDISK
369    "$BB" partprobe "$DEV" 2>/dev/null || true
370    "$BB" sync; sleep 1
371    P1="${DEV}1"; P2="${DEV}2"; P3="${DEV}3"; P4="${DEV}4"
372    for p in "$P1" "$P2" "$P3" "$P4"; do
373        [ -b "$p" ] || { echo "takana-install: no apareció la partición $p tras particionar" >&2; exit 1; }
374    done
375
376    echo "==> formateando (ESP FAT32 + 3 ext2 etiquetadas para el pivote por LABEL)"
377    "$BB" mkfs.vfat -F 32 -n HAMMER "$P1" >/dev/null 2>&1
378    "$BB" mke2fs -F -L hammer-root  "$P2" >/dev/null 2>&1
379    "$BB" mke2fs -F -L hammer-store "$P3" >/dev/null 2>&1
380    "$BB" mke2fs -F -L hammer-state "$P4" >/dev/null 2>&1
381
382    # initramfs de pivote (busybox estático del live + /init: findfs LABEL=takana-root → switch_root).
383    echo "==> armando el initramfs de pivote (busybox + /init switch_root a hammer-root)"
384    IRD_TREE=/run/hammer-efi-ird
385    "$BB" rm -rf "$IRD_TREE"
386    "$BB" mkdir -p "$IRD_TREE/bin" "$IRD_TREE/dev" "$IRD_TREE/proc" "$IRD_TREE/sys" "$IRD_TREE/newroot"
387    cp "$BB" "$IRD_TREE/bin/busybox"; "$BB" chmod 0755 "$IRD_TREE/bin/busybox"
388    for a in sh mount umount findfs switch_root mkdir echo sleep; do "$BB" ln -sf busybox "$IRD_TREE/bin/$a"; done
389    cat > "$IRD_TREE/init" <<'INIT'
390#!/bin/busybox sh
391export PATH=/bin
392mount -t proc     proc /proc 2>/dev/null || true
393mount -t sysfs    sys  /sys  2>/dev/null || true
394mount -t devtmpfs dev  /dev  2>/dev/null || true
395log() { echo "$*"; echo "$*" > /dev/ttyS0 2>/dev/null || true; }
396log "HAMMER-EFI: initramfs de pivote — resolviendo hammer-root por LABEL"
397ROOTDEV=""
398for _try in 1 2 3 4 5; do
399    ROOTDEV="$(findfs LABEL=hammer-root 2>/dev/null || true)"
400    [ -n "$ROOTDEV" ] && break
401    log "HAMMER-EFI: hammer-root aún no visible, reintento $_try…"; sleep 1
402done
403[ -n "$ROOTDEV" ] || { log "HAMMER-EFI-FALLO: no encuentro LABEL=hammer-root"; exec sh; }
404log "HAMMER-EFI: hammer-root = $ROOTDEV → montando en /newroot"
405mount -t ext4 "$ROOTDEV" /newroot || { log "HAMMER-EFI-FALLO: no pude montar $ROOTDEV"; exec sh; }
406STOREDEV="$(findfs LABEL=hammer-store 2>/dev/null || true)"
407STATEDEV="$(findfs LABEL=hammer-state 2>/dev/null || true)"
408[ -n "$STOREDEV" ] && mount -t ext4 "$STOREDEV" /newroot/store          2>/dev/null || true
409[ -n "$STATEDEV" ] && mount -t ext4 "$STATEDEV" /newroot/var/lib/hammer  2>/dev/null || true
410log "HAMMER-EFI-DISK-PIVOT-OK: switch_root → /sbin/init"
411exec switch_root /newroot /sbin/init
412INIT
413    "$BB" chmod +x "$IRD_TREE/init"
414    ( cd "$IRD_TREE" && "$BB" find . | "$BB" cpio -o -H newc 2>/dev/null | "$BB" gzip -1 ) > /run/hammer-efi-ird.cpio.gz
415
416    # Poblar la ESP con el kernel en DOS rutas (ADR 0018 §3), porque una sola es un punto único de
417    # fallo que NO controlamos:
418    #   \EFI\takana\takanax64.efi  el vendor path — nuestro, no lo reclama nadie más.
419    #   \EFI\BOOT\BOOTX64.EFI      la ruta FALLBACK de medios removibles (spec UEFI): tierra de nadie
420    #                                y lo único que arranca SIN entrada NVRAM, que es lo que hay hoy
421    #                                (takana todavía no crea entradas: hace falta efibootmgr/efivar).
422    # Es el mismo fichero dos veces: cuesta bytes de ESP, no complejidad.
423    echo "==> poblando la ESP (\\EFI\\takana\\takanax64.efi + \\EFI\\BOOT\\BOOTX64.EFI = kernel metal + \\initramfs.cpio.gz)"
424    ESPMNT=/run/hammer-esp
425    "$BB" mkdir -p "$ESPMNT"
426    "$BB" mount -t vfat "$P1" "$ESPMNT"
427    "$BB" mkdir -p "$ESPMNT/EFI/BOOT" "$ESPMNT/EFI/takana"
428
429    # Guardián de capacidad (ADR 0018 §4): comprobar ANTES, con los números a la vista. Un `cp` que
430    # se queda sin sitio en FAT32 deja un fichero TRUNCADO y devuelve error tarde — y un BOOTX64.EFI
431    # a medias no falla: arranca y muere en el firmware, que es la peor forma de enterarse.
432    _k_kb=$( "$BB" du -k "$PAYLOAD/kernel/bzImage-efi" | "$BB" awk '{print $1}' )
433    _i_kb=$( "$BB" du -k /run/hammer-efi-ird.cpio.gz   | "$BB" awk '{print $1}' )
434    _free_kb=$( "$BB" df -k "$ESPMNT" | "$BB" awk 'NR==2{print $4}' )
435    _need_kb=$(( _k_kb * 2 + _i_kb + 256 ))
436    echo "    kernel $(( _k_kb / 1024 ))M x2 + initramfs $(( _i_kb / 1024 ))M = $(( _need_kb / 1024 ))M sobre $(( _free_kb / 1024 ))M libres en la ESP"
437    if [ "$_need_kb" -gt "$_free_kb" ]; then
438        "$BB" umount "$ESPMNT"
439        echo "TAKANA-INSTALL-FAIL: no entra en la ESP — hacen falta $(( _need_kb / 1024 ))M y hay $(( _free_kb / 1024 ))M libres." >&2
440        echo "                     subí ESP_MB (actual ${ESP_MB}M) o liberá la ESP." >&2
441        exit 1
442    fi
443
444    cp "$PAYLOAD/kernel/bzImage-efi" "$ESPMNT/EFI/takana/takanax64.efi"
445    cp "$PAYLOAD/kernel/bzImage-efi" "$ESPMNT/EFI/BOOT/BOOTX64.EFI"
446    cp /run/hammer-efi-ird.cpio.gz   "$ESPMNT/initramfs.cpio.gz"
447    "$BB" sync
448    # Verificar las DOS rutas y el initramfs por TAMAÑO, no por presencia: un `cp` truncado deja el
449    # fichero ahí y `test -e` diría que todo salió bien (regla 3 de CLAUDE.md).
450    for _pair in "EFI/takana/takanax64.efi:$_k_kb" "EFI/BOOT/BOOTX64.EFI:$_k_kb" "initramfs.cpio.gz:$_i_kb"; do
451        _f="${_pair%:*}"; _want="${_pair##*:}"
452        _got=$( "$BB" du -k "$ESPMNT/$_f" 2>/dev/null | "$BB" awk '{print $1}' )
453        [ "${_got:-0}" = "$_want" ] || {
454            "$BB" umount "$ESPMNT"
455            echo "TAKANA-INSTALL-FAIL: $_f quedó en ${_got:-0}K, se esperaban ${_want}K (ESP llena o cp truncado)" >&2
456            exit 1
457        }
458    done
459    echo "    ESP verificada: las dos rutas del kernel y el initramfs con su tamaño completo"
460    "$BB" umount "$ESPMNT"
461
462    # Poblar la root (copia del live) — sin wrapper que monte particiones (el pivote ya montó store/estado).
463    echo "==> copiando la raíz del live → $P2 (excluye virtuales/efímeros, /store, /var/lib/hammer, payload)"
464    MNT=/run/takana-install
465    "$BB" mkdir -p "$MNT"
466    "$BB" mount -t ext4 "$P2" "$MNT"
467    for entry in /* /.[!.]*; do
468        [ -e "$entry" ] || continue
469        name="${entry##*/}"
470        case "$name" in
471            proc|sys|dev|run|tmp|store|init) continue ;;
472            *) cp -a "$entry" "$MNT/" 2>/dev/null || true ;;
473        esac
474    done
475    "$BB" rm -rf "$MNT/var/lib/hammer" 2>/dev/null || true
476    "$BB" rm -rf "$MNT/usr/lib/hammer/install" 2>/dev/null || true
477    "$BB" mkdir -p "$MNT/store" "$MNT/var/lib/hammer" "$MNT/proc" "$MNT/sys" "$MNT/dev" "$MNT/run" "$MNT/tmp"
478    # /sbin/init: wrapper que auto-sana un upgrade interrumpido y arranca arje-zero (el pivote ya montó
479    # store/estado por LABEL, así que acá NO hace falta montar nada — sólo hammer-recover + exec).
480    if [ -x "$PAYLOAD/hammer-recover" ]; then
481        "$BB" mkdir -p "$MNT/usr/sbin"
482        cp "$PAYLOAD/hammer-recover" "$MNT/usr/sbin/hammer-recover"; "$BB" chmod 0755 "$MNT/usr/sbin/hammer-recover"
483    fi
484    # CLI takana (static musl) para el menú de arranque por grafo (ADR 0010): lo copia al disco desde el
485    # payload; el wrapper lo invoca como `takana boot menu`.
486    if [ -x "$PAYLOAD/hammer" ]; then
487        cp "$PAYLOAD/hammer" "$MNT/usr/bin/hammer"; "$BB" chmod 0755 "$MNT/usr/bin/hammer"
488    fi
489    "$BB" rm -f "$MNT/sbin/init"
490    cat > "$MNT/sbin/init" <<'INIT'
491#!/bin/sh
492# Wrapper PID1 (rama UEFI): el initramfs de pivote ya montó / /store /var/lib/hammer por LABEL antes del
493# switch_root; sólo auto-sanamos un upgrade interrumpido y arrancamos el init real. El marcador a
494# /dev/ttyS0 sobrevive `quiet` (que suprime el printk kernel-side) ⇒ prueba serie de que llegó a PID1.
495# busybox switch_root NO mueve /dev ⇒ montamos devtmpfs antes (si no, /dev/ttyS0 aún no existe).
496/bin/busybox mount -t devtmpfs dev /dev 2>/dev/null || true
497echo "HAMMER-EFI-INIT-OK: arje-zero PID1" > /dev/ttyS0 2>/dev/null || true
498[ -x /usr/sbin/hammer-recover ] && /usr/sbin/hammer-recover || true
499# Menú de arranque por grafo (ADR 0010): emite /run/hammer/boot-graph.json y, si hay compositor (mirada),
500# lo pinta sobre KMS. Graceful (sin compositor sigue) y al serial (no pinta tty0 ⇒ cero-parpadeo).
501[ -x /usr/bin/hammer ] && /usr/bin/hammer boot menu > /dev/ttyS0 2>&1 || true
502# efivarfs: sin montarlo la NVRAM del firmware no se ve. El directorio sólo existe si arrancamos por
503# UEFI, así que el `[ -d ]` distingue UEFI de BIOS sin preguntarle a nadie.
504# switch_root no arrastra /sys (ni /dev): sin esto el directorio de efivars no existe y el
505# reconciliador diagnostica «no arrancó por UEFI» en una máquina que sí lo hizo.
506/bin/busybox mount -t sysfs sys /sys 2>/dev/null || true
507[ -d /sys/firmware/efi/efivars ] && /bin/busybox mount -t efivarfs efivarfs /sys/firmware/efi/efivars 2>/dev/null || true
508# Reconciliador del arranque (ADR 0018 §2): la NVRAM es estado compartido y el vecino la reescribe
509# sin avisar. Converger en cada arranque, y DECIRLO en pantalla cuando hubo que actuar — si repara
510# en silencio, el usuario nunca se entera de que algo le está pisando el arranque.
511[ -x /usr/bin/hammer ] && /bin/busybox timeout 15 /usr/bin/hammer boot entry reconcile 2>&1 \
512    | /bin/busybox tee /dev/tty0 > /dev/ttyS0 2>/dev/null || true
513
514# Respaldo del arranque (ADR 0018 §5). Se hace DESPUÉS de reconciliar, así lo que queda guardado es
515# el estado bueno y no el que dejó el vecino. El nombre del fichero sale del CONTENIDO: un arranque
516# que no cambió produce el mismo fichero, así que esto corre en cada arranque sin llenar la
517# partición de estado con copias idénticas.
518#
519# Vive en /var/lib/hammer, que en las imágenes es su propia partición y sobrevive a una reinstalación
520# del sistema. **No va al store**: el store lo barre `store-gc.sh`, que clasifica por nombre de
521# receta — un respaldo ahí sería «huérfano» y se borraría en el primer `--huerfanos`.
522[ -x /usr/bin/hammer ] && /bin/busybox timeout 15 /usr/bin/hammer boot entry backup > /dev/ttyS0 2>&1 || true
523exec /usr/bin/arje-zero
524INIT
525    "$BB" chmod +x "$MNT/sbin/init"
526    # config del usuario (hostname / root / zona / teclado) recogida al inicio
527    apply_post_install_config "$MNT"
528    "$BB" sync
529    "$BB" umount "$MNT"
530
531    echo "✓ takana-install (UEFI): $DEV instalado con EFI-stub SOBERANO (sin GRUB ni systemd-boot). Reiniciá sin el medio live."
532    exit 0
533fi
534
535# ===================== rama BIOS (MBR + GRUB) — el firmware NO es UEFI ==============================
536[ -r "$PAYLOAD/grub/boot.img" ] && [ -r "$PAYLOAD/grub/core.img" ] || { echo "takana-install: payload GRUB incompleto" >&2; exit 1; }
537[ -r "$PAYLOAD/kernel/bzImage" ] || { echo "takana-install: falta el kernel en el payload" >&2; exit 1; }
538
539echo "==> takana-install: instalando el sistema live en $DEV (root ${ROOT_MB}M, store ${STORE_MB}M, estado=resto)"
540echo "    ¡esto BORRA $DEV!"
541
542# --- particionar MBR con busybox fdisk (3 primarias; p1 bootable) ---
543# Pasamos sectores de inicio/fin EXPLÍCITOS para las tres: busybox fdisk, al pedir el inicio por
544# defecto, ofrece el sector LIBRE MÁS BAJO (= el hueco 63..2047 que dejamos antes de p1) ⇒ con <enter>
545# colocaría p2 en ese hueco. Por eso computamos los sectores y los tecleamos.
546#   p1 ARRANCA EN 2048 (1 MiB) A PROPÓSITO: deja un hueco post-MBR de 2047 sectores para el core.img de
547#   GRUB (~281 sectores). El default CHS de busybox (sector 63 ⇒ hueco de 62) lo DESBORDA, pisando el
548#   filesystem de p1 ⇒ GRUB cae a `grub>`.
549SPM=2048
550P1S=2048;                  P1E=$(( P1S + ROOT_MB  * SPM - 1 ))
551P2S=$(( P1E + 1 ));        P2E=$(( P2S + STORE_MB * SPM - 1 ))
552P3S=$(( P2E + 1 ))         # p3 toma hasta el final del disco (último sector = default)
553echo "==> particionando $DEV (MBR: p1 ${P1S}-${P1E}, p2 ${P2S}-${P2E}, p3 ${P3S}-fin)"
554"$BB" fdisk "$DEV" >/dev/null 2>&1 <<FDISK || true
555o
556n
557p
5581
559$P1S
560$P1E
561n
562p
5632
564$P2S
565$P2E
566n
567p
5683
569$P3S
570
571a
5721
573w
574FDISK
575"$BB" partprobe "$DEV" 2>/dev/null || true
576"$BB" sync; sleep 1
577
578P1="${DEV}1"; P2="${DEV}2"; P3="${DEV}3"
579for p in "$P1" "$P2" "$P3"; do
580    [ -b "$p" ] || { echo "takana-install: no apareció la partición $p tras particionar" >&2; exit 1; }
581done
582
583# --- formatear (busybox mke2fs = ext2; el driver ext4 del kernel lo monta) ---
584echo "==> formateando particiones (ext2, montables como ext4)"
585"$BB" mke2fs -F -L hammer-root  "$P1" >/dev/null 2>&1
586"$BB" mke2fs -F -L hammer-store "$P2" >/dev/null 2>&1
587"$BB" mke2fs -F -L hammer-state "$P3" >/dev/null 2>&1
588
589# --- copiar la raíz del live a la partición root, excluyendo virtuales + el payload ---
590MNT=/run/takana-install
591"$BB" mkdir -p "$MNT"
592"$BB" mount -t ext4 "$P1" "$MNT"
593echo "==> copiando la raíz del live → $P1 (excluye virtuales/efímeros, /store, /var/lib/hammer y el payload)"
594# Enumeramos TODO el top-level de / y copiamos salvo lo virtual/efímero — así no se nos escapa ningún
595# dir del producto (p.ej. /ente con la seed.card, /linuxrc). uutils cp -a preserva modos/symlinks.
596for entry in /* /.[!.]*; do
597    [ -e "$entry" ] || continue
598    name="${entry##*/}"
599    case "$name" in
600        proc|sys|dev|run|tmp|store|init) continue ;;  # virtuales/efímeros + el /init marcador del live
601        *) cp -a "$entry" "$MNT/" 2>/dev/null || true ;;
602    esac
603done
604# /var sin /var/lib/hammer (estado) — se recrea vacío como mountpoint.
605"$BB" rm -rf "$MNT/var/lib/hammer" 2>/dev/null || true
606# Quitar el payload del disco instalado (sólo sirve en el live) y recrear mountpoints.
607"$BB" rm -rf "$MNT/usr/lib/hammer/install" 2>/dev/null || true
608"$BB" mkdir -p "$MNT/store" "$MNT/var/lib/hammer" "$MNT/proc" "$MNT/sys" "$MNT/dev" "$MNT/run" "$MNT/tmp" "$MNT/boot/grub/i386-pc"
609
610# --- /boot: kernel + módulos GRUB + grub.cfg, y wrapper /sbin/init (monta las particiones dedicadas) ---
611echo "==> poblando /boot (kernel + GRUB) y wrapper /sbin/init"
612cp "$PAYLOAD/kernel/bzImage" "$MNT/boot/bzImage"; "$BB" chmod 0644 "$MNT/boot/bzImage"
613cp "$PAYLOAD"/grub/i386-pc/*.mod "$MNT/boot/grub/i386-pc/" 2>/dev/null || true
614cp "$PAYLOAD"/grub/i386-pc/*.lst "$MNT/boot/grub/i386-pc/" 2>/dev/null || true
615ROOTDEV="${P1##*/}"   # p.ej. vda1 cuando el disco instalado sea el único
616cat > "$MNT/boot/grub/grub.cfg" <<CFG
617set timeout=2
618set default=0
619serial --unit=0 --speed=115200
620terminal_input serial console
621terminal_output serial console
622insmod part_msdos
623insmod ext2
624menuentry "hammer" {
625    linux /boot/bzImage console=ttyS0 root=/dev/vda1 rw rdinit=/sbin/init
626}
627CFG
628# hammer-recover: auto-sana un upgrade interrumpido al arranque (E4 #4b). Lo dejamos en /usr/sbin del
629# disco; el wrapper lo corre tras montar /store y /var/lib/hammer (que necesita) y antes de incarnar.
630if [ -x "$PAYLOAD/hammer-recover" ]; then
631    "$BB" mkdir -p "$MNT/usr/sbin"
632    cp "$PAYLOAD/hammer-recover" "$MNT/usr/sbin/hammer-recover"; "$BB" chmod 0755 "$MNT/usr/sbin/hammer-recover"
633fi
634"$BB" rm -f "$MNT/sbin/init"
635cat > "$MNT/sbin/init" <<'INIT'
636#!/bin/sh
637# Wrapper PID1: el kernel monta la partición root; montamos las dedicadas, auto-sanamos un upgrade
638# interrumpido (si lo hay) y arrancamos el init real.
639/bin/busybox mount -t ext4 /dev/vda2 /store          || echo "init: no pude montar /store (/dev/vda2)"
640/bin/busybox mount -t ext4 /dev/vda3 /var/lib/hammer  || echo "init: no pude montar /var/lib/hammer (/dev/vda3)"
641[ -x /usr/sbin/hammer-recover ] && /usr/sbin/hammer-recover || true
642exec /usr/bin/arje-zero
643INIT
644"$BB" chmod +x "$MNT/sbin/init"
645# config del usuario (hostname / root / zona / teclado) recogida al inicio
646apply_post_install_config "$MNT"
647"$BB" sync
648"$BB" umount "$MNT"
649
650# --- instalar GRUB: boot.img→MBR (440 B, sin pisar la tabla de particiones) + core.img→hueco post-MBR.
651#     Con install contiguo MBR los punteros por defecto de GRUB (kernel_sector=1, blocklist=2) ya valen
652#     ⇒ NO hace falta el parcheo binario que sí pide el caso GPT de install-image.sh.
653echo "==> instalando GRUB (boot.img→MBR + core.img→hueco post-MBR)"
654"$BB" dd if="$PAYLOAD/grub/boot.img"  of="$DEV" bs=1 count=440 conv=notrunc 2>/dev/null
655"$BB" dd if="$PAYLOAD/grub/core.img"  of="$DEV" bs=512 seek=1 conv=notrunc 2>/dev/null
656"$BB" sync
657
658echo "✓ takana-install: $DEV instalado. Reiniciá sin el medio live para arrancar del disco."