snark13
ba3aca07bf
ЗАМЕР, из которого всё выросло (MAME, 2026-08-25): `open` стоит 51,4 мс, а чтение 16 КБ из уже открытого файла — 32,6 мс. То есть 61 % времени загрузки уходит на ОТКРЫТИЕ, а не на данные, и чистая скорость чтения — 491 КБ/с, а не 260. На диске игры 343 файла; одна только стартовая пачка (kid+shadow+bg+sound+guard, ~142 файла) — это 7,3 секунды чистого open. * toolchain/pop_pack_arc.py + pop_arc.c/h (банк 8) — формат PBA1: заголовок 512 Б, магия, count, записи по 4 байта (offset в СЕКТОРАХ — архив бывает больше 64 КБ; size в байтах — ресурс всегда <= 16 КБ, он обязан лезть в EMM-страницу). Таблицу держит вызывающий на своём стеке: в W2 её класть нельзя, а стека в точке загрузки израсходовано 75 байт из 1279 (замер там же). * libc: bank_read_page — чтение из УЖЕ ОТКРЫТОГО файла в EMM-страницу. bank_load_file переписана через неё, поэтому дублирования работы с W3 не осталось и резидент почти не вырос. * Набор эффектов: 10 файлов -> SND\snd.arc, один open вместо десяти. * Музыка: трек лежит ОДНИМ файлом и читается порциями по странице — нарезка на куски больше не нужна. Этот же путь понадобится финалу `won` (1,2 МБ), который в память целиком не влезает. * Менеджер звука приведён к оригиналу: играющая музыка участвует в таблицах приоритета наравне с эффектами (seg000:1672 + data.h:433). Почти вся музыка НЕперебиваема, поэтому поверх неё эффект не стартует — ровно как в SDLPoP; раньше эффект её перебивал. * ALLOCS 3000 -> 6000 (решение пользователя): сборка +20 с, резидент -161 байт. Куча 87 -> 248 Б. Co-Authored-By: Claude Opus 5 <noreply@anthropic.com>
143 lines
6.5 KiB
C
143 lines
6.5 KiB
C
/*
|
|
* sprinter_mem.h — banking-aware page allocator and bank-data accessors.
|
|
*
|
|
* For data that doesn't fit in window 2's heap, allocate physical pages
|
|
* directly through ESTEX EMM and access them via bank_read / bank_write
|
|
* (which swap a CPU window internally).
|
|
*
|
|
* mem_alloc_pages(N) — reserve N contiguous 16 KB pages, return block id.
|
|
* mem_free_block(id) — release a previously-allocated block.
|
|
* mem_get_page(id, i) — translate (block, page-index) to physical page.
|
|
* mem_info(&total, &free) — query EMM about total/free 16 KB pages.
|
|
*
|
|
* bank_load_byte / bank_store_byte — single-byte access through W3.
|
|
* bank_read / bank_write — bulk copy through W3.
|
|
* bank_*_w1 — same family but through W1 (for
|
|
* memory modes where code lives in
|
|
* W2 and W1 is free for data).
|
|
*
|
|
* Each helper saves the previous window-mapping, swaps to the target
|
|
* physical page, does the access, restores the saved page.
|
|
*
|
|
* SAFETY by memory mode (-memory FLAG to sprinter-cc):
|
|
*
|
|
* `tiny` : both bank_* and bank_*_w1 are safe.
|
|
* `small`/`huge`: only bank_* (W3) is safe; bank_*_w1 CRASHES
|
|
* because code lives in W1.
|
|
* `big` : only bank_* (W3) is safe; bank_*_w1 would clobber
|
|
* the banked-code segment in W1.
|
|
* `huge` (data path through W3 banked code): bank_* (W3) is unsafe;
|
|
* avoid banking via W3 in huge programs.
|
|
*
|
|
* In short: `_w1` accessors are a `tiny`-mode optimisation, useful when
|
|
* the program is small enough to fit in W2 and wants both W1 and W3 as
|
|
* independent banked-data windows.
|
|
*/
|
|
|
|
#ifndef SPRINTER_MEM_H
|
|
#define SPRINTER_MEM_H
|
|
|
|
#include <stdint.h>
|
|
|
|
/* ===================================================================
|
|
* ESTEX EMM allocator wrappers
|
|
* =================================================================== */
|
|
|
|
/* Allocate `n` contiguous 16-KB physical pages from the EMM pool.
|
|
* n : 1..255
|
|
* ret : blk_id (1..255) on success; 0 on failure with errno set.
|
|
* The id is opaque — pass it to mem_get_page() and mem_free_block(). */
|
|
uint8_t mem_alloc_pages_estex(uint8_t n);
|
|
uint8_t mem_alloc_pages_bios(uint8_t n);
|
|
|
|
/* Release a block previously returned by mem_alloc_pages().
|
|
* On error errno is set (e.g. EINVAL for unknown id). Double-free is
|
|
* NOT idempotent: the second call sets errno. */
|
|
void mem_free_block_estex(uint8_t blk_id);
|
|
void mem_free_block_bios(uint8_t blk_id);
|
|
|
|
/* Translate (block, page-index) into a physical page number suitable
|
|
* for sprinter_page_w1/w2/w3() or the bank_*() helpers below.
|
|
* blk_id: from mem_alloc_pages()
|
|
* idx : 0..(n-1)
|
|
* ret : physical page (1..255) on success; 0 on failure (errno set). */
|
|
uint8_t mem_get_page_bios(uint8_t blk_id, uint8_t idx);
|
|
|
|
/* Query the EMM allocator state. Both pointers must be non-NULL.
|
|
* Cannot fail (no error path). */
|
|
void mem_info_estex(uint16_t *total, uint16_t *free_pages);
|
|
void mem_info_bios(uint16_t *total, uint16_t *free_pages);
|
|
|
|
#define MEM_MANAGE_MODE_BIOS
|
|
|
|
#ifdef MEM_MANAGE_MODE_ESTEX
|
|
|
|
#define mem_alloc_pages mem_alloc_pages_estex
|
|
#define mem_free_block mem_free_block_estex
|
|
#define mem_info mem_info_estex
|
|
|
|
#define mem_get_page mem_get_page_bios
|
|
|
|
#elif defined MEM_MANAGE_MODE_BIOS
|
|
|
|
#define mem_alloc_pages mem_alloc_pages_bios
|
|
#define mem_free_block mem_free_block_bios
|
|
#define mem_info mem_info_bios
|
|
|
|
#define mem_get_page mem_get_page_bios
|
|
|
|
#endif
|
|
|
|
|
|
/* ===================================================================
|
|
* Far-page accessors via window 3 (base 0xC000, port 0xE2)
|
|
*
|
|
* Each call saves the current W3 mapping, sets W3 to `phys_page`, does
|
|
* the access at (base + off_in_window), then restores the saved page.
|
|
* Safe in `tiny`, `small`, `big` memory modes (W3 is free for data).
|
|
* NOT safe in `huge` — banked code lives in W3 there.
|
|
* =================================================================== */
|
|
|
|
/* Read one byte from phys_page at offset off_in_window (0..0x3FFF). */
|
|
uint8_t bank_load_byte(uint8_t phys_page, uint16_t off_in_window);
|
|
|
|
/* Write byte `v` into phys_page at offset off_in_window. */
|
|
void bank_store_byte(uint8_t phys_page, uint16_t off_in_window, uint8_t v);
|
|
|
|
/* Copy `n` bytes from phys_page[off..off+n-1] into the near buffer `dst`. */
|
|
void bank_read(uint8_t phys_page, uint16_t off, void *dst, uint16_t n);
|
|
|
|
/* Copy `n` bytes from near buffer `src` into phys_page[off..off+n-1]. */
|
|
void bank_write(uint8_t phys_page, uint16_t off, const void *src, uint16_t n);
|
|
|
|
/* Файловый обмен непосредственно с диапазоном EMM-страницы через W3.
|
|
* В отличие от bank_read/bank_write безопасен для вызова из huge-банка:
|
|
* path используется до переключения W3, а окно восстановлено до возврата.
|
|
* Возвращает фактический размер либо -1 + errno. */
|
|
int bank_load_file(uint8_t phys_page, uint16_t off, const char *path,
|
|
uint16_t max_size);
|
|
|
|
/* То же, но из УЖЕ ОТКРЫТОГО файла и с текущей позиции (её ставит вызывающий
|
|
* через lseek). Нужна тем, кто читает из одного файла много кусков: `open`
|
|
* стоит дороже самого чтения (замер: 51,4 мс против 32,6 мс на 16 КБ), и
|
|
* держать fd открытым — единственный способ эту цену не платить. */
|
|
int bank_read_page(int fd, uint8_t phys_page, uint16_t off, uint16_t size);
|
|
int bank_save_file(uint8_t phys_page, uint16_t off, const char *path,
|
|
uint16_t size);
|
|
|
|
/* ===================================================================
|
|
* Far-page accessors via window 1 (base 0x4000, port 0xA2)
|
|
*
|
|
* Same semantics as the W3 family but swap W1 instead. SAFE ONLY in
|
|
* `--memory tiny` builds — in any other mode code lives in (or uses) W1
|
|
* and swapping it mid-call will crash. See header notes above for the
|
|
* full safety matrix.
|
|
* =================================================================== */
|
|
|
|
uint8_t bank_load_byte_w1(uint8_t phys_page, uint16_t off_in_window);
|
|
void bank_store_byte_w1(uint8_t phys_page, uint16_t off_in_window, uint8_t v);
|
|
void bank_read_w1(uint8_t phys_page, uint16_t off, void *dst, uint16_t n);
|
|
void bank_write_w1(uint8_t phys_page, uint16_t off, const void *src, uint16_t n);
|
|
|
|
#endif
|