A2osX/LIB/LIBTCPIP.S.TCP.txt

NEW
PREFIX /A2OSX.BUILD
AUTO 4,1
				.LIST OFF	
*--------------------------------------
TCP.IN			jsr FRM.GetTargetSKT.TCPUDP

				jsr SKT.FindMatchingLocRem
				bcs TCP.IN.JMP.CLOSED	no socket, go discard
				
				ldy #S.SOCKET.PROTO
				lda (ZPPtrSKT),y
				cmp #S.IP.PROTOCOL.TCP
				bne TCP.IN.JMP.CLOSED	wrong protocol, go discard
			
				ldy #S.TCP.OPTIONS
				lda (ZPFrameInPtr),y
				and #S.TCP.OPTIONS.RST	RST ? go Kill this socket...
				bne TCP.IN.RST			...and discard frame
				
				ldy #S.SOCKET.TCP.S
				lda (ZPPtrSKT),y
				asl
				tax
				jmp (J.TCP.IN,x)
*--------------------------------------
TCP.IN.RST		lda SKT.TABLE,x
				jsr SKT.shutdown
*--------------------------------------
TCP.IN.JMP.CLOSED
				lda hFrameIn
				stz hFrameIn
				>SYSCALL FreeMem
				rts
*--------------------------------------
TCP.CLOSE		ldx #0

.1				phx
				lda SKT.TABLE,x
				beq .8
				
				>SYSCALL GetMemPtr
				>STYA ZPTmpPtr1

				ldy #S.SOCKET.AF
				lda (ZPTmpPtr1),y
				cmp #AF.INET
				bne .8
				
				iny					#S.SOCKET.T
				
				lda (ZPTmpPtr1),y
				cmp #S.SOCKET.T.SEQPACKET
				bcc .8
				
				ldy #S.SOCKET.TCP.S
				lda (ZPTmpPtr1),y
				cmp #S.SOCKET.TCP.S.TIMEWT
				bcc .8
				
				plx
				phx
				
				lda SKT.TABLE,x
				jsr SKT.Shutdown
				
.8				plx
				inx
				cpx #K.SKTTABLE.SIZE
				bne .1

.9				rts
*--------------------------------------
TCP.IN.JMP.LISTEN
				ldy #S.SOCKET.T			Create a new client socket
				lda (ZPPtrSKT),y
				tax						Same type a listening socket
				iny						#S.SOCKET.PROTO
				lda (ZPPtrSKT),y
				
				jsr SKT.Socket.I		get new socket in ZPTmpPtr1
				bcs TCP.IN.JMP.CLOSED

				jsr SKT.AddToQueueA		Queued successfully ?
				
				bcs TCP.IN.JMP.CLOSED	no, discard frame and new socket		

				jsr ARP.AddFromFrameInPtr
				
				lda ZPTmpPtr1
				sta ZPPtrSKT
				lda ZPTmpPtr1+1
				sta ZPPtrSKT+1

				jsr SKT.SetLocAddr
				jsr SKT.SetRemAddr

				jsr SKT.NewTCB
				bcs .99
				
				jsr TCP.IN.ACKTheSYN
				
				lda #S.TCP.OPTIONS.SYN+S.TCP.OPTIONS.ACK
				jsr TCP.OUT.SendOptA	SYN received, Send SYN.ACK
				bcs .9

				lda #S.SOCKET.TCP.S.SYNRCVD
				sta	SKT.Cache+S.SOCKET.TCP.S
				jmp SKT.StoreTCB
				
.9				lda #ERR.SKT.OOS
.99				rts
*--------------------------------------
TCP.IN.JMP.SYNSENT
				ldy #S.TCP.OPTIONS		SYN Send, only accept SYN.ACK packet, then Send ACK 
				lda (ZPFrameInPtr),y
				and #S.TCP.OPTIONS.SYN+S.TCP.OPTIONS.ACK
				cmp #S.TCP.OPTIONS.SYN+S.TCP.OPTIONS.ACK
				bne .9

				jsr SKT.GetTCB
				
				ldx #3
				ldy #S.TCP.ACKNUM+3

				sec						Check if ACK=OUTNEXTSEQ+1

.1				lda SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ,x
				adc #0
				sta	SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ,x 
				eor (ZPFrameInPtr),y
				bne .9
				dey
				dex
				bpl .1

				jsr TCP.IN.ACKTheSYN

				lda #S.TCP.OPTIONS.ACK
				jsr TCP.OUT.SendOptA	SYN.ACK recieved, Send, ACK
				bcs .9
				
				lda #S.SOCKET.TCP.S.ESTBLSH
				sta	SKT.Cache+S.SOCKET.TCP.S
				jmp SKT.StoreTCB
				
.9				lda #S.TCP.OPTIONS.RST
				jsr TCP.OUT.SendOptA
				
				ldx SKT.Index
				lda SKT.TABLE,x
				jmp SKT.shutdown
*--------------------------------------
TCP.IN.JMP.SYNRCVD
				ldy #S.TCP.OPTIONS		SYN Received, SYN.ACK Sent, only accept ACK packet
				lda (ZPFrameInPtr),y
				cmp #S.TCP.OPTIONS.ACK
				bne .8
				
				jsr SKT.GetTCB
			
				ldx #3
				ldy #S.TCP.ACKNUM+3

				sec
				
.1				lda	SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ,x 	Check if ACK=OUTNEXTSEQ+1
				adc #0
				sta SKT.Cache+S.SOCKET.TCP.OUTSEQNUM,x 		setup SEQNUM
				sta	SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ,x		...and update NEXTSEQ
				eor (ZPFrameInPtr),y
				bne .8
				dey
				dex
				bpl .1
				
				lda #S.SOCKET.TCP.S.ESTBLSH
				sta SKT.Cache+S.SOCKET.TCP.S
				jmp SKT.StoreTCB
			
.8				clc
.9				rts
*--------------------------------------
TCP.IN.JMP.ESTBLSH
				jsr SKT.GetTCB

				ldy #S.TCP.OPTIONS
				lda (ZPFrameInPtr),y
				and #S.TCP.OPTIONS.ACK	Remote side ACKed data ?
				beq .1
				
				jsr SKT.AckDataToSktOut	Yes, Discard sent data
				jsr SKT.StoreTCB		and update SKT

.1				jsr TCP.IN.SetDataInPtrAndLen
				
				lda ZPDataInLen			Incoming Data in this frame ?
				ora ZPDataInLen+1
				beq .2					No data, ...

				jsr SKT.AddDataToSktIn	yes, queue data if there is room for....
				bcs .2
				
				jsr SKT.StoreTCB		success, update socket
				
.2				ldy #S.TCP.OPTIONS
				lda (ZPFrameInPtr),y
				and #S.TCP.OPTIONS.FIN
				beq .8

				jsr TCP.IN.ACKTheFIN
				
				bcs .9
				
				ldy #S.SOCKET.TCP.S
				lda #S.SOCKET.TCP.S.CLWAIT
				sta (ZPPtrSKT),y
				jmp SKT.StoreTCB
				
.8				clc
.9				rts
*--------------------------------------
TCP.IN.JMP.CLWAIT
				clc						Wait for SKT.shutdown
				rts
*--------------------------------------
TCP.IN.JMP.LASTACK
				ldy #S.TCP.OPTIONS		only accept ACK packet
				lda (ZPFrameInPtr),y
				bit #S.TCP.OPTIONS.ACK
				beq .8
				
				ldx SKT.Index
				lda SKT.TABLE,x
				jmp SKT.shutdown
				
.8				clc
				rts
