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:
+22
-22
@@ -1,40 +1,40 @@
|
||||
/*
|
||||
* _errno_set — set `errno` from an ESTEX error code (0..255 in A).
|
||||
* _errno_set — установить `errno` из кода ошибки ESTEX (0..255 в A).
|
||||
*
|
||||
* Replaces the inline pattern
|
||||
* Заменяет inline-паттерн
|
||||
* ld (_errno), a
|
||||
* xor a, a
|
||||
* ld (_errno+1), a ; 7 bytes per error path
|
||||
* with a single
|
||||
* call __errno_set ; 3 bytes per error path
|
||||
* ld (_errno+1), a ; 7 байт на каждый error path
|
||||
* одним
|
||||
* call __errno_set ; 3 байта на error path
|
||||
*
|
||||
* Saves ~4 bytes at every libc error handler that converts an ESTEX
|
||||
* code into the C-side `errno`. Helper itself is 7 bytes; with 10+
|
||||
* error paths in our libc the size win is net-positive.
|
||||
* Экономит ~4 байта в каждом обработчике ошибок libc, конвертирующем
|
||||
* код ESTEX в C-шный errno. Сам хелпер — 7 байт; при 10+ error path
|
||||
* в нашей libc выигрыш по размеру суммарно положительный.
|
||||
*
|
||||
* ABI:
|
||||
* in: A = ESTEX error code (0..255)
|
||||
* out: HL = A (zero-extended); errno fully overwritten so a prior
|
||||
* large value (e.g. errno = -1) can't leak its high byte.
|
||||
* clobbers: HL, AF flags. Caller must not depend on HL afterwards.
|
||||
* вход: A = код ошибки ESTEX (0..255)
|
||||
* выход: errno перезаписан целиком, чтобы прежнее большое значение
|
||||
* (например errno = -1) не оставило свой старший байт.
|
||||
* клоббер: A, флаги. HL/BC/DE/IX/IY не трогаются.
|
||||
*
|
||||
* Defensive 16-bit store — see chat 2026-06-02: if anyone ever assigns
|
||||
* errno via C (`errno = -1`), the high byte becomes 0xFF, and a partial
|
||||
* 8-bit write here would leave that 0xFF in place. Always writing the
|
||||
* full word keeps errno honest regardless of who set it last.
|
||||
* Защитная 16-битная запись — см. чат 2026-06-02: если кто-то присвоит
|
||||
* errno из C (`errno = -1`), старший байт станет 0xFF, и частичная
|
||||
* 8-битная запись здесь оставила бы этот 0xFF на месте. Полное слово
|
||||
* держит errno честным независимо от того, кто писал последним.
|
||||
*/
|
||||
|
||||
void _errno_set(unsigned char code) __naked
|
||||
{
|
||||
(void)code;
|
||||
__asm
|
||||
;; __sdcccall(1): single uint8_t arg already in A.
|
||||
;; Write the two bytes separately so HL/BC/DE/IX/IY remain
|
||||
;; untouched. Only A is clobbered: it is the input register,
|
||||
;; and ABI does not require preserving it across a void call.
|
||||
ld (_errno), a ; low byte = code
|
||||
;; __sdcccall(1): единственный uint8_t-аргумент уже в A.
|
||||
;; Пишем два байта по отдельности, чтобы HL/BC/DE/IX/IY остались
|
||||
;; нетронутыми. Клобберится только A: это входной регистр, и
|
||||
;; ABI не требует сохранять его через void-вызов.
|
||||
ld (_errno), a ; младший байт = код
|
||||
xor a, a
|
||||
ld (_errno+1), a ; high byte = 0
|
||||
ld (_errno+1), a ; старший байт = 0
|
||||
ret
|
||||
__endasm;
|
||||
}
|
||||
|
||||
@@ -0,0 +1,18 @@
|
||||
/*
|
||||
* perror — напечатать "prefix: <strerror(errno)>\r\n" в stderr.
|
||||
* Пустой/NULL prefix — печатается только текст ошибки.
|
||||
*/
|
||||
|
||||
#include <errno.h>
|
||||
#include <stdio.h>
|
||||
#include <string.h>
|
||||
|
||||
void perror(const char *prefix)
|
||||
{
|
||||
if (prefix && *prefix) {
|
||||
fputs(prefix, stderr);
|
||||
fputs(": ", stderr);
|
||||
}
|
||||
fputs(strerror(errno), stderr);
|
||||
fputs("\r\n", stderr);
|
||||
}
|
||||
@@ -1,24 +1,20 @@
|
||||
/*
|
||||
* errno.c — strerror / perror over the SDCC-provided `errno` global.
|
||||
* strerror — текст ошибки по коду ESTEX (0..32); вне диапазона —
|
||||
* "Unknown error". Таблица повторяет solid-c IO.ASM (английские
|
||||
* формулировки сохранены для grep-ability). Таблица и функция
|
||||
* неразделимы — живут одним модулем.
|
||||
*
|
||||
* The message table mirrors the one in solid-c's IO.ASM (we kept the
|
||||
* English wording for grep-ability). ESTEX returns codes 0..32 in the
|
||||
* meaningful range; anything beyond gets "Unknown error".
|
||||
*
|
||||
* Note: we deliberately do NOT define `_errno` here — SDCC's
|
||||
* z80.lib/errno.rel provides it (a single int in _DATA), and our libc
|
||||
* wrappers (read.c, open.c, etc.) just assign to `errno`. This
|
||||
* removes the "multiple definition of _errno" link warning.
|
||||
* Примечание: `_errno` здесь сознательно НЕ определяется — его даёт
|
||||
* SDCC z80.lib/errno.rel (int в _DATA), наши обёртки просто пишут в
|
||||
* `errno`. Это убирает варнинг "multiple definition of _errno".
|
||||
*/
|
||||
|
||||
#include <errno.h>
|
||||
#include <stdio.h>
|
||||
#include <string.h>
|
||||
|
||||
/*
|
||||
* Stored verbatim — pointers in the lookup table cost 2 bytes each plus
|
||||
* the message bytes themselves. Sentinel "" entries pad out gaps so
|
||||
* indexing stays direct.
|
||||
* Хранится как есть — указатель в таблице стоит 2 байта плюс сами
|
||||
* байты сообщения. Заглушки "RESERVED" затыкают дыры, чтобы
|
||||
* индексирование оставалось прямым.
|
||||
*/
|
||||
static const char *const messages[] = {
|
||||
/* 0 */ "No error",
|
||||
@@ -65,13 +61,3 @@ const char *strerror(int err)
|
||||
}
|
||||
return messages[err];
|
||||
}
|
||||
|
||||
void perror(const char *prefix)
|
||||
{
|
||||
if (prefix && *prefix) {
|
||||
fputs(prefix, stderr);
|
||||
fputs(": ", stderr);
|
||||
}
|
||||
fputs(strerror(errno), stderr);
|
||||
fputs("\r\n", stderr);
|
||||
}
|
||||
Reference in New Issue
Block a user