sergio/takana

1#!/usr/bin/env bash
2# qemu-desktop-image.sh — imagen de disco EFI GNOME para QEMU (virtio-gpu + software GL), auto-lanza
3# gnome-shell. Hermano de scripts/kde/qemu-desktop-image.sh; comparte con él la base metal, la
4# inyección de mesa/LLVM/musl y el truco del console-getty, y sólo diverge en lo que GNOME necesita.
5#
6#   work/metal-rootfs      base: arje-zero PID1 + busybox + kernel(EFI-stub) + firmware
7#   work/gnome-rootfs      cierre de gnome-shell (lo arma scripts/gnome/hydrate-gnome.sh, 108/108)
8#   + store/*-mesa-llvmpipe   GBM/EGL de software (el rootfs GNOME sólo trae iris_dri, que es Intel real)
9#   + store/*-llvm18          libLLVM que llvmpipe JIT-linkea
10#   + store/*-dejavu-fonts    el rootfs GNOME NO trae NINGUNA fuente
11#   → work/gnome-qemu-rootfs (hardlinks) → work/hammer-gnome-qemu.img
12#
13# Uso:  scripts/gnome/qemu-desktop-image.sh
14set -euo pipefail
15ROOT="$(cd "$(dirname "$0")/../.." && pwd)"; cd "$ROOT"
16
17BASE="${BASE:-work/metal-rootfs}"
18GNOME="${GNOME:-work/gnome-rootfs}"
19MESA="${MESA:-$(ls -dt store/*-mesa-llvmpipe 2>/dev/null | head -1)}"
20LLVM="${LLVM:-$(ls -dt store/*-llvm18 2>/dev/null | head -1)}"
21FONTS="${FONTS:-$(ls -dt store/*-dejavu-fonts 2>/dev/null | head -1)}"
22MERGED="${MERGED:-work/gnome-qemu-rootfs}"
23IMG="${IMG:-work/hammer-gnome-qemu.img}"
24
25[ -d "$BASE" ]  || { echo "falta $BASE" >&2; exit 1; }
26[ -d "$GNOME" ] || { echo "falta $GNOME — corré scripts/gnome/hydrate-gnome.sh" >&2; exit 1; }
27[ -n "$MESA" ] && [ -d "$MESA" ] || { echo "falta mesa-llvmpipe en store/" >&2; exit 1; }
28
29echo "==> fundiendo rootfs por hardlinks (base metal + cierre GNOME)"
30rm -rf "$MERGED"
31cp -al "$BASE" "$MERGED"
32cp -al --remove-destination "$GNOME"/. "$MERGED"/
33
34. "$ROOT/scripts/lib/pid1-desde-store.sh"
35inyectar_pid1 "$MERGED" "$BASE"
36
37echo "==> parcheando mesa software desde $MESA"
38# El cierre GNOME trae mesa con SÓLO iris_dri.so (Intel real). En QEMU no hay GPU: hace falta
39# kms_swrast. Se copian los .so de mesa-llvmpipe ENCIMA (--remove-destination rompe el hardlink).
40mkdir -p "$MERGED"/usr/lib/dri
41cp -a --remove-destination "$MESA"/usr/lib/dri/. "$MERGED"/usr/lib/dri/ 2>/dev/null || true
42for so in libglapi libgbm libEGL libGLESv2 libGL libgallium; do
43  cp -a --remove-destination "$MESA"/usr/lib/$so* "$MERGED"/usr/lib/ 2>/dev/null || true
44done
45ls "$MERGED"/usr/lib/dri/*swrast* >/dev/null 2>&1 && echo "   ✓ kms_swrast instalado" || { echo "   ✗ swrast no entró" >&2; exit 1; }
46
47echo "==> inyectando libLLVM.18 (llvmpipe lo JIT-linkea)"
48[ -n "$LLVM" ] && [ -d "$LLVM" ] || { echo "   ✗ falta llvm18 en store/ (set LLVM=)" >&2; exit 1; }
49cp -a --remove-destination "$LLVM"/usr/lib/libLLVM.so.18.1 "$MERGED"/usr/lib/
50ln -sf libLLVM.so.18.1 "$MERGED"/usr/lib/libLLVM.so.18
51ln -sf libLLVM.so.18.1 "$MERGED"/usr/lib/libLLVM.so
52
53echo "==> inyectando el runtime C++ de Alpine (deuda CONOCIDA, no accidente)"
54# libLLVM y mesa-llvmpipe se construyen con gcc ⇒ NEEDean libstdc++/libgcc_s. Y además —esto es
55# propio de GNOME y quedó documentado al auditar el cierre— **libmozjs-128.so también los NEEDea**,
56# o sea que la cadena gnome-shell → libgjs → libmozjs arrastra el runtime C++ de Alpine. Es la
57# "última milla" de matar-gcc que se cerró para cmake con -static-libstdc++ y que spidermonkey no
58# cubrió. Mientras eso no se re-selle (radio medido: 2), la imagen los inyecta o el shell no carga.
59for lib in libgcc_s.so.1 libstdc++.so.6; do
60  src=".dev-fs/alpine/usr/lib/$lib"
61  if [ -r "$src" ]; then cp -a --remove-destination "$src"* "$MERGED"/usr/lib/ 2>/dev/null || true
62  else echo "   ⚠ sin $lib ($src)"; fi
63done
64
65echo "==> inyectando musl — y los DOS sonames"
66# La base metal es 100% estática (arje-zero+busybox) y el cierre GNOME no trae libc. En musl el
67# loader ES libc (mismo fichero). Van dos nombres porque conviven dos toolchains: zig-cc emite
68# NEEDED `libc.so` (359 consumidores) y el gcc/clang de Alpine emite `libc.musl-x86_64.so.1`
69# (17: todo nss + spidermonkey). Es la MISMA libc; sin el segundo symlink esos 17 no cargan.
70MUSL="${MUSL:-/usr/lib/musl/lib/libc.so}"
71[ -r "$MUSL" ] || { echo "no encuentro musl libc ($MUSL) — set MUSL=" >&2; exit 1; }
72mkdir -p "$MERGED/usr/lib/musl/lib" "$MERGED/lib"
73cp -a --remove-destination "$MUSL" "$MERGED/usr/lib/musl/lib/libc.so"
74ln -sf /usr/lib/musl/lib/libc.so "$MERGED/lib/ld-musl-x86_64.so.1"
75ln -sf /usr/lib/musl/lib/libc.so "$MERGED/usr/lib/libc.so"
76ln -sf /usr/lib/musl/lib/libc.so "$MERGED/usr/lib/libc.musl-x86_64.so.1"
77echo "   ✓ libc.so + libc.musl-x86_64.so.1"
78
79if [ -n "$FONTS" ] && [ -d "$FONTS" ]; then
80  echo "==> inyectando fuentes ($(basename "$FONTS"))"
81  cp -a --remove-destination "$FONTS"/usr/share/fonts/. "$MERGED"/usr/share/fonts/ 2>/dev/null || \
82    { mkdir -p "$MERGED"/usr/share/fonts && cp -a "$FONTS"/usr/share/fonts/. "$MERGED"/usr/share/fonts/; }
83else
84  echo "   ⚠ sin dejavu-fonts en el store: el escritorio saldrá con tofu"
85fi
86
87echo "==> inyectando arje-logind-compat (el login1 del fractal)"
88# EL ESLABÓN QUE FALTABA, descubierto arrancando la imagen: mutter levanta como display server y
89# muere en `Failed to setup: Failed to find any matching session`. Ese chequeo es de logind — mutter
90# pregunta por su sesión vía la C-ABI sd-login, que acá provee libelogind (arje-sdlogin-compat)
91# LEYENDO /run/systemd/{sessions,users,seats}. Pero alguien tiene que ESCRIBIR esos ficheros, y ese
92# alguien es arje-logind-compat, el daemon D-Bus que se hace pasar por org.freedesktop.login1.
93# libelogind entra solo (es dep de mutter); el daemon no, porque nadie lo declara como dep de build.
94# El artefacto se elige por `hammer hash` sobre la receta —el que corresponde a la receta de HOY—, no
95# por el más reciente del store: con dos artefactos del mismo paquete conviviendo, la fecha no dice
96# cuál es el vigente. ALC_BIN permite inyectar un binario RECIÉN COMPILADO en vez del artefacto sellado. Es para probar
97# un cambio en arje-compat antes de commitear/pushear tawasuyu y re-sellar la receta (la receta pina
98# un commit, así que sin push no hay artefacto nuevo). Lo que se pruebe así NO es reproducible: es
99# andamio de iteración, y el camino de producción sigue siendo el artefacto del store.
100if [ -n "${ALC_BIN:-}" ] && [ -x "$ALC_BIN" ]; then
101  install -Dm755 "$ALC_BIN" "$MERGED"/usr/bin/arje-logind-compat
102  echo "   ⚠ binario LOCAL (no sellado): $ALC_BIN"
103elif ALC="${ALC:-store/$(./target/release/hammer --store store hash recipes/arje-logind-compat.toml 2>/dev/null | tail -1 | sed 's/^b3://')-arje-logind-compat}"; [ -d "$ALC" ]; then
104  install -Dm755 "$ALC"/usr/bin/arje-logind-compat "$MERGED"/usr/bin/arje-logind-compat
105  # …y su POLÍTICA D-Bus, que desde 2026-07-30 viaja en el artefacto. Se copia, no se escribe: el
106  # dueño del fichero es el paquete. Ojo — inyectar «sólo el binario» era el bug que destapó la
107  # comprobación de abajo: el artefacto traía el .conf y la imagen lo dejaba afuera.
108  install -d "$MERGED/usr/share/dbus-1/system.d"
109  cp -a --remove-destination "$ALC"/usr/share/dbus-1/system.d/. "$MERGED"/usr/share/dbus-1/system.d/ 2>/dev/null || true
110  echo "   ✓ $(basename "$ALC" | cut -c1-12)"
111else
112  echo "   ✗ falta arje-logind-compat en store/ — mutter no hallará sesión" >&2; exit 1
113fi
114
115# La POLÍTICA D-Bus de login1 YA NO SE ESCRIBE ACÁ (2026-07-30): la trae el artefacto de
116# `arje-logind-compat`, que es su dueño. Este bloque tenía un TODO diciendo exactamente eso, y estaba
117# bien puesto: un servicio que no puede adueñarse de su nombre no es un servicio, así que su política
118# es parte de lo que el paquete promete. Teniéndola acá, cualquier OTRA imagen —metal, KDE, mirada—
119# se llevaba el daemon y no podía usarlo. Se comprueba abajo, junto con la de polkit.
120install -d "$MERGED/usr/share/dbus-1/system.d"
121
122echo "==> inyectando arje-polkit-compat (el PolicyKit1 del fractal) + su política"
123# EL TERCER ESLABÓN DEL MISMO TIPO, y lo destapó la lista de nombres del bus: accounts-daemon y
124# upowerd quedaban CONECTADOS (`:1.0`, `:1.1`) sin adquirir su nombre, porque los dos se bloquean en
125# `polkit_authority_get_sync()` esperando a `org.freedesktop.PolicyKit1`. Nuestra receta `polkit` es
126# libs-only a propósito (el demonio lo pone arje), así que nadie servía ese nombre y gnome-shell
127# esperaba 25 s por cada uno.
128# ⚠ El shim autoriza TODO (postura de sistema confiado ya tomada por arje) — ver su receta.
129if APC="${APC:-store/$(./target/release/hammer --store store hash recipes/arje-polkit-compat.toml 2>/dev/null | tail -1 | sed 's/^b3://')-arje-polkit-compat}"; [ -d "$APC" ]; then
130  install -Dm755 "$APC"/usr/bin/arje-polkit-compat "$MERGED"/usr/bin/arje-polkit-compat
131  install -d "$MERGED/usr/share/dbus-1/system.d"
132  cp -a --remove-destination "$APC"/usr/share/dbus-1/system.d/. "$MERGED"/usr/share/dbus-1/system.d/ 2>/dev/null || true
133  echo "   ✓ $(basename "$APC" | cut -c1-12)"
134else
135  echo "   ✗ falta arje-polkit-compat en store/ — accounts-daemon y upowerd no adquirirán su nombre" >&2
136  exit 1
137fi
138# Su política tampoco se escribe acá: viaja en el artefacto (ver recipes/arje-polkit-compat.toml, que
139# explica por qué el fichero se llama `zz-` y no reemplaza al de polkit).
140#
141# ── COMPROBACIÓN, que es lo que reemplaza a escribirlas ────────────────────────────────────────
142# Mover algo a un artefacto sólo es una mejora si se NOTA cuando falta. Sin esto, un artefacto viejo
143# sin su .conf daría el mismo fallo tardío y confuso de antes: el daemon arranca, no adquiere el
144# nombre, y el escritorio espera 25 s por servicio sin decir por qué.
145for pol in org.freedesktop.login1.conf zz-arje-polkit-compat.conf; do
146  if [ -f "$MERGED/usr/share/dbus-1/system.d/$pol" ]; then
147    echo "   ✓ $pol (del artefacto)"
148  else
149    echo "   ✗ falta $pol — el artefacto que lo trae es viejo; re-sellá su receta" >&2
150    exit 1
151  fi
152done
153
154echo "==> usuario messagebus (el system bus hace setuid a él)"
155for f in passwd:messagebus:x:81:81:messagebus:/dev/null:/sbin/nologin group:messagebus:x:81:; do
156  file="${f%%:*}"; line="${f#*:}"
157  if ! grep -q '^messagebus:' "$MERGED/etc/$file" 2>/dev/null; then
158    tmp="$MERGED/etc/$file.new"
159    { cat "$MERGED/etc/$file"; echo "$line"; } > "$tmp"
160    chmod 644 "$tmp"; mv "$tmp" "$MERGED/etc/$file"
161  fi
162done
163
164# El launch-helper del bus de SISTEMA tiene que ser setuid root. Es el que dbus-daemon ejecuta para
165# activar un servicio bajo demanda, y comprueba SUS PROPIOS permisos antes de hacer nada: si no es
166# setuid root, se niega, y el cliente recibe
167#   Error calling StartServiceByName for <servicio>: The permission of the setuid helper is not correct
168# que es exactamente lo que reportaba colord al arrancar la sesión. Sin esto **ninguna** activación
169# por bus de sistema funciona; con esto, cualquier servicio con su `.service` instalado arranca solo y
170# no hace falta lanzarlo a mano desde `gnome-start`.
171for h in usr/libexec/dbus-daemon-launch-helper usr/lib/dbus-1.0/dbus-daemon-launch-helper; do
172  if [ -f "$MERGED/$h" ]; then
173    chown 0:81 "$MERGED/$h" 2>/dev/null || true   # root:messagebus
174    chmod 4750 "$MERGED/$h"
175    echo "   ✓ setuid en /$h"
176  fi
177done
178
179# GNOME_MODE se hornea como fichero: el getty ejecuta gnome-start sin ambiente heredable.
180printf 'GNOME_MODE=%s\n' "${GNOME_MODE:-drm}" > "$MERGED/etc/gnome-mode"
181echo "==> modo de arranque: ${GNOME_MODE:-drm}"
182# KMS_MODE viaja por el mismo camino, y sólo si se pide: `gnome-start` lo traduce a
183# MUTTER_DEBUG_FORCE_KMS_MODE. Vacío = atomic (el default de mutter). `simple` = el modeset legacy
184# que se heredó de KDE y dejaba la pantalla en negro.
185if [ -n "${KMS_MODE:-}" ]; then
186  printf 'KMS_MODE=%s\n' "$KMS_MODE" >> "$MERGED/etc/gnome-mode"
187  echo "==> KMS forzado a: $KMS_MODE"
188fi
189
190echo "==> instalando /usr/bin/gnome-start"
191install -Dm755 scripts/gnome/gnome-start-qemu.sh "$MERGED/usr/bin/gnome-start"
192
193echo "==> auto-lanzar GNOME: console-getty ejecuta gnome-start (no /bin/sh)"
194python3 - "$MERGED/ente/seed.card.json" <<'PY'
195import json, sys, os
196p = sys.argv[1]
197c = json.load(open(p))
198for g in c.get("genesis", []):
199    if g.get("label") == "console-getty":
200        argv = g["payload"]["Native"]["argv"]
201        argv[:] = [("/usr/bin/gnome-start" if a == "/bin/sh" else a) for a in argv]
202        print("  console-getty argv →", argv)
203tmp = p + ".new"
204with open(tmp, "w") as f:
205    json.dump(c, f, indent=2)
206os.chmod(tmp, 0o644)
207os.replace(tmp, p)
208PY
209
210# /var/run → /run: arje-logind-compat busca el bus de sistema en la ruta LEGACY
211# (/var/run/dbus/system_bus_socket) y dbus-daemon escucha en /run/dbus/system_bus_socket. En casi
212# toda distro /var/run es un symlink a /run desde hace 15 años; esta base metal es tan mínima que ni
213# siquiera tiene /var/run. Sin el enlace el daemon reporta `bus_present=false` y se va a "modo idle",
214# o sea que nunca registra login1 ni escribe /run/systemd/sessions ⇒ mutter no halla sesión.
215ln -sfn /run "$MERGED/var/run"
216
217mkdir -p "$MERGED/root/.config" "$MERGED/root/.cache" "$MERGED/run/user/0" "$MERGED/tmp"
218chmod 1777 "$MERGED/tmp"
219
220echo "==> rootfs fundido: $(du -sh "$MERGED" | cut -f1)"
221need_mb=$(du -sm "$MERGED" | cut -f1)
222ROOT_SIZE="${ROOT_SIZE:-$(( need_mb + 1536 ))}"
223echo "==> ROOT_SIZE=${ROOT_SIZE} MiB"
224
225export ROOTFS="$MERGED" IMG ROOT_SIZE
226export ESP_MB="${ESP_MB:-128}" STORE_SIZE="${STORE_SIZE:-512}" STATE_SIZE="${STATE_SIZE:-768}"
227exec ./scripts/install-image-efi.sh