mirror of
https://github.com/A2osX/A2osX.git
synced 2024-11-25 20:33:13 +00:00
Kernel 0.9.2
This commit is contained in:
parent
77f5b08ba9
commit
cfae61405d
Binary file not shown.
Binary file not shown.
@ -216,6 +216,13 @@ ARP.QUERY.I jsr ARP.FIND.BY.IP
|
|||||||
cpy #S.ARPCACHE.MAC+6
|
cpy #S.ARPCACHE.MAC+6
|
||||||
bne .2
|
bne .2
|
||||||
|
|
||||||
|
ldy #S.ARPCACHE.TTL
|
||||||
|
lda #K.ARP.TTL
|
||||||
|
sta (ZPCachePtr),y
|
||||||
|
iny
|
||||||
|
lda /K.ARP.TTL
|
||||||
|
sta (ZPCachePtr),y
|
||||||
|
|
||||||
clc
|
clc
|
||||||
rts
|
rts
|
||||||
|
|
||||||
@ -261,6 +268,7 @@ ARP.FIND.BY.IP >LDYA L.ARP.CACHE
|
|||||||
dey
|
dey
|
||||||
dex
|
dex
|
||||||
bpl .2
|
bpl .2
|
||||||
|
|
||||||
clc
|
clc
|
||||||
rts
|
rts
|
||||||
|
|
||||||
|
@ -336,8 +336,8 @@ SKT.MkNod sta .1+1
|
|||||||
* **Out:**
|
* **Out:**
|
||||||
* Y,A = bytes transfered
|
* Y,A = bytes transfered
|
||||||
*\--------------------------------------
|
*\--------------------------------------
|
||||||
SKT.Read >PULLW ZPDataOutLen
|
SKT.Read >PULLW ZPDataInLen !!!use DataInPtr/Len
|
||||||
>PULLW ZPDataOutPtr
|
>PULLW ZPDataInPtr !!!DataOut trashed when sending ACK in TCP.OUT
|
||||||
>PULLA
|
>PULLA
|
||||||
|
|
||||||
SKT.Read.I jsr SKT.Get.I
|
SKT.Read.I jsr SKT.Get.I
|
||||||
@ -705,11 +705,11 @@ SKT.GetDataFromSktIn
|
|||||||
adc SKT.TCBCache+S.TCB.INTAIL+1
|
adc SKT.TCBCache+S.TCB.INTAIL+1
|
||||||
sta ZPTmpPtr2+1
|
sta ZPTmpPtr2+1
|
||||||
|
|
||||||
lda ZPDataOutLen
|
lda ZPDataInLen
|
||||||
eor #$FF
|
eor #$FF
|
||||||
tax
|
tax
|
||||||
|
|
||||||
lda ZPDataOutLen+1
|
lda ZPDataInLen+1
|
||||||
eor #$FF
|
eor #$FF
|
||||||
pha
|
pha
|
||||||
|
|
||||||
@ -757,10 +757,10 @@ SKT.GetDataFromSktIn
|
|||||||
|
|
||||||
.5 pla get back data....
|
.5 pla get back data....
|
||||||
|
|
||||||
.6 sta (ZPDataOutPtr),y
|
.6 sta (ZPDataInPtr),y
|
||||||
iny
|
iny
|
||||||
bne .61
|
bne .61
|
||||||
inc ZPDataOutPtr+1
|
inc ZPDataInPtr+1
|
||||||
|
|
||||||
.61 inc ZPTmpPtr3
|
.61 inc ZPTmpPtr3
|
||||||
bne .1
|
bne .1
|
||||||
|
@ -190,7 +190,7 @@ TCP.IN.JMP.SYNSENT
|
|||||||
lda #S.SOCKET.TCP.STATUS.ESTBLSH
|
lda #S.SOCKET.TCP.STATUS.ESTBLSH
|
||||||
sta (ZPPtrSKT),y
|
sta (ZPPtrSKT),y
|
||||||
|
|
||||||
jsr SKT.StoreTCB
|
jmp SKT.StoreTCB
|
||||||
|
|
||||||
.8 clc
|
.8 clc
|
||||||
.9 rts
|
.9 rts
|
||||||
@ -218,12 +218,10 @@ TCP.IN.JMP.SYNRCVD
|
|||||||
dex
|
dex
|
||||||
bpl .1
|
bpl .1
|
||||||
|
|
||||||
jsr SKT.StoreTCB
|
|
||||||
bcs .9
|
|
||||||
|
|
||||||
ldy #S.SOCKET.TCP.STATUS
|
ldy #S.SOCKET.TCP.STATUS
|
||||||
lda #S.SOCKET.TCP.STATUS.ESTBLSH
|
lda #S.SOCKET.TCP.STATUS.ESTBLSH
|
||||||
sta (ZPPtrSKT),y
|
sta (ZPPtrSKT),y
|
||||||
|
jmp SKT.StoreTCB
|
||||||
|
|
||||||
.8 clc
|
.8 clc
|
||||||
.9 rts
|
.9 rts
|
||||||
@ -452,7 +450,7 @@ TCP.OUT.I lda SKT.TCBCache+S.TCB.OUTTOSEND+1
|
|||||||
bne .80
|
bne .80
|
||||||
inc SKT.TCBCache+S.TCB.OUTNEXTSEQ
|
inc SKT.TCBCache+S.TCB.OUTNEXTSEQ
|
||||||
|
|
||||||
.80 jmp SKT.StoreTCB
|
.80 jmp SKT.StoreTCB exits with CC
|
||||||
TCP.OUT.9 rts
|
TCP.OUT.9 rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
TCP.OUT.SendOptA
|
TCP.OUT.SendOptA
|
||||||
|
Loading…
Reference in New Issue
Block a user