WebSVN – Kolibri OS – Blame – /kernel/trunk/network/tcp.inc

Rev	Author	Line No.	Line
3545	hidnplayr	1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		2	;; ;;
6916	hidnplayr	3	;; Copyright (C) KolibriOS team 2004-2017. All rights reserved. ;;
3545	hidnplayr	4	;; Distributed under terms of the GNU General Public License ;;
		5	;; ;;
		6	;; Part of the TCP/IP network stack for KolibriOS ;;
		7	;; ;;
		8	;; Written by hidnplayr@kolibrios.org ;;
		9	;; ;;
		10	;; Based on the code of 4.4BSD ;;
		11	;; ;;
		12	;; GNU GENERAL PUBLIC LICENSE ;;
		13	;; Version 2, June 1991 ;;
		14	;; ;;
		15	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		16
4850	mario79	17	$Revision: 6916 $
3545	hidnplayr	18
		19	; Socket states
		20	TCPS_CLOSED = 0
		21	TCPS_LISTEN = 1
		22	TCPS_SYN_SENT = 2
		23	TCPS_SYN_RECEIVED = 3
		24	TCPS_ESTABLISHED = 4
		25	TCPS_CLOSE_WAIT = 5
		26	TCPS_FIN_WAIT_1 = 6
		27	TCPS_CLOSING = 7
		28	TCPS_LAST_ACK = 8
		29	TCPS_FIN_WAIT_2 = 9
6476	hidnplayr	30	TCPS_TIME_WAIT = 10
3545	hidnplayr	31
		32	; Socket Flags
		33	TF_ACKNOW = 1 shl 0 ; ack peer immediately
		34	TF_DELACK = 1 shl 1 ; ack, but try to delay it
		35	TF_NODELAY = 1 shl 2 ; don't delay packets to coalesce
		36	TF_NOOPT = 1 shl 3 ; don't use tcp options
		37	TF_SENTFIN = 1 shl 4 ; have sent FIN
		38	TF_REQ_SCALE = 1 shl 5 ; have/will request window scaling
		39	TF_RCVD_SCALE = 1 shl 6 ; other side has requested scaling
		40	TF_REQ_TSTMP = 1 shl 7 ; have/will request timestamps
		41	TF_RCVD_TSTMP = 1 shl 8 ; a timestamp was received in SYN
		42	TF_SACK_PERMIT = 1 shl 9 ; other side said I could SACK
		43
6916	hidnplayr	44	TF_FORCE = 1 shl 16 ; force to send a segment
		45
3545	hidnplayr	46	; Segment flags
		47	TH_FIN = 1 shl 0
		48	TH_SYN = 1 shl 1
		49	TH_RST = 1 shl 2
		50	TH_PUSH = 1 shl 3
		51	TH_ACK = 1 shl 4
		52	TH_URG = 1 shl 5
		53
		54	; Segment header options
		55	TCP_OPT_EOL = 0 ; End of option list.
		56	TCP_OPT_NOP = 1 ; No-Operation.
		57	TCP_OPT_MAXSEG = 2 ; Maximum Segment Size.
		58	TCP_OPT_WINDOW = 3 ; window scale
		59	TCP_OPT_SACK_PERMIT = 4 ; Selective Acknowledgement
		60	TCP_OPT_SACK = 5
		61	TCP_OPT_TIMESTAMP = 8
		62
		63	; Fundamental timer values
		64	TCP_time_MSL = 47 ; max segment lifetime (30s)
		65	TCP_time_re_min = 2 ; min retransmission (1,28s)
		66	TCP_time_re_max = 100 ; max retransmission (64s)
		67	TCP_time_pers_min = 8 ; min persist (5,12s)
		68	TCP_time_pers_max = 94 ; max persist (60,16s)
		69	TCP_time_keep_init = 118 ; connection establishment (75,52s)
		70	TCP_time_keep_idle = 4608 ; idle time before 1st probe (2h)
		71	TCP_time_keep_interval = 118 ; between probes when no response (75,52s)
		72	TCP_time_rtt_default = 5 ; default Round Trip Time (3,2s)
		73	TCP_time_srtt_default = 0 ;
		74	TCP_time_max_idle = 8*TCP_time_keep_interval ; FIXME
		75
4030	hidnplayr	76	TCP_time_connect = 300 ; in 1/100s (default=3s)
		77
3545	hidnplayr	78	; timer constants
		79	TCP_max_rxtshift = 12 ; max retransmissions waiting for ACK
		80	TCP_max_keepcnt = 8 ; max keepalive probes
		81
		82	;
		83	TCP_max_winshift = 14
		84	TCP_max_win = 65535
		85
		86	TCP_re_xmit_thresh = 3
		87
		88	TCP_mss_default = 1480 ; default max segment size
		89
		90	; smoothed round trip time and estimated variance are stored as fixed point numbers,
		91	; shifted by the value below.
		92	; With these scales, srtt has 3 bits to the right of the binary point, and thus an "alpha"
		93	; of .875. rttvar has 2 bits to the right and thus "alpha" of 0.75
		94	TCP_RTT_SHIFT = 3
		95	TCP_RTTVAR_SHIFT = 2
		96
		97	TCP_PAWS_IDLE = 24246060100 ; 24 days, in 1/100 seconds
		98
		99	TCP_QUEUE_SIZE = 50
		100
