2 * Copyright (c) 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/session/application_local.h>
17 #include <vnet/session/session.h>
19 static ct_connection_t *connections;
22 ct_enable_disable_main_pre_input_node (u8 is_add)
26 n_conns = pool_elts (connections);
30 if (n_conns > 0 && is_add)
31 vlib_node_set_state (vlib_get_main (),
32 session_queue_pre_input_node.index,
33 VLIB_NODE_STATE_POLLING);
34 else if (n_conns == 0)
35 vlib_node_set_state (vlib_get_main (),
36 session_queue_pre_input_node.index,
37 VLIB_NODE_STATE_DISABLED);
40 static ct_connection_t *
41 ct_connection_alloc (void)
45 pool_get_zero (connections, ct);
46 ct->c_c_index = ct - connections;
47 ct->c_thread_index = 0;
53 static ct_connection_t *
54 ct_connection_get (u32 ct_index)
56 if (pool_is_free_index (connections, ct_index))
58 return pool_elt_at_index (connections, ct_index);
62 ct_connection_free (ct_connection_t * ct)
65 memset (ct, 0xfc, sizeof (*ct));
66 pool_put (connections, ct);
70 ct_session_get_peer (session_t * s)
72 ct_connection_t *ct, *peer_ct;
73 ct = ct_connection_get (s->connection_index);
74 peer_ct = ct_connection_get (ct->peer_index);
75 return session_get (peer_ct->c_s_index, 0);
79 ct_session_endpoint (session_t * ll, session_endpoint_t * sep)
82 ct = (ct_connection_t *) session_get_transport (ll);
83 sep->transport_proto = ct->actual_tp;
84 sep->port = ct->c_lcl_port;
85 sep->is_ip4 = ct->c_is_ip4;
89 ct_session_connect_notify (session_t * ss)
91 svm_fifo_segment_private_t *seg;
92 ct_connection_t *sct, *cct;
93 app_worker_t *client_wrk;
94 segment_manager_t *sm;
100 ss_index = ss->session_index;
101 sct = (ct_connection_t *) session_get_transport (ss);
102 client_wrk = app_worker_get (sct->client_wrk);
104 sm = segment_manager_get (ss->rx_fifo->segment_manager);
105 seg = segment_manager_get_segment_w_lock (sm, ss->rx_fifo->segment_index);
106 segment_handle = segment_manager_segment_handle (sm, seg);
108 if (app_worker_add_segment_notify (client_wrk, segment_handle))
110 clib_warning ("failed to notify client %u of new segment",
112 segment_manager_segment_reader_unlock (sm);
118 segment_manager_segment_reader_unlock (sm);
121 /* Alloc client session */
122 cct = ct_connection_get (sct->peer_index);
124 cs = session_alloc (0);
125 ss = session_get (ss_index, 0);
126 cs->session_type = ss->session_type;
127 cs->connection_index = sct->c_c_index;
128 cs->listener_index = SESSION_INVALID_INDEX;
129 cs->session_state = SESSION_STATE_CONNECTING;
130 cs->app_wrk_index = client_wrk->wrk_index;
131 cs->connection_index = cct->c_c_index;
133 cct->c_s_index = cs->session_index;
134 cct->client_rx_fifo = ss->tx_fifo;
135 cct->client_tx_fifo = ss->rx_fifo;
137 cct->client_rx_fifo->refcnt++;
138 cct->client_tx_fifo->refcnt++;
140 /* This will allocate fifos for the session. They won't be used for
141 * exchanging data but they will be used to close the connection if
142 * the segment manager/worker is freed */
143 if (app_worker_init_connected (client_wrk, cs))
149 if (app_worker_connect_notify (client_wrk, is_fail ? 0 : cs,
156 cs = session_get (cct->c_s_index, 0);
157 cs->session_state = SESSION_STATE_READY;
163 ct_init_local_session (app_worker_t * client_wrk, app_worker_t * server_wrk,
164 ct_connection_t * ct, session_t * ls, session_t * ll)
166 u32 round_rx_fifo_sz, round_tx_fifo_sz, sm_index, seg_size;
167 segment_manager_properties_t *props;
168 svm_fifo_segment_private_t *seg;
169 application_t *server;
170 segment_manager_t *sm;
171 u32 margin = 16 << 10;
175 server = application_get (server_wrk->app_index);
177 props = application_segment_manager_properties (server);
178 round_rx_fifo_sz = 1 << max_log2 (props->rx_fifo_size);
179 round_tx_fifo_sz = 1 << max_log2 (props->tx_fifo_size);
180 seg_size = round_rx_fifo_sz + round_tx_fifo_sz + margin;
182 sm = app_worker_get_listen_segment_manager (server_wrk, ll);
183 seg_index = segment_manager_add_segment (sm, seg_size);
186 clib_warning ("failed to add new cut-through segment");
189 seg = segment_manager_get_segment_w_lock (sm, seg_index);
191 rv = segment_manager_try_alloc_fifos (seg, props->rx_fifo_size,
192 props->tx_fifo_size, &ls->rx_fifo,
196 clib_warning ("failed to add fifos in cut-through segment");
197 segment_manager_segment_reader_unlock (sm);
201 sm_index = segment_manager_index (sm);
202 ls->rx_fifo->master_session_index = ls->session_index;
203 ls->tx_fifo->master_session_index = ls->session_index;
204 ls->rx_fifo->segment_manager = sm_index;
205 ls->tx_fifo->segment_manager = sm_index;
206 ls->rx_fifo->segment_index = seg_index;
207 ls->tx_fifo->segment_index = seg_index;
209 segment_handle = segment_manager_segment_handle (sm, seg);
210 if ((rv = app_worker_add_segment_notify (server_wrk, segment_handle)))
212 clib_warning ("failed to notify server of new segment");
213 segment_manager_segment_reader_unlock (sm);
216 segment_manager_segment_reader_unlock (sm);
217 ct->segment_handle = segment_handle;
222 segment_manager_del_segment (sm, seg);
227 ct_connect (app_worker_t * client_wrk, session_t * ll,
228 session_endpoint_cfg_t * sep)
230 u32 cct_index, ll_index, ll_ct_index;
231 ct_connection_t *sct, *cct, *ll_ct;
232 app_worker_t *server_wrk;
235 ll_index = ll->session_index;
236 ll_ct_index = ll->connection_index;
238 cct = ct_connection_alloc ();
239 cct_index = cct->c_c_index;
240 sct = ct_connection_alloc ();
241 ll_ct = ct_connection_get (ll_ct_index);
244 * Alloc and init client transport
246 cct = ct_connection_get (cct_index);
247 cct->c_thread_index = 0;
248 cct->c_rmt_port = sep->port;
250 cct->c_is_ip4 = sep->is_ip4;
251 clib_memcpy (&cct->c_rmt_ip, &sep->ip, sizeof (sep->ip));
252 cct->actual_tp = ll_ct->actual_tp;
256 * Init server transport
258 sct->c_thread_index = 0;
260 sct->c_lcl_port = ll_ct->c_lcl_port;
261 sct->c_is_ip4 = sep->is_ip4;
262 clib_memcpy (&sct->c_lcl_ip, &ll_ct->c_lcl_ip, sizeof (ll_ct->c_lcl_ip));
263 sct->client_wrk = client_wrk->wrk_index;
264 sct->c_proto = TRANSPORT_PROTO_NONE;
265 sct->client_opaque = sep->opaque;
266 sct->actual_tp = ll_ct->actual_tp;
268 sct->peer_index = cct->c_c_index;
269 cct->peer_index = sct->c_c_index;
272 * Accept server session. Client session is created only after
273 * server confirms accept.
275 ss = session_alloc (0);
276 ll = listen_session_get (ll_index);
277 ss->session_type = session_type_from_proto_and_ip (TRANSPORT_PROTO_NONE,
279 ss->connection_index = sct->c_c_index;
280 ss->listener_index = ll->session_index;
281 ss->session_state = SESSION_STATE_CREATED;
283 server_wrk = application_listener_select_worker (ll);
284 ss->app_wrk_index = server_wrk->wrk_index;
286 sct->c_s_index = ss->session_index;
287 sct->server_wrk = ss->app_wrk_index;
289 if (ct_init_local_session (client_wrk, server_wrk, sct, ss, ll))
291 clib_warning ("failed");
292 ct_connection_free (sct);
297 ss->session_state = SESSION_STATE_ACCEPTING;
298 if (app_worker_accept_notify (server_wrk, ss))
300 clib_warning ("failed");
301 ct_connection_free (sct);
302 session_free_w_fifos (ss);
306 cct->segment_handle = sct->segment_handle;
307 ct_enable_disable_main_pre_input_node (1 /* is_add */ );
312 ct_start_listen (u32 app_listener_index, transport_endpoint_t * tep)
314 session_endpoint_cfg_t *sep;
317 sep = (session_endpoint_cfg_t *) tep;
318 ct = ct_connection_alloc ();
319 ct->server_wrk = sep->app_wrk_index;
320 ct->c_is_ip4 = sep->is_ip4;
321 clib_memcpy (&ct->c_lcl_ip, &sep->ip, sizeof (sep->ip));
322 ct->c_lcl_port = sep->port;
323 ct->actual_tp = sep->transport_proto;
324 ct_enable_disable_main_pre_input_node (1 /* is_add */ );
325 return ct->c_c_index;
329 ct_stop_listen (u32 ct_index)
332 ct = ct_connection_get (ct_index);
333 ct_connection_free (ct);
334 ct_enable_disable_main_pre_input_node (0 /* is_add */ );
338 static transport_connection_t *
339 ct_listener_get (u32 ct_index)
341 return (transport_connection_t *) ct_connection_get (ct_index);
345 ct_session_connect (transport_endpoint_cfg_t * tep)
347 session_endpoint_cfg_t *sep_ext;
348 session_endpoint_t *sep;
349 app_worker_t *app_wrk;
357 sep_ext = (session_endpoint_cfg_t *) tep;
358 sep = (session_endpoint_t *) tep;
359 app_wrk = app_worker_get (sep_ext->app_wrk_index);
360 app = application_get (app_wrk->app_index);
362 sep->transport_proto = sep_ext->original_tp;
363 table_index = application_local_session_table (app);
364 lh = session_lookup_local_endpoint (table_index, sep);
365 if (lh == SESSION_DROP_HANDLE)
366 return VNET_API_ERROR_APP_CONNECT_FILTERED;
368 if (lh == SESSION_INVALID_HANDLE)
371 ll = listen_session_get_from_handle (lh);
372 al = app_listener_get_w_session (ll);
375 * Break loop if rule in local table points to connecting app. This
376 * can happen if client is a generic proxy. Route connect through
377 * global table instead.
379 if (al->app_index == app->app_index)
382 return ct_connect (app_wrk, ll, sep_ext);
385 * If nothing found, check the global scope for locally attached
386 * destinations. Make sure first that we're allowed to.
390 if (session_endpoint_is_local (sep))
391 return VNET_API_ERROR_SESSION_CONNECT;
393 if (!application_has_global_scope (app))
394 return VNET_API_ERROR_APP_CONNECT_SCOPE;
396 fib_proto = session_endpoint_fib_proto (sep);
397 table_index = application_session_table (app, fib_proto);
398 ll = session_lookup_listener_wildcard (table_index, sep);
401 return ct_connect (app_wrk, ll, sep_ext);
403 /* Failed to connect but no error */
408 ct_session_close (u32 ct_index, u32 thread_index)
410 ct_connection_t *ct, *peer_ct;
411 app_worker_t *app_wrk;
414 ct = ct_connection_get (ct_index);
415 peer_ct = ct_connection_get (ct->peer_index);
418 peer_ct->peer_index = ~0;
419 session_transport_closing_notify (&peer_ct->connection);
422 s = session_get (ct->c_s_index, 0);
423 app_wrk = app_worker_get_if_valid (s->app_wrk_index);
425 app_worker_del_segment_notify (app_wrk, ct->segment_handle);
426 session_free_w_fifos (s);
428 segment_manager_dealloc_fifos (ct->client_rx_fifo, ct->client_tx_fifo);
430 ct_connection_free (ct);
431 ct_enable_disable_main_pre_input_node (0 /* is_add */ );
434 static transport_connection_t *
435 ct_session_get (u32 ct_index, u32 thread_index)
437 return (transport_connection_t *) ct_connection_get (ct_index);
441 format_ct_connection_id (u8 * s, va_list * args)
443 ct_connection_t *ct = va_arg (*args, ct_connection_t *);
448 s = format (s, "[%d:%d][CT:%U] %U:%d->%U:%d", ct->c_thread_index,
449 ct->c_s_index, format_transport_proto_short, ct->actual_tp,
450 format_ip4_address, &ct->c_lcl_ip4,
451 clib_net_to_host_u16 (ct->c_lcl_port), format_ip4_address,
452 &ct->c_rmt_ip4, clib_net_to_host_u16 (ct->c_rmt_port));
456 s = format (s, "[%d:%d][CT:%U] %U:%d->%U:%d", ct->c_thread_index,
457 ct->c_s_index, format_transport_proto_short, ct->actual_tp,
458 format_ip6_address, &ct->c_lcl_ip6,
459 clib_net_to_host_u16 (ct->c_lcl_port), format_ip6_address,
460 &ct->c_rmt_ip6, clib_net_to_host_u16 (ct->c_rmt_port));
467 ct_custom_tx (void *session)
469 session_t *s = (session_t *) session;
470 if (session_has_transport (s))
472 return ct_session_tx (s);
476 format_ct_listener (u8 * s, va_list * args)
478 u32 tc_index = va_arg (*args, u32);
479 u32 __clib_unused verbose = va_arg (*args, u32);
480 ct_connection_t *ct = ct_connection_get (tc_index);
481 s = format (s, "%-50U", format_ct_connection_id, ct);
483 s = format (s, "%-15s", "LISTEN");
488 format_ct_connection (u8 * s, va_list * args)
490 ct_connection_t *ct = va_arg (*args, ct_connection_t *);
491 u32 verbose = va_arg (*args, u32);
495 s = format (s, "%-50U", format_ct_connection_id, ct);
498 s = format (s, "%-15s", "ESTABLISHED");
501 s = format (s, "\n");
508 format_ct_session (u8 * s, va_list * args)
510 u32 ct_index = va_arg (*args, u32);
511 u32 __clib_unused thread_index = va_arg (*args, u32);
512 u32 verbose = va_arg (*args, u32);
515 ct = ct_connection_get (ct_index);
518 s = format (s, "empty\n");
522 s = format (s, "%U", format_ct_connection, ct, verbose);
527 const static transport_proto_vft_t cut_thru_proto = {
528 .start_listen = ct_start_listen,
529 .stop_listen = ct_stop_listen,
530 .get_listener = ct_listener_get,
531 .connect = ct_session_connect,
532 .close = ct_session_close,
533 .get_connection = ct_session_get,
534 .custom_tx = ct_custom_tx,
535 .tx_type = TRANSPORT_TX_INTERNAL,
536 .service_type = TRANSPORT_SERVICE_APP,
537 .format_listener = format_ct_listener,
538 .format_connection = format_ct_session,
543 ct_session_tx (session_t * s)
545 ct_connection_t *ct, *peer_ct;
548 ct = (ct_connection_t *) session_get_transport (s);
549 peer_ct = ct_connection_get (ct->peer_index);
552 peer_s = session_get (peer_ct->c_s_index, 0);
553 if (peer_s->session_state >= SESSION_STATE_TRANSPORT_CLOSING)
555 return session_enqueue_notify (peer_s);
558 static clib_error_t *
559 ct_transport_init (vlib_main_t * vm)
561 transport_register_protocol (TRANSPORT_PROTO_NONE, &cut_thru_proto,
562 FIB_PROTOCOL_IP4, ~0);
563 transport_register_protocol (TRANSPORT_PROTO_NONE, &cut_thru_proto,
564 FIB_PROTOCOL_IP6, ~0);
568 VLIB_INIT_FUNCTION (ct_transport_init);
571 * fd.io coding-style-patch-verification: ON
574 * eval: (c-set-style "gnu")