mirror of
https://github.com/A2osX/A2osX.git
synced 2025-01-13 08:29:46 +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
|
||||
beq .8
|
||||
|
||||
pha
|
||||
|
||||
.2 lda (ZPDataInPtr),y
|
||||
sta (ZPTmpPtr2)
|
||||
iny
|
||||
@ -872,6 +874,8 @@ SKT.GetDataFromSktIn
|
||||
SKT.AddDataToSktOut
|
||||
jsr SKT.GetTCB
|
||||
|
||||
* >DEBUG
|
||||
|
||||
ldx SKT.TCBCache+S.TCB.OUTFREE
|
||||
cpx ZPDataInLen
|
||||
lda SKT.TCBCache+S.TCB.OUTFREE+1
|
||||
|
@ -340,7 +340,7 @@ TCP.OUT.I lda SKT.TCBCache+S.TCB.OUTUSED+1
|
||||
pha
|
||||
sbc /K.TCP.MSS OUTDATA > MSS ?
|
||||
pla
|
||||
bcs .2 no....keep data len
|
||||
bcc .2 no....keep data len
|
||||
|
||||
>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
|
||||
lda (ZPPtrSKT),y
|
||||
ora #S.TCP.OPTIONS.ACK
|
||||
ldy #S.TCP.OPTIONS
|
||||
sta (ZPFrameOutPtr),y
|
||||
|
||||
|
@ -198,6 +198,7 @@ CS.RUN.CLIENT ldy #SktIndex
|
||||
>PUSHA
|
||||
|
||||
.2 lda #$ff data
|
||||
and #$7F
|
||||
>PUSHA
|
||||
|
||||
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.PutC
|
||||
|
Loading…
x
Reference in New Issue
Block a user