session/tcp: improve preallocated segment handling
[vpp.git] / src / vnet / tcp / tcp.h
1 /*
2  * Copyright (c) 2016 Cisco and/or its affiliates.
3  * Licensed under the Apache License, Version 2.0 (the "License");
4  * you may not use this file except in compliance with the License.
5  * You may obtain a copy of the License at:
6  *
7  *     http://www.apache.org/licenses/LICENSE-2.0
8  *
9  * Unless required by applicable law or agreed to in writing, software
10  * distributed under the License is distributed on an "AS IS" BASIS,
11  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12  * See the License for the specific language governing permissions and
13  * limitations under the License.
14  */
15
16 #ifndef _vnet_tcp_h_
17 #define _vnet_tcp_h_
18
19 #include <vnet/vnet.h>
20 #include <vnet/ip/ip.h>
21 #include <vnet/tcp/tcp_packet.h>
22 #include <vnet/tcp/tcp_timer.h>
23 #include <vnet/session/transport.h>
24 #include <vnet/session/session.h>
25 #include <vnet/tcp/tcp_debug.h>
26
27 #define TCP_TICK 0.001                  /**< TCP tick period (s) */
28 #define THZ (u32) (1/TCP_TICK)          /**< TCP tick frequency */
29 #define TCP_TSTAMP_RESOLUTION TCP_TICK  /**< Time stamp resolution */
30 #define TCP_PAWS_IDLE 24 * 24 * 60 * 60 * THZ /**< 24 days */
31 #define TCP_FIB_RECHECK_PERIOD  1 * THZ /**< Recheck every 1s */
32 #define TCP_MAX_OPTION_SPACE 40
33
34 #define TCP_DUPACK_THRESHOLD    3
35 #define TCP_MAX_RX_FIFO_SIZE    4 << 20
36 #define TCP_MIN_RX_FIFO_SIZE    4 << 10
37 #define TCP_IW_N_SEGMENTS       10
38 #define TCP_ALWAYS_ACK          1       /**< On/off delayed acks */
39 #define TCP_USE_SACKS           1       /**< Disable only for testing */
40
41 /** TCP FSM state definitions as per RFC793. */
42 #define foreach_tcp_fsm_state   \
43   _(CLOSED, "CLOSED")           \
44   _(LISTEN, "LISTEN")           \
45   _(SYN_SENT, "SYN_SENT")       \
46   _(SYN_RCVD, "SYN_RCVD")       \
47   _(ESTABLISHED, "ESTABLISHED") \
48   _(CLOSE_WAIT, "CLOSE_WAIT")   \
49   _(FIN_WAIT_1, "FIN_WAIT_1")   \
50   _(LAST_ACK, "LAST_ACK")       \
51   _(CLOSING, "CLOSING")         \
52   _(FIN_WAIT_2, "FIN_WAIT_2")   \
53   _(TIME_WAIT, "TIME_WAIT")
54
55 typedef enum _tcp_state
56 {
57 #define _(sym, str) TCP_STATE_##sym,
58   foreach_tcp_fsm_state
59 #undef _
60   TCP_N_STATES
61 } tcp_state_t;
62
63 format_function_t format_tcp_state;
64 format_function_t format_tcp_flags;
65 format_function_t format_tcp_sacks;
66 format_function_t format_tcp_rcv_sacks;
67
68 /** TCP timers */
69 #define foreach_tcp_timer               \
70   _(RETRANSMIT, "RETRANSMIT")           \
71   _(DELACK, "DELAYED ACK")              \
72   _(PERSIST, "PERSIST")                 \
73   _(KEEP, "KEEP")                       \
74   _(WAITCLOSE, "WAIT CLOSE")            \
75   _(RETRANSMIT_SYN, "RETRANSMIT SYN")   \
76   _(ESTABLISH, "ESTABLISH")
77
78 typedef enum _tcp_timers
79 {
80 #define _(sym, str) TCP_TIMER_##sym,
81   foreach_tcp_timer
82 #undef _
83   TCP_N_TIMERS
84 } tcp_timers_e;
85
86 typedef void (timer_expiration_handler) (u32 index);
87
88 extern timer_expiration_handler tcp_timer_delack_handler;
89 extern timer_expiration_handler tcp_timer_retransmit_handler;
90 extern timer_expiration_handler tcp_timer_persist_handler;
91 extern timer_expiration_handler tcp_timer_retransmit_syn_handler;
92
93 #define TCP_TIMER_HANDLE_INVALID ((u32) ~0)
94
95 /* Timer delays as multiples of 100ms */
96 #define TCP_TO_TIMER_TICK       TCP_TICK*10     /* Period for converting from TCP
97                                                  * ticks to timer units */
98 #define TCP_DELACK_TIME         1       /* 0.1s */
99 #define TCP_ESTABLISH_TIME      750     /* 75s */
100 #define TCP_SYN_RCVD_TIME       600     /* 60s */
101 #define TCP_2MSL_TIME           300     /* 30s */
102 #define TCP_CLOSEWAIT_TIME      20      /* 2s */
103 #define TCP_TIMEWAIT_TIME       20      /* 2s */
104 #define TCP_CLEANUP_TIME        10      /* 1s Time to wait before cleanup */
105 #define TCP_TIMER_PERSIST_MIN   2       /* 0.2s */
106
107 #define TCP_RTO_MAX 60 * THZ    /* Min max RTO (60s) as per RFC6298 */
108 #define TCP_RTO_MIN 0.2 * THZ   /* Min RTO (200ms) - lower than standard */
109 #define TCP_RTT_MAX 30 * THZ    /* 30s (probably too much) */
110 #define TCP_RTO_SYN_RETRIES 3   /* SYN retries without doubling RTO */
111 #define TCP_RTO_INIT 1 * THZ    /* Initial retransmit timer */
112
113 /** TCP connection flags */
114 #define foreach_tcp_connection_flag             \
115   _(SNDACK, "Send ACK")                         \
116   _(FINSNT, "FIN sent")                         \
117   _(SENT_RCV_WND0, "Sent 0 receive window")     \
118   _(RECOVERY, "Recovery on")                    \
119   _(FAST_RECOVERY, "Fast Recovery on")          \
120   _(FR_1_SMSS, "Sent 1 SMSS")                   \
121   _(HALF_OPEN_DONE, "Half-open completed")      \
122   _(FINPNDG, "FIN pending")
123
124 typedef enum _tcp_connection_flag_bits
125 {
126 #define _(sym, str) TCP_CONN_##sym##_BIT,
127   foreach_tcp_connection_flag
128 #undef _
129   TCP_CONN_N_FLAG_BITS
130 } tcp_connection_flag_bits_e;
131
132 typedef enum _tcp_connection_flag
133 {
134 #define _(sym, str) TCP_CONN_##sym = 1 << TCP_CONN_##sym##_BIT,
135   foreach_tcp_connection_flag
136 #undef _
137   TCP_CONN_N_FLAGS
138 } tcp_connection_flags_e;
139
140 /** TCP buffer flags */
141 #define foreach_tcp_buf_flag                            \
142   _ (ACK)       /**< Sending ACK. */                    \
143   _ (DUPACK)    /**< Sending DUPACK. */                 \
144
145 enum
146 {
147 #define _(f) TCP_BUF_BIT_##f,
148   foreach_tcp_buf_flag
149 #undef _
150     TCP_N_BUF_BITS,
151 };
152
153 enum
154 {
155 #define _(f) TCP_BUF_FLAG_##f = 1 << TCP_BUF_BIT_##f,
156   foreach_tcp_buf_flag
157 #undef _
158 };
159
160 #define TCP_SCOREBOARD_TRACE (0)
161 #define TCP_MAX_SACK_BLOCKS 15  /**< Max number of SACK blocks stored */
162 #define TCP_INVALID_SACK_HOLE_INDEX ((u32)~0)
163
164 typedef struct _scoreboard_trace_elt
165 {
166   u32 start;
167   u32 end;
168   u32 ack;
169   u32 snd_una_max;
170   u32 group;
171 } scoreboard_trace_elt_t;
172
173 typedef struct _sack_scoreboard_hole
174 {
175   u32 next;             /**< Index for next entry in linked list */
176   u32 prev;             /**< Index for previous entry in linked list */
177   u32 start;            /**< Start sequence number */
178   u32 end;              /**< End sequence number */
179   u8 is_lost;           /**< Mark hole as lost */
180 } sack_scoreboard_hole_t;
181
182 typedef struct _sack_scoreboard
183 {
184   sack_scoreboard_hole_t *holes;        /**< Pool of holes */
185   u32 head;                             /**< Index of first entry */
186   u32 tail;                             /**< Index of last entry */
187   u32 sacked_bytes;                     /**< Number of bytes sacked in sb */
188   u32 last_sacked_bytes;                /**< Number of bytes last sacked */
189   u32 last_bytes_delivered;             /**< Number of sack bytes delivered */
190   u32 snd_una_adv;                      /**< Bytes to add to snd_una */
191   u32 high_sacked;                      /**< Highest byte sacked (fack) */
192   u32 high_rxt;                         /**< Highest retransmitted sequence */
193   u32 rescue_rxt;                       /**< Rescue sequence number */
194   u32 lost_bytes;                       /**< Bytes lost as per RFC6675 */
195   u32 cur_rxt_hole;                     /**< Retransmitting from this hole */
196
197 #if TCP_SCOREBOARD_TRACE
198   scoreboard_trace_elt_t *trace;
199 #endif
200
201 } sack_scoreboard_t;
202
203 #if TCP_SCOREBOARD_TRACE
204 #define tcp_scoreboard_trace_add(_tc, _ack)                             \
205 {                                                                       \
206     static u64 _group = 0;                                              \
207     sack_scoreboard_t *_sb = &_tc->sack_sb;                             \
208     sack_block_t *_sack, *_sacks;                                       \
209     scoreboard_trace_elt_t *_elt;                                       \
210     int i;                                                              \
211     _group++;                                                           \
212     _sacks = _tc->rcv_opts.sacks;                                       \
213     for (i = 0; i < vec_len (_sacks); i++)                              \
214       {                                                                 \
215         _sack = &_sacks[i];                                             \
216         vec_add2 (_sb->trace, _elt, 1);                                 \
217         _elt->start = _sack->start;                                     \
218         _elt->end = _sack->end;                                         \
219         _elt->ack = _elt->end == _ack ? _ack : 0;                       \
220         _elt->snd_una_max = _elt->end == _ack ? _tc->snd_una_max : 0;   \
221         _elt->group = _group;                                           \
222       }                                                                 \
223 }
224 #else
225 #define tcp_scoreboard_trace_add(_tc, _ack)
226 #endif
227
228 typedef enum _tcp_cc_algorithm_type
229 {
230   TCP_CC_NEWRENO,
231 } tcp_cc_algorithm_type_e;
232
233 typedef struct _tcp_cc_algorithm tcp_cc_algorithm_t;
234
235 typedef enum _tcp_cc_ack_t
236 {
237   TCP_CC_ACK,
238   TCP_CC_DUPACK,
239   TCP_CC_PARTIALACK
240 } tcp_cc_ack_t;
241
242 typedef struct _tcp_connection
243 {
244   transport_connection_t connection;  /**< Common transport data. First! */
245
246   u8 state;                     /**< TCP state as per tcp_state_t */
247   u16 flags;                    /**< Connection flags (see tcp_conn_flags_e) */
248   u32 timers[TCP_N_TIMERS];     /**< Timer handles into timer wheel */
249
250   /* TODO RFC4898 */
251
252   /** Send sequence variables RFC793 */
253   u32 snd_una;          /**< oldest unacknowledged sequence number */
254   u32 snd_una_max;      /**< newest unacknowledged sequence number + 1*/
255   u32 snd_wnd;          /**< send window */
256   u32 snd_wl1;          /**< seq number used for last snd.wnd update */
257   u32 snd_wl2;          /**< ack number used for last snd.wnd update */
258   u32 snd_nxt;          /**< next seq number to be sent */
259   u16 snd_mss;          /**< Effective send max seg (data) size */
260
261   /** Receive sequence variables RFC793 */
262   u32 rcv_nxt;          /**< next sequence number expected */
263   u32 rcv_wnd;          /**< receive window we expect */
264
265   u32 rcv_las;          /**< rcv_nxt at last ack sent/rcv_wnd update */
266   u32 iss;              /**< initial sent sequence */
267   u32 irs;              /**< initial remote sequence */
268
269   /* Options */
270   tcp_options_t rcv_opts;       /**< Rx options for connection */
271   tcp_options_t snd_opts;       /**< Tx options for connection */
272   u8 snd_opts_len;              /**< Tx options len */
273   u8 rcv_wscale;        /**< Window scale to advertise to peer */
274   u8 snd_wscale;        /**< Window scale to use when sending */
275   u32 tsval_recent;     /**< Last timestamp received */
276   u32 tsval_recent_age; /**< When last updated tstamp_recent*/
277
278   sack_block_t *snd_sacks;      /**< Vector of SACKs to send. XXX Fixed size? */
279   sack_scoreboard_t sack_sb;    /**< SACK "scoreboard" that tracks holes */
280
281   u16 rcv_dupacks;      /**< Number of DUPACKs received */
282   u8 snt_dupacks;       /**< Number of DUPACKs sent in a burst */
283
284   /* Congestion control */
285   u32 cwnd;             /**< Congestion window */
286   u32 ssthresh;         /**< Slow-start threshold */
287   u32 prev_ssthresh;    /**< ssthresh before congestion */
288   u32 prev_cwnd;        /**< ssthresh before congestion */
289   u32 bytes_acked;      /**< Bytes acknowledged by current segment */
290   u32 snd_rxt_bytes;    /**< Retransmitted bytes */
291   u32 snd_rxt_ts;       /**< Timestamp when first packet is retransmitted */
292   u32 tsecr_last_ack;   /**< Timestamp echoed to us in last healthy ACK */
293   u32 snd_congestion;   /**< snd_una_max when congestion is detected */
294   tcp_cc_algorithm_t *cc_algo;  /**< Congestion control algorithm */
295
296   /* RTT and RTO */
297   u32 rto;              /**< Retransmission timeout */
298   u32 rto_boff;         /**< Index for RTO backoff */
299   u32 srtt;             /**< Smoothed RTT */
300   u32 rttvar;           /**< Smoothed mean RTT difference. Approximates variance */
301   u32 rtt_ts;           /**< Timestamp for tracked ACK */
302   u32 rtt_seq;          /**< Sequence number for tracked ACK */
303
304   u16 mss;              /**< Our max seg size that includes options */
305   u32 limited_transmit; /**< snd_nxt when limited transmit starts */
306   u32 last_fib_check;   /**< Last time we checked fib route for peer */
307 } tcp_connection_t;
308
309 struct _tcp_cc_algorithm
310 {
311   void (*rcv_ack) (tcp_connection_t * tc);
312   void (*rcv_cong_ack) (tcp_connection_t * tc, tcp_cc_ack_t ack);
313   void (*congestion) (tcp_connection_t * tc);
314   void (*recovered) (tcp_connection_t * tc);
315   void (*init) (tcp_connection_t * tc);
316 };
317
318 #define tcp_fastrecovery_on(tc) (tc)->flags |= TCP_CONN_FAST_RECOVERY
319 #define tcp_fastrecovery_off(tc) (tc)->flags &= ~TCP_CONN_FAST_RECOVERY
320 #define tcp_recovery_on(tc) (tc)->flags |= TCP_CONN_RECOVERY
321 #define tcp_recovery_off(tc) (tc)->flags &= ~TCP_CONN_RECOVERY
322 #define tcp_in_fastrecovery(tc) ((tc)->flags & TCP_CONN_FAST_RECOVERY)
323 #define tcp_in_recovery(tc) ((tc)->flags & (TCP_CONN_RECOVERY))
324 #define tcp_in_slowstart(tc) (tc->cwnd < tc->ssthresh)
325 #define tcp_fastrecovery_sent_1_smss(tc) ((tc)->flags & TCP_CONN_FR_1_SMSS)
326 #define tcp_fastrecovery_1_smss_on(tc) ((tc)->flags |= TCP_CONN_FR_1_SMSS)
327 #define tcp_fastrecovery_1_smss_off(tc) ((tc)->flags &= ~TCP_CONN_FR_1_SMSS)
328
329 #define tcp_in_cong_recovery(tc) ((tc)->flags &                 \
330           (TCP_CONN_FAST_RECOVERY | TCP_CONN_RECOVERY))
331
332 always_inline void
333 tcp_cong_recovery_off (tcp_connection_t * tc)
334 {
335   tc->flags &= ~(TCP_CONN_FAST_RECOVERY | TCP_CONN_RECOVERY);
336   tcp_fastrecovery_1_smss_off (tc);
337 }
338
339 typedef enum
340 {
341   TCP_IP4,
342   TCP_IP6,
343   TCP_N_AF,
344 } tcp_af_t;
345
346 typedef enum _tcp_error
347 {
348 #define tcp_error(n,s) TCP_ERROR_##n,
349 #include <vnet/tcp/tcp_error.def>
350 #undef tcp_error
351   TCP_N_ERROR,
352 } tcp_error_t;
353
354 typedef struct _tcp_lookup_dispatch
355 {
356   u8 next, error;
357 } tcp_lookup_dispatch_t;
358
359 typedef struct _tcp_main
360 {
361   /* Per-worker thread tcp connection pools */
362   tcp_connection_t **connections;
363
364   /* Pool of listeners. */
365   tcp_connection_t *listener_pool;
366
367   /** Dispatch table by state and flags */
368   tcp_lookup_dispatch_t dispatch_table[TCP_N_STATES][64];
369
370   u8 log2_tstamp_clocks_per_tick;
371   f64 tstamp_ticks_per_clock;
372   u32 *time_now;
373
374   /** per-worker tx buffer free lists */
375   u32 **tx_buffers;
376   /** per-worker tx frames to tcp 4/6 output nodes */
377   vlib_frame_t **tx_frames[2];
378   /** per-worker tx frames to ip 4/6 lookup nodes */
379   vlib_frame_t **ip_lookup_tx_frames[2];
380
381   /* Per worker-thread timer wheel for connections timers */
382   tw_timer_wheel_16t_2w_512sl_t *timer_wheels;
383
384   /* Pool of half-open connections on which we've sent a SYN */
385   tcp_connection_t *half_open_connections;
386   clib_spinlock_t half_open_lock;
387
388   /* Pool of local TCP endpoints */
389   transport_endpoint_t *local_endpoints;
390
391   /* Local endpoints lookup table */
392   transport_endpoint_table_t local_endpoints_table;
393   clib_spinlock_t local_endpoints_lock;
394
395   /* Congestion control algorithms registered */
396   tcp_cc_algorithm_t *cc_algos;
397
398   /* Flag that indicates if stack is on or off */
399   u8 is_enabled;
400
401   /** Number of preallocated connections */
402   u32 preallocated_connections;
403   u32 preallocated_half_open_connections;
404
405   /** Transport table (preallocation) size parameters */
406   u32 local_endpoints_table_memory;
407   u32 local_endpoints_table_buckets;
408
409   /** Vectors of src addresses. Optional unless one needs > 63K active-opens */
410   ip4_address_t *ip4_src_addresses;
411   u32 last_v4_address_rotor;
412   u32 last_v6_address_rotor;
413   ip6_address_t *ip6_src_addresses;
414
415   /** Port allocator random number generator seed */
416   u32 port_allocator_seed;
417
418   /** vlib buffer size */
419   u32 bytes_per_buffer;
420 } tcp_main_t;
421
422 extern tcp_main_t tcp_main;
423 extern vlib_node_registration_t tcp4_input_node;
424 extern vlib_node_registration_t tcp6_input_node;
425 extern vlib_node_registration_t tcp4_output_node;
426 extern vlib_node_registration_t tcp6_output_node;
427
428 always_inline tcp_main_t *
429 vnet_get_tcp_main ()
430 {
431   return &tcp_main;
432 }
433
434 always_inline tcp_header_t *
435 tcp_buffer_hdr (vlib_buffer_t * b)
436 {
437   ASSERT ((signed) b->current_data >= (signed) -VLIB_BUFFER_PRE_DATA_SIZE);
438   return (tcp_header_t *) (b->data + b->current_data
439                            + vnet_buffer (b)->tcp.hdr_offset);
440 }
441
442 clib_error_t *vnet_tcp_enable_disable (vlib_main_t * vm, u8 is_en);
443
444 always_inline tcp_connection_t *
445 tcp_connection_get (u32 conn_index, u32 thread_index)
446 {
447   if (PREDICT_FALSE
448       (pool_is_free_index (tcp_main.connections[thread_index], conn_index)))
449     return 0;
450   return pool_elt_at_index (tcp_main.connections[thread_index], conn_index);
451 }
452
453 always_inline tcp_connection_t *
454 tcp_connection_get_if_valid (u32 conn_index, u32 thread_index)
455 {
456   if (tcp_main.connections[thread_index] == 0)
457     return 0;
458   if (pool_is_free_index (tcp_main.connections[thread_index], conn_index))
459     return 0;
460   return pool_elt_at_index (tcp_main.connections[thread_index], conn_index);
461 }
462
463 always_inline tcp_connection_t *
464 tcp_get_connection_from_transport (transport_connection_t * tconn)
465 {
466   return (tcp_connection_t *) tconn;
467 }
468
469 void tcp_connection_close (tcp_connection_t * tc);
470 void tcp_connection_cleanup (tcp_connection_t * tc);
471 void tcp_connection_del (tcp_connection_t * tc);
472 int tcp_half_open_connection_cleanup (tcp_connection_t * tc);
473 tcp_connection_t *tcp_connection_new (u8 thread_index);
474 void tcp_connection_reset (tcp_connection_t * tc);
475 int tcp_configure_v4_source_address_range (vlib_main_t * vm,
476                                            ip4_address_t * start,
477                                            ip4_address_t * end, u32 table_id);
478 int tcp_configure_v6_source_address_range (vlib_main_t * vm,
479                                            ip6_address_t * start,
480                                            ip6_address_t * end, u32 table_id);
481 void tcp_api_reference (void);
482 u8 *format_tcp_connection_id (u8 * s, va_list * args);
483 u8 *format_tcp_connection (u8 * s, va_list * args);
484 u8 *format_tcp_scoreboard (u8 * s, va_list * args);
485
486 u8 *tcp_scoreboard_replay (u8 * s, tcp_connection_t * tc, u8 verbose);
487
488 always_inline tcp_connection_t *
489 tcp_listener_get (u32 tli)
490 {
491   return pool_elt_at_index (tcp_main.listener_pool, tli);
492 }
493
494 always_inline tcp_connection_t *
495 tcp_half_open_connection_get (u32 conn_index)
496 {
497   tcp_connection_t *tc = 0;
498   clib_spinlock_lock_if_init (&tcp_main.half_open_lock);
499   if (!pool_is_free_index (tcp_main.half_open_connections, conn_index))
500     tc = pool_elt_at_index (tcp_main.half_open_connections, conn_index);
501   clib_spinlock_unlock_if_init (&tcp_main.half_open_lock);
502   return tc;
503 }
504
505 void tcp_make_ack (tcp_connection_t * ts, vlib_buffer_t * b);
506 void tcp_make_fin (tcp_connection_t * tc, vlib_buffer_t * b);
507 void tcp_make_synack (tcp_connection_t * ts, vlib_buffer_t * b);
508 void tcp_send_reset_w_pkt (tcp_connection_t * tc, vlib_buffer_t * pkt,
509                            u8 is_ip4);
510 void tcp_send_reset (tcp_connection_t * tc);
511 void tcp_send_syn (tcp_connection_t * tc);
512 void tcp_send_fin (tcp_connection_t * tc);
513 void tcp_init_mss (tcp_connection_t * tc);
514 void tcp_update_snd_mss (tcp_connection_t * tc);
515 void tcp_update_rto (tcp_connection_t * tc);
516 void tcp_flush_frame_to_output (vlib_main_t * vm, u8 thread_index, u8 is_ip4);
517 void tcp_flush_frames_to_output (u8 thread_index);
518
519 always_inline u32
520 tcp_end_seq (tcp_header_t * th, u32 len)
521 {
522   return th->seq_number + tcp_is_syn (th) + tcp_is_fin (th) + len;
523 }
524
525 /* Modulo arithmetic for TCP sequence numbers */
526 #define seq_lt(_s1, _s2) ((i32)((_s1)-(_s2)) < 0)
527 #define seq_leq(_s1, _s2) ((i32)((_s1)-(_s2)) <= 0)
528 #define seq_gt(_s1, _s2) ((i32)((_s1)-(_s2)) > 0)
529 #define seq_geq(_s1, _s2) ((i32)((_s1)-(_s2)) >= 0)
530 #define seq_max(_s1, _s2) (seq_gt((_s1), (_s2)) ? (_s1) : (_s2))
531
532 /* Modulo arithmetic for timestamps */
533 #define timestamp_lt(_t1, _t2) ((i32)((_t1)-(_t2)) < 0)
534 #define timestamp_leq(_t1, _t2) ((i32)((_t1)-(_t2)) <= 0)
535
536 /**
537  * Our estimate of the number of bytes that have left the network
538  */
539 always_inline u32
540 tcp_bytes_out (const tcp_connection_t * tc)
541 {
542   if (tcp_opts_sack_permitted (&tc->rcv_opts))
543     return tc->sack_sb.sacked_bytes + tc->sack_sb.lost_bytes;
544   else
545     return tc->rcv_dupacks * tc->snd_mss;
546 }
547
548 /**
549  * Our estimate of the number of bytes in flight (pipe size)
550  */
551 always_inline u32
552 tcp_flight_size (const tcp_connection_t * tc)
553 {
554   int flight_size;
555
556   flight_size = (int) (tc->snd_una_max - tc->snd_una) - tcp_bytes_out (tc)
557     + tc->snd_rxt_bytes;
558
559   if (flight_size < 0)
560     {
561       if (0)
562         clib_warning
563           ("Negative: %u %u %u dupacks %u sacked bytes %u flags %d",
564            tc->snd_una_max - tc->snd_una, tcp_bytes_out (tc),
565            tc->snd_rxt_bytes, tc->rcv_dupacks, tc->sack_sb.sacked_bytes,
566            tc->rcv_opts.flags);
567       return 0;
568     }
569
570   return flight_size;
571 }
572
573 /**
574  * Initial cwnd as per RFC5681
575  */
576 always_inline u32
577 tcp_initial_cwnd (const tcp_connection_t * tc)
578 {
579   if (tc->snd_mss > 2190)
580     return 2 * tc->snd_mss;
581   else if (tc->snd_mss > 1095)
582     return 3 * tc->snd_mss;
583   else
584     return 4 * tc->snd_mss;
585 }
586
587 always_inline u32
588 tcp_loss_wnd (const tcp_connection_t * tc)
589 {
590   return tc->snd_mss;
591 }
592
593 always_inline u32
594 tcp_available_snd_wnd (const tcp_connection_t * tc)
595 {
596   return clib_min (tc->cwnd, tc->snd_wnd);
597 }
598
599 always_inline u32
600 tcp_available_output_snd_space (const tcp_connection_t * tc)
601 {
602   u32 available_wnd = tcp_available_snd_wnd (tc);
603   int flight_size = (int) (tc->snd_nxt - tc->snd_una);
604
605   if (available_wnd <= flight_size)
606     return 0;
607
608   return available_wnd - flight_size;
609 }
610
611 /**
612  * Estimate of how many bytes we can still push into the network
613  */
614 always_inline u32
615 tcp_available_snd_space (const tcp_connection_t * tc)
616 {
617   u32 available_wnd = tcp_available_snd_wnd (tc);
618   u32 flight_size = tcp_flight_size (tc);
619
620   if (available_wnd <= flight_size)
621     return 0;
622
623   return available_wnd - flight_size;
624 }
625
626 always_inline u8
627 tcp_is_lost_fin (tcp_connection_t * tc)
628 {
629   if ((tc->flags & TCP_CONN_FINSNT) && tc->snd_una_max - tc->snd_una == 1)
630     return 1;
631   return 0;
632 }
633
634 i32 tcp_rcv_wnd_available (tcp_connection_t * tc);
635 u32 tcp_snd_space (tcp_connection_t * tc);
636 void tcp_update_rcv_wnd (tcp_connection_t * tc);
637
638 void tcp_retransmit_first_unacked (tcp_connection_t * tc);
639 void tcp_fast_retransmit_no_sack (tcp_connection_t * tc);
640 void tcp_fast_retransmit_sack (tcp_connection_t * tc);
641 void tcp_fast_retransmit (tcp_connection_t * tc);
642 void tcp_cc_init_congestion (tcp_connection_t * tc);
643 int tcp_cc_recover (tcp_connection_t * tc);
644 void tcp_cc_fastrecovery_exit (tcp_connection_t * tc);
645
646 fib_node_index_t tcp_lookup_rmt_in_fib (tcp_connection_t * tc);
647
648 /* Made public for unit testing only */
649 void tcp_update_sack_list (tcp_connection_t * tc, u32 start, u32 end);
650
651 always_inline u32
652 tcp_time_now (void)
653 {
654   return tcp_main.time_now[vlib_get_thread_index ()];
655 }
656
657 always_inline u32
658 tcp_set_time_now (u32 thread_index)
659 {
660   tcp_main.time_now[thread_index] = clib_cpu_time_now ()
661     * tcp_main.tstamp_ticks_per_clock;
662   return tcp_main.time_now[thread_index];
663 }
664
665 always_inline void
666 tcp_update_time (f64 now, u32 thread_index)
667 {
668   tcp_set_time_now (thread_index);
669   tw_timer_expire_timers_16t_2w_512sl (&tcp_main.timer_wheels[thread_index],
670                                        now);
671   tcp_flush_frames_to_output (thread_index);
672 }
673
674 u32 tcp_push_header (transport_connection_t * tconn, vlib_buffer_t * b);
675
676 u32
677 tcp_prepare_retransmit_segment (tcp_connection_t * tc, u32 offset,
678                                 u32 max_bytes, vlib_buffer_t ** b);
679
680 void tcp_connection_timers_init (tcp_connection_t * tc);
681 void tcp_connection_timers_reset (tcp_connection_t * tc);
682 void tcp_init_snd_vars (tcp_connection_t * tc);
683 void tcp_connection_init_vars (tcp_connection_t * tc);
684
685 always_inline void
686 tcp_connection_force_ack (tcp_connection_t * tc, vlib_buffer_t * b)
687 {
688   /* Reset flags, make sure ack is sent */
689   tc->flags = TCP_CONN_SNDACK;
690   vnet_buffer (b)->tcp.flags &= ~TCP_BUF_FLAG_DUPACK;
691 }
692
693 always_inline void
694 tcp_timer_set (tcp_connection_t * tc, u8 timer_id, u32 interval)
695 {
696   ASSERT (tc->c_thread_index == vlib_get_thread_index ());
697   ASSERT (tc->timers[timer_id] == TCP_TIMER_HANDLE_INVALID);
698   tc->timers[timer_id]
699     = tw_timer_start_16t_2w_512sl (&tcp_main.timer_wheels[tc->c_thread_index],
700                                    tc->c_c_index, timer_id, interval);
701 }
702
703 always_inline void
704 tcp_timer_reset (tcp_connection_t * tc, u8 timer_id)
705 {
706   ASSERT (tc->c_thread_index == vlib_get_thread_index ());
707   if (tc->timers[timer_id] == TCP_TIMER_HANDLE_INVALID)
708     return;
709
710   tw_timer_stop_16t_2w_512sl (&tcp_main.timer_wheels[tc->c_thread_index],
711                               tc->timers[timer_id]);
712   tc->timers[timer_id] = TCP_TIMER_HANDLE_INVALID;
713 }
714
715 always_inline void
716 tcp_timer_update (tcp_connection_t * tc, u8 timer_id, u32 interval)
717 {
718   ASSERT (tc->c_thread_index == vlib_get_thread_index ());
719   if (tc->timers[timer_id] != TCP_TIMER_HANDLE_INVALID)
720     tw_timer_stop_16t_2w_512sl (&tcp_main.timer_wheels[tc->c_thread_index],
721                                 tc->timers[timer_id]);
722   tc->timers[timer_id] =
723     tw_timer_start_16t_2w_512sl (&tcp_main.timer_wheels[tc->c_thread_index],
724                                  tc->c_c_index, timer_id, interval);
725 }
726
727 always_inline void
728 tcp_retransmit_timer_set (tcp_connection_t * tc)
729 {
730   ASSERT (tc->snd_una != tc->snd_una_max);
731   tcp_timer_set (tc, TCP_TIMER_RETRANSMIT,
732                  clib_max (tc->rto * TCP_TO_TIMER_TICK, 1));
733 }
734
735 always_inline void
736 tcp_retransmit_timer_reset (tcp_connection_t * tc)
737 {
738   tcp_timer_reset (tc, TCP_TIMER_RETRANSMIT);
739 }
740
741 always_inline void
742 tcp_retransmit_timer_force_update (tcp_connection_t * tc)
743 {
744   tcp_timer_update (tc, TCP_TIMER_RETRANSMIT,
745                     clib_max (tc->rto * TCP_TO_TIMER_TICK, 1));
746 }
747
748 always_inline void
749 tcp_persist_timer_set (tcp_connection_t * tc)
750 {
751   /* Reuse RTO. It's backed off in handler */
752   tcp_timer_set (tc, TCP_TIMER_PERSIST,
753                  clib_max (tc->rto * TCP_TO_TIMER_TICK,
754                            TCP_TIMER_PERSIST_MIN));
755 }
756
757 always_inline void
758 tcp_persist_timer_update (tcp_connection_t * tc)
759 {
760   tcp_timer_update (tc, TCP_TIMER_PERSIST,
761                     clib_max (tc->rto * TCP_TO_TIMER_TICK,
762                               TCP_TIMER_PERSIST_MIN));
763 }
764
765 always_inline void
766 tcp_persist_timer_reset (tcp_connection_t * tc)
767 {
768   tcp_timer_reset (tc, TCP_TIMER_PERSIST);
769 }
770
771 always_inline void
772 tcp_retransmit_timer_update (tcp_connection_t * tc)
773 {
774   if (tc->snd_una == tc->snd_una_max)
775     {
776       tcp_retransmit_timer_reset (tc);
777       if (tc->snd_wnd < tc->snd_mss)
778         tcp_persist_timer_update (tc);
779     }
780   else
781     tcp_timer_update (tc, TCP_TIMER_RETRANSMIT,
782                       clib_max (tc->rto * TCP_TO_TIMER_TICK, 1));
783 }
784
785 always_inline u8
786 tcp_timer_is_active (tcp_connection_t * tc, tcp_timers_e timer)
787 {
788   return tc->timers[timer] != TCP_TIMER_HANDLE_INVALID;
789 }
790
791 #define tcp_validate_txf_size(_tc, _a)                                  \
792   ASSERT(_tc->state != TCP_STATE_ESTABLISHED                            \
793          || stream_session_tx_fifo_max_dequeue (&_tc->connection) >= _a)
794
795 void
796 scoreboard_remove_hole (sack_scoreboard_t * sb,
797                         sack_scoreboard_hole_t * hole);
798 void scoreboard_update_lost (tcp_connection_t * tc, sack_scoreboard_t * sb);
799 sack_scoreboard_hole_t *scoreboard_insert_hole (sack_scoreboard_t * sb,
800                                                 u32 prev_index, u32 start,
801                                                 u32 end);
802 sack_scoreboard_hole_t *scoreboard_next_rxt_hole (sack_scoreboard_t * sb,
803                                                   sack_scoreboard_hole_t *
804                                                   start, u8 have_sent_1_smss,
805                                                   u8 * can_rescue,
806                                                   u8 * snd_limited);
807 void scoreboard_init_high_rxt (sack_scoreboard_t * sb, u32 seq);
808
809 always_inline sack_scoreboard_hole_t *
810 scoreboard_get_hole (sack_scoreboard_t * sb, u32 index)
811 {
812   if (index != TCP_INVALID_SACK_HOLE_INDEX)
813     return pool_elt_at_index (sb->holes, index);
814   return 0;
815 }
816
817 always_inline sack_scoreboard_hole_t *
818 scoreboard_next_hole (sack_scoreboard_t * sb, sack_scoreboard_hole_t * hole)
819 {
820   if (hole->next != TCP_INVALID_SACK_HOLE_INDEX)
821     return pool_elt_at_index (sb->holes, hole->next);
822   return 0;
823 }
824
825 always_inline sack_scoreboard_hole_t *
826 scoreboard_prev_hole (sack_scoreboard_t * sb, sack_scoreboard_hole_t * hole)
827 {
828   if (hole->prev != TCP_INVALID_SACK_HOLE_INDEX)
829     return pool_elt_at_index (sb->holes, hole->prev);
830   return 0;
831 }
832
833 always_inline sack_scoreboard_hole_t *
834 scoreboard_first_hole (sack_scoreboard_t * sb)
835 {
836   if (sb->head != TCP_INVALID_SACK_HOLE_INDEX)
837     return pool_elt_at_index (sb->holes, sb->head);
838   return 0;
839 }
840
841 always_inline sack_scoreboard_hole_t *
842 scoreboard_last_hole (sack_scoreboard_t * sb)
843 {
844   if (sb->tail != TCP_INVALID_SACK_HOLE_INDEX)
845     return pool_elt_at_index (sb->holes, sb->tail);
846   return 0;
847 }
848
849 always_inline void
850 scoreboard_clear (sack_scoreboard_t * sb)
851 {
852   sack_scoreboard_hole_t *hole;
853   while ((hole = scoreboard_first_hole (sb)))
854     {
855       scoreboard_remove_hole (sb, hole);
856     }
857   ASSERT (sb->head == sb->tail && sb->head == TCP_INVALID_SACK_HOLE_INDEX);
858   ASSERT (pool_elts (sb->holes) == 0);
859   sb->sacked_bytes = 0;
860   sb->last_sacked_bytes = 0;
861   sb->last_bytes_delivered = 0;
862   sb->snd_una_adv = 0;
863   sb->high_sacked = 0;
864   sb->high_rxt = 0;
865   sb->lost_bytes = 0;
866   sb->cur_rxt_hole = TCP_INVALID_SACK_HOLE_INDEX;
867 }
868
869 always_inline u32
870 scoreboard_hole_bytes (sack_scoreboard_hole_t * hole)
871 {
872   return hole->end - hole->start;
873 }
874
875 always_inline u32
876 scoreboard_hole_index (sack_scoreboard_t * sb, sack_scoreboard_hole_t * hole)
877 {
878   ASSERT (!pool_is_free_index (sb->holes, hole - sb->holes));
879   return hole - sb->holes;
880 }
881
882 always_inline void
883 scoreboard_init (sack_scoreboard_t * sb)
884 {
885   sb->head = TCP_INVALID_SACK_HOLE_INDEX;
886   sb->tail = TCP_INVALID_SACK_HOLE_INDEX;
887   sb->cur_rxt_hole = TCP_INVALID_SACK_HOLE_INDEX;
888 }
889
890 void tcp_rcv_sacks (tcp_connection_t * tc, u32 ack);
891
892 always_inline void
893 tcp_cc_algo_register (tcp_cc_algorithm_type_e type,
894                       const tcp_cc_algorithm_t * vft)
895 {
896   tcp_main_t *tm = vnet_get_tcp_main ();
897   vec_validate (tm->cc_algos, type);
898
899   tm->cc_algos[type] = *vft;
900 }
901
902 always_inline tcp_cc_algorithm_t *
903 tcp_cc_algo_get (tcp_cc_algorithm_type_e type)
904 {
905   tcp_main_t *tm = vnet_get_tcp_main ();
906   return &tm->cc_algos[type];
907 }
908
909 void tcp_cc_init (tcp_connection_t * tc);
910
911 /**
912  * Push TCP header to buffer
913  *
914  * @param vm - vlib_main
915  * @param b - buffer to write the header to
916  * @param sp_net - source port net order
917  * @param dp_net - destination port net order
918  * @param seq - sequence number net order
919  * @param ack - ack number net order
920  * @param tcp_hdr_opts_len - header and options length in bytes
921  * @param flags - header flags
922  * @param wnd - window size
923  *
924  * @return - pointer to start of TCP header
925  */
926 always_inline void *
927 vlib_buffer_push_tcp_net_order (vlib_buffer_t * b, u16 sp, u16 dp, u32 seq,
928                                 u32 ack, u8 tcp_hdr_opts_len, u8 flags,
929                                 u16 wnd)
930 {
931   tcp_header_t *th;
932
933   th = vlib_buffer_push_uninit (b, tcp_hdr_opts_len);
934
935   th->src_port = sp;
936   th->dst_port = dp;
937   th->seq_number = seq;
938   th->ack_number = ack;
939   th->data_offset_and_reserved = (tcp_hdr_opts_len >> 2) << 4;
940   th->flags = flags;
941   th->window = wnd;
942   th->checksum = 0;
943   th->urgent_pointer = 0;
944   return th;
945 }
946
947 /**
948  * Push TCP header to buffer
949  *
950  * @param b - buffer to write the header to
951  * @param sp_net - source port net order
952  * @param dp_net - destination port net order
953  * @param seq - sequence number host order
954  * @param ack - ack number host order
955  * @param tcp_hdr_opts_len - header and options length in bytes
956  * @param flags - header flags
957  * @param wnd - window size
958  *
959  * @return - pointer to start of TCP header
960  */
961 always_inline void *
962 vlib_buffer_push_tcp (vlib_buffer_t * b, u16 sp_net, u16 dp_net, u32 seq,
963                       u32 ack, u8 tcp_hdr_opts_len, u8 flags, u16 wnd)
964 {
965   return vlib_buffer_push_tcp_net_order (b, sp_net, dp_net,
966                                          clib_host_to_net_u32 (seq),
967                                          clib_host_to_net_u32 (ack),
968                                          tcp_hdr_opts_len, flags,
969                                          clib_host_to_net_u16 (wnd));
970 }
971
972 #endif /* _vnet_tcp_h_ */
973
974 /*
975  * fd.io coding-style-patch-verification: ON
976  *
977  * Local Variables:
978  * eval: (c-set-style "gnu")
979  * End:
980  */