libc: две версии библиотеки — sprinter.lib (fast) / sprinter_safe.lib
Симметрично libbgi (bgi256/bgi256_safe): fast = -DLIBC_NOCHECK, дефолт sprinter-cc; safe линкуется по --safe (флаг уже существовал). Под LIBC_NOCHECK вырезаны ТОЛЬКО параметр-валидации: - fgetc/fputc: NULL-check в горячей asm-обёртке (~11Т на каждый байт); - fgets/fputs/fread/fwrite: NULL ptr/fp и EBADF на неверное направление потока; ftell/fseek/ungetc/fclose: NULL fp; cputs: NULL s. НЕ тронуты: критичный _fd_guard (9-й OPEN вешает DSS — в обеих версиях), функциональная маршрутизация (консоль/направление/hold), cold-path валидации (fopen/cbl_open/irq/settextmode — экономии ноль). libc/Makefile — dual-build по образцу libbgi (build/fast + build/safe, общий стейл-контроль). Корневой Makefile: в TESTS добавлены bgitest, bgi_img, accfill, cblstream — раньше не собирались корневым make и выпадали из size-check при чистой пересборке. Дельты fast vs старая (safe-семантика): filetest -481, fbench -384, solidt -180, errno -71, остальные -3..-9; роста нет. Проверено в MAME: filetest fast и safe (--safe, sprinter_safe.lib) — прогоны идентичны. Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
This commit is contained in:
@@ -13,10 +13,12 @@
|
||||
|
||||
int fclose(FILE *fp)
|
||||
{
|
||||
#ifndef LIBC_NOCHECK
|
||||
if (!fp) {
|
||||
errno = EBADF;
|
||||
return EOF;
|
||||
}
|
||||
#endif
|
||||
if (fp->flags & (_F_CONIN | _F_CONOUT)) {
|
||||
return 0;
|
||||
}
|
||||
|
||||
@@ -22,7 +22,9 @@
|
||||
* пределах этого модуля). */
|
||||
static int fgetc_slow(FILE *fp)
|
||||
{
|
||||
#ifndef LIBC_NOCHECK
|
||||
if (!fp) { errno = EBADF; return EOF; }
|
||||
#endif
|
||||
if (fp->hold != EOF) {
|
||||
int c = fp->hold;
|
||||
fp->hold = EOF;
|
||||
@@ -62,9 +64,11 @@ int fgetc(FILE *fp) __naked
|
||||
(void)fgetc_slow; /* используется из asm */
|
||||
__asm
|
||||
;; HL = fp.
|
||||
#ifndef LIBC_NOCHECK
|
||||
ld a, h
|
||||
or a, l
|
||||
jr Z, _fg_slow ; NULL — C-путь выставит errno
|
||||
#endif
|
||||
push hl
|
||||
pop iy ; IY = fp (IY — scratch в __sdcccall(1))
|
||||
|
||||
|
||||
@@ -51,7 +51,9 @@ static uint16_t fgets_scan(uint8_t *dst, const uint8_t *src,
|
||||
|
||||
char *fgets(char *buf, int n, FILE *fp)
|
||||
{
|
||||
#ifndef LIBC_NOCHECK
|
||||
if (!buf || n < 1 || !fp) return NULL;
|
||||
#endif
|
||||
uint8_t *dst = (uint8_t *)buf;
|
||||
int space = n - 1;
|
||||
|
||||
|
||||
@@ -25,7 +25,9 @@
|
||||
/* Медленный путь; зовётся из asm-обёртки. */
|
||||
static int fputc_slow(int c, FILE *fp)
|
||||
{
|
||||
#ifndef LIBC_NOCHECK
|
||||
if (!fp) { errno = EBADF; return EOF; }
|
||||
#endif
|
||||
if (fp->flags & _F_CONOUT) {
|
||||
putchar(c);
|
||||
return (int)(uint8_t)c;
|
||||
@@ -63,9 +65,11 @@ int fputc(int c, FILE *fp) __naked
|
||||
(void)fputc_slow; /* используется из asm */
|
||||
__asm
|
||||
;; HL = c, DE = fp.
|
||||
#ifndef LIBC_NOCHECK
|
||||
ld a, d
|
||||
or a, e
|
||||
jr Z, _fp_slow ; NULL — C-путь выставит errno
|
||||
#endif
|
||||
push de
|
||||
pop iy ; IY = fp
|
||||
|
||||
|
||||
@@ -10,7 +10,9 @@
|
||||
|
||||
int fputs(const char *s, FILE *fp)
|
||||
{
|
||||
#ifndef LIBC_NOCHECK
|
||||
if (!fp || !s) return EOF;
|
||||
#endif
|
||||
size_t n = strlen(s);
|
||||
if (n == 0) return 0;
|
||||
return fwrite(s, 1, n, fp) == n ? 0 : EOF;
|
||||
|
||||
@@ -16,7 +16,9 @@
|
||||
|
||||
size_t fread(void *ptr, size_t size, size_t nmemb, FILE *fp)
|
||||
{
|
||||
#ifndef LIBC_NOCHECK
|
||||
if (!ptr || !fp) return 0;
|
||||
#endif
|
||||
if (size == 0 || nmemb == 0) return 0;
|
||||
|
||||
uint8_t *p = (uint8_t *)ptr;
|
||||
@@ -39,7 +41,9 @@ size_t fread(void *ptr, size_t size, size_t nmemb, FILE *fp)
|
||||
}
|
||||
goto done;
|
||||
}
|
||||
#ifndef LIBC_NOCHECK
|
||||
if (!(fp->flags & _F_READ)) { errno = EBADF; return 0; }
|
||||
#endif
|
||||
if (fp->flags & _F_DIROUT) {
|
||||
if (_file_sync(fp)) return 0; /* сброс накопленной записи */
|
||||
}
|
||||
|
||||
+4
-1
@@ -14,7 +14,10 @@
|
||||
|
||||
int fseek(FILE *fp, long off, int whence)
|
||||
{
|
||||
if (!fp || (fp->flags & (_F_CONIN | _F_CONOUT))) {
|
||||
#ifndef LIBC_NOCHECK
|
||||
if (!fp) { errno = EBADF; return -1; }
|
||||
#endif
|
||||
if (fp->flags & (_F_CONIN | _F_CONOUT)) {
|
||||
errno = EBADF;
|
||||
return -1;
|
||||
}
|
||||
|
||||
+4
-1
@@ -12,7 +12,10 @@
|
||||
|
||||
long ftell(FILE *fp)
|
||||
{
|
||||
if (!fp || (fp->flags & (_F_CONIN | _F_CONOUT))) {
|
||||
#ifndef LIBC_NOCHECK
|
||||
if (!fp) { errno = EBADF; return -1L; }
|
||||
#endif
|
||||
if (fp->flags & (_F_CONIN | _F_CONOUT)) {
|
||||
errno = EBADF;
|
||||
return -1L;
|
||||
}
|
||||
|
||||
@@ -18,7 +18,9 @@
|
||||
|
||||
size_t fwrite(const void *ptr, size_t size, size_t nmemb, FILE *fp)
|
||||
{
|
||||
#ifndef LIBC_NOCHECK
|
||||
if (!ptr || !fp) return 0;
|
||||
#endif
|
||||
if (size == 0 || nmemb == 0) return 0;
|
||||
|
||||
const uint8_t *p = (const uint8_t *)ptr;
|
||||
@@ -30,7 +32,9 @@ size_t fwrite(const void *ptr, size_t size, size_t nmemb, FILE *fp)
|
||||
}
|
||||
return nmemb;
|
||||
}
|
||||
#ifndef LIBC_NOCHECK
|
||||
if (!(fp->flags & _F_WRITE)) { errno = EBADF; return 0; }
|
||||
#endif
|
||||
|
||||
if (!(fp->flags & _F_DIROUT)) {
|
||||
if (_file_sync(fp)) return 0; /* откат readahead/hold */
|
||||
|
||||
+4
-1
@@ -10,7 +10,10 @@
|
||||
|
||||
int ungetc(int c, FILE *fp)
|
||||
{
|
||||
if (!fp || c == EOF) return EOF;
|
||||
#ifndef LIBC_NOCHECK
|
||||
if (!fp) return EOF;
|
||||
#endif
|
||||
if (c == EOF) return EOF; /* семантика стандарта */
|
||||
if (fp->hold != EOF) return EOF; /* место занято */
|
||||
if (fp->flags & _F_CONOUT) return EOF;
|
||||
if (!(fp->flags & (_F_READ | _F_CONIN))) return EOF;
|
||||
|
||||
Reference in New Issue
Block a user