Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-06-07 17:29:34 +00:00
Code Issues Projects Releases Wiki Activity

Kernel 0.93

Browse Source
This commit is contained in:
Rémy GIBERT 2019-06-12 07:56:34 +02:00
parent 167e9146c0
commit b6fdc79b80
3 changed files with 12 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.Floppies/A2OSX.BUILD.po
View File

Binary file not shown.

2
LIB/LIBTCPIP.S.SKT.txt
View File

@ -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

21
LIB/LIBTCPIP.S.TCP.txt
View File

@ -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