mirror of
https://github.com/A2osX/A2osX.git
synced 2024-07-14 04:29:02 +00:00
Kernel version 0.9 : TCP, fix in PutC & ACK flag
This commit is contained in:
parent
95844e1698
commit
1440f681a8
BIN
A2OSX.BOOT.po
BIN
A2OSX.BOOT.po
Binary file not shown.
BIN
A2OSX.SRC.po
BIN
A2OSX.SRC.po
Binary file not shown.
@ -660,6 +660,8 @@ SKT.AddDataToSktIn
|
|||||||
inc
|
inc
|
||||||
beq .8
|
beq .8
|
||||||
|
|
||||||
|
pha
|
||||||
|
|
||||||
.2 lda (ZPDataInPtr),y
|
.2 lda (ZPDataInPtr),y
|
||||||
sta (ZPTmpPtr2)
|
sta (ZPTmpPtr2)
|
||||||
iny
|
iny
|
||||||
@ -872,6 +874,8 @@ SKT.GetDataFromSktIn
|
|||||||
SKT.AddDataToSktOut
|
SKT.AddDataToSktOut
|
||||||
jsr SKT.GetTCB
|
jsr SKT.GetTCB
|
||||||
|
|
||||||
|
* >DEBUG
|
||||||
|
|
||||||
ldx SKT.TCBCache+S.TCB.OUTFREE
|
ldx SKT.TCBCache+S.TCB.OUTFREE
|
||||||
cpx ZPDataInLen
|
cpx ZPDataInLen
|
||||||
lda SKT.TCBCache+S.TCB.OUTFREE+1
|
lda SKT.TCBCache+S.TCB.OUTFREE+1
|
||||||
|
@ -340,7 +340,7 @@ TCP.OUT.I lda SKT.TCBCache+S.TCB.OUTUSED+1
|
|||||||
pha
|
pha
|
||||||
sbc /K.TCP.MSS OUTDATA > MSS ?
|
sbc /K.TCP.MSS OUTDATA > MSS ?
|
||||||
pla
|
pla
|
||||||
bcs .2 no....keep data len
|
bcc .2 no....keep data len
|
||||||
|
|
||||||
>LDYAI K.TCP.MSS yes get only MSS
|
>LDYAI K.TCP.MSS yes get only MSS
|
||||||
|
|
||||||
@ -351,6 +351,7 @@ TCP.OUT.I lda SKT.TCBCache+S.TCB.OUTUSED+1
|
|||||||
|
|
||||||
ldy #S.SOCKET.TCP.OPTIONS
|
ldy #S.SOCKET.TCP.OPTIONS
|
||||||
lda (ZPPtrSKT),y
|
lda (ZPPtrSKT),y
|
||||||
|
ora #S.TCP.OPTIONS.ACK
|
||||||
ldy #S.TCP.OPTIONS
|
ldy #S.TCP.OPTIONS
|
||||||
sta (ZPFrameOutPtr),y
|
sta (ZPFrameOutPtr),y
|
||||||
|
|
||||||
|
@ -198,6 +198,7 @@ CS.RUN.CLIENT ldy #SktIndex
|
|||||||
>PUSHA
|
>PUSHA
|
||||||
|
|
||||||
.2 lda #$ff data
|
.2 lda #$ff data
|
||||||
|
and #$7F
|
||||||
>PUSHA
|
>PUSHA
|
||||||
|
|
||||||
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.PutC
|
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.PutC
|
||||||
|
Loading…
Reference in New Issue
Block a user