*--------------------------------------
TCP.IN.JMP.FINWT1
				ldy #S.TCP.OPTIONS		only accept ACK packet
				lda (ZPFrameInPtr),y
				bit #S.TCP.OPTIONS.FIN
				beq .8
				
				ldy #S.SOCKET.TCP.O
				lda #S.TCP.OPTIONS.FIN	send FIN
				sta (ZPPtrSKT),y
				jsr TCP.IN.ACKTheFIN
				bcs .9
				
				ldy #S.SOCKET.TCP.S
				lda #S.SOCKET.TCP.S.FINWT2
				sta (ZPPtrSKT),y
				
.8				clc
.9				rts
*--------------------------------------
TCP.IN.JMP.FINWT2
				ldy #S.TCP.OPTIONS		only accept FIN packet
				lda (ZPFrameInPtr),y

				bit #S.TCP.OPTIONS.FIN
				beq .8
				
				jsr TCP.IN.ACKTheFIN
				bcs .9

				ldy #S.SOCKET.TCP.S
				lda #S.SOCKET.TCP.S.TIMEWT
				sta (ZPPtrSKT),y
				
.8				clc
.9				rts
*--------------------------------------
TCP.IN.JMP.CLOSING
				ldy #S.TCP.OPTIONS		only accept ACK packet
				lda (ZPFrameInPtr),y
				bit #S.TCP.OPTIONS.ACK
				beq .1
				
				ldy #S.SOCKET.TCP.S
				lda #S.SOCKET.TCP.S.TIMEWT
				sta (ZPPtrSKT),y
				
.1				clc
				rts
*--------------------------------------
TCP.IN.JMP.TIMEWT
				clc						Wait for TCP.Close
				rts
*--------------------------------------
TCP.IN.ACKTheSYN
				ldy #S.TCP.SEQNUM+3		Get Remote SEQ
				ldx #3
				
				sec
				
.3				lda (ZPFrameInPtr),y	Set OUTACK=SEQ+1 for new socket...
				adc #0
				sta SKT.Cache+S.SOCKET.TCP.INLASTSEQNUM,x
				sta SKT.Cache+S.SOCKET.TCP.OUTACKNUM,x
				dey
				dex
				bpl .3
				rts
*--------------------------------------
TCP.IN.ACKTheFIN
				ldy #S.SOCKET.TCP.O
				lda (ZPPtrSKT),y
				ora #S.TCP.OPTIONS.ACK	
				sta (ZPPtrSKT),y
				
				jsr SKT.GetTCB
				
				ldx #3
				ldy #S.TCP.ACKNUM+3

				sec
				
.3				lda	SKT.Cache+S.SOCKET.TCP.OUTACKNUM,x
				adc #0
				sta	SKT.Cache+S.SOCKET.TCP.OUTACKNUM,x
				dey
				dex
				bpl .3

				jmp TCP.OUT.I			ACK the FIN
*--------------------------------------
TCP.IN.SetDataInPtrAndLen
				ldy #S.IP.TOTAL.LENGTH+1
				lda (ZPFrameInPtr),y
				sec
				sbc #S.IP-S.ETH.EII
				sta ZPDataInLen

				dey
				lda (ZPFrameInPtr),y
				sbc /S.IP-S.ETH.EII
				sta ZPDataInLen+1
				
				ldy #S.TCP.DATAOFFSET
				lda (ZPFrameInPtr),y
				and #$F0				Get TCP Header len in DWORD
				lsr
				lsr
				sta TmpOffset

				lda ZPDataInLen
				sec
				sbc TmpOffset
				sta ZPDataInLen
				
				bcs .1
				dec ZPDataInLen+1
				
.1				lda ZPFrameInPtr
				clc
				adc #S.IP
				pha
				
				lda ZPFrameInPtr+1
				adc /S.IP
				tax
				
				pla
				clc
				adc TmpOffset
				bcc .2
				
				inx
				
.2				sta ZPDataInPtr
				stx ZPDataInPtr+1
				rts
*--------------------------------------
TCP.OUT			jsr SKT.GetTCB 

TCP.OUT.I		lda SKT.Cache+S.SOCKET.TCP.OUTTOSEND+1
				ldy SKT.Cache+S.SOCKET.TCP.OUTTOSEND
				
				bne .1
			
				tax
				bne .1
				
*	Y,A=0 : no data to send		
		
				ldy #S.SOCKET.TCP.O
				lda (ZPPtrSKT),y
				bne TCP.OUT.SendOptA	a least an option...
				clc						No, data, no flag....exit
				rts
						
.1				cpy #K.TCP.MSS
				pha
				sbc /K.TCP.MSS			OUTDATA > MSS ?
				pla
				bcc .2					no....keep data len

				>LDYAI K.TCP.MSS		yes send only MSS
				
.2				jsr TCP.NewFrame
				bcs TCP.OUT.9

				jsr SKT.GetDataFromSktOut
								
				ldy #S.SOCKET.TCP.O
				lda (ZPPtrSKT),y
				ora #S.TCP.OPTIONS.ACK
				jsr TCP.OUT.SendOptA.1
				
				bcs TCP.OUT.9
				
				lda SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ+3
				clc
				adc ZPDataOutLen
				sta SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ+3
				
				lda SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ+2
				adc ZPDataOutLen+1
				sta SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ+2
				bcc .80
				inc SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ+1
				bne .80
				inc SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ
				
.80				jmp SKT.StoreTCB		exits with CC
TCP.OUT.9		rts
*--------------------------------------
TCP.OUT.SendOptA
				sta .1+1
				>LDYAI 0
				jsr TCP.NewFrame
				bcs TCP.OUT.9				

.1				lda #$ff
				
TCP.OUT.SendOptA.1
				ldy #S.TCP.OPTIONS
				sta (ZPFrameOutPtr),y
				bit #S.TCP.OPTIONS.ACK
				beq .10
				
				ldx #3
				ldy #S.TCP.ACKNUM+3
				
.1				lda SKT.Cache+S.SOCKET.TCP.OUTACKNUM,x
				sta (ZPFrameOutPtr),y
				dey
				dex
				bpl .1
				
.10				ldx #3
				ldy #S.TCP.SEQNUM+3
				
.2				lda SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ,x
				sta (ZPFrameOutPtr),y
				dey
				dex
				bpl .2
				
				ldy #S.TCP.WINDOW
				lda SKT.Cache+S.SOCKET.TCP.INFREE+1
				sta (ZPFrameOutPtr),y
				iny
				lda SKT.Cache+S.SOCKET.TCP.INFREE
				sta (ZPFrameOutPtr),y

				jsr FRM.SendIP
				bcs .9
				
				ldy #S.SOCKET.TCP.O
				lda #0
				sta (ZPPtrSKT),y

*				clc
.9				rts
*--------------------------------------
TCP.NewFrame	ldx #S.IP.PROTOCOL.TCP
				jsr FRM.NewIP
				bcs .9
				
				jsr SKT.SetFrameOutDstIP

				jsr SKT.SetFrameOutTCPUDPPorts
				
				ldy #S.TCP.DATAOFFSET
				lda #$50				Header size = 5 DWORDS
				sta (ZPFrameOutPtr),y
				
				ldy #S.TCP.WINDOW
				lda SKT.Cache+S.SOCKET.TCP.INFREE+1
				sta (ZPFrameOutPtr),y
				iny
				lda SKT.Cache+S.SOCKET.TCP.INFREE
				sta (ZPFrameOutPtr),y
				
				clc
.9				rts
*--------------------------------------
MAN
SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.TCP
LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
ASM
-												Kernel 0.9.1 : Move To S-C MASM 3.0
											
										
										
											2017-12-22 21:24:30 +00:00
