snark13
2c6f4e33c3
_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>
37 lines
1.4 KiB
C
37 lines
1.4 KiB
C
/*
|
|
* 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;
|
|
}
|