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>

libc/file/fopen.c

@@ -1,89 +1,32 @@
 /*
  * fopen — открыть файл как буферизованный поток FILE* (вариант B+).
  *
- * FILE берётся из статической таблицы _file_slots (свободный слот:
- * flags == 0), без malloc — сам буфер выделится лениво при первой
- * операции.  Первый успешный fopen вешает _fclosall на atexit, чтобы
- * exit() сбрасывал несброшенную запись всех потоков.
+ * FILE берётся из статической таблицы (_file_slot_take, он же взводит
+ * atexit(_fclosall)); сам буфер выделится лениво при первой операции.
  * NULL при: плохом режиме (EINVAL), занятой таблице (EMFILE), ошибке
  * open (errno от него).
  */
 
-#include <stdlib.h>
-#include <sprinter_exit.h>     /* atexit */
 #include <fcntl.h>
-#include <unistd.h>
-#include <errno.h>
 #include "_file.h"
 
-/* Транслировать строку режима fopen() в подмножество флагов open(),
- * которое понимает libc/io/open.c.  Поддержаны r, w, a, "+" в любом
- * месте хвоста; "b"/"t" игнорируются — весь I/O бинарный. */
-static int mode_to_flags(const char *mode, uint8_t *file_flags)
-{
-    if (!mode || !*mode) {
-        errno = EINVAL;
-        return -1;
-    }
-    int  oflags = 0;
-    uint8_t ff = 0;
-    char base = *mode;
-    int  plus = 0;
-    for (const char *p = mode + 1; *p; p++) {
-        if (*p == '+') plus = 1;
-    }
-    switch (base) {
-    case 'r':
-        oflags = plus ? O_RDWR : O_RDONLY;
-        ff = _F_READ | (plus ? _F_WRITE : 0);
-        break;
-    case 'w':
-        oflags = (plus ? O_RDWR : O_WRONLY) | O_CREAT | O_TRUNC;
-        ff = _F_WRITE | (plus ? _F_READ : 0);
-        break;
-    case 'a':
-        oflags = (plus ? O_RDWR : O_WRONLY) | O_CREAT | O_APPEND;
-        ff = _F_WRITE | _F_APPEND | (plus ? _F_READ : 0);
-        break;
-    default:
-        errno = EINVAL;
-        return -1;
-    }
-    *file_flags = ff;
-    return oflags;
-}
-
 FILE *fopen(const char *path, const char *mode)
 {
-    static uint8_t atexit_armed;
-
     uint8_t ff;
-    int oflags = mode_to_flags(mode, &ff);
-    if (oflags < 0) return NULL;
+    int oflags = _file_mode_flags(mode, &ff);
+    if (oflags < 0) return 0;
 
-    /* Свободный слот таблицы — ДО open, чтобы не открывать зря. */
-    FILE *fp = _file_slots;
-    for (uint8_t i = 0; ; i++, fp++) {
-        if (i >= OPEN_MAX) {
-            errno = EMFILE;
-            return NULL;
-        }
-        if (fp->flags == 0) break;
-    }
+    FILE *fp = _file_slot_take();      /* слот — ДО open, чтобы не открывать зря */
+    if (!fp) return 0;
 
     int fd = open(path, oflags);
-    if (fd < 0) return NULL;
+    if (fd < 0) return 0;
 
     fp->fd    = fd;
-    fp->buf   = NULL;
-    fp->curp  = NULL;
+    fp->buf   = 0;
+    fp->curp  = 0;
     fp->level = 0;
     fp->hold  = EOF;
     fp->flags = ff;              /* последним — занимает слот */
-
-    if (!atexit_armed) {
-        atexit_armed = 1;
-        atexit(_fclosall);       /* exit() сбросит все потоки */
-    }
     return fp;
 }