6476	hidnplayr	101	TCP_ISSINCR = 128000
		102
3545	hidnplayr	103	struct TCP_header
		104
		105	SourcePort dw ?
		106	DestinationPort dw ?
		107	SequenceNumber dd ?
		108	AckNumber dd ?
		109	DataOffset db ? ; DataOffset[0-3 bits] and Reserved[4-7]
		110	Flags db ? ; Reserved[0-1 bits]\|URG\|ACK\|PSH\|RST\|SYN\|FIN
		111	Window dw ?
		112	Checksum dw ?
		113	UrgentPointer dw ?
		114
		115	ends
		116
		117	struct TCP_queue_entry
		118
5133	hidnplayr	119	ip_ptr dd ?
		120	segment_ptr dd ?
		121	segment_size dd ?
		122	device_ptr dd ?
5522	hidnplayr	123	timestamp dd ?
5133	hidnplayr	124	buffer_ptr dd ?
3545	hidnplayr	125
		126	ends
		127
3697	hidnplayr	128	uglobal
3545	hidnplayr	129	align 4
3697	hidnplayr	130
3600	hidnplayr	131	TCP_segments_tx rd NET_DEVICES_MAX
		132	TCP_segments_rx rd NET_DEVICES_MAX
		133	TCP_segments_missed rd NET_DEVICES_MAX
		134	TCP_segments_dumped rd NET_DEVICES_MAX
		135	; TCP_bytes_rx rq NET_DEVICES_MAX
		136	; TCP_bytes_tx rq NET_DEVICES_MAX
3545	hidnplayr	137	TCP_sequence_num dd ?
3697	hidnplayr	138	TCP_queue rd (TCP_QUEUE_SIZE*sizeof.TCP_queue_entry + sizeof.queue)/4
3545	hidnplayr	139	TCP_input_event dd ?
5013	hidnplayr	140	TCP_timer1_event dd ?
3545	hidnplayr	141	endg
		142
4387	hidnplayr	143	uglobal
		144	align 4
3545	hidnplayr	145
4387	hidnplayr	146	TCPS_accepts dd ? ; #SYNs received in LISTEN state
		147	TCPS_closed dd ? ; #connections closed (includes drops)
		148	TCPS_connattempt dd ? ; #connections initiated (calls to connect)
		149	TCPS_conndrops dd ? ; #embryonic connections dropped (before SYN received)
		150	TCPS_connects dd ? ; #connections established actively or passively
		151	TCPS_delack dd ? ; #delayed ACKs sent
		152	TCPS_drops dd ? ; #connections dropped (after SYN received)
		153	TCPS_keepdrops dd ? ; #connections dropped in keepalive (established or awaiting SYN)
		154	TCPS_keepprobe dd ? ; #keepalive probes sent
		155	TCPS_keeptimeo dd ? ; #times keepalive timer or connections-establishment timer expire
		156	TCPS_pawsdrop dd ? ; #segments dropped due to PAWS
		157	TCPS_pcbcachemiss dd ? ; #times PCB cache comparison fails
		158	TCPS_persisttimeo dd ? ; #times persist timer expires
		159	TCPS_predack dd ? ; #times header prediction correct for ACKs
		160	TCPS_preddat dd ? ; #times header prediction correct for data packets
		161	TCPS_rcvackbyte dd ? ; #bytes ACKed by received ACKs
		162	TCPS_rcvackpack dd ? ; #received ACK packets
		163	TCPS_rcvacktoomuch dd ? ; #received ACKs for unsent data
		164	TCPS_rcvafterclose dd ? ; #packets received after connection closed
		165	TCPS_rcvbadoff dd ? ; #packets received with invalid header length
		166	TCPS_rcvbadsum dd ? ; #packets received with checksum errors
		167	TCPS_rcvbyte dd ? ; #bytes received in sequence
		168	TCPS_rcvbyteafterwin dd ? ; #bytes received beyond advertised window
		169	TCPS_rcvdupack dd ? ; #duplicate ACKs received
		170	TCPS_rcvdupbyte dd ? ; #bytes receivedin completely duplicate packets
		171	TCPS_rcvduppack dd ? ; #packets received with completely duplicate bytes
		172	TCPS_rcvoobyte dd ? ; #out-of-order bytes received
		173	TCPS_rcvoopack dd ? ; #out-of-order packets received
		174	TCPS_rcvpack dd ? ; #packets received in sequence
		175	TCPS_rcvpackafterwin dd ? ; #packets with some data beyond advertised window
		176	TCPS_rcvpartdupbyte dd ? ; #duplicate bytes in part-duplicate packets
		177	TCPS_rcvpartduppack dd ? ; #packets with some duplicate data
		178	TCPS_rcvshort dd ? ; #packets received too short
		179	TCPS_rcvtotal dd ? ; #total packets received
		180	TCPS_rcvwinprobe dd ? ; #window probe packets received
		181	TCPS_rcvwinupd dd ? ; #received window update packets
		182	TCPS_rexmttimeo dd ? ; #retransmission timeouts
		183	TCPS_rttupdated dd ? ; #times RTT estimators updated
		184	TCPS_segstimed dd ? ; #segments for which TCP tried to measure RTT
		185	TCPS_sndacks dd ? ; #ACK-only packets sent (data length = 0)
		186	TCPS_sndbyte dd ? ; #data bytes sent
		187	TCPS_sndctrl dd ? ; #control (SYN, FIN, RST) packets sent (data length = 0)
		188	TCPS_sndpack dd ? ; #data packets sent (data length > 0)
		189	TCPS_sndprobe dd ? ; #window probes sent (1 byte of data forced by persist timer)
		190	TCPS_sndrexmitbyte dd ? ; #data bytes retransmitted
		191	TCPS_sndrexmitpack dd ? ; #data packets retransmitted
		192	TCPS_sndtotal dd ? ; total #packets sent
		193	TCPS_sndurg dd ? ; #packets sent with URG-only (data length=0)
		194	TCPS_sndwinup dd ? ; #window update-only packets sent (data length=0)
		195	TCPS_timeoutdrop dd ? ; #connections dropped in retransmission timeout
		196
		197	endg
		198
		199
