mirror of
https://github.com/A2osX/A2osX.git
synced 2024-10-05 03:57:31 +00:00
Kernel 0.93++
This commit is contained in:
parent
581b82e934
commit
5e329c153e
Binary file not shown.
@ -85,9 +85,10 @@ CS.RUN >LIBCALL hLIBTCPIP,LIBTCPIP.GETCFG
|
|||||||
cmp #3
|
cmp #3
|
||||||
bne CS.RUN.ERR
|
bne CS.RUN.ERR
|
||||||
jmp CS.RUN.ADD
|
jmp CS.RUN.ADD
|
||||||
CS.RUN.ERR >PUSHBI 0
|
|
||||||
>LDYA L.MSG.Usage
|
CS.RUN.ERR >PUSHW L.MSG.Usage
|
||||||
>SYSCALL printf
|
>PUSHBI 0
|
||||||
|
>SYSCALL printf2
|
||||||
lda #E.SYN
|
lda #E.SYN
|
||||||
sec
|
sec
|
||||||
rts
|
rts
|
||||||
@ -106,21 +107,27 @@ CS.RUN.QUERY jsr Init.Timeout
|
|||||||
cmp #3
|
cmp #3
|
||||||
beq .9
|
beq .9
|
||||||
bra .1
|
bra .1
|
||||||
.2 ldx #5
|
|
||||||
ldy #DST.MAC+5
|
.2 >PUSHW L.MSG2
|
||||||
.3 >PUSHB (pData),y
|
|
||||||
dey
|
ldx #4
|
||||||
dex
|
ldy #DST.IP
|
||||||
bpl .3
|
|
||||||
ldx #3
|
|
||||||
ldy #DST.IP+3
|
|
||||||
.4 >PUSHB (pData),y
|
.4 >PUSHB (pData),y
|
||||||
dey
|
iny
|
||||||
dex
|
dex
|
||||||
bpl .4
|
bne .4
|
||||||
|
|
||||||
|
ldx #6
|
||||||
|
ldy #DST.MAC
|
||||||
|
|
||||||
|
.3 >PUSHB (pData),y
|
||||||
|
iny
|
||||||
|
dex
|
||||||
|
bne .3
|
||||||
|
|
||||||
>PUSHBI 10
|
>PUSHBI 10
|
||||||
>LDYA L.MSG2
|
>SYSCALL printf2
|
||||||
>SYSCALL printf
|
|
||||||
.8 lda #0
|
.8 lda #0
|
||||||
.9 sec
|
.9 sec
|
||||||
rts
|
rts
|
||||||
@ -156,28 +163,31 @@ CS.RUN.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.ARP.GETCACHE
|
|||||||
.1 lda (ZPPTR1)
|
.1 lda (ZPPTR1)
|
||||||
beq .4
|
beq .4
|
||||||
|
|
||||||
ldy #S.ARPCACHE.IP+4
|
>PUSHW L.MSG1
|
||||||
|
|
||||||
.2 dey
|
>PUSHB (ZPPTR1)
|
||||||
>PUSHB (ZPPTR1),y
|
|
||||||
cpy #S.ARPCACHE.IP
|
|
||||||
bne .2
|
|
||||||
|
|
||||||
ldy #S.ARPCACHE.MAC+6
|
|
||||||
|
|
||||||
.3 dey
|
|
||||||
>PUSHB (ZPPTR1),y
|
|
||||||
cpy #S.ARPCACHE.MAC
|
|
||||||
bne .3
|
|
||||||
|
|
||||||
ldy #S.ARPCACHE.TTL+1
|
ldy #S.ARPCACHE.TTL+1
|
||||||
>PUSHB (ZPPTR1),y
|
>PUSHB (ZPPTR1),y
|
||||||
dey
|
dey
|
||||||
>PUSHB (ZPPTR1),y
|
>PUSHB (ZPPTR1),y
|
||||||
>PUSHB (ZPPTR1)
|
|
||||||
|
ldy #S.ARPCACHE.MAC
|
||||||
|
|
||||||
|
.3 >PUSHB (ZPPTR1),y
|
||||||
|
iny
|
||||||
|
cpy #S.ARPCACHE.MAC+6
|
||||||
|
bne .3
|
||||||
|
|
||||||
|
ldy #S.ARPCACHE.IP
|
||||||
|
|
||||||
|
.2 >PUSHB (ZPPTR1),y
|
||||||
|
iny
|
||||||
|
cpy #S.ARPCACHE.IP+4
|
||||||
|
bne .2
|
||||||
|
|
||||||
>PUSHBI 13
|
>PUSHBI 13
|
||||||
>LDYA L.MSG1
|
>SYSCALL printf2
|
||||||
>SYSCALL printf
|
|
||||||
|
|
||||||
.4 lda ZPPTR1
|
.4 lda ZPPTR1
|
||||||
clc
|
clc
|
||||||
|
@ -67,6 +67,7 @@ CS.RUN
|
|||||||
lda ArgIndex
|
lda ArgIndex
|
||||||
>SYSCALL ArgV
|
>SYSCALL ArgV
|
||||||
bcs .7
|
bcs .7
|
||||||
|
|
||||||
>STYA ZPPtr1
|
>STYA ZPPtr1
|
||||||
|
|
||||||
lda (ZPPtr1)
|
lda (ZPPtr1)
|
||||||
@ -74,33 +75,32 @@ CS.RUN
|
|||||||
bne .2
|
bne .2
|
||||||
jsr CS.RUN.CheckOpt
|
jsr CS.RUN.CheckOpt
|
||||||
bcc .1
|
bcc .1
|
||||||
.99 >PUSHBI 0
|
|
||||||
>LDYA L.MSG.USAGE
|
.99 >PUSHW L.MSG.USAGE
|
||||||
>SYSCALL printf
|
>PUSHBI 0
|
||||||
|
>SYSCALL printf2
|
||||||
lda #E.SYN
|
lda #E.SYN
|
||||||
sec
|
sec
|
||||||
.9 rts
|
.9 rts
|
||||||
|
|
||||||
.2 lda hFile1
|
.2 lda hFile1
|
||||||
bne .3
|
bne .3
|
||||||
|
|
||||||
jsr CS.RUN.OPEN
|
jsr CS.RUN.OPEN
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
sta hFile1
|
sta hFile1
|
||||||
>LDYAI 256
|
|
||||||
>SYSCALL GetMem
|
|
||||||
bcs .9
|
|
||||||
>STYA ZPBufPtr1
|
|
||||||
stx hBuf1
|
|
||||||
bra .1
|
bra .1
|
||||||
|
|
||||||
.3 lda hFile2
|
.3 lda hFile2
|
||||||
bne .4
|
bne .4
|
||||||
|
|
||||||
jsr CS.RUN.OPEN
|
jsr CS.RUN.OPEN
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
sta hFile2
|
sta hFile2
|
||||||
>LDYAI 256
|
|
||||||
>SYSCALL GetMem
|
|
||||||
bcs .9
|
|
||||||
>STYA ZPBufPtr2
|
|
||||||
stx hBuf2
|
|
||||||
bra .1
|
bra .1
|
||||||
|
|
||||||
.4 bit bSkip1
|
.4 bit bSkip1
|
||||||
@ -110,18 +110,36 @@ CS.RUN
|
|||||||
sec
|
sec
|
||||||
ror bSkip1
|
ror bSkip1
|
||||||
bra .1
|
bra .1
|
||||||
|
|
||||||
.5 bit bSkip2
|
.5 bit bSkip2
|
||||||
bmi .99
|
bmi .99
|
||||||
|
|
||||||
sta bSkip2
|
sta bSkip2
|
||||||
jsr CS.RUN.SEEK
|
jsr CS.RUN.SEEK
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
sec
|
sec
|
||||||
ror bSkip2
|
ror bSkip2
|
||||||
jmp .1
|
jmp .1
|
||||||
|
|
||||||
.7 lda hFile2
|
.7 lda hFile2
|
||||||
beq .99
|
beq .99
|
||||||
lda hFile1
|
lda hFile1
|
||||||
beq .99
|
beq .99
|
||||||
|
|
||||||
|
.8 >LDYAI 256
|
||||||
|
>SYSCALL GetMem
|
||||||
|
bcs .9
|
||||||
|
|
||||||
|
>STYA ZPBufPtr1
|
||||||
|
stx hBuf1
|
||||||
|
|
||||||
|
>LDYAI 256
|
||||||
|
>SYSCALL GetMem
|
||||||
|
bcs .9
|
||||||
|
|
||||||
|
>STYA ZPBufPtr2
|
||||||
|
stx hBuf2
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CS.RUN.LOOP ldy #S.PS.hStdIn
|
CS.RUN.LOOP ldy #S.PS.hStdIn
|
||||||
lda (pPS),y
|
lda (pPS),y
|
||||||
@ -225,14 +243,16 @@ CS.RUN.READ2 >PUSHWI 256
|
|||||||
rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CS.RUN.Print phy
|
CS.RUN.Print phy
|
||||||
>PUSHB (ZPBufPtr2),y
|
|
||||||
>PUSHB (ZPBufPtr1),y
|
>PUSHW L.MSG.DIFF
|
||||||
|
>PUSHW Offset
|
||||||
tya
|
tya
|
||||||
>PUSHA
|
>PUSHA
|
||||||
>PUSHW Offset
|
>PUSHB (ZPBufPtr1),y
|
||||||
|
>PUSHB (ZPBufPtr2),y
|
||||||
>PUSHBI 5
|
>PUSHBI 5
|
||||||
>LDYA L.MSG.DIFF
|
|
||||||
>SYSCALL printf
|
>SYSCALL printf
|
||||||
|
|
||||||
ply
|
ply
|
||||||
rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
@ -74,9 +74,10 @@ CS.RUN.IPOK ldy #S.PS.ARGC
|
|||||||
|
|
||||||
.1 cmp #2
|
.1 cmp #2
|
||||||
beq CS.RUN.ADD
|
beq CS.RUN.ADD
|
||||||
|
|
||||||
|
>PUSHW L.MSG.USAGE
|
||||||
>PUSHBI 0
|
>PUSHBI 0
|
||||||
>LDYA L.MSG.USAGE
|
>SYSCALL printf2
|
||||||
>SYSCALL printf
|
|
||||||
|
|
||||||
lda #E.SYN
|
lda #E.SYN
|
||||||
sec
|
sec
|
||||||
@ -120,37 +121,44 @@ CS.RUN.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.DNS.GetCache
|
|||||||
.1 lda (ZPPTR1)
|
.1 lda (ZPPTR1)
|
||||||
beq .6
|
beq .6
|
||||||
|
|
||||||
ldy #S.DNSCACHE.TTL+4
|
>PUSHW L.MSG1
|
||||||
.2 dey
|
ldx #0
|
||||||
lda (ZPPTR1),y
|
lda (ZPPTR1) Entry Status
|
||||||
>PUSHA
|
bmi .5
|
||||||
cpy #S.DNSCACHE.TTL
|
|
||||||
bne .2
|
asl
|
||||||
ldy #S.DNSCACHE.IP+4
|
tax
|
||||||
.3 dey
|
|
||||||
lda (ZPPTR1),y
|
.5 >PUSHW L.MSG1.Status,x
|
||||||
>PUSHA
|
|
||||||
cpy #S.DNSCACHE.IP
|
|
||||||
bne .3
|
|
||||||
ldy #S.DNSCACHE.hNAME
|
|
||||||
lda (ZPPTR1),y
|
|
||||||
>SYSCALL GetMemPtr
|
|
||||||
>PUSHYA
|
|
||||||
|
|
||||||
ldy #S.DNSCACHE.ID
|
ldy #S.DNSCACHE.ID
|
||||||
>PUSHB (ZPPTR1),y
|
>PUSHB (ZPPTR1),y
|
||||||
iny
|
iny
|
||||||
>PUSHB (ZPPTR1),y
|
>PUSHB (ZPPTR1),y
|
||||||
|
|
||||||
ldx #0
|
ldy #S.DNSCACHE.hNAME
|
||||||
lda (ZPPTR1) Entry Status
|
lda (ZPPTR1),y
|
||||||
bmi .5
|
>SYSCALL GetMemPtr
|
||||||
asl
|
>PUSHYA
|
||||||
tax
|
|
||||||
.5 >PUSHW L.MSG1.Status,x
|
ldy #S.DNSCACHE.IP+4
|
||||||
|
|
||||||
|
.3 dey
|
||||||
|
lda (ZPPTR1),y
|
||||||
|
>PUSHA
|
||||||
|
cpy #S.DNSCACHE.IP
|
||||||
|
bne .3
|
||||||
|
|
||||||
|
|
||||||
|
ldy #S.DNSCACHE.TTL+4
|
||||||
|
.2 dey
|
||||||
|
lda (ZPPTR1),y
|
||||||
|
>PUSHA
|
||||||
|
cpy #S.DNSCACHE.TTL
|
||||||
|
bne .2
|
||||||
|
|
||||||
>PUSHBI 14
|
>PUSHBI 14
|
||||||
>LDYA L.MSG1
|
>SYSCALL printf2
|
||||||
>SYSCALL printf
|
|
||||||
|
|
||||||
.6 lda ZPPTR1
|
.6 lda ZPPTR1
|
||||||
clc
|
clc
|
||||||
|
Loading…
Reference in New Issue
Block a user