libc/irq: цепочка кадровых обработчиков + all-modes W1-remap

_irq_user → _irq_chain[4]+_irq_chain_n (W2-BSS); трамплин tr_frame
проходит слоты (один тяжёлый сейв на всю цепь, пустой слот пропуск).
API irq_chain_add (0/-1+ENOMEM) / irq_chain_remove(h); irq_install →
обёртка chain_add (EBUSY исчез), irq_remove() рвёт всю цепь; refcount
таблицы на первом/последнем слоте, мутации под IRQ_DISABLE. Лимит
4 кадровых + 1 CTC.

All-modes: трамплин copy-safe (только jr/djnz + литерал jp 0x0038),
_irq_table_ref копирует его в _irq_tramp_w2buf (W2) когда оригинал в W1
(small/huge), вектор → на копию; вокруг вызова хендлеров восстанавливает
базовую W1-страницу (_irq_app_w1_page = IN 0xA2). Хендлер может лежать
где угодно в плоском 0x4000-0xBFFF.

Проверено в MAME (tests/irqtest, 2 хендлера): tiny/big/huge — chain
h1=h2 → remove h2 → h1 жив/h2=0; huge = код в W1, remap работает.
Follow-up: CTC в small/huge = EINVAL (нужна W2-копия _irq_ctc_tramp);
small для мелких программ (BSS в W1) = irq_install EINVAL, safe.

Доки: im2_isr_design (цепочка), sprite-api §9е (делитель поверх цепи),
fast_ram §8. rpgprof: gfx_sprite_ysort в профиль (+230 Б baseline).

Co-Authored-By: Claude Opus 4.8 <noreply@anthropic.com>

libc/irq/irq_chain_add.c

@@ -0,0 +1,36 @@
+/*
+ * irq_chain_add — добавить обработчик кадрового прерывания в цепочку.
+ * Возврат 0 / -1+errno: EINVAL (handler==NULL, или данные не в W2 —
+ * из _irq_table_ref), ENOMEM (все IRQ_CHAIN_MAX слотов заняты).
+ *
+ * Первый слот захватывает IM2-таблицу (_irq_table_ref).  Порядок вызова
+ * хендлеров = порядок индексов; после remove/add взаимный порядок НЕ
+ * гарантирован — хендлеры обязаны быть независимы (см. irq.h).
+ */
+
+#include <errno.h>
+#include "_irq.h"
+
+int irq_chain_add(isr_t handler)
+{
+    if (!handler) { errno = EINVAL; return -1; }
+
+    uint8_t i;
+    for (i = 0; i < IRQ_CHAIN_MAX; i++)
+        if (!_irq_chain[i]) break;
+    if (i == IRQ_CHAIN_MAX) { errno = ENOMEM; return -1; }
+
+    /* Первый обработчик — захватить таблицу и включить IM2.  Делаем ДО
+     * записи слота: при неудаче (EINVAL в small) состояние не тронуто.
+     * Пока слот не выставлен, chain_n==0 → трамплин на кадре просто
+     * чейнит к DSS. */
+    if (_irq_chain_n == 0)
+        if (_irq_table_ref() != 0)
+            return -1;
+
+    IRQ_DISABLE();
+    _irq_chain[i] = handler;
+    _irq_chain_n++;
+    IRQ_ENABLE();
+    return 0;
+}