snark13
60373930fb
- <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>
33 lines
644 B
C
33 lines
644 B
C
/*
|
|
* sscanf — форматированный разбор строки; ядро — _scanf_core,
|
|
* источник — движущийся указатель по ASCIIZ-строке.
|
|
*/
|
|
|
|
#include <stdarg.h>
|
|
#include "_scanf.h"
|
|
|
|
static const char *ss_p;
|
|
|
|
static int ss_get(void *ctx)
|
|
{
|
|
(void)ctx;
|
|
if (!*ss_p) return -1;
|
|
return (unsigned char)*ss_p++;
|
|
}
|
|
|
|
static void ss_unget(void *ctx, int c)
|
|
{
|
|
(void)ctx; (void)c;
|
|
ss_p--;
|
|
}
|
|
|
|
int sscanf(const char *s, const char *fmt, ...)
|
|
{
|
|
ss_p = s;
|
|
va_list ap;
|
|
va_start(ap, fmt);
|
|
int r = _scanf_core(ss_get, ss_unget, 0, fmt, ap);
|
|
va_end(ap);
|
|
return r;
|
|
}
|