5976	hidnplayr	200	;-----------------------------------------------------------------;
		201	; ;
		202	; TCP_init: Resets all TCP variables. ;
		203	; ;
		204	;-----------------------------------------------------------------;
6011	hidnplayr	205	macro tcp_init {
3545	hidnplayr	206
		207	xor eax, eax
		208	mov edi, TCP_segments_tx
3600	hidnplayr	209	mov ecx, (6*NET_DEVICES_MAX)
3711	clevermous	210	rep stosd
3545	hidnplayr	211
		212	pseudo_random eax
		213	mov [TCP_sequence_num], eax
		214
		215	init_queue TCP_queue
		216
3598	clevermous	217	movi ebx, 1
6011	hidnplayr	218	mov ecx, tcp_process_input
3545	hidnplayr	219	call new_sys_threads
3697	hidnplayr	220	test eax, eax
		221	jns @f
5013	hidnplayr	222	DEBUGF DEBUG_NETWORK_ERROR,'K : cannot create kernel thread for TCP input, error %d\n', eax
3697	hidnplayr	223	@@:
3545	hidnplayr	224
5013	hidnplayr	225	movi ebx, 1
6011	hidnplayr	226	mov ecx, tcp_timer_640ms
5013	hidnplayr	227	call new_sys_threads
		228	test eax, eax
		229	jns @f
		230	DEBUGF DEBUG_NETWORK_ERROR,'K : cannot create kernel thread for TCP timer, error %d\n', eax
		231	@@:
		232
3545	hidnplayr	233	}
		234
		235
		236	include 'tcp_timer.inc'
		237	include 'tcp_subr.inc'
		238	include 'tcp_usreq.inc'
		239	include 'tcp_input.inc'
		240	include 'tcp_output.inc'
		241
		242
5976	hidnplayr	243	;------------------------------------------------------------------;
		244	; ;
6011	hidnplayr	245	; tcp_api: Part of system function 76 ;
5976	hidnplayr	246	; ;
		247	; IN: bl = subfunction number ;
		248	; bh = device number ;
		249	; ecx, edx, .. depends on subfunction ;
		250	; ;
		251	; OUT: depends on subfunction ;
		252	; ;
		253	;------------------------------------------------------------------;
3545	hidnplayr	254	align 4
6011	hidnplayr	255	tcp_api:
3545	hidnplayr	256
		257	movzx eax, bh
		258	shl eax, 2
		259
		260	test bl, bl
		261	jz .packets_tx ; 0
		262	dec bl
		263	jz .packets_rx ; 1
		264	dec bl
		265	jz .packets_missed ; 2
		266	dec bl
		267	jz .packets_dumped ; 3
5015	hidnplayr	268	dec bl
		269	jz .packets_queued ; 4
3545	hidnplayr	270
		271	.error:
		272	mov eax, -1
		273	ret
		274
		275	.packets_tx:
		276	mov eax, [TCP_segments_tx + eax]
		277	ret
		278
		279	.packets_rx:
		280	mov eax, [TCP_segments_rx + eax]
		281	ret
		282
		283	.packets_missed:
		284	mov eax, [TCP_segments_missed + eax]
		285	ret
		286
		287	.packets_dumped:
		288	mov eax, [TCP_segments_dumped + eax]
		289	ret
5015	hidnplayr	290
		291	.packets_queued:
		292	mov eax, [TCP_queue + queue.size]
		293	ret

Subversion Repositories Kolibri OS

(root)/kernel/trunk/network/tcp.inc – Rev 6916