diff --git a/.Floppies/A2OSX.BUILD.po b/.Floppies/A2OSX.BUILD.po index 85fbf306..9d2915b8 100644 Binary files a/.Floppies/A2OSX.BUILD.po and b/.Floppies/A2OSX.BUILD.po differ diff --git a/LIB/LIBTCPIP.S.SKT.txt b/LIB/LIBTCPIP.S.SKT.txt index 841b4462..65e17598 100644 --- a/LIB/LIBTCPIP.S.SKT.txt +++ b/LIB/LIBTCPIP.S.SKT.txt @@ -502,7 +502,7 @@ SKT.GetDataFromSktIn * lda #S.TCP.OPTIONS.ACK * jsr TCP.OUT.SendOptA - jsr TCP.SetSocketTCPO.ACK ACK=1 -> send WSIZE +* jsr TCP.SetSocketTCPO.ACK ACK=1 -> send WSIZE * jsr TCP.OUT.I SKT.GetTCB already called diff --git a/LIB/LIBTCPIP.S.TCP.txt b/LIB/LIBTCPIP.S.TCP.txt index 0a0c86dc..bef3008f 100644 --- a/LIB/LIBTCPIP.S.TCP.txt +++ b/LIB/LIBTCPIP.S.TCP.txt @@ -166,7 +166,7 @@ TCP.IN.JMP.ESTBLSH ldx TmpDWord+2 bne .2 tay - beq .3 + beq .4 .2 clc adc SKT.Cache+S.SOCKET.TCP.OUTTAIL @@ -227,24 +227,25 @@ TCP.IN.JMP.ESTBLSH bne .6 inc SKT.Cache+S.SOCKET.TCP.INSEQNUM -.6 jsr SKT.StoreTCB success, update socket +.6 jsr TCP.SetSocketTCPO.ACK - jsr TCP.SetSocketTCPO.ACK Try to ACK read DATA - -* jsr TCP.OUT.I SKT.GetTCB already called +* lda #S.TCP.OPTIONS.ACK +* jsr TCP.OUT.SendOptA Try to ACK read DATA + + jsr SKT.StoreTCB success, update socket .7 ldy #S.TCP.OPTIONS lda (ZPFrameInPtr),y and #S.TCP.OPTIONS.FIN beq .8 + lda #S.SOCKET.TCP.S.CLWAIT + ldy #S.SOCKET.TCP.S + sta (ZPPtrSKT),y + jsr TCP.IN.ACKTheFIN lda #S.TCP.OPTIONS.FIN+S.TCP.OPTIONS.ACK - jsr TCP.OUT.SendOptA FIN received, Send FIN.ACK - bcs .9 - - lda #S.SOCKET.TCP.S.CLWAIT - jmp SKT.StoreTCB.S + jmp TCP.OUT.SendOptA FIN received, Send FIN.ACK .8 clc .9 rts