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

Rev	Author	Line No.	Line
3545	hidnplayr	1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		2	;; ;;
		3	;; Copyright (C) KolibriOS team 2004-2013. All rights reserved. ;;
		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
		17	$Revision: 3406 $
		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
		30	TCPS_TIMED_WAIT = 10
		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
		44	; Segment flags
		45	TH_FIN = 1 shl 0
		46	TH_SYN = 1 shl 1
		47	TH_RST = 1 shl 2
		48	TH_PUSH = 1 shl 3
		49	TH_ACK = 1 shl 4
		50	TH_URG = 1 shl 5
		51
		52	; Segment header options
		53	TCP_OPT_EOL = 0 ; End of option list.
		54	TCP_OPT_NOP = 1 ; No-Operation.
		55	TCP_OPT_MAXSEG = 2 ; Maximum Segment Size.
		56	TCP_OPT_WINDOW = 3 ; window scale
		57	TCP_OPT_SACK_PERMIT = 4 ; Selective Acknowledgement
		58	TCP_OPT_SACK = 5
		59	TCP_OPT_TIMESTAMP = 8
		60
		61	; Fundamental timer values
		62	TCP_time_MSL = 47 ; max segment lifetime (30s)
		63	TCP_time_re_min = 2 ; min retransmission (1,28s)
		64	TCP_time_re_max = 100 ; max retransmission (64s)
		65	TCP_time_pers_min = 8 ; min persist (5,12s)
		66	TCP_time_pers_max = 94 ; max persist (60,16s)
		67	TCP_time_keep_init = 118 ; connection establishment (75,52s)
		68	TCP_time_keep_idle = 4608 ; idle time before 1st probe (2h)
		69	TCP_time_keep_interval = 118 ; between probes when no response (75,52s)
		70	TCP_time_rtt_default = 5 ; default Round Trip Time (3,2s)
		71	TCP_time_srtt_default = 0 ;
		72	TCP_time_max_idle = 8*TCP_time_keep_interval ; FIXME
		73
		74	; timer constants
		75	TCP_max_rxtshift = 12 ; max retransmissions waiting for ACK
		76	TCP_max_keepcnt = 8 ; max keepalive probes
		77
		78	;
		79	TCP_max_winshift = 14
		80	TCP_max_win = 65535
		81
		82	TCP_re_xmit_thresh = 3
		83
		84	TCP_mss_default = 1480 ; default max segment size
		85
		86	; smoothed round trip time and estimated variance are stored as fixed point numbers,
		87	; shifted by the value below.
		88	; With these scales, srtt has 3 bits to the right of the binary point, and thus an "alpha"
		89	; of .875. rttvar has 2 bits to the right and thus "alpha" of 0.75
		90	TCP_RTT_SHIFT = 3
		91	TCP_RTTVAR_SHIFT = 2
		92
		93	; bits used by tcp_input and tcp_output
		94	TCP_BIT_NEEDOUTPUT = 1 shl 0
		95	TCP_BIT_TIMESTAMP = 1 shl 1
		96	TCP_BIT_DROPSOCKET = 1 shl 2
		97
		98	TCP_BIT_SENDALOT = 1 shl 0
		99
		100	TCP_PAWS_IDLE = 24246060100 ; 24 days, in 1/100 seconds
		101
		102	TCP_QUEUE_SIZE = 50
		103
		104	struct TCP_header
		105
		106	SourcePort dw ?
		107	DestinationPort dw ?
		108	SequenceNumber dd ?
		109	AckNumber dd ?
		110	DataOffset db ? ; DataOffset[0-3 bits] and Reserved[4-7]
		111	Flags db ? ; Reserved[0-1 bits]\|URG\|ACK\|PSH\|RST\|SYN\|FIN
		112	Window dw ?
		113	Checksum dw ?
		114	UrgentPointer dw ?
		115
		116	ends
		117
		118	struct TCP_queue_entry
		119
		120	ip_ptr dd ?
		121	segment_ptr dd ?
		122	segment_size dd ?
		123	device_ptr dd ?
		124
		125	buffer_ptr dd ?
		126	timestamp dd ?
		127
		128	ends
		129
3697	hidnplayr	130	uglobal
3545	hidnplayr	131	align 4
3697	hidnplayr	132
3600	hidnplayr	133	TCP_segments_tx rd NET_DEVICES_MAX
		134	TCP_segments_rx rd NET_DEVICES_MAX
		135	TCP_segments_missed rd NET_DEVICES_MAX
		136	TCP_segments_dumped rd NET_DEVICES_MAX
		137	; TCP_bytes_rx rq NET_DEVICES_MAX
		138	; TCP_bytes_tx rq NET_DEVICES_MAX
3545	hidnplayr	139	TCP_sequence_num dd ?
3697	hidnplayr	140	TCP_queue rd (TCP_QUEUE_SIZE*sizeof.TCP_queue_entry + sizeof.queue)/4
3545	hidnplayr	141	TCP_input_event dd ?
		142	endg
		143
		144
		145	;-----------------------------------------------------------------
		146	;
		147	; TCP_init
		148	;
		149	; This function resets all TCP variables
		150	;
		151	;-----------------------------------------------------------------
		152	macro TCP_init {
		153
		154	xor eax, eax
		155	mov edi, TCP_segments_tx
3600	hidnplayr	156	mov ecx, (6*NET_DEVICES_MAX)
3711	clevermous	157	rep stosd
3545	hidnplayr	158
		159	pseudo_random eax
		160	mov [TCP_sequence_num], eax
		161
		162	init_queue TCP_queue
		163
3598	clevermous	164	movi ebx, 1
3545	hidnplayr	165	mov ecx, TCP_process_input
		166	call new_sys_threads
3697	hidnplayr	167	test eax, eax
		168	jns @f
		169	DEBUGF DEBUG_NETWORK_ERROR,'K : cannot create kernel thread for TCP, error %d\n', eax
		170	@@:
3545	hidnplayr	171
		172	}
		173
		174
		175	include 'tcp_timer.inc'
		176	include 'tcp_subr.inc'
		177	include 'tcp_usreq.inc'
		178	include 'tcp_input.inc'
		179	include 'tcp_output.inc'
		180
		181
		182	;---------------------------------------------------------------------------
		183	;
		184	; TCP_API
		185	;
		186	; This function is called by system function 76
		187	;
		188	; IN: subfunction number in bl
		189	; device number in bh
		190	; ecx, edx, .. depends on subfunction
		191	;
		192	; OUT:
		193	;
		194	;---------------------------------------------------------------------------
		195	align 4
		196	TCP_api:
		197
		198	movzx eax, bh
		199	shl eax, 2
		200
		201	test bl, bl
		202	jz .packets_tx ; 0
		203	dec bl
		204	jz .packets_rx ; 1
		205	dec bl
		206	jz .packets_missed ; 2
		207	dec bl
		208	jz .packets_dumped ; 3
		209
		210	.error:
		211	mov eax, -1
		212	ret
		213
		214	.packets_tx:
		215	mov eax, [TCP_segments_tx + eax]
		216	ret
		217
		218	.packets_rx:
		219	mov eax, [TCP_segments_rx + eax]
		220	ret
		221
		222	.packets_missed:
		223	mov eax, [TCP_segments_missed + eax]
		224	ret
		225
		226	.packets_dumped:
		227	mov eax, [TCP_segments_dumped + eax]
		228	ret

Subversion Repositories Kolibri OS

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