Kernel 0.9.1 : TCPIP, bugfix in DNS,ARP cache

This commit is contained in:
Rémy GIBERT 2018-01-17 06:56:16 +00:00
parent 92fd335e60
commit 343efe71f4
6 changed files with 25 additions and 18 deletions

Binary file not shown.

Binary file not shown.

View File

@ -21,6 +21,8 @@ CS.START cld
.DA #$61 6502,Level 1 (65c02)
.DA #1 BIN Layout Version 1
.DA 0
.DA CS.END-CS.START CS
.DA DS.END-DS.START DS
.DA #16 SS
.DA #2 ZP
.DA 0

View File

@ -128,7 +128,7 @@ CS.QUIT lda hLIBTCPIP
rts
*--------------------------------------
CS.END
LIBTCPIP >PSTR "libtcpip.o"
LIBTCPIP >CSTR "libtcpip.o"
MSG0 >CSTR "Proto Local Remote Options Status\r\n"
MSG1 >CSTR "%s %03d.%03d.%03d.%03d:%05D %03d.%03d.%03d.%03d:%05D %b %s\r\n"
MSG1.UDP >CSTR "UDP"

View File

@ -91,6 +91,7 @@ Dev.Detect >STYA ARGS
>LDYA ARGS
>STYA ZPTmpPTR
lda (ZPTmpPTR)
bne .4

View File

@ -3,14 +3,13 @@ PREFIX /A2OSX.BUILD
AUTO 4,1
.LIST OFF
*--------------------------------------
DecodeMac lda (ZPTmpPTR)
cmp #12
bne .9
ldy #1
DecodeMac ldy #0
ldx #0
.1 lda (ZPTmpPTR),y
beq .9
iny
jsr Asc2NibbleA
bcs .9
@ -20,16 +19,18 @@ DecodeMac lda (ZPTmpPTR)
asl
sta MAC,x
iny
lda (ZPTmpPTR),y
beq .9
iny
jsr Asc2NibbleA
bcs .9
ora MAC,x
sta MAC,x
inx
iny
cpy #13
cpx #6
bne .1
clc
@ -38,22 +39,25 @@ DecodeMac lda (ZPTmpPTR)
.9 sec
rts
*--------------------------------------
Asc2NibbleA cmp #$30
Asc2NibbleA cmp #'0'
bcc .9
cmp #$3A
cmp #'9'+1
bcs .1
and #$0F
clc
* clc
rts
.1 cmp #$41
.1 cmp #'A'
bcc .9
cmp #$47
bcs .9
cmp #'F'+1
bcs .99
sbc #$36
clc
* clc
rts
.9 sec
rts
.99 rts
*--------------------------------------
MAN
SAVE /A2OSX.SRC/DRV/X.NET.DRV.S