snark13
4a081501d8
- bios/conio/env/errno/gfx/io/mem/mouse/stdio/stdlib/string/sys/time/ video разложены по модулям: общие статики и helpers — в internal _-модулях (_conio.h/_mouse.h/_gfx.h/_palette.h/_atexit.h/_time.h) - lib/Makefile: LIBC_C = wildcard libc/*/*.c — гранулярность файлов = гранулярность DCE линкера - эффект _CODE: gfx_text 6986→2568 Б, gfx_mous −1745, gfx_demo/d16 −542; ранее timedir −3270, ls −3098, stattest −2995 - комментарии оставшихся модулей переведены на русский; puts: убран мёртвый pchars; videomode_raw разложен на get/set - docs/libc-split-asm-cases.md — правила asm-связок между модулями; docs/libc-roadmap.md — план этапа - восстановлен examples/mdview/SAMPLE.MD (нужен make floppy) Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
50 lines
1.8 KiB
C
50 lines
1.8 KiB
C
/*
|
|
* getdatetime — чтение RTC через ESTEX SYSTIME ($21).
|
|
*
|
|
* $21 SYSTIME → D=day E=month IX=year H=hour L=min B=sec C=dow
|
|
*
|
|
* Раскладка структуры (datetime_t, 8 байт):
|
|
* +0 day, +1 month, +2..3 year, +4 hour, +5 min, +6 sec, +7 dow
|
|
*
|
|
* Пишет прямо в *dt — без статического скретча. Ключевой трюк —
|
|
* `ex (sp), hl` после RST: в HL час:мин, на вершине стека dt —
|
|
* один байт меняет их местами, дальше идём по структуре через HL.
|
|
*/
|
|
|
|
#include <time.h>
|
|
|
|
void getdatetime(datetime_t *dt) __naked
|
|
{
|
|
(void)dt;
|
|
__asm
|
|
push ix ; save caller IX (BIOS clobbers it)
|
|
push hl ; stash dt across RST (clobbers HL)
|
|
ld c, #0x21 ; ESTEX SYSTIME
|
|
rst #0x10
|
|
;; Returns: D=day E=month IX=year H=hour L=min B=sec C=dow
|
|
|
|
;; ex (sp), hl: TOS<->HL. Now HL = dt, TOS = hour:min stash.
|
|
ex (sp), hl
|
|
ld (hl), d ; +0 day
|
|
inc hl
|
|
ld (hl), e ; +1 month
|
|
inc hl
|
|
push ix ; year → stack
|
|
pop de ; DE = year
|
|
ld (hl), e ; +2 year low
|
|
inc hl
|
|
ld (hl), d ; +3 year high
|
|
inc hl
|
|
pop de ; D = hour, E = min (from earlier ex(sp))
|
|
ld (hl), d ; +4 hour
|
|
inc hl
|
|
ld (hl), e ; +5 min
|
|
inc hl
|
|
ld (hl), b ; +6 sec
|
|
inc hl
|
|
ld (hl), c ; +7 dow
|
|
pop ix ; restore caller IX
|
|
ret
|
|
__endasm;
|
|
}
|