Files
Sprinter-SDCC/libc/file/fclose.c
T
snark13 9f8aa6fc28 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>
2026-07-10 22:11:01 +03:00

31 lines
1.0 KiB
C

/*
* fclose — закрыть поток: сбросить буфер (_file_sync), закрыть fd,
* освободить буфер и слот таблицы. ВАЖНО: ошибки отложенной записи
* вылезают именно здесь — проверять результат fclose у пишущих
* потоков. Консольные псевдопотоки (stdin/stdout/stderr) распознаются
* по флагам и успешно игнорируются.
*/
#include <stdlib.h>
#include <unistd.h>
#include <errno.h>
#include "_file.h"
int fclose(FILE *fp)
{
#ifndef LIBC_NOCHECK
if (!fp) {
errno = EBADF;
return EOF;
}
#endif
if (fp->flags & (_F_CONIN | _F_CONOUT)) {
return 0;
}
int rc = _file_sync(fp); /* сброс несброшенной записи */
if (close(fp->fd) < 0) rc = EOF;
if (fp->buf) free(fp->buf);
fp->flags = 0; /* слот свободен */
return rc;
}