snark13
9f8aa6fc28
Симметрично 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>
65 lines
2.3 KiB
C
65 lines
2.3 KiB
C
/*
|
|
* fwrite — пишет nmemb элементов по size байт из ptr в поток
|
|
* (буферизованно, вариант B+).
|
|
*
|
|
* Большой блок (>= BUFSIZ, или нет буфера): сброс накопленного и один
|
|
* write() напрямую из ptr мимо буфера. Мелкий: memcpy в буфер (со
|
|
* сбросом ПЕРЕД записью, если не влезает). Если поток был в режиме
|
|
* чтения — _file_sync откатит readahead. Возвращает число ПОЛНЫХ
|
|
* записанных элементов; ошибка/короткая запись ставит _F_ERROR.
|
|
* Ошибки буферизованной части могут вылезти позже (fflush/fclose).
|
|
* Консольный поток — посимвольно через putchar().
|
|
*/
|
|
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
#include <errno.h>
|
|
#include "_file.h"
|
|
|
|
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;
|
|
size_t total = size * nmemb;
|
|
|
|
if (fp->flags & _F_CONOUT) {
|
|
for (size_t i = 0; i < total; i++) {
|
|
putchar(p[i]);
|
|
}
|
|
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 */
|
|
}
|
|
|
|
if (total >= BUFSIZ || !_file_buf(fp)) {
|
|
/* Большой блок (или нет буфера): сброс хвоста + прямой write. */
|
|
if (_file_sync(fp)) return 0;
|
|
int w = write(fp->fd, p, (uint16_t)total);
|
|
if (w < 0) { fp->flags |= _F_ERROR; return 0; }
|
|
if ((size_t)w < total) fp->flags |= _F_ERROR;
|
|
return (size_t)w / size;
|
|
}
|
|
|
|
/* Мелкий блок — в буфер; сброс ПЕРЕД записью, если не влезает. */
|
|
if (fp->level + total > BUFSIZ) {
|
|
if (_file_sync(fp)) return 0;
|
|
}
|
|
if (!(fp->flags & _F_DIROUT)) {
|
|
fp->flags |= _F_DIROUT;
|
|
fp->curp = fp->buf;
|
|
}
|
|
memcpy(fp->curp, p, total);
|
|
fp->curp += total;
|
|
fp->level += (uint16_t)total;
|
|
return nmemb;
|
|
}
|