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