+								NEW
-												Kernel version 0.9 : MEDIA reorganisation
											
										
										
											2017-03-29 15:48:15 +00:00
+								PREFIX /A2OSX.BUILD
-												Kernel 0.9.1 : Move To S-C MASM 3.0
											
										
										
											2017-12-22 21:24:30 +00:00
+								AUTO 4,1
-												Moved All TCPIP Code from TCPIP.DRV to LIBTCPIP
											
										
										
											2016-01-16 22:04:22 +00:00
+												.LIST OFF
 								*--------------------------------------
-												Kernel 0.9.2
											
										
										
											2018-10-08 15:41:00 +00:00
+								TCP.IN			jsr FRM.GetTargetSKT.TCPUDP
-												Kernel 0.9.2
											
										
										
											2018-11-01 08:53:47 +00:00
-												Kernel 0.9.2
											
										
										
											2018-10-01 05:48:42 +00:00
+												jsr SKT.FindMatchingLocRem
 												bcs TCP.IN.JMP.CLOSED	no socket, go discard
-												LIBTCPIP:Started implementing Socket API
											
										
										
											2016-03-13 22:09:00 +00:00
-												Kernel 0.9.2
											
										
										
											2018-10-01 05:48:42 +00:00
+												ldy #S.SOCKET.PROTO
-												LIBTCPIP:Started implementing Socket API
											
										
										
											2016-03-13 22:09:00 +00:00
+												lda (ZPPtrSKT),y
-												Kernel 0.9.2
											
										
										
											2018-10-08 15:41:00 +00:00
+												cmp #S.IP.PROTOCOL.TCP
-												Kernel 0.9.2
											
										
										
											2018-10-01 05:48:42 +00:00
+												bne TCP.IN.JMP.CLOSED	wrong protocol, go discard
-												Kernel version 0.9 : TCP Client sockets
											
										
										
											2017-03-13 07:07:07 +00:00
-												Kernel version 0.9 : LIBTCPIP development resuming....
											
										
										
											2017-03-07 16:40:32 +00:00
+												ldy #S.TCP.OPTIONS
 												lda (ZPFrameInPtr),y
-												Kernel 0.9.2
											
										
										
											2018-10-01 05:48:42 +00:00
+												and #S.TCP.OPTIONS.RST	RST ? go Kill this socket...
 												bne TCP.IN.RST			...and discard frame
-												Kernel version 0.9 : LIBTCPIP development resuming....
											
										
										
											2017-03-07 16:40:32 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-28 15:24:44 +00:00
+												ldy #S.SOCKET.TCP.S
-												Kernel version 0.9 : TCP & Sockets, bugfix session #2
											
										
										
											2017-02-16 16:26:11 +00:00
+												lda (ZPPtrSKT),y
 												asl
 												tax
-												Kernel 0.9.2
											
										
										
											2018-09-27 15:34:38 +00:00
+												jmp (J.TCP.IN,x)
-												Kernel version 0.9 : TCP & Sockets, bugfix session #2
											
										
										
											2017-02-16 16:26:11 +00:00
+								*--------------------------------------
-												Kernel 0.9.2
											
										
										
											2018-11-07 06:59:37 +00:00
+								TCP.IN.RST		lda SKT.TABLE,x
 												jsr SKT.shutdown
-												Kernel 0.9.2
											
										
										
											2018-10-01 05:48:42 +00:00
+								*--------------------------------------
 								TCP.IN.JMP.CLOSED
-												Kernel 0.9.2
											
										
										
											2018-11-07 06:59:37 +00:00
+												lda hFrameIn
 												stz hFrameIn
 												>SYSCALL FreeMem
-												Kernel 0.9.2
											
										
										
											2018-10-01 05:48:42 +00:00
+												rts
-												Kernel version 0.9 : LIBTCPIP development resuming....
											
										
										
											2017-03-07 16:40:32 +00:00
+								*--------------------------------------
-												Kernel 0.9.2
											
										
										
											2018-11-07 06:59:37 +00:00
+								TCP.CLOSE		ldx #0
 								.1				phx
 												lda SKT.TABLE,x
 												beq .8
 												>SYSCALL GetMemPtr
 												>STYA ZPTmpPtr1
 												ldy #S.SOCKET.AF
 												lda (ZPTmpPtr1),y
 												cmp #AF.INET
 												bne .8
 												iny					#S.SOCKET.T
 												lda (ZPTmpPtr1),y
 												cmp #S.SOCKET.T.SEQPACKET
 												bcc .8
 												ldy #S.SOCKET.TCP.S
 												lda (ZPTmpPtr1),y
 												cmp #S.SOCKET.TCP.S.TIMEWT
 												bcc .8
 												plx
 												phx
 												lda SKT.TABLE,x
 												jsr SKT.Shutdown
 								.8				plx
 												inx
 												cpx #K.SKTTABLE.SIZE
 												bne .1
 								.9				rts
 								*--------------------------------------
-												Kernel version 0.9 : TCP & Sockets, bugfix session #2
											
										
										
											2017-02-16 16:26:11 +00:00
+								TCP.IN.JMP.LISTEN
-												Kernel 0.9.2
											
										
										
											2018-10-01 15:52:58 +00:00
+												ldy #S.SOCKET.T			Create a new client socket
 												lda (ZPPtrSKT),y
 												tax						Same type a listening socket
-												Kernel 0.9.2
											
										
										
											2018-11-01 08:53:47 +00:00
+												iny						#S.SOCKET.PROTO
 												lda (ZPPtrSKT),y
-												Kernel 0.9.2
											
										
										
											2018-10-01 15:52:58 +00:00
+												jsr SKT.Socket.I		get new socket in ZPTmpPtr1
 												bcs TCP.IN.JMP.CLOSED
-												LIBTCPIP:Started implementing Socket API
											
										
										
											2016-03-13 22:09:00 +00:00
-												Kernel 0.9.2
											
										
										
											2018-10-01 15:52:58 +00:00
+												jsr SKT.AddToQueueA		Queued successfully ?
-												Updated Medias
											
										
										
											2016-04-09 09:15:11 +00:00
-												Kernel 0.9.2
											
										
										
											2018-10-01 15:52:58 +00:00
+												bcs TCP.IN.JMP.CLOSED	no, discard frame and new socket
-												LIBTCPIP:Started implementing Socket API
											
										
										
											2016-03-13 22:09:00 +00:00
-												Kernel 0.9.2
											
										
										
											2018-10-01 05:48:42 +00:00
+												jsr ARP.AddFromFrameInPtr
-												Kernel 0.9.2
											
										
										
											2018-10-01 15:52:58 +00:00
+												lda ZPTmpPtr1
-												Kernel version 0.9 : TCP Client sockets
											
										
										
											2017-03-13 07:07:07 +00:00
+												sta ZPPtrSKT
-												Kernel 0.9.2
											
										
										
											2018-11-01 08:53:47 +00:00
+												lda ZPTmpPtr1+1
-												Kernel version 0.9 : TCP Client sockets
											
										
										
											2017-03-13 07:07:07 +00:00
+												sta ZPPtrSKT+1
-												Kernel version 0.9 : TCP & Sockets, bugfix session #3
											
										
										
											2017-02-17 07:20:57 +00:00
-												Kernel 0.9.2
											
										
										
											2018-11-01 08:53:47 +00:00
+												jsr SKT.SetLocAddr
 												jsr SKT.SetRemAddr
 												jsr SKT.NewTCB
 												bcs .99
-												Kernel version 0.9 : TCP & Sockets, bugfix session #3
											
										
										
											2017-02-17 07:20:57 +00:00
-												Kernel 0.9.2
											
										
										
											2018-11-01 08:53:47 +00:00
