libc: Solid-C совместимость (П3) + rename/isatty (П4); scanf-семейство
- <dos.h>: getdate/gettime/setdate/settime (структуры Turbo-C, обёртки над getdatetime), getdisk/setdisk (ESTEX $02/$01), absread/abswrite (BIOS $55/$56, rst 8 — номера найдены в solid-c DOS.ASM; сектор 0 = boot логического диска) - scanf/fscanf/sscanf: своё C-ядро _scanf_core (%d %u %x %o %c %s, модификатор l, ширина, подавление '*', %%); в SDCC z80 scanf нет, asm solid-c не портируем из-за чужого ABI; 22 хост-теста ядра - хвост П2: fdopen/freopen/fclosall/fgetpos/fsetpos поверх таблицы FILE; парсер режима и выдача слота вынесены в _file_mode/_file_slot - rename() — ESTEX RENAME $10; isatty(fd) = fd <= 0 (tty только псевдо-fd 0/-1/-2: из CLI DSS манипуляторы идут с 1 — verified, fd 1 не резерв, под Flex Navigator его держит навигатор) - errno.h: Solid-C имена ошибок (EZERO/EINVFNC/ENOFILE/...) как алиасы - <sprinter_solid.h> — зонтичный заголовок для портирования; ltell/_setargv в sprinter_compat.h; div/ldiv — из SDCC (проверено) - tests/solidt — smoke всех П3/П4 API, зелёный в MAME (вкл. absread boot-сектора с сигнатурой 55AA) Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
This commit is contained in:
@@ -0,0 +1,42 @@
|
||||
/*
|
||||
* freopen — переоткрыть поток на другой файл, переиспользуя тот же
|
||||
* FILE* (и его буфер, если уже выделен).
|
||||
*
|
||||
* Для файлового потока: сброс буфера, close старого fd, open нового.
|
||||
* Для консольного псевдопотока (stdout/stderr/stdin): превращает его
|
||||
* в файловый — работает ТОЛЬКО для операций через FILE* (fputs(...,
|
||||
* stdout) и т.п.); printf/puts/putchar идут через ESTEX напрямую и
|
||||
* НЕ перенаправляются. NULL при ошибке (поток при этом закрыт —
|
||||
* по стандарту).
|
||||
*/
|
||||
|
||||
#include <fcntl.h>
|
||||
#include <unistd.h>
|
||||
#include "_file.h"
|
||||
|
||||
FILE *freopen(const char *path, const char *mode, FILE *fp)
|
||||
{
|
||||
if (!fp) return 0;
|
||||
|
||||
uint8_t ff;
|
||||
int oflags = _file_mode_flags(mode, &ff);
|
||||
|
||||
/* Закрыть текущее содержимое потока (буфер сохраняем). */
|
||||
if (!(fp->flags & (_F_CONIN | _F_CONOUT))) {
|
||||
_file_sync(fp);
|
||||
close(fp->fd);
|
||||
}
|
||||
fp->flags = 0; /* пока свободен/закрыт */
|
||||
fp->level = 0;
|
||||
fp->curp = fp->buf;
|
||||
fp->hold = EOF;
|
||||
|
||||
if (oflags < 0) return 0; /* плохой режим — поток закрыт */
|
||||
|
||||
int fd = open(path, oflags);
|
||||
if (fd < 0) return 0;
|
||||
|
||||
fp->fd = fd;
|
||||
fp->flags = ff;
|
||||
return fp;
|
||||
}
|
||||
Reference in New Issue
Block a user