libc: сплит «1 функция = 1 модуль» — вся библиотека, wildcard-сборка
- bios/conio/env/errno/gfx/io/mem/mouse/stdio/stdlib/string/sys/time/ video разложены по модулям: общие статики и helpers — в internal _-модулях (_conio.h/_mouse.h/_gfx.h/_palette.h/_atexit.h/_time.h) - lib/Makefile: LIBC_C = wildcard libc/*/*.c — гранулярность файлов = гранулярность DCE линкера - эффект _CODE: gfx_text 6986→2568 Б, gfx_mous −1745, gfx_demo/d16 −542; ранее timedir −3270, ls −3098, stattest −2995 - комментарии оставшихся модулей переведены на русский; puts: убран мёртвый pchars; videomode_raw разложен на get/set - docs/libc-split-asm-cases.md — правила asm-связок между модулями; docs/libc-roadmap.md — план этапа - восстановлен examples/mdview/SAMPLE.MD (нужен make floppy) Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
This commit is contained in:
@@ -0,0 +1,31 @@
|
||||
/*
|
||||
* mem_alloc_pages_estex — выделить n смежных 16-КБ физических страниц
|
||||
* из EMM-пула через ESTEX GETMEM ($3D): B=npages → A=blk_id, CF=err.
|
||||
*
|
||||
* in: n — 1..255; out: blk_id (1..255) или 0 при ошибке (errno).
|
||||
*
|
||||
* blk_id непрозрачен — mem_get_page_bios() даст номера страниц,
|
||||
* mem_free_block_estex() освободит. Id с 1; 0 = «не выделилось».
|
||||
*/
|
||||
|
||||
#include <stdint.h>
|
||||
#include <sprinter_mem.h>
|
||||
|
||||
uint8_t mem_alloc_pages_estex(uint8_t n) __naked
|
||||
{
|
||||
(void)n;
|
||||
__asm
|
||||
;; SDCC: единственный uint8-аргумент в A; ESTEX хочет n в B.
|
||||
push ix
|
||||
ld b, a
|
||||
ld c, #0x3D ; ESTEX GETMEM
|
||||
rst #0x10
|
||||
pop ix
|
||||
jr c, _alloc_fail
|
||||
ret ; CF=0 → A = blk_id (возврат uint8 в A)
|
||||
_alloc_fail:
|
||||
call __errno_set ; CF=1 → A = код ошибки
|
||||
xor a, a ; вернуть 0 = сигнал ошибки
|
||||
ret
|
||||
__endasm;
|
||||
}
|
||||
Reference in New Issue
Block a user