+												jsr TCP.IN.ACKTheSYN
-												Kernel version 0.9 : TCP & Sockets, bugfix session #2
											
										
										
											2017-02-16 16:26:11 +00:00
-												Kernel version 0.9 : TCP & SKT, bugfix and optimization in TCP.OUT
											
										
										
											2017-03-23 16:41:36 +00:00
+												lda #S.TCP.OPTIONS.SYN+S.TCP.OPTIONS.ACK
-												Kernel 0.9.2
											
										
										
											2018-09-21 15:28:46 +00:00
+												jsr TCP.OUT.SendOptA	SYN received, Send SYN.ACK
-												Kernel version 0.9 : TCP & Sockets, bugfix session #2
											
										
										
											2017-02-16 16:26:11 +00:00
+												bcs .9
-												Kernel version 0.9 : TCP, bugfix in TELNETD/NETSTAT
											
										
										
											2017-03-14 07:32:31 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-28 15:24:44 +00:00
+												lda #S.SOCKET.TCP.S.SYNRCVD
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												sta	SKT.Cache+S.SOCKET.TCP.S
-												Kernel 0.9.2
											
										
										
											2018-11-01 08:53:47 +00:00
+												jmp SKT.StoreTCB
-												Kernel version 0.9 : TCP Client sockets
											
										
										
											2017-03-13 07:07:07 +00:00
-												Kernel 0.9.2
											
										
										
											2018-11-01 08:53:47 +00:00
+								.9				lda #ERR.SKT.OOS
-												Kernel version 0.9 : TCP Client sockets
											
										
										
											2017-03-13 07:07:07 +00:00
+								.99				rts
-												Kernel version 0.9 : TCPIP migration, fixed timing issues in DHCPCLNT, Broadcast not cleared properly....and working on TCP....
											
										
										
											2017-01-28 22:05:20 +00:00
+								*--------------------------------------
 								TCP.IN.JMP.SYNSENT
-												Kernel version 0.9 : TCP, bugfix in recieve data ACKed to early
											
										
										
											2017-03-14 16:46:29 +00:00
+												ldy #S.TCP.OPTIONS		SYN Send, only accept SYN.ACK packet, then Send ACK
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+												lda (ZPFrameInPtr),y
-												Kernel 0.9.2
											
										
										
											2018-09-12 15:27:00 +00:00
+												and #S.TCP.OPTIONS.SYN+S.TCP.OPTIONS.ACK
 												cmp #S.TCP.OPTIONS.SYN+S.TCP.OPTIONS.ACK
 												bne .9
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+												jsr SKT.GetTCB
 												ldx #3
