mirror of
https://github.com/cc65/cc65.git
synced 2024-12-28 22:30:12 +00:00
38 lines
844 B
ArmAsm
38 lines
844 B
ArmAsm
|
;
|
||
|
|
; Oliver Schmidt, 14.08.2018
|
||
|
|
; Colin Leroy-Mira, 2023 <colin@colino.net>
|
||
|
|
;
|
||
|
|
; time_t __fastcall__ mktime_dt(const struct datetime *dt)
|
||
|
|
;
|
||
|
|
|
||
|
|
.import steaxspidx, pushax, incsp2, _gmtime_dt
|
||
|
|
.import tm_buf
|
||
|
|
.export _mktime_dt
|
||
|
|
|
||
|
|
.include "time.inc"
|
||
|
|
.include "zeropage.inc"
|
||
|
|
.include "errno.inc"
|
||
|
|
.include "mli.inc"
|
||
|
|
|
||
|
|
; Convert ProDOS date/time to UNIX timestamp
|
||
|
|
; source date address in AX
|
||
|
|
|
||
|
|
_mktime_dt:
|
||
|
|
; Convert to internal tm
|
||
|
|
jsr _gmtime_dt
|
||
|
|
cpx #$00
|
||
|
|
bne :+
|
||
|
|
cmp #$00
|
||
|
|
beq err
|
||
|
|
|
||
|
|
; Make time_t
|
||
|
|
: lda #<tm_buf
|
||
|
|
ldx #>tm_buf
|
||
|
|
jmp _mktime
|
||
|
|
|
||
|
|
err: lda #$00
|
||
|
|
tax
|
||
|
|
sta sreg
|
||
|
|
sta sreg+1
|
||
|
|
rts
|