2 * Copyright (c) 2016-2019 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:
7 * http://www.apache.org/licenses/LICENSE-2.0
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.
16 #include <vnet/tcp/tcp.h>
19 typedef enum _tcp_output_next
22 TCP_OUTPUT_NEXT_IP_LOOKUP,
23 TCP_OUTPUT_NEXT_IP_REWRITE,
24 TCP_OUTPUT_NEXT_IP_ARP,
28 #define foreach_tcp4_output_next \
29 _ (DROP, "error-drop") \
30 _ (IP_LOOKUP, "ip4-lookup") \
31 _ (IP_REWRITE, "ip4-rewrite") \
34 #define foreach_tcp6_output_next \
35 _ (DROP, "error-drop") \
36 _ (IP_LOOKUP, "ip6-lookup") \
37 _ (IP_REWRITE, "ip6-rewrite") \
38 _ (IP_ARP, "ip6-discover-neighbor")
40 static char *tcp_error_strings[] = {
41 #define tcp_error(n,s) s,
42 #include <vnet/tcp/tcp_error.def>
48 tcp_header_t tcp_header;
49 tcp_connection_t tcp_connection;
53 format_tcp_tx_trace (u8 * s, va_list * args)
55 CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
56 CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
57 tcp_tx_trace_t *t = va_arg (*args, tcp_tx_trace_t *);
58 u32 indent = format_get_indent (s);
60 s = format (s, "%U\n%U%U",
61 format_tcp_header, &t->tcp_header, 128,
62 format_white_space, indent,
63 format_tcp_connection, &t->tcp_connection, 1);
68 #ifndef CLIB_MARCH_VARIANT
70 tcp_window_compute_scale (u32 window)
73 while (wnd_scale < TCP_MAX_WND_SCALE && (window >> wnd_scale) > TCP_WND_MAX)
79 * Update max segment size we're able to process.
81 * The value is constrained by our interface's MTU and IP options. It is
82 * also what we advertise to our peer.
85 tcp_update_rcv_mss (tcp_connection_t * tc)
87 /* TODO find our iface MTU */
88 tc->mss = tcp_main.default_mtu - sizeof (tcp_header_t);
92 * TCP's initial window
95 tcp_initial_wnd_unscaled (tcp_connection_t * tc)
97 /* RFC 6928 recommends the value lower. However at the time our connections
98 * are initialized, fifos may not be allocated. Therefore, advertise the
99 * smallest possible unscaled window size and update once fifos are
100 * assigned to the session.
103 tcp_update_rcv_mss (tc);
104 TCP_IW_N_SEGMENTS * tc->mss;
106 return TCP_MIN_RX_FIFO_SIZE;
110 * Compute initial window and scale factor. As per RFC1323, window field in
111 * SYN and SYN-ACK segments is never scaled.
114 tcp_initial_window_to_advertise (tcp_connection_t * tc)
116 tcp_main_t *tm = &tcp_main;
119 /* Initial wnd for SYN. Fifos are not allocated yet.
120 * Use some predefined value. For SYN-ACK we still want the
121 * scale to be computed in the same way */
122 max_fifo = tm->max_rx_fifo ? tm->max_rx_fifo : TCP_MAX_RX_FIFO_SIZE;
124 /* Compute rcv wscale only if peer advertised support for it */
125 if (tc->state != TCP_STATE_SYN_RCVD || tcp_opts_wscale (&tc->rcv_opts))
126 tc->rcv_wscale = tcp_window_compute_scale (max_fifo);
128 tc->rcv_wnd = tcp_initial_wnd_unscaled (tc);
130 return clib_min (tc->rcv_wnd, TCP_WND_MAX);
134 tcp_update_rcv_wnd (tcp_connection_t * tc)
136 u32 available_space, wnd;
139 ASSERT (tc->rcv_opts.mss < transport_rx_fifo_size (&tc->connection));
142 * Figure out how much space we have available
144 available_space = transport_max_rx_enqueue (&tc->connection);
145 if (PREDICT_FALSE (available_space < tc->rcv_opts.mss))
149 * Use the above and what we know about what we've previously advertised
150 * to compute the new window
152 observed_wnd = (i32) tc->rcv_wnd - (tc->rcv_nxt - tc->rcv_las);
154 /* Bad. Thou shalt not shrink */
155 if (PREDICT_FALSE ((i32) available_space < observed_wnd))
157 wnd = clib_max (observed_wnd, 0);
158 TCP_EVT_DBG (TCP_EVT_RCV_WND_SHRUNK, tc, observed_wnd, available_space);
162 wnd = available_space;
165 /* Make sure we have a multiple of rcv_wscale */
166 if (wnd && tc->rcv_wscale)
168 wnd &= ~((1 << tc->rcv_wscale) - 1);
170 wnd = 1 << tc->rcv_wscale;
173 tc->rcv_wnd = clib_min (wnd, TCP_WND_MAX << tc->rcv_wscale);
177 * Compute and return window to advertise, scaled as per RFC1323
180 tcp_window_to_advertise (tcp_connection_t * tc, tcp_state_t state)
182 if (state < TCP_STATE_ESTABLISHED)
183 return tcp_initial_window_to_advertise (tc);
185 tcp_update_rcv_wnd (tc);
186 return tc->rcv_wnd >> tc->rcv_wscale;
190 * Write TCP options to segment.
193 tcp_options_write (u8 * data, tcp_options_t * opts)
196 u32 buf, seq_len = 4;
198 if (tcp_opts_mss (opts))
200 *data++ = TCP_OPTION_MSS;
201 *data++ = TCP_OPTION_LEN_MSS;
202 buf = clib_host_to_net_u16 (opts->mss);
203 clib_memcpy_fast (data, &buf, sizeof (opts->mss));
204 data += sizeof (opts->mss);
205 opts_len += TCP_OPTION_LEN_MSS;
208 if (tcp_opts_wscale (opts))
210 *data++ = TCP_OPTION_WINDOW_SCALE;
211 *data++ = TCP_OPTION_LEN_WINDOW_SCALE;
212 *data++ = opts->wscale;
213 opts_len += TCP_OPTION_LEN_WINDOW_SCALE;
216 if (tcp_opts_sack_permitted (opts))
218 *data++ = TCP_OPTION_SACK_PERMITTED;
219 *data++ = TCP_OPTION_LEN_SACK_PERMITTED;
220 opts_len += TCP_OPTION_LEN_SACK_PERMITTED;
223 if (tcp_opts_tstamp (opts))
225 *data++ = TCP_OPTION_TIMESTAMP;
226 *data++ = TCP_OPTION_LEN_TIMESTAMP;
227 buf = clib_host_to_net_u32 (opts->tsval);
228 clib_memcpy_fast (data, &buf, sizeof (opts->tsval));
229 data += sizeof (opts->tsval);
230 buf = clib_host_to_net_u32 (opts->tsecr);
231 clib_memcpy_fast (data, &buf, sizeof (opts->tsecr));
232 data += sizeof (opts->tsecr);
233 opts_len += TCP_OPTION_LEN_TIMESTAMP;
236 if (tcp_opts_sack (opts))
240 if (opts->n_sack_blocks != 0)
242 *data++ = TCP_OPTION_SACK_BLOCK;
243 *data++ = 2 + opts->n_sack_blocks * TCP_OPTION_LEN_SACK_BLOCK;
244 for (i = 0; i < opts->n_sack_blocks; i++)
246 buf = clib_host_to_net_u32 (opts->sacks[i].start);
247 clib_memcpy_fast (data, &buf, seq_len);
249 buf = clib_host_to_net_u32 (opts->sacks[i].end);
250 clib_memcpy_fast (data, &buf, seq_len);
253 opts_len += 2 + opts->n_sack_blocks * TCP_OPTION_LEN_SACK_BLOCK;
257 /* Terminate TCP options */
260 *data++ = TCP_OPTION_EOL;
261 opts_len += TCP_OPTION_LEN_EOL;
264 /* Pad with zeroes to a u32 boundary */
267 *data++ = TCP_OPTION_NOOP;
268 opts_len += TCP_OPTION_LEN_NOOP;
274 tcp_make_syn_options (tcp_options_t * opts, u8 wnd_scale)
278 opts->flags |= TCP_OPTS_FLAG_MSS;
279 opts->mss = tcp_main.default_mtu; /*XXX discover that */
280 len += TCP_OPTION_LEN_MSS;
282 opts->flags |= TCP_OPTS_FLAG_WSCALE;
283 opts->wscale = wnd_scale;
284 len += TCP_OPTION_LEN_WINDOW_SCALE;
286 opts->flags |= TCP_OPTS_FLAG_TSTAMP;
287 opts->tsval = tcp_time_now ();
289 len += TCP_OPTION_LEN_TIMESTAMP;
293 opts->flags |= TCP_OPTS_FLAG_SACK_PERMITTED;
294 len += TCP_OPTION_LEN_SACK_PERMITTED;
297 /* Align to needed boundary */
298 len += (TCP_OPTS_ALIGN - len % TCP_OPTS_ALIGN) % TCP_OPTS_ALIGN;
303 tcp_make_synack_options (tcp_connection_t * tc, tcp_options_t * opts)
307 opts->flags |= TCP_OPTS_FLAG_MSS;
309 len += TCP_OPTION_LEN_MSS;
311 if (tcp_opts_wscale (&tc->rcv_opts))
313 opts->flags |= TCP_OPTS_FLAG_WSCALE;
314 opts->wscale = tc->rcv_wscale;
315 len += TCP_OPTION_LEN_WINDOW_SCALE;
318 if (tcp_opts_tstamp (&tc->rcv_opts))
320 opts->flags |= TCP_OPTS_FLAG_TSTAMP;
321 opts->tsval = tcp_time_now ();
322 opts->tsecr = tc->tsval_recent;
323 len += TCP_OPTION_LEN_TIMESTAMP;
326 if (tcp_opts_sack_permitted (&tc->rcv_opts))
328 opts->flags |= TCP_OPTS_FLAG_SACK_PERMITTED;
329 len += TCP_OPTION_LEN_SACK_PERMITTED;
332 /* Align to needed boundary */
333 len += (TCP_OPTS_ALIGN - len % TCP_OPTS_ALIGN) % TCP_OPTS_ALIGN;
338 tcp_make_established_options (tcp_connection_t * tc, tcp_options_t * opts)
344 if (tcp_opts_tstamp (&tc->rcv_opts))
346 opts->flags |= TCP_OPTS_FLAG_TSTAMP;
347 opts->tsval = tcp_tstamp (tc);
348 opts->tsecr = tc->tsval_recent;
349 len += TCP_OPTION_LEN_TIMESTAMP;
351 if (tcp_opts_sack_permitted (&tc->rcv_opts))
353 if (vec_len (tc->snd_sacks))
355 opts->flags |= TCP_OPTS_FLAG_SACK;
356 if (tc->snd_sack_pos >= vec_len (tc->snd_sacks))
357 tc->snd_sack_pos = 0;
358 opts->sacks = &tc->snd_sacks[tc->snd_sack_pos];
359 opts->n_sack_blocks = vec_len (tc->snd_sacks) - tc->snd_sack_pos;
360 opts->n_sack_blocks = clib_min (opts->n_sack_blocks,
361 TCP_OPTS_MAX_SACK_BLOCKS);
362 tc->snd_sack_pos += opts->n_sack_blocks;
363 len += 2 + TCP_OPTION_LEN_SACK_BLOCK * opts->n_sack_blocks;
367 /* Align to needed boundary */
368 len += (TCP_OPTS_ALIGN - len % TCP_OPTS_ALIGN) % TCP_OPTS_ALIGN;
373 tcp_make_options (tcp_connection_t * tc, tcp_options_t * opts,
378 case TCP_STATE_ESTABLISHED:
379 case TCP_STATE_CLOSE_WAIT:
380 case TCP_STATE_FIN_WAIT_1:
381 case TCP_STATE_LAST_ACK:
382 case TCP_STATE_CLOSING:
383 case TCP_STATE_FIN_WAIT_2:
384 case TCP_STATE_TIME_WAIT:
385 case TCP_STATE_CLOSED:
386 return tcp_make_established_options (tc, opts);
387 case TCP_STATE_SYN_RCVD:
388 return tcp_make_synack_options (tc, opts);
389 case TCP_STATE_SYN_SENT:
390 return tcp_make_syn_options (opts, tc->rcv_wscale);
392 clib_warning ("State not handled! %d", state);
398 * Update burst send vars
400 * - Updates snd_mss to reflect the effective segment size that we can send
401 * by taking into account all TCP options, including SACKs.
402 * - Cache 'on the wire' options for reuse
403 * - Updates receive window which can be reused for a burst.
405 * This should *only* be called when doing bursts
408 tcp_update_burst_snd_vars (tcp_connection_t * tc)
410 tcp_main_t *tm = &tcp_main;
412 /* Compute options to be used for connection. These may be reused when
413 * sending data or to compute the effective mss (snd_mss) */
414 tc->snd_opts_len = tcp_make_options (tc, &tc->snd_opts,
415 TCP_STATE_ESTABLISHED);
417 /* XXX check if MTU has been updated */
418 tc->snd_mss = clib_min (tc->mss, tc->rcv_opts.mss) - tc->snd_opts_len;
419 ASSERT (tc->snd_mss > 0);
421 tcp_options_write (tm->wrk_ctx[tc->c_thread_index].cached_opts,
424 tcp_update_rcv_wnd (tc);
426 if (tc->flags & TCP_CONN_RATE_SAMPLE)
427 tc->flags |= TCP_CONN_TRACK_BURST;
429 if (tc->snd_una == tc->snd_nxt)
430 tcp_cc_event (tc, TCP_CC_EVT_START_TX);
434 tcp_init_mss (tcp_connection_t * tc)
436 u16 default_min_mss = 536;
437 tcp_update_rcv_mss (tc);
439 /* TODO cache mss and consider PMTU discovery */
440 tc->snd_mss = clib_min (tc->rcv_opts.mss, tc->mss);
442 if (tc->snd_mss < 45)
444 /* Assume that at least the min default mss works */
445 tc->snd_mss = default_min_mss;
446 tc->rcv_opts.mss = default_min_mss;
449 /* We should have enough space for 40 bytes of options */
450 ASSERT (tc->snd_mss > 45);
452 /* If we use timestamp option, account for it */
453 if (tcp_opts_tstamp (&tc->rcv_opts))
454 tc->snd_mss -= TCP_OPTION_LEN_TIMESTAMP;
456 #endif /* CLIB_MARCH_VARIANT */
459 tcp_reuse_buffer (vlib_main_t * vm, vlib_buffer_t * b)
461 if (b->flags & VLIB_BUFFER_NEXT_PRESENT)
462 vlib_buffer_free_one (vm, b->next_buffer);
463 /* Zero all flags but free list index and trace flag */
464 b->flags &= VLIB_BUFFER_NEXT_PRESENT - 1;
466 b->current_length = 0;
467 b->total_length_not_including_first_buffer = 0;
468 vnet_buffer (b)->tcp.flags = 0;
470 /* Leave enough space for headers */
471 return vlib_buffer_make_headroom (b, TRANSPORT_MAX_HDRS_LEN);
474 #ifndef CLIB_MARCH_VARIANT
476 tcp_init_buffer (vlib_main_t * vm, vlib_buffer_t * b)
478 ASSERT ((b->flags & VLIB_BUFFER_NEXT_PRESENT) == 0);
479 b->flags |= VNET_BUFFER_F_LOCALLY_ORIGINATED;
480 b->total_length_not_including_first_buffer = 0;
482 vnet_buffer (b)->tcp.flags = 0;
483 VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b);
484 /* Leave enough space for headers */
485 return vlib_buffer_make_headroom (b, TRANSPORT_MAX_HDRS_LEN);
492 tcp_make_ack_i (tcp_connection_t * tc, vlib_buffer_t * b, tcp_state_t state,
495 tcp_options_t _snd_opts, *snd_opts = &_snd_opts;
496 u8 tcp_opts_len, tcp_hdr_opts_len;
500 wnd = tcp_window_to_advertise (tc, state);
502 /* Make and write options */
503 tcp_opts_len = tcp_make_established_options (tc, snd_opts);
504 tcp_hdr_opts_len = tcp_opts_len + sizeof (tcp_header_t);
506 th = vlib_buffer_push_tcp (b, tc->c_lcl_port, tc->c_rmt_port, tc->snd_nxt,
507 tc->rcv_nxt, tcp_hdr_opts_len, flags, wnd);
509 tcp_options_write ((u8 *) (th + 1), snd_opts);
510 vnet_buffer (b)->tcp.connection_index = tc->c_c_index;
513 tcp_zero_rwnd_sent_on (tc);
515 tcp_zero_rwnd_sent_off (tc);
519 * Convert buffer to ACK
522 tcp_make_ack (tcp_connection_t * tc, vlib_buffer_t * b)
524 tcp_make_ack_i (tc, b, TCP_STATE_ESTABLISHED, TCP_FLAG_ACK);
525 TCP_EVT_DBG (TCP_EVT_ACK_SENT, tc);
526 tc->rcv_las = tc->rcv_nxt;
530 * Convert buffer to FIN-ACK
533 tcp_make_fin (tcp_connection_t * tc, vlib_buffer_t * b)
535 tcp_make_ack_i (tc, b, TCP_STATE_ESTABLISHED, TCP_FLAG_FIN | TCP_FLAG_ACK);
539 * Convert buffer to SYN
542 tcp_make_syn (tcp_connection_t * tc, vlib_buffer_t * b)
544 u8 tcp_hdr_opts_len, tcp_opts_len;
547 tcp_options_t snd_opts;
549 initial_wnd = tcp_initial_window_to_advertise (tc);
551 /* Make and write options */
552 clib_memset (&snd_opts, 0, sizeof (snd_opts));
553 tcp_opts_len = tcp_make_syn_options (&snd_opts, tc->rcv_wscale);
554 tcp_hdr_opts_len = tcp_opts_len + sizeof (tcp_header_t);
556 th = vlib_buffer_push_tcp (b, tc->c_lcl_port, tc->c_rmt_port, tc->iss,
557 tc->rcv_nxt, tcp_hdr_opts_len, TCP_FLAG_SYN,
559 vnet_buffer (b)->tcp.connection_index = tc->c_c_index;
560 tcp_options_write ((u8 *) (th + 1), &snd_opts);
564 * Convert buffer to SYN-ACK
567 tcp_make_synack (tcp_connection_t * tc, vlib_buffer_t * b)
569 tcp_options_t _snd_opts, *snd_opts = &_snd_opts;
570 u8 tcp_opts_len, tcp_hdr_opts_len;
574 clib_memset (snd_opts, 0, sizeof (*snd_opts));
575 initial_wnd = tcp_initial_window_to_advertise (tc);
576 tcp_opts_len = tcp_make_synack_options (tc, snd_opts);
577 tcp_hdr_opts_len = tcp_opts_len + sizeof (tcp_header_t);
579 th = vlib_buffer_push_tcp (b, tc->c_lcl_port, tc->c_rmt_port, tc->iss,
580 tc->rcv_nxt, tcp_hdr_opts_len,
581 TCP_FLAG_SYN | TCP_FLAG_ACK, initial_wnd);
582 tcp_options_write ((u8 *) (th + 1), snd_opts);
584 vnet_buffer (b)->tcp.connection_index = tc->c_c_index;
588 tcp_enqueue_to_ip_lookup_i (tcp_worker_ctx_t * wrk, vlib_buffer_t * b, u32 bi,
589 u8 is_ip4, u32 fib_index, u8 flush)
591 vlib_main_t *vm = wrk->vm;
592 u32 *to_next, next_index;
595 b->flags |= VNET_BUFFER_F_LOCALLY_ORIGINATED;
598 vnet_buffer (b)->sw_if_index[VLIB_TX] = fib_index;
599 vnet_buffer (b)->sw_if_index[VLIB_RX] = 0;
601 /* Send to IP lookup */
602 next_index = is_ip4 ? ip4_lookup_node.index : ip6_lookup_node.index;
603 tcp_trajectory_add_start (b, 1);
605 f = wrk->ip_lookup_tx_frames[!is_ip4];
608 f = vlib_get_frame_to_node (vm, next_index);
610 wrk->ip_lookup_tx_frames[!is_ip4] = f;
613 to_next = vlib_frame_vector_args (f);
614 to_next[f->n_vectors] = bi;
616 if (flush || f->n_vectors == VLIB_FRAME_SIZE)
618 vlib_put_frame_to_node (vm, next_index, f);
619 wrk->ip_lookup_tx_frames[!is_ip4] = 0;
624 tcp_enqueue_to_ip_lookup_now (tcp_worker_ctx_t * wrk, vlib_buffer_t * b,
625 u32 bi, u8 is_ip4, u32 fib_index)
627 tcp_enqueue_to_ip_lookup_i (wrk, b, bi, is_ip4, fib_index, 1);
631 tcp_enqueue_to_ip_lookup (tcp_worker_ctx_t * wrk, vlib_buffer_t * b, u32 bi,
632 u8 is_ip4, u32 fib_index)
634 tcp_enqueue_to_ip_lookup_i (wrk, b, bi, is_ip4, fib_index, 0);
635 if (wrk->vm->thread_index == 0 && vlib_num_workers ())
636 session_flush_frames_main_thread (wrk->vm);
640 tcp_enqueue_to_output_i (tcp_worker_ctx_t * wrk, vlib_buffer_t * b, u32 bi,
643 u32 *to_next, next_index;
646 b->flags |= VNET_BUFFER_F_LOCALLY_ORIGINATED;
649 /* Decide where to send the packet */
650 next_index = is_ip4 ? tcp4_output_node.index : tcp6_output_node.index;
651 tcp_trajectory_add_start (b, 2);
653 /* Get frame to v4/6 output node */
654 f = wrk->tx_frames[!is_ip4];
657 f = vlib_get_frame_to_node (wrk->vm, next_index);
659 wrk->tx_frames[!is_ip4] = f;
661 to_next = vlib_frame_vector_args (f);
662 to_next[f->n_vectors] = bi;
664 if (flush || f->n_vectors == VLIB_FRAME_SIZE)
666 vlib_put_frame_to_node (wrk->vm, next_index, f);
667 wrk->tx_frames[!is_ip4] = 0;
672 tcp_enqueue_to_output (tcp_worker_ctx_t * wrk, vlib_buffer_t * b, u32 bi,
675 tcp_enqueue_to_output_i (wrk, b, bi, is_ip4, 0);
679 tcp_enqueue_to_output_now (tcp_worker_ctx_t * wrk, vlib_buffer_t * b, u32 bi,
682 tcp_enqueue_to_output_i (wrk, b, bi, is_ip4, 1);
684 #endif /* CLIB_MARCH_VARIANT */
687 tcp_make_reset_in_place (vlib_main_t * vm, vlib_buffer_t * b0,
688 tcp_state_t state, u8 thread_index, u8 is_ip4)
693 ip4_address_t src_ip40, dst_ip40;
694 ip6_address_t src_ip60, dst_ip60;
695 u16 src_port, dst_port;
700 /* Find IP and TCP headers */
701 th0 = tcp_buffer_hdr (b0);
703 /* Save src and dst ip */
706 ih4 = vlib_buffer_get_current (b0);
707 ASSERT ((ih4->ip_version_and_header_length & 0xF0) == 0x40);
708 src_ip40.as_u32 = ih4->src_address.as_u32;
709 dst_ip40.as_u32 = ih4->dst_address.as_u32;
713 ih6 = vlib_buffer_get_current (b0);
714 ASSERT ((ih6->ip_version_traffic_class_and_flow_label & 0xF0) == 0x60);
715 clib_memcpy_fast (&src_ip60, &ih6->src_address, sizeof (ip6_address_t));
716 clib_memcpy_fast (&dst_ip60, &ih6->dst_address, sizeof (ip6_address_t));
719 src_port = th0->src_port;
720 dst_port = th0->dst_port;
722 /* Try to determine what/why we're actually resetting */
723 if (state == TCP_STATE_CLOSED)
728 tmp = clib_net_to_host_u32 (th0->seq_number);
730 /* Got a SYN for no listener. */
731 flags = TCP_FLAG_RST | TCP_FLAG_ACK;
732 ack = clib_host_to_net_u32 (tmp + 1);
737 flags = TCP_FLAG_RST;
738 seq = th0->ack_number;
742 tcp_reuse_buffer (vm, b0);
743 tcp_trajectory_add_start (b0, 4);
744 th0 = vlib_buffer_push_tcp_net_order (b0, dst_port, src_port, seq, ack,
745 sizeof (tcp_header_t), flags, 0);
749 ih4 = vlib_buffer_push_ip4 (vm, b0, &dst_ip40, &src_ip40,
751 th0->checksum = ip4_tcp_udp_compute_checksum (vm, b0, ih4);
756 ih6 = vlib_buffer_push_ip6 (vm, b0, &dst_ip60, &src_ip60,
758 th0->checksum = ip6_tcp_udp_icmp_compute_checksum (vm, b0, ih6, &bogus);
765 #ifndef CLIB_MARCH_VARIANT
767 * Send reset without reusing existing buffer
769 * It extracts connection info out of original packet
772 tcp_send_reset_w_pkt (tcp_connection_t * tc, vlib_buffer_t * pkt,
773 u32 thread_index, u8 is_ip4)
775 tcp_worker_ctx_t *wrk = tcp_get_worker (thread_index);
776 vlib_main_t *vm = wrk->vm;
778 u32 bi, sw_if_index, fib_index;
779 u8 tcp_hdr_len, flags = 0;
780 tcp_header_t *th, *pkt_th;
782 ip4_header_t *ih4, *pkt_ih4;
783 ip6_header_t *ih6, *pkt_ih6;
784 fib_protocol_t fib_proto;
786 if (PREDICT_FALSE (!vlib_buffer_alloc (vm, &bi, 1)))
789 b = vlib_get_buffer (vm, bi);
790 sw_if_index = vnet_buffer (pkt)->sw_if_index[VLIB_RX];
791 fib_proto = is_ip4 ? FIB_PROTOCOL_IP4 : FIB_PROTOCOL_IP6;
792 fib_index = fib_table_get_index_for_sw_if_index (fib_proto, sw_if_index);
793 tcp_init_buffer (vm, b);
795 /* Make and write options */
796 tcp_hdr_len = sizeof (tcp_header_t);
800 pkt_ih4 = vlib_buffer_get_current (pkt);
801 pkt_th = ip4_next_header (pkt_ih4);
805 pkt_ih6 = vlib_buffer_get_current (pkt);
806 pkt_th = ip6_next_header (pkt_ih6);
809 if (tcp_ack (pkt_th))
811 flags = TCP_FLAG_RST;
812 seq = pkt_th->ack_number;
813 ack = (tc->state >= TCP_STATE_SYN_RCVD) ? tc->rcv_nxt : 0;
817 flags = TCP_FLAG_RST | TCP_FLAG_ACK;
819 ack = clib_host_to_net_u32 (vnet_buffer (pkt)->tcp.seq_end);
822 th = vlib_buffer_push_tcp_net_order (b, pkt_th->dst_port, pkt_th->src_port,
823 seq, ack, tcp_hdr_len, flags, 0);
825 /* Swap src and dst ip */
828 ASSERT ((pkt_ih4->ip_version_and_header_length & 0xF0) == 0x40);
829 ih4 = vlib_buffer_push_ip4 (vm, b, &pkt_ih4->dst_address,
830 &pkt_ih4->src_address, IP_PROTOCOL_TCP, 1);
831 th->checksum = ip4_tcp_udp_compute_checksum (vm, b, ih4);
836 ASSERT ((pkt_ih6->ip_version_traffic_class_and_flow_label & 0xF0) ==
838 ih6 = vlib_buffer_push_ip6 (vm, b, &pkt_ih6->dst_address,
839 &pkt_ih6->src_address, IP_PROTOCOL_TCP);
840 th->checksum = ip6_tcp_udp_icmp_compute_checksum (vm, b, ih6, &bogus);
844 tcp_enqueue_to_ip_lookup_now (wrk, b, bi, is_ip4, fib_index);
845 TCP_EVT_DBG (TCP_EVT_RST_SENT, tc);
849 * Build and set reset packet for connection
852 tcp_send_reset (tcp_connection_t * tc)
854 tcp_worker_ctx_t *wrk = tcp_get_worker (tc->c_thread_index);
855 vlib_main_t *vm = wrk->vm;
859 u16 tcp_hdr_opts_len, advertise_wnd, opts_write_len;
862 if (PREDICT_FALSE (!vlib_buffer_alloc (vm, &bi, 1)))
864 b = vlib_get_buffer (vm, bi);
865 tcp_init_buffer (vm, b);
867 tc->snd_opts_len = tcp_make_options (tc, &tc->snd_opts, tc->state);
868 tcp_hdr_opts_len = tc->snd_opts_len + sizeof (tcp_header_t);
869 advertise_wnd = tcp_window_to_advertise (tc, TCP_STATE_ESTABLISHED);
870 flags = TCP_FLAG_RST;
871 th = vlib_buffer_push_tcp (b, tc->c_lcl_port, tc->c_rmt_port, tc->snd_nxt,
872 tc->rcv_nxt, tcp_hdr_opts_len, flags,
874 opts_write_len = tcp_options_write ((u8 *) (th + 1), &tc->snd_opts);
875 ASSERT (opts_write_len == tc->snd_opts_len);
876 vnet_buffer (b)->tcp.connection_index = tc->c_c_index;
880 ih4 = vlib_buffer_push_ip4 (vm, b, &tc->c_lcl_ip.ip4,
881 &tc->c_rmt_ip.ip4, IP_PROTOCOL_TCP, 0);
882 th->checksum = ip4_tcp_udp_compute_checksum (vm, b, ih4);
888 ih6 = vlib_buffer_push_ip6 (vm, b, &tc->c_lcl_ip.ip6,
889 &tc->c_rmt_ip.ip6, IP_PROTOCOL_TCP);
890 th->checksum = ip6_tcp_udp_icmp_compute_checksum (vm, b, ih6, &bogus);
893 tcp_enqueue_to_ip_lookup_now (wrk, b, bi, tc->c_is_ip4, tc->c_fib_index);
894 TCP_EVT_DBG (TCP_EVT_RST_SENT, tc);
898 tcp_push_ip_hdr (tcp_worker_ctx_t * wrk, tcp_connection_t * tc,
901 tcp_header_t *th = vlib_buffer_get_current (b);
902 vlib_main_t *vm = wrk->vm;
906 ih = vlib_buffer_push_ip4 (vm, b, &tc->c_lcl_ip4,
907 &tc->c_rmt_ip4, IP_PROTOCOL_TCP, 1);
908 th->checksum = ip4_tcp_udp_compute_checksum (vm, b, ih);
915 ih = vlib_buffer_push_ip6 (vm, b, &tc->c_lcl_ip6,
916 &tc->c_rmt_ip6, IP_PROTOCOL_TCP);
917 th->checksum = ip6_tcp_udp_icmp_compute_checksum (vm, b, ih, &bogus);
925 * Builds a SYN packet for a half-open connection and sends it to ipx_lookup.
926 * The packet is not forwarded through tcpx_output to avoid doing lookups
927 * in the half_open pool.
930 tcp_send_syn (tcp_connection_t * tc)
932 tcp_worker_ctx_t *wrk = tcp_get_worker (tc->c_thread_index);
933 vlib_main_t *vm = wrk->vm;
938 * Setup retransmit and establish timers before requesting buffer
939 * such that we can return if we've ran out.
941 tcp_timer_set (tc, TCP_TIMER_ESTABLISH_AO, TCP_ESTABLISH_TIME);
942 tcp_timer_update (tc, TCP_TIMER_RETRANSMIT_SYN,
943 tc->rto * TCP_TO_TIMER_TICK);
945 if (PREDICT_FALSE (!vlib_buffer_alloc (vm, &bi, 1)))
947 tcp_timer_update (tc, TCP_TIMER_RETRANSMIT_SYN, 1);
951 b = vlib_get_buffer (vm, bi);
952 tcp_init_buffer (vm, b);
953 tcp_make_syn (tc, b);
955 /* Measure RTT with this */
956 tc->rtt_ts = tcp_time_now_us (vlib_num_workers ()? 1 : 0);
957 tc->rtt_seq = tc->snd_nxt;
960 tcp_push_ip_hdr (wrk, tc, b);
961 tcp_enqueue_to_ip_lookup (wrk, b, bi, tc->c_is_ip4, tc->c_fib_index);
962 TCP_EVT_DBG (TCP_EVT_SYN_SENT, tc);
966 tcp_send_synack (tcp_connection_t * tc)
968 tcp_worker_ctx_t *wrk = tcp_get_worker (tc->c_thread_index);
969 vlib_main_t *vm = wrk->vm;
973 tcp_retransmit_timer_force_update (tc);
975 if (PREDICT_FALSE (!vlib_buffer_alloc (vm, &bi, 1)))
977 tcp_timer_update (tc, TCP_TIMER_RETRANSMIT, 1);
981 tc->rtt_ts = tcp_time_now_us (tc->c_thread_index);
982 b = vlib_get_buffer (vm, bi);
983 tcp_init_buffer (vm, b);
984 tcp_make_synack (tc, b);
985 tcp_enqueue_to_output (wrk, b, bi, tc->c_is_ip4);
986 TCP_EVT_DBG (TCP_EVT_SYNACK_SENT, tc);
990 * Flush tx frame populated by retransmits and timer pops
993 tcp_flush_frame_to_output (tcp_worker_ctx_t * wrk, u8 is_ip4)
995 if (wrk->tx_frames[!is_ip4])
998 next_index = is_ip4 ? tcp4_output_node.index : tcp6_output_node.index;
999 vlib_put_frame_to_node (wrk->vm, next_index, wrk->tx_frames[!is_ip4]);
1000 wrk->tx_frames[!is_ip4] = 0;
1005 * Flush ip lookup tx frames populated by timer pops
1008 tcp_flush_frame_to_ip_lookup (tcp_worker_ctx_t * wrk, u8 is_ip4)
1010 if (wrk->ip_lookup_tx_frames[!is_ip4])
1013 next_index = is_ip4 ? ip4_lookup_node.index : ip6_lookup_node.index;
1014 vlib_put_frame_to_node (wrk->vm, next_index,
1015 wrk->ip_lookup_tx_frames[!is_ip4]);
1016 wrk->ip_lookup_tx_frames[!is_ip4] = 0;
1021 * Flush v4 and v6 tcp and ip-lookup tx frames for thread index
1024 tcp_flush_frames_to_output (tcp_worker_ctx_t * wrk)
1026 tcp_flush_frame_to_output (wrk, 1);
1027 tcp_flush_frame_to_output (wrk, 0);
1028 tcp_flush_frame_to_ip_lookup (wrk, 1);
1029 tcp_flush_frame_to_ip_lookup (wrk, 0);
1036 tcp_send_fin (tcp_connection_t * tc)
1038 tcp_worker_ctx_t *wrk = tcp_get_worker (tc->c_thread_index);
1039 vlib_main_t *vm = wrk->vm;
1044 fin_snt = tc->flags & TCP_CONN_FINSNT;
1048 if (PREDICT_FALSE (!vlib_buffer_alloc (vm, &bi, 1)))
1050 /* Out of buffers so program fin retransmit ASAP */
1051 tcp_timer_update (tc, TCP_TIMER_RETRANSMIT, 1);
1055 /* Make sure retransmit retries a fin not data */
1056 tc->flags |= TCP_CONN_FINSNT;
1060 tcp_retransmit_timer_force_update (tc);
1061 b = vlib_get_buffer (vm, bi);
1062 tcp_init_buffer (vm, b);
1063 tcp_make_fin (tc, b);
1064 tcp_enqueue_to_output_now (wrk, b, bi, tc->c_is_ip4);
1065 TCP_EVT_DBG (TCP_EVT_FIN_SENT, tc);
1066 /* Account for the FIN */
1070 tc->flags |= TCP_CONN_FINSNT;
1071 tc->flags &= ~TCP_CONN_FINPNDG;
1072 tc->snd_una_max = seq_max (tc->snd_una_max, tc->snd_nxt);
1077 * Push TCP header and update connection variables. Should only be called
1078 * for segments with data, not for 'control' packets.
1081 tcp_push_hdr_i (tcp_connection_t * tc, vlib_buffer_t * b, u32 snd_nxt,
1082 u8 compute_opts, u8 maybe_burst, u8 update_snd_nxt)
1084 u8 tcp_hdr_opts_len, flags = TCP_FLAG_ACK;
1085 u32 advertise_wnd, data_len;
1086 tcp_main_t *tm = &tcp_main;
1089 data_len = b->current_length;
1090 if (PREDICT_FALSE (b->flags & VLIB_BUFFER_NEXT_PRESENT))
1091 data_len += b->total_length_not_including_first_buffer;
1093 vnet_buffer (b)->tcp.flags = 0;
1094 vnet_buffer (b)->tcp.connection_index = tc->c_c_index;
1097 tc->snd_opts_len = tcp_make_options (tc, &tc->snd_opts, tc->state);
1099 tcp_hdr_opts_len = tc->snd_opts_len + sizeof (tcp_header_t);
1102 advertise_wnd = tc->rcv_wnd >> tc->rcv_wscale;
1104 advertise_wnd = tcp_window_to_advertise (tc, TCP_STATE_ESTABLISHED);
1106 if (PREDICT_FALSE (tc->flags & TCP_CONN_PSH_PENDING))
1108 if (seq_geq (tc->psh_seq, snd_nxt)
1109 && seq_lt (tc->psh_seq, snd_nxt + data_len))
1110 flags |= TCP_FLAG_PSH;
1112 th = vlib_buffer_push_tcp (b, tc->c_lcl_port, tc->c_rmt_port, snd_nxt,
1113 tc->rcv_nxt, tcp_hdr_opts_len, flags,
1118 clib_memcpy_fast ((u8 *) (th + 1),
1119 tm->wrk_ctx[tc->c_thread_index].cached_opts,
1124 u8 len = tcp_options_write ((u8 *) (th + 1), &tc->snd_opts);
1125 ASSERT (len == tc->snd_opts_len);
1129 * Update connection variables
1133 tc->snd_nxt += data_len;
1134 tc->rcv_las = tc->rcv_nxt;
1136 TCP_EVT_DBG (TCP_EVT_PKTIZE, tc);
1140 tcp_session_push_header (transport_connection_t * tconn, vlib_buffer_t * b)
1142 tcp_connection_t *tc = (tcp_connection_t *) tconn;
1144 if (tc->flags & TCP_CONN_TRACK_BURST)
1146 tcp_bt_check_app_limited (tc);
1147 tcp_bt_track_tx (tc);
1148 tc->flags &= ~TCP_CONN_TRACK_BURST;
1151 tcp_push_hdr_i (tc, b, tc->snd_nxt, /* compute opts */ 0, /* burst */ 1,
1152 /* update_snd_nxt */ 1);
1154 tc->snd_una_max = seq_max (tc->snd_nxt, tc->snd_una_max);
1155 tcp_validate_txf_size (tc, tc->snd_una_max - tc->snd_una);
1156 /* If not tracking an ACK, start tracking */
1157 if (tc->rtt_ts == 0 && !tcp_in_cong_recovery (tc))
1159 tc->rtt_ts = tcp_time_now_us (tc->c_thread_index);
1160 tc->rtt_seq = tc->snd_nxt;
1162 if (PREDICT_FALSE (!tcp_timer_is_active (tc, TCP_TIMER_RETRANSMIT)))
1164 tcp_retransmit_timer_set (tc);
1167 tcp_trajectory_add_start (b, 3);
1172 tcp_send_ack (tcp_connection_t * tc)
1174 tcp_worker_ctx_t *wrk = tcp_get_worker (tc->c_thread_index);
1175 vlib_main_t *vm = wrk->vm;
1179 if (PREDICT_FALSE (!vlib_buffer_alloc (vm, &bi, 1)))
1181 tcp_update_rcv_wnd (tc);
1184 b = vlib_get_buffer (vm, bi);
1185 tcp_init_buffer (vm, b);
1186 tcp_make_ack (tc, b);
1187 tcp_enqueue_to_output (wrk, b, bi, tc->c_is_ip4);
1191 tcp_program_ack (tcp_connection_t * tc)
1193 if (!(tc->flags & TCP_CONN_SNDACK))
1195 session_add_self_custom_tx_evt (&tc->connection, 1);
1196 tc->flags |= TCP_CONN_SNDACK;
1201 tcp_program_dupack (tcp_connection_t * tc)
1203 if (!(tc->flags & TCP_CONN_SNDACK))
1205 session_add_self_custom_tx_evt (&tc->connection, 1);
1206 tc->flags |= TCP_CONN_SNDACK;
1208 if (tc->pending_dupacks < 255)
1209 tc->pending_dupacks += 1;
1213 tcp_program_fastretransmit (tcp_connection_t * tc)
1215 if (!(tc->flags & TCP_CONN_FRXT_PENDING))
1217 session_add_self_custom_tx_evt (&tc->connection, 0);
1218 tc->flags |= TCP_CONN_FRXT_PENDING;
1223 * Delayed ack timer handler
1225 * Sends delayed ACK when timer expires
1228 tcp_timer_delack_handler (u32 index)
1230 u32 thread_index = vlib_get_thread_index ();
1231 tcp_connection_t *tc;
1233 tc = tcp_connection_get (index, thread_index);
1234 tc->timers[TCP_TIMER_DELACK] = TCP_TIMER_HANDLE_INVALID;
1239 * Send Window Update ACK,
1240 * ensuring that it will be sent once, if RWND became non-zero,
1241 * after zero RWND has been advertised in ACK before
1244 tcp_send_window_update_ack (tcp_connection_t * tc)
1248 if (tcp_zero_rwnd_sent (tc))
1250 win = tcp_window_to_advertise (tc, tc->state);
1253 tcp_zero_rwnd_sent_off (tc);
1254 tcp_program_ack (tc);
1260 * Allocate a new buffer and build a new tcp segment
1262 * @param wrk tcp worker
1263 * @param tc connection for which the segment will be allocated
1264 * @param offset offset of the first byte in the tx fifo
1265 * @param max_deq_byte segment size
1266 * @param[out] b pointer to buffer allocated
1268 * @return the number of bytes in the segment or 0 if buffer cannot be
1269 * allocated or no data available
1272 tcp_prepare_segment (tcp_worker_ctx_t * wrk, tcp_connection_t * tc,
1273 u32 offset, u32 max_deq_bytes, vlib_buffer_t ** b)
1275 u32 bytes_per_buffer = vnet_get_tcp_main ()->bytes_per_buffer;
1276 vlib_main_t *vm = wrk->vm;
1281 seg_size = max_deq_bytes + TRANSPORT_MAX_HDRS_LEN;
1286 tc->snd_opts_len = tcp_make_options (tc, &tc->snd_opts, tc->state);
1289 * Allocate and fill in buffer(s)
1292 /* Easy case, buffer size greater than mss */
1293 if (PREDICT_TRUE (seg_size <= bytes_per_buffer))
1295 if (PREDICT_FALSE (!vlib_buffer_alloc (vm, &bi, 1)))
1297 *b = vlib_get_buffer (vm, bi);
1298 data = tcp_init_buffer (vm, *b);
1299 n_bytes = session_tx_fifo_peek_bytes (&tc->connection, data, offset,
1301 ASSERT (n_bytes == max_deq_bytes);
1302 b[0]->current_length = n_bytes;
1303 tcp_push_hdr_i (tc, *b, tc->snd_una + offset, /* compute opts */ 0,
1304 /* burst */ 0, /* update_snd_nxt */ 0);
1306 /* Split mss into multiple buffers */
1309 u32 chain_bi = ~0, n_bufs_per_seg, n_bufs;
1310 u16 n_peeked, len_to_deq;
1311 vlib_buffer_t *chain_b, *prev_b;
1314 /* Make sure we have enough buffers */
1315 n_bufs_per_seg = ceil ((double) seg_size / bytes_per_buffer);
1316 vec_validate_aligned (wrk->tx_buffers, n_bufs_per_seg - 1,
1317 CLIB_CACHE_LINE_BYTES);
1318 n_bufs = vlib_buffer_alloc (vm, wrk->tx_buffers, n_bufs_per_seg);
1319 if (PREDICT_FALSE (n_bufs != n_bufs_per_seg))
1322 vlib_buffer_free (vm, wrk->tx_buffers, n_bufs);
1326 *b = vlib_get_buffer (vm, wrk->tx_buffers[--n_bufs]);
1327 data = tcp_init_buffer (vm, *b);
1328 n_bytes = session_tx_fifo_peek_bytes (&tc->connection, data, offset,
1330 TRANSPORT_MAX_HDRS_LEN);
1331 b[0]->current_length = n_bytes;
1332 b[0]->flags |= VLIB_BUFFER_TOTAL_LENGTH_VALID;
1333 b[0]->total_length_not_including_first_buffer = 0;
1334 max_deq_bytes -= n_bytes;
1337 for (i = 1; i < n_bufs_per_seg; i++)
1340 len_to_deq = clib_min (max_deq_bytes, bytes_per_buffer);
1341 chain_bi = wrk->tx_buffers[--n_bufs];
1342 chain_b = vlib_get_buffer (vm, chain_bi);
1343 chain_b->current_data = 0;
1344 data = vlib_buffer_get_current (chain_b);
1345 n_peeked = session_tx_fifo_peek_bytes (&tc->connection, data,
1348 ASSERT (n_peeked == len_to_deq);
1349 n_bytes += n_peeked;
1350 chain_b->current_length = n_peeked;
1351 chain_b->next_buffer = 0;
1353 /* update previous buffer */
1354 prev_b->next_buffer = chain_bi;
1355 prev_b->flags |= VLIB_BUFFER_NEXT_PRESENT;
1357 max_deq_bytes -= n_peeked;
1358 b[0]->total_length_not_including_first_buffer += n_peeked;
1361 tcp_push_hdr_i (tc, *b, tc->snd_una + offset, /* compute opts */ 0,
1362 /* burst */ 0, /* update_snd_nxt */ 0);
1364 if (PREDICT_FALSE (n_bufs))
1366 clib_warning ("not all buffers consumed");
1367 vlib_buffer_free (vm, wrk->tx_buffers, n_bufs);
1371 ASSERT (n_bytes > 0);
1372 ASSERT (((*b)->current_data + (*b)->current_length) <= bytes_per_buffer);
1378 * Build a retransmit segment
1380 * @return the number of bytes in the segment or 0 if there's nothing to
1384 tcp_prepare_retransmit_segment (tcp_worker_ctx_t * wrk,
1385 tcp_connection_t * tc, u32 offset,
1386 u32 max_deq_bytes, vlib_buffer_t ** b)
1388 u32 start, available_bytes;
1391 ASSERT (tc->state >= TCP_STATE_ESTABLISHED);
1392 ASSERT (max_deq_bytes != 0);
1395 * Make sure we can retransmit something
1397 available_bytes = transport_max_tx_dequeue (&tc->connection);
1398 ASSERT (available_bytes >= offset);
1399 available_bytes -= offset;
1400 if (!available_bytes)
1403 max_deq_bytes = clib_min (tc->snd_mss, max_deq_bytes);
1404 max_deq_bytes = clib_min (available_bytes, max_deq_bytes);
1406 /* Start is beyond snd_congestion */
1407 start = tc->snd_una + offset;
1408 if (seq_geq (start, tc->snd_congestion))
1411 /* Don't overshoot snd_congestion */
1412 if (seq_gt (start + max_deq_bytes, tc->snd_congestion))
1414 max_deq_bytes = tc->snd_congestion - start;
1415 if (max_deq_bytes == 0)
1419 n_bytes = tcp_prepare_segment (wrk, tc, offset, max_deq_bytes, b);
1423 if (tcp_in_fastrecovery (tc))
1425 tc->snd_rxt_bytes += n_bytes;
1426 if (tc->flags & TCP_CONN_RATE_SAMPLE)
1427 tcp_bt_track_rxt (tc, start, start + n_bytes);
1431 TCP_EVT_DBG (TCP_EVT_CC_RTX, tc, offset, n_bytes);
1436 * Reset congestion control, switch cwnd to loss window and try again.
1439 tcp_cc_init_rxt_timeout (tcp_connection_t * tc)
1441 TCP_EVT_DBG (TCP_EVT_CC_EVT, tc, 6);
1442 tc->prev_ssthresh = tc->ssthresh;
1443 tc->prev_cwnd = tc->cwnd;
1445 /* Clear fast recovery state if needed */
1446 if (tcp_in_fastrecovery (tc))
1447 tcp_cc_fastrecovery_clear (tc);
1449 /* Let cc algo decide loss cwnd and ssthresh */
1452 /* Start again from the beginning */
1453 tc->snd_congestion = tc->snd_nxt;
1454 tc->rcv_dupacks = 0;
1456 tc->cwnd_acc_bytes = 0;
1457 tcp_connection_tx_pacer_reset (tc, tc->cwnd, 2 * tc->snd_mss);
1458 tcp_recovery_on (tc);
1462 tcp_timer_retransmit_handler_i (u32 index, u8 is_syn)
1464 u32 thread_index = vlib_get_thread_index ();
1465 tcp_worker_ctx_t *wrk = tcp_get_worker (thread_index);
1466 vlib_main_t *vm = wrk->vm;
1467 tcp_connection_t *tc;
1468 vlib_buffer_t *b = 0;
1473 tc = tcp_half_open_connection_get (index);
1474 /* Note: the connection may have transitioned to ESTABLISHED... */
1475 if (PREDICT_FALSE (tc == 0 || tc->state != TCP_STATE_SYN_SENT))
1477 tc->timers[TCP_TIMER_RETRANSMIT_SYN] = TCP_TIMER_HANDLE_INVALID;
1481 tc = tcp_connection_get (index, thread_index);
1482 /* Note: the connection may have been closed and pool_put */
1483 if (PREDICT_FALSE (tc == 0 || tc->state == TCP_STATE_SYN_SENT))
1485 tc->timers[TCP_TIMER_RETRANSMIT] = TCP_TIMER_HANDLE_INVALID;
1486 /* Wait-close and retransmit could pop at the same time */
1487 if (tc->state == TCP_STATE_CLOSED)
1491 if (tc->state >= TCP_STATE_ESTABLISHED)
1493 TCP_EVT_DBG (TCP_EVT_CC_EVT, tc, 2);
1495 /* Lost FIN, retransmit and return */
1496 if (tc->flags & TCP_CONN_FINSNT)
1500 tc->rto = clib_min (tc->rto << 1, TCP_RTO_MAX);
1504 /* Shouldn't be here. This condition is tricky because it has to take
1505 * into account boff > 0 due to persist timeout. */
1506 if ((tc->rto_boff == 0 && tc->snd_una == tc->snd_nxt)
1507 || (tc->rto_boff > 0 && seq_geq (tc->snd_una, tc->snd_congestion)
1508 && !tcp_flight_size (tc)))
1510 ASSERT (!tcp_in_recovery (tc));
1515 /* We're not in recovery so make sure rto_boff is 0. Can be non 0 due
1516 * to persist timer timeout */
1517 if (!tcp_in_recovery (tc) && tc->rto_boff > 0)
1520 tcp_update_rto (tc);
1523 /* Peer is dead or network connectivity is lost. Close connection.
1524 * RFC 1122 section 4.2.3.5 recommends a value of at least 100s. For
1525 * a min rto of 0.2s we need to retry about 8 times. */
1526 if (tc->rto_boff >= TCP_RTO_BOFF_MAX)
1528 tcp_send_reset (tc);
1529 tcp_connection_set_state (tc, TCP_STATE_CLOSED);
1530 session_transport_closing_notify (&tc->connection);
1531 tcp_connection_timers_reset (tc);
1532 tcp_timer_update (tc, TCP_TIMER_WAITCLOSE, TCP_CLOSEWAIT_TIME);
1536 /* Increment RTO backoff (also equal to number of retries) and go back
1537 * to first un-acked byte */
1540 /* TODO be less aggressive about clearing scoreboard */
1541 scoreboard_clear (&tc->sack_sb);
1543 /* First retransmit timeout */
1544 if (tc->rto_boff == 1)
1545 tcp_cc_init_rxt_timeout (tc);
1547 if (tc->flags & TCP_CONN_RATE_SAMPLE)
1548 tcp_bt_flush_samples (tc);
1550 /* If we've sent beyond snd_congestion, update it */
1551 tc->snd_congestion = seq_max (tc->snd_nxt, tc->snd_congestion);
1553 tc->snd_nxt = tc->snd_una;
1554 tc->rto = clib_min (tc->rto << 1, TCP_RTO_MAX);
1556 /* Send one segment. Note that n_bytes may be zero due to buffer
1558 n_bytes = tcp_prepare_retransmit_segment (wrk, tc, 0, tc->snd_mss, &b);
1561 tcp_timer_update (tc, TCP_TIMER_RETRANSMIT, 1);
1565 bi = vlib_get_buffer_index (vm, b);
1567 /* For first retransmit, record timestamp (Eifel detection RFC3522) */
1568 if (tc->rto_boff == 1)
1569 tc->snd_rxt_ts = tcp_tstamp (tc);
1571 tcp_enqueue_to_output (wrk, b, bi, tc->c_is_ip4);
1572 tcp_retransmit_timer_force_update (tc);
1574 /* Retransmit for SYN */
1575 else if (tc->state == TCP_STATE_SYN_SENT)
1577 /* Half-open connection actually moved to established but we were
1578 * waiting for syn retransmit to pop to call cleanup from the right
1580 if (tc->flags & TCP_CONN_HALF_OPEN_DONE)
1582 if (tcp_half_open_connection_cleanup (tc))
1583 TCP_DBG ("could not remove half-open connection");
1587 TCP_EVT_DBG (TCP_EVT_CC_EVT, tc, 2);
1589 /* Try without increasing RTO a number of times. If this fails,
1590 * start growing RTO exponentially */
1592 if (tc->rto_boff > TCP_RTO_SYN_RETRIES)
1593 tc->rto = clib_min (tc->rto << 1, TCP_RTO_MAX);
1595 tcp_timer_update (tc, TCP_TIMER_RETRANSMIT_SYN,
1596 tc->rto * TCP_TO_TIMER_TICK);
1598 if (PREDICT_FALSE (!vlib_buffer_alloc (vm, &bi, 1)))
1600 tcp_timer_update (tc, TCP_TIMER_RETRANSMIT_SYN, 1);
1604 b = vlib_get_buffer (vm, bi);
1605 tcp_init_buffer (vm, b);
1606 tcp_make_syn (tc, b);
1609 TCP_EVT_DBG (TCP_EVT_SYN_RXT, tc, 0);
1611 /* This goes straight to ipx_lookup. Retransmit timer set already */
1612 tcp_push_ip_hdr (wrk, tc, b);
1613 tcp_enqueue_to_ip_lookup (wrk, b, bi, tc->c_is_ip4, tc->c_fib_index);
1615 /* Retransmit SYN-ACK */
1616 else if (tc->state == TCP_STATE_SYN_RCVD)
1618 TCP_EVT_DBG (TCP_EVT_CC_EVT, tc, 2);
1621 if (tc->rto_boff > TCP_RTO_SYN_RETRIES)
1622 tc->rto = clib_min (tc->rto << 1, TCP_RTO_MAX);
1625 tcp_retransmit_timer_force_update (tc);
1627 if (PREDICT_FALSE (!vlib_buffer_alloc (vm, &bi, 1)))
1629 tcp_timer_update (tc, TCP_TIMER_RETRANSMIT, 1);
1633 b = vlib_get_buffer (vm, bi);
1634 tcp_init_buffer (vm, b);
1635 tcp_make_synack (tc, b);
1636 TCP_EVT_DBG (TCP_EVT_SYN_RXT, tc, 1);
1638 /* Retransmit timer already updated, just enqueue to output */
1639 tcp_enqueue_to_output (wrk, b, bi, tc->c_is_ip4);
1643 ASSERT (tc->state == TCP_STATE_CLOSED);
1649 tcp_timer_retransmit_handler (u32 index)
1651 tcp_timer_retransmit_handler_i (index, 0);
1655 tcp_timer_retransmit_syn_handler (u32 index)
1657 tcp_timer_retransmit_handler_i (index, 1);
1661 * Got 0 snd_wnd from peer, try to do something about it.
1665 tcp_timer_persist_handler (u32 index)
1667 u32 thread_index = vlib_get_thread_index ();
1668 tcp_worker_ctx_t *wrk = tcp_get_worker (thread_index);
1669 u32 bi, max_snd_bytes, available_bytes, offset;
1670 tcp_main_t *tm = vnet_get_tcp_main ();
1671 vlib_main_t *vm = wrk->vm;
1672 tcp_connection_t *tc;
1677 tc = tcp_connection_get_if_valid (index, thread_index);
1681 /* Make sure timer handle is set to invalid */
1682 tc->timers[TCP_TIMER_PERSIST] = TCP_TIMER_HANDLE_INVALID;
1684 /* Problem already solved or worse */
1685 if (tc->state == TCP_STATE_CLOSED || tc->snd_wnd > tc->snd_mss
1686 || (tc->flags & TCP_CONN_FINSNT))
1689 available_bytes = transport_max_tx_dequeue (&tc->connection);
1690 offset = tc->snd_nxt - tc->snd_una;
1692 /* Reprogram persist if no new bytes available to send. We may have data
1694 if (!available_bytes)
1696 tcp_persist_timer_set (tc);
1700 if (available_bytes <= offset)
1702 ASSERT (tcp_timer_is_active (tc, TCP_TIMER_RETRANSMIT));
1706 /* Increment RTO backoff */
1708 tc->rto = clib_min (tc->rto << 1, TCP_RTO_MAX);
1711 * Try to force the first unsent segment (or buffer)
1713 if (PREDICT_FALSE (!vlib_buffer_alloc (vm, &bi, 1)))
1715 tcp_persist_timer_set (tc);
1718 b = vlib_get_buffer (vm, bi);
1719 data = tcp_init_buffer (vm, b);
1721 tcp_validate_txf_size (tc, offset);
1722 tc->snd_opts_len = tcp_make_options (tc, &tc->snd_opts, tc->state);
1723 max_snd_bytes = clib_min (tc->snd_mss,
1724 tm->bytes_per_buffer - TRANSPORT_MAX_HDRS_LEN);
1725 n_bytes = session_tx_fifo_peek_bytes (&tc->connection, data, offset,
1727 b->current_length = n_bytes;
1728 ASSERT (n_bytes != 0 && (tcp_timer_is_active (tc, TCP_TIMER_RETRANSMIT)
1729 || tc->snd_nxt == tc->snd_una_max
1730 || tc->rto_boff > 1));
1732 tcp_push_hdr_i (tc, b, tc->snd_nxt, /* compute opts */ 0,
1733 /* burst */ 0, /* update_snd_nxt */ 1);
1734 tc->snd_una_max = seq_max (tc->snd_nxt, tc->snd_una_max);
1735 tcp_validate_txf_size (tc, tc->snd_una_max - tc->snd_una);
1736 tcp_enqueue_to_output (wrk, b, bi, tc->c_is_ip4);
1738 /* Just sent new data, enable retransmit */
1739 tcp_retransmit_timer_update (tc);
1743 * Retransmit first unacked segment
1746 tcp_retransmit_first_unacked (tcp_worker_ctx_t * wrk, tcp_connection_t * tc)
1748 vlib_main_t *vm = wrk->vm;
1752 TCP_EVT_DBG (TCP_EVT_CC_EVT, tc, 1);
1754 n_bytes = tcp_prepare_retransmit_segment (wrk, tc, 0, tc->snd_mss, &b);
1758 bi = vlib_get_buffer_index (vm, b);
1759 tcp_enqueue_to_output (wrk, b, bi, tc->c_is_ip4);
1765 tcp_fast_retransmit_unsent (tcp_worker_ctx_t * wrk, tcp_connection_t * tc,
1768 u32 offset, n_segs = 0, n_written, bi;
1769 vlib_main_t *vm = wrk->vm;
1770 vlib_buffer_t *b = 0;
1772 offset = tc->snd_nxt - tc->snd_una;
1773 while (n_segs < burst_size)
1775 n_written = tcp_prepare_segment (wrk, tc, offset, tc->snd_mss, &b);
1779 bi = vlib_get_buffer_index (vm, b);
1780 tcp_enqueue_to_output (wrk, b, bi, tc->c_is_ip4);
1781 offset += n_written;
1784 tc->snd_nxt += n_written;
1785 tc->snd_una_max = seq_max (tc->snd_nxt, tc->snd_una_max);
1792 #define scoreboard_rescue_rxt_valid(_sb, _tc) \
1793 (seq_geq (_sb->rescue_rxt, _tc->snd_una) \
1794 && seq_leq (_sb->rescue_rxt, _tc->snd_congestion))
1797 * Do fast retransmit with SACKs
1800 tcp_fast_retransmit_sack (tcp_worker_ctx_t * wrk, tcp_connection_t * tc,
1803 u32 n_written = 0, offset, max_bytes, n_segs = 0, n_segs_now;
1804 sack_scoreboard_hole_t *hole;
1805 vlib_main_t *vm = wrk->vm;
1806 vlib_buffer_t *b = 0;
1807 sack_scoreboard_t *sb;
1810 u8 snd_limited = 0, can_rescue = 0;
1812 ASSERT (tcp_in_fastrecovery (tc));
1814 snd_space = tcp_available_cc_snd_space (tc);
1815 if (snd_space < tc->snd_mss)
1817 tcp_program_fastretransmit (tc);
1821 TCP_EVT_DBG (TCP_EVT_CC_EVT, tc, 0);
1823 hole = scoreboard_get_hole (sb, sb->cur_rxt_hole);
1825 max_deq = transport_max_tx_dequeue (&tc->connection);
1826 max_deq -= tc->snd_nxt - tc->snd_una;
1828 while (snd_space > 0 && n_segs < burst_size)
1830 hole = scoreboard_next_rxt_hole (sb, hole, max_deq, &can_rescue,
1836 snd_space = clib_min (max_deq, snd_space);
1837 burst_size = clib_min (burst_size - n_segs,
1838 snd_space / tc->snd_mss);
1839 n_segs_now = tcp_fast_retransmit_unsent (wrk, tc, burst_size);
1840 if (max_deq > n_segs_now * tc->snd_mss)
1841 tcp_program_fastretransmit (tc);
1842 n_segs += n_segs_now;
1846 if (!can_rescue || scoreboard_rescue_rxt_valid (sb, tc))
1849 /* If rescue rxt undefined or less than snd_una then one segment of
1850 * up to SMSS octets that MUST include the highest outstanding
1851 * unSACKed sequence number SHOULD be returned, and RescueRxt set to
1852 * RecoveryPoint. HighRxt MUST NOT be updated.
1854 max_bytes = clib_min (tc->snd_mss,
1855 tc->snd_congestion - tc->snd_una);
1856 max_bytes = clib_min (max_bytes, snd_space);
1857 offset = tc->snd_congestion - tc->snd_una - max_bytes;
1858 sb->rescue_rxt = tc->snd_congestion;
1859 n_written = tcp_prepare_retransmit_segment (wrk, tc, offset,
1864 bi = vlib_get_buffer_index (vm, b);
1865 tcp_enqueue_to_output (wrk, b, bi, tc->c_is_ip4);
1870 max_bytes = clib_min (hole->end - sb->high_rxt, snd_space);
1871 max_bytes = snd_limited ? clib_min (max_bytes, tc->snd_mss) : max_bytes;
1875 offset = sb->high_rxt - tc->snd_una;
1876 n_written = tcp_prepare_retransmit_segment (wrk, tc, offset, max_bytes,
1878 ASSERT (n_written <= snd_space);
1880 /* Nothing left to retransmit */
1884 bi = vlib_get_buffer_index (vm, b);
1885 tcp_enqueue_to_output (wrk, b, bi, tc->c_is_ip4);
1887 sb->high_rxt += n_written;
1888 snd_space -= n_written;
1893 tcp_program_fastretransmit (tc);
1900 * Fast retransmit without SACK info
1903 tcp_fast_retransmit_no_sack (tcp_worker_ctx_t * wrk, tcp_connection_t * tc,
1906 u32 n_written = 0, offset = 0, bi, max_deq, n_segs_now;
1907 vlib_main_t *vm = wrk->vm;
1908 int snd_space, n_segs = 0;
1911 ASSERT (tcp_in_fastrecovery (tc));
1912 TCP_EVT_DBG (TCP_EVT_CC_EVT, tc, 0);
1914 snd_space = tcp_available_cc_snd_space (tc);
1916 if (!tcp_fastrecovery_first (tc))
1919 /* RFC 6582: [If a partial ack], retransmit the first unacknowledged
1921 while (snd_space > 0 && n_segs < burst_size)
1923 n_written = tcp_prepare_retransmit_segment (wrk, tc, offset,
1926 /* Nothing left to retransmit */
1930 bi = vlib_get_buffer_index (vm, b);
1931 tcp_enqueue_to_output (wrk, b, bi, tc->c_is_ip4);
1932 snd_space -= n_written;
1933 offset += n_written;
1937 if (n_segs == burst_size)
1942 /* RFC 6582: Send a new segment if permitted by the new value of cwnd. */
1943 if (snd_space < tc->snd_mss || tc->snd_mss == 0)
1946 max_deq = transport_max_tx_dequeue (&tc->connection);
1947 max_deq -= tc->snd_nxt - tc->snd_una;
1950 snd_space = clib_min (max_deq, snd_space);
1951 burst_size = clib_min (burst_size - n_segs, snd_space / tc->snd_mss);
1952 n_segs_now = tcp_fast_retransmit_unsent (wrk, tc, burst_size);
1953 if (max_deq > n_segs_now * tc->snd_mss)
1954 tcp_program_fastretransmit (tc);
1955 n_segs += n_segs_now;
1959 tcp_fastrecovery_first_off (tc);
1964 * Do fast retransmit
1967 tcp_fast_retransmit (tcp_worker_ctx_t * wrk, tcp_connection_t * tc,
1970 if (tcp_opts_sack_permitted (&tc->rcv_opts))
1971 return tcp_fast_retransmit_sack (wrk, tc, burst_size);
1973 return tcp_fast_retransmit_no_sack (wrk, tc, burst_size);
1977 tcp_send_acks (tcp_connection_t * tc, u32 max_burst_size)
1981 if (!tc->pending_dupacks)
1987 /* If we're supposed to send dupacks but have no ooo data
1988 * send only one ack */
1989 if (!vec_len (tc->snd_sacks))
1995 /* Start with first sack block */
1996 tc->snd_sack_pos = 0;
1998 /* Generate enough dupacks to cover all sack blocks. Do not generate
1999 * more sacks than the number of packets received. But do generate at
2000 * least 3, i.e., the number needed to signal congestion, if needed. */
2001 n_acks = vec_len (tc->snd_sacks) / TCP_OPTS_MAX_SACK_BLOCKS;
2002 n_acks = clib_min (n_acks, tc->pending_dupacks);
2003 n_acks = clib_max (n_acks, clib_min (tc->pending_dupacks, 3));
2004 for (j = 0; j < clib_min (n_acks, max_burst_size); j++)
2007 if (n_acks < max_burst_size)
2009 tc->pending_dupacks = 0;
2010 tc->snd_sack_pos = 0;
2015 TCP_DBG ("constrained by burst size");
2016 tc->pending_dupacks = n_acks - max_burst_size;
2017 tcp_program_dupack (tc);
2018 return max_burst_size;
2023 tcp_do_fastretransmit (tcp_connection_t * tc, u32 max_burst_size)
2025 u32 n_segs = 0, burst_size, sent_bytes, burst_bytes;
2026 tcp_worker_ctx_t *wrk;
2028 wrk = tcp_get_worker (tc->c_thread_index);
2029 burst_bytes = transport_connection_tx_pacer_burst (&tc->connection,
2031 clib_time.last_cpu_time);
2032 burst_size = clib_min (max_burst_size, burst_bytes / tc->snd_mss);
2035 tcp_program_fastretransmit (tc);
2039 n_segs = tcp_fast_retransmit (wrk, tc, burst_size);
2040 sent_bytes = clib_min (n_segs * tc->snd_mss, burst_bytes);
2041 transport_connection_tx_pacer_update_bytes (&tc->connection, sent_bytes);
2046 tcp_session_custom_tx (void *conn, u32 max_burst_size)
2048 tcp_connection_t *tc = (tcp_connection_t *) conn;
2051 if (tcp_in_fastrecovery (tc) && (tc->flags & TCP_CONN_FRXT_PENDING))
2053 tc->flags &= ~TCP_CONN_FRXT_PENDING;
2054 n_segs = tcp_do_fastretransmit (tc, max_burst_size);
2055 max_burst_size -= n_segs;
2058 if (!(tc->flags & TCP_CONN_SNDACK))
2061 tc->flags &= ~TCP_CONN_SNDACK;
2063 /* We have retransmitted packets and no dupack */
2064 if (n_segs && !tc->pending_dupacks)
2067 if (!max_burst_size)
2069 tcp_program_ack (tc);
2070 return max_burst_size;
2073 n_segs += tcp_send_acks (tc, max_burst_size);
2077 #endif /* CLIB_MARCH_VARIANT */
2080 tcp_output_handle_link_local (tcp_connection_t * tc0, vlib_buffer_t * b0,
2081 u16 * next0, u32 * error0)
2083 ip_adjacency_t *adj;
2086 /* Not thread safe but as long as the connection exists the adj should
2088 ai = adj_nbr_find (FIB_PROTOCOL_IP6, VNET_LINK_IP6, &tc0->c_rmt_ip,
2090 if (ai == ADJ_INDEX_INVALID)
2092 vnet_buffer (b0)->sw_if_index[VLIB_TX] = ~0;
2093 *next0 = TCP_OUTPUT_NEXT_DROP;
2094 *error0 = TCP_ERROR_LINK_LOCAL_RW;
2099 if (PREDICT_TRUE (adj->lookup_next_index == IP_LOOKUP_NEXT_REWRITE))
2100 *next0 = TCP_OUTPUT_NEXT_IP_REWRITE;
2101 else if (adj->lookup_next_index == IP_LOOKUP_NEXT_ARP)
2102 *next0 = TCP_OUTPUT_NEXT_IP_ARP;
2105 *next0 = TCP_OUTPUT_NEXT_DROP;
2106 *error0 = TCP_ERROR_LINK_LOCAL_RW;
2108 vnet_buffer (b0)->ip.adj_index[VLIB_TX] = ai;
2112 tcp46_output_trace_frame (vlib_main_t * vm, vlib_node_runtime_t * node,
2113 u32 * to_next, u32 n_bufs)
2115 u32 n_trace = vlib_get_trace_count (vm, node);
2116 tcp_connection_t *tc;
2122 for (i = 0; i < clib_min (n_trace, n_bufs); i++)
2124 b = vlib_get_buffer (vm, to_next[i]);
2125 th = vlib_buffer_get_current (b);
2126 tc = tcp_connection_get (vnet_buffer (b)->tcp.connection_index,
2128 t = vlib_add_trace (vm, node, b, sizeof (*t));
2129 clib_memcpy_fast (&t->tcp_header, th, sizeof (t->tcp_header));
2130 clib_memcpy_fast (&t->tcp_connection, tc, sizeof (t->tcp_connection));
2135 tcp_output_push_ip (vlib_main_t * vm, vlib_buffer_t * b0,
2136 tcp_connection_t * tc0, u8 is_ip4)
2138 tcp_header_t *th0 = 0;
2140 th0 = vlib_buffer_get_current (b0);
2141 TCP_EVT_DBG (TCP_EVT_OUTPUT, tc0, th0->flags, b0->current_length);
2144 vlib_buffer_push_ip4 (vm, b0, &tc0->c_lcl_ip4, &tc0->c_rmt_ip4,
2145 IP_PROTOCOL_TCP, 1);
2146 b0->flags |= VNET_BUFFER_F_OFFLOAD_TCP_CKSUM;
2147 vnet_buffer (b0)->l4_hdr_offset = (u8 *) th0 - b0->data;
2153 ih0 = vlib_buffer_push_ip6 (vm, b0, &tc0->c_lcl_ip6,
2154 &tc0->c_rmt_ip6, IP_PROTOCOL_TCP);
2155 b0->flags |= VNET_BUFFER_F_OFFLOAD_TCP_CKSUM;
2156 vnet_buffer (b0)->l3_hdr_offset = (u8 *) ih0 - b0->data;
2157 vnet_buffer (b0)->l4_hdr_offset = (u8 *) th0 - b0->data;
2163 tcp_output_handle_packet (tcp_connection_t * tc0, vlib_buffer_t * b0,
2164 u32 * error0, u16 * next0, u8 is_ip4)
2167 if (PREDICT_FALSE (tc0->state == TCP_STATE_CLOSED))
2169 *error0 = TCP_ERROR_INVALID_CONNECTION;
2170 *next0 = TCP_OUTPUT_NEXT_DROP;
2174 /* If next_index is not drop use it */
2175 if (tc0->next_node_index)
2177 *next0 = tc0->next_node_index;
2178 vnet_buffer (b0)->tcp.next_node_opaque = tc0->next_node_opaque;
2181 vnet_buffer (b0)->sw_if_index[VLIB_TX] = tc0->c_fib_index;
2182 vnet_buffer (b0)->sw_if_index[VLIB_RX] = 0;
2186 if (PREDICT_FALSE (ip6_address_is_link_local_unicast (&tc0->c_rmt_ip6)))
2187 tcp_output_handle_link_local (tc0, b0, next0, error0);
2190 if (!TCP_ALWAYS_ACK)
2191 tcp_timer_reset (tc0, TCP_TIMER_DELACK);
2195 tcp46_output_inline (vlib_main_t * vm, vlib_node_runtime_t * node,
2196 vlib_frame_t * frame, int is_ip4)
2198 u32 n_left_from, *from, thread_index = vm->thread_index;
2199 vlib_buffer_t *bufs[VLIB_FRAME_SIZE], **b;
2200 u16 nexts[VLIB_FRAME_SIZE], *next;
2202 from = vlib_frame_vector_args (frame);
2203 n_left_from = frame->n_vectors;
2204 tcp_set_time_now (tcp_get_worker (thread_index));
2206 if (PREDICT_FALSE (node->flags & VLIB_NODE_FLAG_TRACE))
2207 tcp46_output_trace_frame (vm, node, from, n_left_from);
2209 vlib_get_buffers (vm, from, bufs, n_left_from);
2213 while (n_left_from >= 4)
2215 u32 error0 = TCP_ERROR_PKTS_SENT, error1 = TCP_ERROR_PKTS_SENT;
2216 tcp_connection_t *tc0, *tc1;
2219 vlib_prefetch_buffer_header (b[2], STORE);
2220 CLIB_PREFETCH (b[2]->data, 2 * CLIB_CACHE_LINE_BYTES, STORE);
2222 vlib_prefetch_buffer_header (b[3], STORE);
2223 CLIB_PREFETCH (b[3]->data, 2 * CLIB_CACHE_LINE_BYTES, STORE);
2226 next[0] = next[1] = TCP_OUTPUT_NEXT_IP_LOOKUP;
2228 tc0 = tcp_connection_get (vnet_buffer (b[0])->tcp.connection_index,
2230 tc1 = tcp_connection_get (vnet_buffer (b[1])->tcp.connection_index,
2233 tcp_output_push_ip (vm, b[0], tc0, is_ip4);
2234 tcp_output_push_ip (vm, b[1], tc1, is_ip4);
2236 tcp_output_handle_packet (tc0, b[0], &error0, &next[0], is_ip4);
2237 tcp_output_handle_packet (tc1, b[1], &error1, &next[1], is_ip4);
2243 while (n_left_from > 0)
2245 u32 error0 = TCP_ERROR_PKTS_SENT;
2246 tcp_connection_t *tc0;
2248 if (n_left_from > 1)
2250 vlib_prefetch_buffer_header (b[1], STORE);
2251 CLIB_PREFETCH (b[1]->data, 2 * CLIB_CACHE_LINE_BYTES, STORE);
2254 next[0] = TCP_OUTPUT_NEXT_IP_LOOKUP;
2255 tc0 = tcp_connection_get (vnet_buffer (b[0])->tcp.connection_index,
2258 tcp_output_push_ip (vm, b[0], tc0, is_ip4);
2259 tcp_output_handle_packet (tc0, b[0], &error0, &next[0], is_ip4);
2266 vlib_buffer_enqueue_to_next (vm, node, from, nexts, frame->n_vectors);
2267 return frame->n_vectors;
2270 VLIB_NODE_FN (tcp4_output_node) (vlib_main_t * vm, vlib_node_runtime_t * node,
2271 vlib_frame_t * from_frame)
2273 return tcp46_output_inline (vm, node, from_frame, 1 /* is_ip4 */ );
2276 VLIB_NODE_FN (tcp6_output_node) (vlib_main_t * vm, vlib_node_runtime_t * node,
2277 vlib_frame_t * from_frame)
2279 return tcp46_output_inline (vm, node, from_frame, 0 /* is_ip4 */ );
2283 VLIB_REGISTER_NODE (tcp4_output_node) =
2285 .name = "tcp4-output",
2286 /* Takes a vector of packets. */
2287 .vector_size = sizeof (u32),
2288 .n_errors = TCP_N_ERROR,
2289 .protocol_hint = VLIB_NODE_PROTO_HINT_TCP,
2290 .error_strings = tcp_error_strings,
2291 .n_next_nodes = TCP_OUTPUT_N_NEXT,
2293 #define _(s,n) [TCP_OUTPUT_NEXT_##s] = n,
2294 foreach_tcp4_output_next
2297 .format_buffer = format_tcp_header,
2298 .format_trace = format_tcp_tx_trace,
2303 VLIB_REGISTER_NODE (tcp6_output_node) =
2305 .name = "tcp6-output",
2306 /* Takes a vector of packets. */
2307 .vector_size = sizeof (u32),
2308 .n_errors = TCP_N_ERROR,
2309 .protocol_hint = VLIB_NODE_PROTO_HINT_TCP,
2310 .error_strings = tcp_error_strings,
2311 .n_next_nodes = TCP_OUTPUT_N_NEXT,
2313 #define _(s,n) [TCP_OUTPUT_NEXT_##s] = n,
2314 foreach_tcp6_output_next
2317 .format_buffer = format_tcp_header,
2318 .format_trace = format_tcp_tx_trace,
2322 typedef enum _tcp_reset_next
2324 TCP_RESET_NEXT_DROP,
2325 TCP_RESET_NEXT_IP_LOOKUP,
2329 #define foreach_tcp4_reset_next \
2330 _(DROP, "error-drop") \
2331 _(IP_LOOKUP, "ip4-lookup")
2333 #define foreach_tcp6_reset_next \
2334 _(DROP, "error-drop") \
2335 _(IP_LOOKUP, "ip6-lookup")
2338 tcp46_send_reset_inline (vlib_main_t * vm, vlib_node_runtime_t * node,
2339 vlib_frame_t * from_frame, u8 is_ip4)
2341 u32 n_left_from, next_index, *from, *to_next;
2342 u32 my_thread_index = vm->thread_index;
2344 from = vlib_frame_vector_args (from_frame);
2345 n_left_from = from_frame->n_vectors;
2347 next_index = node->cached_next_index;
2349 while (n_left_from > 0)
2353 vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
2355 while (n_left_from > 0 && n_left_to_next > 0)
2361 u32 error0 = TCP_ERROR_RST_SENT, next0 = TCP_RESET_NEXT_IP_LOOKUP;
2368 n_left_to_next -= 1;
2370 b0 = vlib_get_buffer (vm, bi0);
2372 if (tcp_make_reset_in_place (vm, b0, vnet_buffer (b0)->tcp.flags,
2373 my_thread_index, is_ip4))
2375 error0 = TCP_ERROR_LOOKUP_DROPS;
2376 next0 = TCP_RESET_NEXT_DROP;
2380 /* Prepare to send to IP lookup */
2381 vnet_buffer (b0)->sw_if_index[VLIB_TX] = ~0;
2382 next0 = TCP_RESET_NEXT_IP_LOOKUP;
2385 b0->error = node->errors[error0];
2386 b0->flags |= VNET_BUFFER_F_LOCALLY_ORIGINATED;
2387 if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
2389 th0 = vlib_buffer_get_current (b0);
2391 th0 = ip4_next_header ((ip4_header_t *) th0);
2393 th0 = ip6_next_header ((ip6_header_t *) th0);
2394 t0 = vlib_add_trace (vm, node, b0, sizeof (*t0));
2395 clib_memcpy_fast (&t0->tcp_header, th0,
2396 sizeof (t0->tcp_header));
2399 vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
2400 n_left_to_next, bi0, next0);
2402 vlib_put_next_frame (vm, node, next_index, n_left_to_next);
2404 return from_frame->n_vectors;
2407 VLIB_NODE_FN (tcp4_reset_node) (vlib_main_t * vm, vlib_node_runtime_t * node,
2408 vlib_frame_t * from_frame)
2410 return tcp46_send_reset_inline (vm, node, from_frame, 1);
2413 VLIB_NODE_FN (tcp6_reset_node) (vlib_main_t * vm, vlib_node_runtime_t * node,
2414 vlib_frame_t * from_frame)
2416 return tcp46_send_reset_inline (vm, node, from_frame, 0);
2420 VLIB_REGISTER_NODE (tcp4_reset_node) = {
2421 .name = "tcp4-reset",
2422 .vector_size = sizeof (u32),
2423 .n_errors = TCP_N_ERROR,
2424 .error_strings = tcp_error_strings,
2425 .n_next_nodes = TCP_RESET_N_NEXT,
2427 #define _(s,n) [TCP_RESET_NEXT_##s] = n,
2428 foreach_tcp4_reset_next
2431 .format_trace = format_tcp_tx_trace,
2436 VLIB_REGISTER_NODE (tcp6_reset_node) = {
2437 .name = "tcp6-reset",
2438 .vector_size = sizeof (u32),
2439 .n_errors = TCP_N_ERROR,
2440 .error_strings = tcp_error_strings,
2441 .n_next_nodes = TCP_RESET_N_NEXT,
2443 #define _(s,n) [TCP_RESET_NEXT_##s] = n,
2444 foreach_tcp6_reset_next
2447 .format_trace = format_tcp_tx_trace,
2452 * fd.io coding-style-patch-verification: ON
2455 * eval: (c-set-style "gnu")