-												Kernel version 0.9 : 
-TCP, bugfix (#8) ...nearly working!!!
-MKNod API implementation for stream SOCKET
-Bugfix in Smartort controller/device detection
-Memory leak in CP/MV/RM
											
										
										
											2017-04-10 06:07:14 +00:00
+												ldy #S.TCP.ACKNUM+3
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
-												Kernel version 0.9 : 
-TCP, bugfix (#8) ...nearly working!!!
-MKNod API implementation for stream SOCKET
-Bugfix in Smartort controller/device detection
-Memory leak in CP/MV/RM
											
										
										
											2017-04-10 06:07:14 +00:00
+												sec						Check if ACK=OUTNEXTSEQ+1
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+								.1				lda SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ,x
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+												adc #0
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												sta	SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ,x
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+												eor (ZPFrameInPtr),y
-												Kernel 0.9.2
											
										
										
											2018-09-12 15:27:00 +00:00
+												bne .9
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+												dey
 												dex
 												bpl .1
-												Kernel 0.9.2
											
										
										
											2018-09-21 15:28:46 +00:00
+												jsr TCP.IN.ACKTheSYN
-												Kernel 0.9.2
											
										
										
											2018-09-03 06:01:07 +00:00
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+												lda #S.TCP.OPTIONS.ACK
-												Kernel version 0.9 : 
-TCP, bugfix (#8) ...nearly working!!!
-MKNod API implementation for stream SOCKET
-Bugfix in Smartort controller/device detection
-Memory leak in CP/MV/RM
											
										
										
											2017-04-10 06:07:14 +00:00
+												jsr TCP.OUT.SendOptA	SYN.ACK recieved, Send, ACK
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+												bcs .9
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-28 15:24:44 +00:00
+												lda #S.SOCKET.TCP.S.ESTBLSH
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												sta	SKT.Cache+S.SOCKET.TCP.S
-												Kernel 0.9.2
											
										
										
											2018-09-04 15:29:15 +00:00
+												jmp SKT.StoreTCB
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-12 15:27:00 +00:00
+								.9				lda #S.TCP.OPTIONS.RST
 												jsr TCP.OUT.SendOptA
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												ldx SKT.Index
 												lda SKT.TABLE,x
 												jmp SKT.shutdown
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+								*--------------------------------------
 								TCP.IN.JMP.SYNRCVD
-												Kernel 0.9.2
											
										
										
											2018-09-21 15:28:46 +00:00
+												ldy #S.TCP.OPTIONS		SYN Received, SYN.ACK Sent, only accept ACK packet
-												Kernel version 0.9 : TCPIP, new RAW socket type for ICMP (cont.)
											
										
										
											2017-01-31 16:40:37 +00:00
+												lda (ZPFrameInPtr),y
-												LIBTCPIP:Started implementing Socket API
											
										
										
											2016-03-13 22:09:00 +00:00
+												cmp #S.TCP.OPTIONS.ACK
 												bne .8
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+												jsr SKT.GetTCB
-												LIBTCPIP:Started implementing Socket API
											
										
										
											2016-03-13 22:09:00 +00:00
+												ldx #3
-												Kernel version 0.9 : 
-TCP, bugfix (#8) ...nearly working!!!
-MKNod API implementation for stream SOCKET
-Bugfix in Smartort controller/device detection
-Memory leak in CP/MV/RM
											
										
										
											2017-04-10 06:07:14 +00:00
+												ldy #S.TCP.ACKNUM+3
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#3)
											
										
										
											2017-03-29 06:33:26 +00:00
+												sec
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+								.1				lda	SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ,x 	Check if ACK=OUTNEXTSEQ+1
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#3)
											
										
										
											2017-03-29 06:33:26 +00:00
+												adc #0
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												sta SKT.Cache+S.SOCKET.TCP.OUTSEQNUM,x 		setup SEQNUM
 												sta	SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ,x		...and update NEXTSEQ
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+												eor (ZPFrameInPtr),y
-												LIBTCPIP:Started implementing Socket API
											
										
										
											2016-03-13 22:09:00 +00:00
+												bne .8
-												Kernel version 0.9 : TCP Client sockets
											
										
										
											2017-03-13 07:07:07 +00:00
+												dey
-												LIBTCPIP:Started implementing Socket API
											
										
										
											2016-03-13 22:09:00 +00:00
+												dex
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+												bpl .1
-												LIBTCPIP:Started implementing Socket API
											
										
										
											2016-03-13 22:09:00 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-28 15:24:44 +00:00
+												lda #S.SOCKET.TCP.S.ESTBLSH
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												sta SKT.Cache+S.SOCKET.TCP.S
-												Kernel 0.9.2
											
										
										
											2018-09-04 15:29:15 +00:00
+												jmp SKT.StoreTCB
-												Kernel version 0.9 : TCP Client sockets
											
										
										
											2017-03-13 07:07:07 +00:00
-												LIBTCPIP:Started implementing Socket API
											
										
										
											2016-03-13 22:09:00 +00:00
+								.8				clc
-												Kernel version 0.9 : TCP & SKT, added code for TCP conn. close
											
										
										
											2017-03-24 16:27:44 +00:00
+								.9				rts
-												Kernel version 0.9 : TCPIP migration, fixed timing issues in DHCPCLNT, Broadcast not cleared properly....and working on TCP....
											
										
										
											2017-01-28 22:05:20 +00:00
+								*--------------------------------------
 								TCP.IN.JMP.ESTBLSH
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+												jsr SKT.GetTCB
-												Kernel version 0.9 : TCPIP migration, fixed timing issues in DHCPCLNT, Broadcast not cleared properly....and working on TCP....
											
										
										
											2017-01-28 22:05:20 +00:00
+												ldy #S.TCP.OPTIONS
-												Kernel version 0.9 : TCPIP, new RAW socket type for ICMP (cont.)
											
										
										
											2017-01-31 16:40:37 +00:00
+												lda (ZPFrameInPtr),y
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#1)
											
										
										
											2017-03-27 06:28:25 +00:00
+												and #S.TCP.OPTIONS.ACK	Remote side ACKed data ?
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+												beq .1
-												Kernel version 0.9 : TCP & Sockets, bugfix session #4
											
										
										
											2017-02-17 16:39:38 +00:00
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#1)
											
										
										
											2017-03-27 06:28:25 +00:00
+												jsr SKT.AckDataToSktOut	Yes, Discard sent data
 												jsr SKT.StoreTCB		and update SKT
-												Kernel version 0.9 : TCP & Sockets, bugfix session #4
											
										
										
											2017-02-17 16:39:38 +00:00
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+								.1				jsr TCP.IN.SetDataInPtrAndLen
-												Kernel version 0.9 : TCP Client sockets
											
										
										
											2017-03-13 07:07:07 +00:00
-												Kernel version 0.9 : TCP, bugfix in recieve data ACKed to early
											
										
										
											2017-03-14 16:46:29 +00:00
+												lda ZPDataInLen			Incoming Data in this frame ?
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+												ora ZPDataInLen+1
-												Kernel version 0.9 : TCP, bugfix in recieve data ACKed to early
											
										
										
											2017-03-14 16:46:29 +00:00
+												beq .2					No data, ...
-												Kernel version 0.9 : TCP, ACK problem solved! some additional fixes including corrected TCP payload length computation
											
										
										
											2017-03-19 21:47:54 +00:00
-												Kernel version 0.9 : TCP, bugfix in recieve data ACKed to early
											
										
										
											2017-03-14 16:46:29 +00:00
+												jsr SKT.AddDataToSktIn	yes, queue data if there is room for....
-												Kernel version 0.9 : 
-TCP, bugfix (#8) ...nearly working!!!
-MKNod API implementation for stream SOCKET
-Bugfix in Smartort controller/device detection
-Memory leak in CP/MV/RM
											
										
										
											2017-04-10 06:07:14 +00:00
+												bcs .2
 												jsr SKT.StoreTCB		success, update socket
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+								.2				ldy #S.TCP.OPTIONS
 												lda (ZPFrameInPtr),y
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#1)
											
										
										
											2017-03-27 06:28:25 +00:00
+												and #S.TCP.OPTIONS.FIN
-												Kernel version 0.9 : TCP Client sockets
											
										
										
											2017-03-13 07:07:07 +00:00
+												beq .8
-												Kernel 0.9.2
											
										
										
											2018-09-09 08:11:42 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-13 15:29:02 +00:00
+												jsr TCP.IN.ACKTheFIN
-												Kernel 0.9.2
											
										
										
											2018-09-09 08:11:42 +00:00
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#1)
											
										
										
											2017-03-27 06:28:25 +00:00
+												bcs .9
-												Kernel version 0.9 : TCP & SKT, added code for TCP conn. close
											
										
										
											2017-03-24 16:27:44 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-28 15:24:44 +00:00
+												ldy #S.SOCKET.TCP.S
 												lda #S.SOCKET.TCP.S.CLWAIT
-												Kernel version 0.9 : TCP & Sockets, bugfix session #4
											
										
										
											2017-02-17 16:39:38 +00:00
+												sta (ZPPtrSKT),y
-												Kernel 0.9.2
											
										
										
											2018-11-01 08:53:47 +00:00
+												jmp SKT.StoreTCB
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#1)
											
										
										
											2017-03-27 06:28:25 +00:00
+								.8				clc
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+								.9				rts
 								*--------------------------------------
 								TCP.IN.JMP.CLWAIT
-												Kernel 0.9.2
											
										
										
											2018-11-01 08:53:47 +00:00
+												clc						Wait for SKT.shutdown
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+												rts
 								*--------------------------------------
 								TCP.IN.JMP.LASTACK
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+												ldy #S.TCP.OPTIONS		only accept ACK packet
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+												lda (ZPFrameInPtr),y
-												Kernel 0.9.2
											
										
										
											2018-09-09 08:11:42 +00:00
+												bit #S.TCP.OPTIONS.ACK
 												beq .8
-												Kernel version 0.9 : TCP & Sockets, bugfix session #4
											
										
										
											2017-02-17 16:39:38 +00:00
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												ldx SKT.Index
 												lda SKT.TABLE,x
 												jmp SKT.shutdown
-												Kernel version 0.9 : TCPIP migration, fixed timing issues in DHCPCLNT, Broadcast not cleared properly....and working on TCP....
											
										
										
											2017-01-28 22:05:20 +00:00
-												Kernel version 0.9 : TCP & Sockets, bugfix session #4
											
										
										
											2017-02-17 16:39:38 +00:00
+								.8				clc
-												Kernel version 0.9 : TCPIP, TCP code reorg
											
										
										
											2017-02-01 16:49:44 +00:00
+												rts
 								*--------------------------------------
 								TCP.IN.JMP.FINWT1
-												Kernel version 0.9 : TCP & SKT, added code for TCP conn. close
											
										
										
											2017-03-24 16:27:44 +00:00
+												ldy #S.TCP.OPTIONS		only accept ACK packet
 												lda (ZPFrameInPtr),y
-												Kernel 0.9.2
											
										
										
											2018-11-10 19:47:45 +00:00
+												bit #S.TCP.OPTIONS.FIN
 												beq .8
 												ldy #S.SOCKET.TCP.O
 												lda #S.TCP.OPTIONS.FIN	send FIN
 												sta (ZPPtrSKT),y
 												jsr TCP.IN.ACKTheFIN
 												bcs .9
-												Kernel version 0.9 : TCP & SKT, added code for TCP conn. close
											
										
										
											2017-03-24 16:27:44 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-28 15:24:44 +00:00
+												ldy #S.SOCKET.TCP.S
 												lda #S.SOCKET.TCP.S.FINWT2
-												Kernel version 0.9 : TCP & SKT, added code for TCP conn. close
											
										
										
											2017-03-24 16:27:44 +00:00
+												sta (ZPPtrSKT),y
-												Kernel 0.9.2
											
										
										
											2018-11-10 19:47:45 +00:00
 								.8				clc
 								.9				rts
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+								*--------------------------------------
-												Kernel version 0.9 : TCPIP, TCP code reorg
											
										
										
											2017-02-01 16:49:44 +00:00
+								TCP.IN.JMP.FINWT2
-												Kernel version 0.9 : TCP & SKT, added code for TCP conn. close
											
										
										
											2017-03-24 16:27:44 +00:00
+												ldy #S.TCP.OPTIONS		only accept FIN packet
 												lda (ZPFrameInPtr),y
-												Kernel 0.9.2
											
										
										
											2018-11-10 19:47:45 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-05 11:31:49 +00:00
+												bit #S.TCP.OPTIONS.FIN
-												Kernel 0.9.2
											
										
										
											2018-11-10 19:47:45 +00:00
+												beq .8
-												Kernel version 0.9 : TCP & SKT, added code for TCP conn. close
											
										
										
											2017-03-24 16:27:44 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-13 15:29:02 +00:00
+												jsr TCP.IN.ACKTheFIN
-												Kernel version 0.9 : TCP & SKT, added code for TCP conn. close
											
										
										
											2017-03-24 16:27:44 +00:00
+												bcs .9
-												Kernel 0.9.2
											
										
										
											2018-09-28 15:24:44 +00:00
+												ldy #S.SOCKET.TCP.S
 												lda #S.SOCKET.TCP.S.TIMEWT
-												Kernel version 0.9 : TCP & SKT, added code for TCP conn. close
											
										
										
											2017-03-24 16:27:44 +00:00
+												sta (ZPPtrSKT),y
 								.8				clc
 								.9				rts
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+								*--------------------------------------
-												Kernel version 0.9 : TCPIP, TCP code reorg
											
										
										
											2017-02-01 16:49:44 +00:00
+								TCP.IN.JMP.CLOSING
-												Kernel version 0.9 : TCP & SKT, added code for TCP conn. close
											
										
										
											2017-03-24 16:27:44 +00:00
+												ldy #S.TCP.OPTIONS		only accept ACK packet
 												lda (ZPFrameInPtr),y
-												Kernel 0.9.2
											
										
										
											2018-09-09 08:11:42 +00:00
+												bit #S.TCP.OPTIONS.ACK
 												beq .1
-												Kernel version 0.9 : TCP & SKT, added code for TCP conn. close
											
										
										
											2017-03-24 16:27:44 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-28 15:24:44 +00:00
+												ldy #S.SOCKET.TCP.S
 												lda #S.SOCKET.TCP.S.TIMEWT
-												Kernel version 0.9 : TCP & SKT, added code for TCP conn. close
											
										
										
											2017-03-24 16:27:44 +00:00
+												sta (ZPPtrSKT),y
 								.1				clc
 												rts
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+								*--------------------------------------
-												Kernel version 0.9 : TCPIP, TCP code reorg
											
										
										
											2017-02-01 16:49:44 +00:00
+								TCP.IN.JMP.TIMEWT
-												Kernel 0.9.2
											
										
										
											2018-11-07 06:59:37 +00:00
+												clc						Wait for TCP.Close
 												rts
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+								*--------------------------------------
-												Kernel 0.9.2
											
										
										
											2018-09-21 15:28:46 +00:00
+								TCP.IN.ACKTheSYN
 												ldy #S.TCP.SEQNUM+3		Get Remote SEQ
 												ldx #3
 												sec
 								.3				lda (ZPFrameInPtr),y	Set OUTACK=SEQ+1 for new socket...
 												adc #0
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												sta SKT.Cache+S.SOCKET.TCP.INLASTSEQNUM,x
 												sta SKT.Cache+S.SOCKET.TCP.OUTACKNUM,x
-												Kernel 0.9.2
											
										
										
											2018-09-21 15:28:46 +00:00
+												dey
 												dex
 												bpl .3
 												rts
 								*--------------------------------------
-												Kernel 0.9.2
											
										
										
											2018-09-13 15:29:02 +00:00
+								TCP.IN.ACKTheFIN
-												Kernel 0.9.2
											
										
										
											2018-09-28 15:24:44 +00:00
+												ldy #S.SOCKET.TCP.O
-												Kernel 0.9.2
											
										
										
											2018-09-13 15:29:02 +00:00
+												lda (ZPPtrSKT),y
 												ora #S.TCP.OPTIONS.ACK
 												sta (ZPPtrSKT),y
 												jsr SKT.GetTCB
 												ldx #3
 												ldy #S.TCP.ACKNUM+3
 												sec
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+								.3				lda	SKT.Cache+S.SOCKET.TCP.OUTACKNUM,x
-												Kernel 0.9.2
											
										
										
											2018-09-13 15:29:02 +00:00
+												adc #0
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												sta	SKT.Cache+S.SOCKET.TCP.OUTACKNUM,x
-												Kernel 0.9.2
											
										
										
											2018-09-13 15:29:02 +00:00
+												dey
 												dex
 												bpl .3
-												Kernel 0.9.2
											
										
										
											2018-09-13 18:43:39 +00:00
+												jmp TCP.OUT.I			ACK the FIN
-												Kernel 0.9.2
											
										
										
											2018-09-13 15:29:02 +00:00
+								*--------------------------------------
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+								TCP.IN.SetDataInPtrAndLen
-												Kernel version 0.9 : TCP, ACK problem solved! some additional fixes including corrected TCP payload length computation
											
										
										
											2017-03-19 21:47:54 +00:00
+												ldy #S.IP.TOTAL.LENGTH+1
 												lda (ZPFrameInPtr),y
 												sec
-												Kernel 0.9.2
											
										
										
											2018-11-06 16:31:13 +00:00
+												sbc #S.IP-S.ETH.EII
-												Kernel version 0.9 : TCP, ACK problem solved! some additional fixes including corrected TCP payload length computation
											
										
										
											2017-03-19 21:47:54 +00:00
+												sta ZPDataInLen
 												dey
 												lda (ZPFrameInPtr),y
-												Kernel 0.9.2
											
										
										
											2018-11-06 16:31:13 +00:00
+												sbc /S.IP-S.ETH.EII
-												Kernel version 0.9 : TCP, ACK problem solved! some additional fixes including corrected TCP payload length computation
											
										
										
											2017-03-19 21:47:54 +00:00
+												sta ZPDataInLen+1
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+												ldy #S.TCP.DATAOFFSET
 												lda (ZPFrameInPtr),y
-												Kernel version 0.9 : TCP, bugfix in GetCA not ACKnoledging properly
											
										
										
											2017-03-15 06:58:13 +00:00
+												and #$F0				Get TCP Header len in DWORD
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+												lsr
-												Kernel version 0.9 : TCP, bugfix in GetCA not ACKnoledging properly
											
										
										
											2017-03-15 06:58:13 +00:00
+												lsr
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+												sta TmpOffset
-												Kernel version 0.9 : TCP, ACK problem solved! some additional fixes including corrected TCP payload length computation
											
										
										
											2017-03-19 21:47:54 +00:00
+												lda ZPDataInLen
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+												sec
 												sbc TmpOffset
 												sta ZPDataInLen
-												Kernel version 0.9 : TCP, ACK problem solved! some additional fixes including corrected TCP payload length computation
											
										
										
											2017-03-19 21:47:54 +00:00
+												bcs .1
 												dec ZPDataInLen+1
-												Kernel version 0.9 : TCP, bugfix in GetCA not ACKnoledging properly
											
										
										
											2017-03-15 06:58:13 +00:00
 								.1				lda ZPFrameInPtr
-												Kernel version 0.9 : TCP, ACK problem solved! some additional fixes including corrected TCP payload length computation
											
										
										
											2017-03-19 21:47:54 +00:00
+												clc
 												adc #S.IP
-												Kernel version 0.9 : new NET.I.txt file, now A2osX.I.txt smaller, opt & fix in TCP
											
										
										
											2017-03-21 21:54:59 +00:00
+												pha
-												Kernel version 0.9 : TCP, bugfix in GetCA not ACKnoledging properly
											
										
										
											2017-03-15 06:58:13 +00:00
 												lda ZPFrameInPtr+1
-												Kernel version 0.9 : TCP, ACK problem solved! some additional fixes including corrected TCP payload length computation
											
										
										
											2017-03-19 21:47:54 +00:00
+												adc /S.IP
-												Kernel version 0.9 : new NET.I.txt file, now A2osX.I.txt smaller, opt & fix in TCP
											
										
										
											2017-03-21 21:54:59 +00:00
+												tax
-												Kernel version 0.9 : TCP, ACK problem solved! some additional fixes including corrected TCP payload length computation
											
										
										
											2017-03-19 21:47:54 +00:00
-												Kernel version 0.9 : new NET.I.txt file, now A2osX.I.txt smaller, opt & fix in TCP
											
										
										
											2017-03-21 21:54:59 +00:00
+												pla
-												Kernel version 0.9 : TCP, ACK problem solved! some additional fixes including corrected TCP payload length computation
											
										
										
											2017-03-19 21:47:54 +00:00
+												clc
 												adc TmpOffset
 												bcc .2
-												Kernel version 0.9 : new NET.I.txt file, now A2osX.I.txt smaller, opt & fix in TCP
											
										
										
											2017-03-21 21:54:59 +00:00
+												inx
-												Kernel version 0.9 : TCP, ACK problem solved! some additional fixes including corrected TCP payload length computation
											
										
										
											2017-03-19 21:47:54 +00:00
-												Kernel version 0.9 : new NET.I.txt file, now A2osX.I.txt smaller, opt & fix in TCP
											
										
										
											2017-03-21 21:54:59 +00:00
+								.2				sta ZPDataInPtr
 												stx ZPDataInPtr+1
 												rts
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+								*--------------------------------------
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
+								TCP.OUT			jsr SKT.GetTCB
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+								TCP.OUT.I		lda SKT.Cache+S.SOCKET.TCP.OUTTOSEND+1
 												ldy SKT.Cache+S.SOCKET.TCP.OUTTOSEND
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
-												Kernel version 0.9 : TCP & Sockets....
											
										
										
											2017-02-13 07:26:18 +00:00
+												bne .1
-												Kernel version 0.9 : TCP, ACK problem solved! some additional fixes including corrected TCP payload length computation
											
										
										
											2017-03-19 21:47:54 +00:00
-												Kernel version 0.9 : TCP/IP API Cleanup
											
										
										
											2017-02-15 16:14:41 +00:00
+												tax
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#3)
											
										
										
											2017-03-29 06:33:26 +00:00
+												bne .1
 								*	Y,A=0 : no data to send
-												Kernel version 0.9 : TCP, bugfix in TELNETD/NETSTAT
											
										
										
											2017-03-14 07:32:31 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-28 15:24:44 +00:00
+												ldy #S.SOCKET.TCP.O
-												Kernel version 0.9 : TCP, bugfix in TELNETD/NETSTAT
											
										
										
											2017-03-14 07:32:31 +00:00
+												lda (ZPPtrSKT),y
-												Kernel version 0.9 : 
-TCP, bugfix (#8) ...nearly working!!!
-MKNod API implementation for stream SOCKET
-Bugfix in Smartort controller/device detection
-Memory leak in CP/MV/RM
											
										
										
											2017-04-10 06:07:14 +00:00
+												bne TCP.OUT.SendOptA	a least an option...
-												Kernel version 0.9 : TCP & SKT, bugfix and optimization in TCP.OUT
											
										
										
											2017-03-23 16:41:36 +00:00
+												clc						No, data, no flag....exit
 												rts
-												Kernel version 0.9 : TCP & Sockets....
											
										
										
											2017-02-13 07:26:18 +00:00
+								.1				cpy #K.TCP.MSS
 												pha
 												sbc /K.TCP.MSS			OUTDATA > MSS ?
 												pla
-												Kernel version 0.9 : TCP, fix in PutC & ACK flag
											
										
										
											2017-03-24 07:31:30 +00:00
+												bcc .2					no....keep data len
-												Kernel version 0.9 : TCP & Sockets....
											
										
										
											2017-02-13 07:26:18 +00:00
-												Kernel version 0.9 : 
-TCP, bugfix (#8) ...nearly working!!!
-MKNod API implementation for stream SOCKET
-Bugfix in Smartort controller/device detection
-Memory leak in CP/MV/RM
											
										
										
											2017-04-10 06:07:14 +00:00
+												>LDYAI K.TCP.MSS		yes send only MSS
-												Kernel version 0.9 : TCP/IP API Cleanup
											
										
										
											2017-02-15 16:14:41 +00:00
-												Kernel version 0.9 : TCP, bugfix in TELNETD/NETSTAT
											
										
										
											2017-03-14 07:32:31 +00:00
+								.2				jsr TCP.NewFrame
-												Kernel version 0.9 : TCP & SKT, bugfix and optimization in TCP.OUT
											
										
										
											2017-03-23 16:41:36 +00:00
+												bcs TCP.OUT.9
-												Kernel version 0.9 : TCP/IP API Cleanup
											
										
										
											2017-02-15 16:14:41 +00:00
 												jsr SKT.GetDataFromSktOut
-												Kernel version 0.9 : TCP, more rewrite & bugfix
											
										
										
											2017-03-10 16:35:54 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-28 15:24:44 +00:00
+												ldy #S.SOCKET.TCP.O
-												Kernel version 0.9 : TCP/IP API Cleanup
											
										
										
											2017-02-15 16:14:41 +00:00
+												lda (ZPPtrSKT),y
-												Kernel 0.9.2
											
										
										
											2018-09-05 11:31:49 +00:00
+												ora #S.TCP.OPTIONS.ACK
-												Kernel version 0.9 : 
-TCP, bugfix (#8) ...nearly working!!!
-MKNod API implementation for stream SOCKET
-Bugfix in Smartort controller/device detection
-Memory leak in CP/MV/RM
											
										
										
											2017-04-10 06:07:14 +00:00
+												jsr TCP.OUT.SendOptA.1
-												Kernel version 0.9 : TCP/IP API Cleanup
											
										
										
											2017-02-15 16:14:41 +00:00
-												Kernel version 0.9 : TCP & SKT, bugfix and optimization in TCP.OUT
											
										
										
											2017-03-23 16:41:36 +00:00
+												bcs TCP.OUT.9
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#4)
											
										
										
											2017-03-31 06:28:43 +00:00
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												lda SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ+3
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#4)
											
										
										
											2017-03-31 06:28:43 +00:00
+												clc
 												adc ZPDataOutLen
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												sta SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ+3
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#4)
											
										
										
											2017-03-31 06:28:43 +00:00
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												lda SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ+2
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#4)
											
										
										
											2017-03-31 06:28:43 +00:00
+												adc ZPDataOutLen+1
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												sta SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ+2
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#4)
											
										
										
											2017-03-31 06:28:43 +00:00
+												bcc .80
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												inc SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ+1
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#4)
											
										
										
											2017-03-31 06:28:43 +00:00
+												bne .80
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												inc SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#4)
											
										
										
											2017-03-31 06:28:43 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-04 15:29:15 +00:00
+								.80				jmp SKT.StoreTCB		exits with CC
-												Kernel version 0.9 : TCP & SKT, bugfix and optimization in TCP.OUT
											
										
										
											2017-03-23 16:41:36 +00:00
+								TCP.OUT.9		rts
 								*--------------------------------------
-												Kernel version 0.9 : 
-TCP, bugfix (#8) ...nearly working!!!
-MKNod API implementation for stream SOCKET
-Bugfix in Smartort controller/device detection
-Memory leak in CP/MV/RM
											
										
										
											2017-04-10 06:07:14 +00:00
+								TCP.OUT.SendOptA
 												sta .1+1
-												Kernel version 0.9 : TCP & SKT, bugfix and optimization in TCP.OUT
											
										
										
											2017-03-23 16:41:36 +00:00
+												>LDYAI 0
 												jsr TCP.NewFrame
 												bcs TCP.OUT.9
-												Kernel version 0.9 : MEDIA reorganisation #2
											
										
										
											2017-03-30 06:31:12 +00:00
+								.1				lda #$ff
-												Kernel version 0.9 : 
-TCP, bugfix (#8) ...nearly working!!!
-MKNod API implementation for stream SOCKET
-Bugfix in Smartort controller/device detection
-Memory leak in CP/MV/RM
											
										
										
											2017-04-10 06:07:14 +00:00
+								TCP.OUT.SendOptA.1
 												ldy #S.TCP.OPTIONS
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#1)
											
										
										
											2017-03-27 06:28:25 +00:00
+												sta (ZPFrameOutPtr),y
-												Kernel 0.9.2
											
										
										
											2018-09-05 11:31:49 +00:00
+												bit #S.TCP.OPTIONS.ACK
 												beq .10
-												Kernel version 0.9 : TCP, bugfix (#7) ...
											
										
										
											2017-04-07 06:31:47 +00:00
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#3)
											
										
										
											2017-03-29 06:33:26 +00:00
+												ldx #3
-												Kernel version 0.9 : 
-TCP, bugfix (#8) ...nearly working!!!
-MKNod API implementation for stream SOCKET
-Bugfix in Smartort controller/device detection
-Memory leak in CP/MV/RM
											
										
										
											2017-04-10 06:07:14 +00:00
+												ldy #S.TCP.ACKNUM+3
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#3)
											
										
										
											2017-03-29 06:33:26 +00:00
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+								.1				lda SKT.Cache+S.SOCKET.TCP.OUTACKNUM,x
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#3)
											
										
										
											2017-03-29 06:33:26 +00:00
+												sta (ZPFrameOutPtr),y
 												dey
 												dex
-												Kernel version 0.9 : TCP.......WORKING!!!!
											
										
										
											2017-04-12 06:12:39 +00:00
+												bpl .1
-												Kernel version 0.9 : TCP, bugfix in SEQ & ACK (#3)
											
										
										
											2017-03-29 06:33:26 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-13 15:29:02 +00:00
+								.10				ldx #3
-												Kernel version 0.9 : 
-TCP, bugfix (#8) ...nearly working!!!
-MKNod API implementation for stream SOCKET
-Bugfix in Smartort controller/device detection
-Memory leak in CP/MV/RM
											
										
										
											2017-04-10 06:07:14 +00:00
+												ldy #S.TCP.SEQNUM+3
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+								.2				lda SKT.Cache+S.SOCKET.TCP.OUTNEXTSEQ,x
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
+												sta (ZPFrameOutPtr),y
 												dey
 												dex
-												Kernel version 0.9 : TCP & SKT, bugfix and optimization in TCP.OUT
											
										
										
											2017-03-23 16:41:36 +00:00
+												bpl .2
-												Kernel version 0.9 : TCP, bugfix in SKT.Write.....and many others!
											
										
										
											2017-03-13 15:34:56 +00:00
-												Kernel version 0.9 : TCP & SKT, bugfix and optimization in TCP.OUT
											
										
										
											2017-03-23 16:41:36 +00:00
+												ldy #S.TCP.WINDOW
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												lda SKT.Cache+S.SOCKET.TCP.INFREE+1
-												Kernel version 0.9 : TCP & SKT, bugfix and optimization in TCP.OUT
											
										
										
											2017-03-23 16:41:36 +00:00
+												sta (ZPFrameOutPtr),y
 												iny
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												lda SKT.Cache+S.SOCKET.TCP.INFREE
-												Kernel version 0.9 : TCP & SKT, bugfix and optimization in TCP.OUT
											
										
										
											2017-03-23 16:41:36 +00:00
+												sta (ZPFrameOutPtr),y
 												jsr FRM.SendIP
-												Kernel version 0.9 : TCP/IP API Cleanup
											
										
										
											2017-02-15 16:14:41 +00:00
+												bcs .9
-												Kernel 0.9.2
											
										
										
											2018-09-28 15:24:44 +00:00
+												ldy #S.SOCKET.TCP.O
-												Kernel version 0.9 : TCP & MkNodA
											
										
										
											2017-03-09 07:11:44 +00:00
+												lda #0
-												Kernel version 0.9 : TCP/IP API Cleanup
											
										
										
											2017-02-15 16:14:41 +00:00
+												sta (ZPPtrSKT),y
-												Kernel version 0.9 : TCP & SKT, bugfix and optimization in TCP.OUT
											
										
										
											2017-03-23 16:41:36 +00:00
-												Kernel 0.9.2
											
										
										
											2018-09-13 15:29:02 +00:00
+								*				clc
-												Kernel version 0.9 : TCP/IP API Cleanup
											
										
										
											2017-02-15 16:14:41 +00:00
+								.9				rts
-												Kernel version 0.9 : TCP & Sockets....
											
										
										
											2017-02-13 07:26:18 +00:00
+								*--------------------------------------
-												Kernel version 0.9 : TCP & Sockets, bugfix session #2
											
										
										
											2017-02-16 16:26:11 +00:00
+								TCP.NewFrame	ldx #S.IP.PROTOCOL.TCP
 												jsr FRM.NewIP
 												bcs .9
-												Kernel version 0.9 : TCPIP migration, fixed timing issues in DHCPCLNT, Broadcast not cleared properly....and working on TCP....
											
										
										
											2017-01-28 22:05:20 +00:00
-												Kernel version 0.9 : TCP & Sockets, bugfix session #2
											
										
										
											2017-02-16 16:26:11 +00:00
+												jsr SKT.SetFrameOutDstIP
-												Kernel 0.9.2
											
										
										
											2018-09-17 15:42:38 +00:00
+												jsr SKT.SetFrameOutTCPUDPPorts
-												Kernel version 0.9 : TCP & Sockets, bugfix session #3
											
										
										
											2017-02-17 07:20:57 +00:00
 												ldy #S.TCP.DATAOFFSET
 												lda #$50				Header size = 5 DWORDS
 												sta (ZPFrameOutPtr),y
 												ldy #S.TCP.WINDOW
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												lda SKT.Cache+S.SOCKET.TCP.INFREE+1
-												Kernel version 0.9 : TCP & Sockets, bugfix session #3
											
										
										
											2017-02-17 07:20:57 +00:00
+												sta (ZPFrameOutPtr),y
 												iny
-												Kernel 0.9.2
											
										
										
											2018-11-08 14:23:06 +00:00
+												lda SKT.Cache+S.SOCKET.TCP.INFREE
-												Kernel version 0.9 : TCP & Sockets, bugfix session #3
											
										
										
											2017-02-17 07:20:57 +00:00
+												sta (ZPFrameOutPtr),y
-												Updated Medias
											
										
										
											2016-04-09 09:15:11 +00:00
+												clc
-												Kernel version 0.9 : TCP & Sockets, bugfix session #2
											
										
										
											2017-02-16 16:26:11 +00:00
+								.9				rts
-												Updated Medias
											
										
										
											2016-04-09 09:15:11 +00:00
+								*--------------------------------------
-												Moved All TCPIP Code from TCPIP.DRV to LIBTCPIP
											
										
										
											2016-01-16 22:04:22 +00:00
+								MAN
-												Kernel version 0.9 : MEDIA reorganisation #2
											
										
										
											2017-03-30 06:31:12 +00:00
+								SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.TCP
 								LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
-												Moved All TCPIP Code from TCPIP.DRV to LIBTCPIP
											
										
										
											2016-01-16 22:04:22 +00:00
+								ASM