X-Git-Url: https://gerrit.fd.io/r/gitweb?a=blobdiff_plain;f=src%2Fvnet%2Fsession%2Fapplication_local.c;h=d2a69dc282bf823e087b6c4471bfd856ffd435c5;hb=d810a6e218e9af3c3bccd58c9a2d925a7f12242e;hp=6a02f23be85355a9b70dd069ca57e972915604cb;hpb=d5a588230f3e05fd496939bea304fca84a687fa3;p=vpp.git diff --git a/src/vnet/session/application_local.c b/src/vnet/session/application_local.c index 6a02f23be85..d2a69dc282b 100644 --- a/src/vnet/session/application_local.c +++ b/src/vnet/session/application_local.c @@ -16,49 +16,103 @@ #include #include +typedef enum ct_segment_flags_ +{ + CT_SEGMENT_F_CLIENT_DETACHED = 1 << 0, + CT_SEGMENT_F_SERVER_DETACHED = 1 << 1, +} ct_segment_flags_t; + +typedef struct ct_segment_ +{ + u32 client_n_sessions; + u32 server_n_sessions; + u32 seg_ctx_index; + u32 ct_seg_index; + u32 segment_index; + ct_segment_flags_t flags; +} ct_segment_t; + +typedef struct ct_segments_ +{ + u32 sm_index; + u32 server_wrk; + u32 client_wrk; + u32 fifo_pair_bytes; + ct_segment_t *segments; +} ct_segments_ctx_t; + +typedef struct ct_cleanup_req_ +{ + u32 ct_index; +} ct_cleanup_req_t; + +typedef struct ct_worker_ +{ + ct_connection_t *connections; /**< Per-worker connection pools */ + u32 *pending_connects; /**< Fifo of pending ho indices */ + ct_cleanup_req_t *pending_cleanups; /**< Fifo of pending indices */ + u8 have_connects; /**< Set if connect rpc pending */ + u8 have_cleanups; /**< Set if cleanup rpc pending */ +} ct_worker_t; + typedef struct ct_main_ { - ct_connection_t **connections; /**< Per-worker connection pools */ + ct_worker_t *wrk; /**< Per-worker state */ u32 n_workers; /**< Number of vpp workers */ u32 n_sessions; /**< Cumulative sessions counter */ u32 *ho_reusable; /**< Vector of reusable ho indices */ clib_spinlock_t ho_reuseable_lock; /**< Lock for reusable ho indices */ + clib_rwlock_t app_segs_lock; /**< RW lock for seg contexts */ + uword *app_segs_ctxs_table; /**< App handle to segment pool map */ + ct_segments_ctx_t *app_seg_ctxs; /**< Pool of ct segment contexts */ } ct_main_t; static ct_main_t ct_main; +static inline ct_worker_t * +ct_worker_get (u32 thread_index) +{ + return &ct_main.wrk[thread_index]; +} + static ct_connection_t * ct_connection_alloc (u32 thread_index) { + ct_worker_t *wrk = ct_worker_get (thread_index); ct_connection_t *ct; - pool_get_zero (ct_main.connections[thread_index], ct); - ct->c_c_index = ct - ct_main.connections[thread_index]; + pool_get_zero (wrk->connections, ct); + ct->c_c_index = ct - wrk->connections; ct->c_thread_index = thread_index; ct->client_wrk = ~0; ct->server_wrk = ~0; + ct->seg_ctx_index = ~0; + ct->ct_seg_index = ~0; return ct; } static ct_connection_t * ct_connection_get (u32 ct_index, u32 thread_index) { - if (pool_is_free_index (ct_main.connections[thread_index], ct_index)) + ct_worker_t *wrk = ct_worker_get (thread_index); + + if (pool_is_free_index (wrk->connections, ct_index)) return 0; - return pool_elt_at_index (ct_main.connections[thread_index], ct_index); + return pool_elt_at_index (wrk->connections, ct_index); } static void ct_connection_free (ct_connection_t * ct) { + ct_worker_t *wrk = ct_worker_get (ct->c_thread_index); + if (CLIB_DEBUG) { - u32 thread_index = ct->c_thread_index; - memset (ct, 0xfc, sizeof (*ct)); - pool_put (ct_main.connections[thread_index], ct); + clib_memset (ct, 0xfc, sizeof (*ct)); + pool_put (wrk->connections, ct); return; } - pool_put (ct_main.connections[ct->c_thread_index], ct); + pool_put (wrk->connections, ct); } static ct_connection_t * @@ -69,7 +123,7 @@ ct_half_open_alloc (void) clib_spinlock_lock (&cm->ho_reuseable_lock); vec_foreach (hip, cm->ho_reusable) - pool_put_index (cm->connections[0], *hip); + pool_put_index (cm->wrk[0].connections, *hip); vec_reset_length (cm->ho_reusable); clib_spinlock_unlock (&cm->ho_reuseable_lock); @@ -106,191 +160,491 @@ ct_session_endpoint (session_t * ll, session_endpoint_t * sep) ip_copy (&sep->ip, &ct->c_lcl_ip, ct->c_is_ip4); } -int -ct_session_connect_notify (session_t * ss) +static void +ct_set_invalid_app_wrk (ct_connection_t *ct, u8 is_client) { - u32 ss_index, opaque, thread_index; - ct_connection_t *sct, *cct; - app_worker_t *client_wrk; + ct_connection_t *peer_ct; + + peer_ct = ct_connection_get (ct->peer_index, ct->c_thread_index); + + if (is_client) + { + ct->client_wrk = APP_INVALID_INDEX; + if (peer_ct) + ct->client_wrk = APP_INVALID_INDEX; + } + else + { + ct->server_wrk = APP_INVALID_INDEX; + if (peer_ct) + ct->server_wrk = APP_INVALID_INDEX; + } +} + +static void +ct_session_dealloc_fifos (ct_connection_t *ct, svm_fifo_t *rx_fifo, + svm_fifo_t *tx_fifo) +{ + ct_segments_ctx_t *seg_ctx; + ct_main_t *cm = &ct_main; segment_manager_t *sm; - fifo_segment_t *seg; - u64 segment_handle; - int err = 0; - session_t *cs; + app_worker_t *app_wrk; + ct_segment_t *ct_seg; + fifo_segment_t *fs; + u32 seg_index; + session_t *s; + int cnt; - ss_index = ss->session_index; - thread_index = ss->thread_index; - sct = (ct_connection_t *) session_get_transport (ss); - client_wrk = app_worker_get (sct->client_wrk); - opaque = sct->client_opaque; + /* + * Cleanup fifos + */ + + sm = segment_manager_get (rx_fifo->segment_manager); + seg_index = rx_fifo->segment_index; + + fs = segment_manager_get_segment_w_lock (sm, seg_index); + fifo_segment_free_fifo (fs, rx_fifo); + fifo_segment_free_fifo (fs, tx_fifo); + segment_manager_segment_reader_unlock (sm); + + /* + * Atomically update segment context with readers lock + */ + + clib_rwlock_reader_lock (&cm->app_segs_lock); - sm = segment_manager_get (ss->rx_fifo->segment_manager); - seg = segment_manager_get_segment_w_lock (sm, ss->rx_fifo->segment_index); - segment_handle = segment_manager_segment_handle (sm, seg); + seg_ctx = pool_elt_at_index (cm->app_seg_ctxs, ct->seg_ctx_index); + ct_seg = pool_elt_at_index (seg_ctx->segments, ct->ct_seg_index); - if ((err = app_worker_add_segment_notify (client_wrk, segment_handle))) + if (ct->flags & CT_CONN_F_CLIENT) { - clib_warning ("failed to notify client %u of new segment", - sct->client_wrk); - segment_manager_segment_reader_unlock (sm); - session_close (ss); - goto error; + cnt = + __atomic_sub_fetch (&ct_seg->client_n_sessions, 1, __ATOMIC_RELAXED); } else { - segment_manager_segment_reader_unlock (sm); + cnt = + __atomic_sub_fetch (&ct_seg->server_n_sessions, 1, __ATOMIC_RELAXED); + } + + clib_rwlock_reader_unlock (&cm->app_segs_lock); + + /* + * No need to do any app updates, return + */ + ASSERT (cnt >= 0); + if (cnt) + return; + + /* + * Grab exclusive lock and update flags unless some other thread + * added more sessions + */ + clib_rwlock_writer_lock (&cm->app_segs_lock); + + seg_ctx = pool_elt_at_index (cm->app_seg_ctxs, ct->seg_ctx_index); + ct_seg = pool_elt_at_index (seg_ctx->segments, ct->ct_seg_index); + if (ct->flags & CT_CONN_F_CLIENT) + { + cnt = ct_seg->client_n_sessions; + if (cnt) + goto done; + ct_seg->flags |= CT_SEGMENT_F_CLIENT_DETACHED; + s = session_get (ct->c_s_index, ct->c_thread_index); + if (s->app_wrk_index == APP_INVALID_INDEX) + ct_set_invalid_app_wrk (ct, 1 /* is_client */); + } + else + { + cnt = ct_seg->server_n_sessions; + if (cnt) + goto done; + ct_seg->flags |= CT_SEGMENT_F_SERVER_DETACHED; + s = session_get (ct->c_s_index, ct->c_thread_index); + if (s->app_wrk_index == APP_INVALID_INDEX) + ct_set_invalid_app_wrk (ct, 0 /* is_client */); + } + + if (!(ct_seg->flags & CT_SEGMENT_F_CLIENT_DETACHED) || + !(ct_seg->flags & CT_SEGMENT_F_SERVER_DETACHED)) + goto done; + + /* + * Remove segment context because both client and server detached + */ + + pool_put_index (seg_ctx->segments, ct->ct_seg_index); + + /* + * No more segment indices left, remove the segments context + */ + if (!pool_elts (seg_ctx->segments)) + { + u64 table_handle = seg_ctx->client_wrk << 16 | seg_ctx->server_wrk; + table_handle = (u64) seg_ctx->sm_index << 32 | table_handle; + hash_unset (cm->app_segs_ctxs_table, table_handle); + pool_free (seg_ctx->segments); + pool_put_index (cm->app_seg_ctxs, ct->seg_ctx_index); } /* - * Alloc client session + * Segment to be removed so notify both apps */ + + app_wrk = app_worker_get_if_valid (ct->client_wrk); + /* Determine if client app still needs notification, i.e., if it is + * still attached. If client detached and this is the last ct session + * on this segment, then its connects segment manager should also be + * detached, so do not send notification */ + if (app_wrk) + { + segment_manager_t *csm; + csm = app_worker_get_connect_segment_manager (app_wrk); + if (!segment_manager_app_detached (csm)) + app_worker_del_segment_notify (app_wrk, ct->segment_handle); + } + + /* Notify server app and free segment */ + segment_manager_lock_and_del_segment (sm, seg_index); + + /* Cleanup segment manager if needed. If server detaches there's a chance + * the client's sessions will hold up segment removal */ + if (segment_manager_app_detached (sm) && !segment_manager_has_fifos (sm)) + segment_manager_free_safe (sm); + +done: + + clib_rwlock_writer_unlock (&cm->app_segs_lock); +} + +static void +ct_session_force_disconnect_server (ct_connection_t *sct) +{ + sct->peer_index = ~0; + session_transport_closing_notify (&sct->connection); +} + +int +ct_session_connect_notify (session_t *ss, session_error_t err) +{ + u32 ss_index, opaque, thread_index; + ct_connection_t *sct, *cct; + app_worker_t *client_wrk; + session_t *cs; + + ss_index = ss->session_index; + thread_index = ss->thread_index; + sct = (ct_connection_t *) session_get_transport (ss); + client_wrk = app_worker_get (sct->client_wrk); + opaque = sct->client_opaque; + cct = ct_connection_get (sct->peer_index, thread_index); /* Client closed while waiting for reply from server */ - if (!cct) + if (PREDICT_FALSE (!cct)) { - session_transport_closing_notify (&sct->connection); - session_transport_delete_notify (&sct->connection); - ct_connection_free (sct); + ct_session_force_disconnect_server (sct); return 0; } session_half_open_delete_notify (&cct->connection); cct->flags &= ~CT_CONN_F_HALF_OPEN; + if (PREDICT_FALSE (err)) + goto connect_error; + + /* + * Alloc client session, server session assumed to be established + */ + + ASSERT (ss->session_state >= SESSION_STATE_READY); + cs = session_alloc (thread_index); ss = session_get (ss_index, thread_index); cs->session_type = ss->session_type; cs->listener_handle = SESSION_INVALID_HANDLE; - cs->session_state = SESSION_STATE_CONNECTING; + session_set_state (cs, SESSION_STATE_CONNECTING); cs->app_wrk_index = client_wrk->wrk_index; cs->connection_index = cct->c_c_index; - cct->c_s_index = cs->session_index; - cct->client_rx_fifo = ss->tx_fifo; - cct->client_tx_fifo = ss->rx_fifo; - - cct->client_rx_fifo->refcnt++; - cct->client_tx_fifo->refcnt++; /* This will allocate fifos for the session. They won't be used for * exchanging data but they will be used to close the connection if * the segment manager/worker is freed */ if ((err = app_worker_init_connected (client_wrk, cs))) { - session_close (ss); session_free (cs); - goto error; + ct_session_force_disconnect_server (sct); + err = SESSION_E_ALLOC; + goto connect_error; } - cs->session_state = SESSION_STATE_CONNECTING; + session_set_state (cs, SESSION_STATE_CONNECTING); - if (app_worker_connect_notify (client_wrk, cs, err, opaque)) + if (app_worker_connect_notify (client_wrk, cs, 0, opaque)) { - session_close (ss); segment_manager_dealloc_fifos (cs->rx_fifo, cs->tx_fifo); session_free (cs); - return -1; + ct_session_force_disconnect_server (sct); + goto cleanup_client; } cs = session_get (cct->c_s_index, cct->c_thread_index); - cs->session_state = SESSION_STATE_READY; + session_set_state (cs, SESSION_STATE_READY); return 0; -error: - app_worker_connect_notify (client_wrk, 0, err, opaque); +connect_error: + + app_worker_connect_notify (client_wrk, 0, err, cct->client_opaque); + +cleanup_client: + + if (cct->client_rx_fifo) + ct_session_dealloc_fifos (cct, cct->client_rx_fifo, cct->client_tx_fifo); + ct_connection_free (cct); return -1; } +static inline ct_segment_t * +ct_lookup_free_segment (ct_main_t *cm, segment_manager_t *sm, + u32 seg_ctx_index) +{ + uword free_bytes, max_free_bytes; + ct_segment_t *ct_seg, *res = 0; + ct_segments_ctx_t *seg_ctx; + fifo_segment_t *fs; + u32 max_fifos; + + seg_ctx = pool_elt_at_index (cm->app_seg_ctxs, seg_ctx_index); + max_free_bytes = seg_ctx->fifo_pair_bytes; + + pool_foreach (ct_seg, seg_ctx->segments) + { + /* Client or server has detached so segment cannot be used */ + fs = segment_manager_get_segment (sm, ct_seg->segment_index); + free_bytes = fifo_segment_available_bytes (fs); + max_fifos = fifo_segment_size (fs) / seg_ctx->fifo_pair_bytes; + if (free_bytes > max_free_bytes && + fifo_segment_num_fifos (fs) / 2 < max_fifos) + { + max_free_bytes = free_bytes; + res = ct_seg; + } + } + + return res; +} + +static ct_segment_t * +ct_alloc_segment (ct_main_t *cm, app_worker_t *server_wrk, u64 table_handle, + segment_manager_t *sm, u32 client_wrk_index) +{ + u32 seg_ctx_index = ~0, sm_index, pair_bytes; + segment_manager_props_t *props; + const u32 margin = 16 << 10; + ct_segments_ctx_t *seg_ctx; + app_worker_t *client_wrk; + u64 seg_size, seg_handle; + application_t *server; + ct_segment_t *ct_seg; + uword *spp; + int fs_index; + + server = application_get (server_wrk->app_index); + props = application_segment_manager_properties (server); + sm_index = segment_manager_index (sm); + pair_bytes = props->rx_fifo_size + props->tx_fifo_size + margin; + + /* + * Make sure another thread did not alloc a segment while acquiring the lock + */ + + spp = hash_get (cm->app_segs_ctxs_table, table_handle); + if (spp) + { + seg_ctx_index = *spp; + ct_seg = ct_lookup_free_segment (cm, sm, seg_ctx_index); + if (ct_seg) + return ct_seg; + } + + /* + * No segment, try to alloc one and notify the server and the client. + * Make sure the segment is not used for other fifos + */ + seg_size = clib_max (props->segment_size, 128 << 20); + fs_index = + segment_manager_add_segment2 (sm, seg_size, FIFO_SEGMENT_F_CUSTOM_USE); + if (fs_index < 0) + return 0; + + if (seg_ctx_index == ~0) + { + pool_get_zero (cm->app_seg_ctxs, seg_ctx); + seg_ctx_index = seg_ctx - cm->app_seg_ctxs; + hash_set (cm->app_segs_ctxs_table, table_handle, seg_ctx_index); + seg_ctx->server_wrk = server_wrk->wrk_index; + seg_ctx->client_wrk = client_wrk_index; + seg_ctx->sm_index = sm_index; + seg_ctx->fifo_pair_bytes = pair_bytes; + } + else + { + seg_ctx = pool_elt_at_index (cm->app_seg_ctxs, seg_ctx_index); + } + + pool_get_zero (seg_ctx->segments, ct_seg); + ct_seg->segment_index = fs_index; + ct_seg->server_n_sessions = 0; + ct_seg->client_n_sessions = 0; + ct_seg->ct_seg_index = ct_seg - seg_ctx->segments; + ct_seg->seg_ctx_index = seg_ctx_index; + + /* New segment, notify the server and client */ + seg_handle = segment_manager_make_segment_handle (sm_index, fs_index); + if (app_worker_add_segment_notify (server_wrk, seg_handle)) + goto error; + + client_wrk = app_worker_get (client_wrk_index); + if (app_worker_add_segment_notify (client_wrk, seg_handle)) + { + app_worker_del_segment_notify (server_wrk, seg_handle); + goto error; + } + + return ct_seg; + +error: + + segment_manager_lock_and_del_segment (sm, fs_index); + pool_put_index (seg_ctx->segments, ct_seg->seg_ctx_index); + return 0; +} + static int -ct_init_accepted_session (app_worker_t * server_wrk, - ct_connection_t * ct, session_t * ls, - session_t * ll) +ct_init_accepted_session (app_worker_t *server_wrk, ct_connection_t *ct, + session_t *ls, session_t *ll) { - u32 round_rx_fifo_sz, round_tx_fifo_sz, sm_index, seg_size; segment_manager_props_t *props; + u64 seg_handle, table_handle; + u32 sm_index, fs_index = ~0; + ct_segments_ctx_t *seg_ctx; + ct_main_t *cm = &ct_main; application_t *server; segment_manager_t *sm; - u32 margin = 16 << 10; - fifo_segment_t *seg; - u64 segment_handle; - int seg_index, rv; + ct_segment_t *ct_seg; + fifo_segment_t *fs; + uword *spp; + int rv; + sm = app_worker_get_listen_segment_manager (server_wrk, ll); + sm_index = segment_manager_index (sm); server = application_get (server_wrk->app_index); - props = application_segment_manager_properties (server); - round_rx_fifo_sz = 1 << max_log2 (props->rx_fifo_size); - round_tx_fifo_sz = 1 << max_log2 (props->tx_fifo_size); - /* Increase size because of inefficient chunk allocations. Depending on - * how data is consumed, it may happen that more chunks than needed are - * allocated. - * TODO should remove once allocations are done more efficiently */ - seg_size = 4 * (round_rx_fifo_sz + round_tx_fifo_sz + margin); - sm = app_worker_get_listen_segment_manager (server_wrk, ll); - seg_index = segment_manager_add_segment (sm, seg_size, 0); - if (seg_index < 0) + table_handle = ct->client_wrk << 16 | server_wrk->wrk_index; + table_handle = (u64) sm_index << 32 | table_handle; + + /* + * Check if we already have a segment that can hold the fifos + */ + + clib_rwlock_reader_lock (&cm->app_segs_lock); + + spp = hash_get (cm->app_segs_ctxs_table, table_handle); + if (spp) { - clib_warning ("failed to add new cut-through segment"); - return seg_index; + ct_seg = ct_lookup_free_segment (cm, sm, *spp); + if (ct_seg) + { + ct->seg_ctx_index = ct_seg->seg_ctx_index; + ct->ct_seg_index = ct_seg->ct_seg_index; + fs_index = ct_seg->segment_index; + ct_seg->flags &= + ~(CT_SEGMENT_F_SERVER_DETACHED | CT_SEGMENT_F_CLIENT_DETACHED); + __atomic_add_fetch (&ct_seg->server_n_sessions, 1, __ATOMIC_RELAXED); + __atomic_add_fetch (&ct_seg->client_n_sessions, 1, __ATOMIC_RELAXED); + } + } + + clib_rwlock_reader_unlock (&cm->app_segs_lock); + + /* + * If not, grab exclusive lock and allocate segment + */ + if (fs_index == ~0) + { + clib_rwlock_writer_lock (&cm->app_segs_lock); + + ct_seg = + ct_alloc_segment (cm, server_wrk, table_handle, sm, ct->client_wrk); + if (!ct_seg) + { + clib_rwlock_writer_unlock (&cm->app_segs_lock); + return -1; + } + + ct->seg_ctx_index = ct_seg->seg_ctx_index; + ct->ct_seg_index = ct_seg->ct_seg_index; + ct_seg->server_n_sessions += 1; + ct_seg->client_n_sessions += 1; + fs_index = ct_seg->segment_index; + + clib_rwlock_writer_unlock (&cm->app_segs_lock); } - seg = segment_manager_get_segment_w_lock (sm, seg_index); - rv = segment_manager_try_alloc_fifos (seg, ls->thread_index, - props->rx_fifo_size, - props->tx_fifo_size, &ls->rx_fifo, - &ls->tx_fifo); + /* + * Allocate and initialize the fifos + */ + fs = segment_manager_get_segment_w_lock (sm, fs_index); + rv = segment_manager_try_alloc_fifos ( + fs, ls->thread_index, props->rx_fifo_size, props->tx_fifo_size, + &ls->rx_fifo, &ls->tx_fifo); if (rv) { - clib_warning ("failed to add fifos in cut-through segment"); segment_manager_segment_reader_unlock (sm); - goto failed; + + clib_rwlock_reader_lock (&cm->app_segs_lock); + + seg_ctx = pool_elt_at_index (cm->app_seg_ctxs, ct->seg_ctx_index); + ct_seg = pool_elt_at_index (seg_ctx->segments, ct->ct_seg_index); + __atomic_sub_fetch (&ct_seg->server_n_sessions, 1, __ATOMIC_RELAXED); + __atomic_sub_fetch (&ct_seg->client_n_sessions, 1, __ATOMIC_RELAXED); + + clib_rwlock_reader_unlock (&cm->app_segs_lock); + + return rv; } - sm_index = segment_manager_index (sm); ls->rx_fifo->shr->master_session_index = ls->session_index; ls->tx_fifo->shr->master_session_index = ls->session_index; ls->rx_fifo->master_thread_index = ls->thread_index; ls->tx_fifo->master_thread_index = ls->thread_index; - ls->rx_fifo->segment_manager = sm_index; - ls->tx_fifo->segment_manager = sm_index; - ls->rx_fifo->segment_index = seg_index; - ls->tx_fifo->segment_index = seg_index; - segment_handle = segment_manager_segment_handle (sm, seg); - if ((rv = app_worker_add_segment_notify (server_wrk, segment_handle))) - { - clib_warning ("failed to notify server of new segment"); - segment_manager_segment_reader_unlock (sm); - goto failed; - } + seg_handle = segment_manager_segment_handle (sm, fs); segment_manager_segment_reader_unlock (sm); - ct->segment_handle = segment_handle; - return 0; + ct->segment_handle = seg_handle; -failed: - segment_manager_lock_and_del_segment (sm, seg_index); - return rv; + return 0; } static void -ct_accept_rpc_wrk_handler (void *accept_args) +ct_accept_one (u32 thread_index, u32 ho_index) { - u32 cct_index, ho_index, thread_index, ll_index; - ct_connection_t *sct, *cct, *ll_ct, *ho; + ct_connection_t *sct, *cct, *ho; + transport_connection_t *ll_ct; app_worker_t *server_wrk; + u32 cct_index, ll_index; session_t *ss, *ll; /* * Alloc client ct and initialize from ho */ - thread_index = vlib_get_thread_index (); cct = ct_connection_alloc (thread_index); cct_index = cct->c_c_index; - ho_index = pointer_to_uword (accept_args); ho = ct_connection_get (ho_index, 0); /* Unlikely but half-open session and transport could have been freed */ @@ -319,20 +673,20 @@ ct_accept_rpc_wrk_handler (void *accept_args) ll_index = cct->peer_index; ll = listen_session_get (ll_index); sct = ct_connection_alloc (thread_index); - ll_ct = ct_connection_get (ll->connection_index, 0 /* listener thread */); + /* Transport not necessarily ct but it might, so grab after sct alloc */ + ll_ct = listen_session_get_transport (ll); /* Make sure cct is valid after sct alloc */ cct = ct_connection_get (cct_index, thread_index); - cct->actual_tp = ll_ct->actual_tp; sct->c_rmt_port = 0; - sct->c_lcl_port = ll_ct->c_lcl_port; + sct->c_lcl_port = ll_ct->lcl_port; sct->c_is_ip4 = cct->c_is_ip4; - clib_memcpy (&sct->c_lcl_ip, &ll_ct->c_lcl_ip, sizeof (ll_ct->c_lcl_ip)); + clib_memcpy (&sct->c_lcl_ip, &cct->c_rmt_ip, sizeof (cct->c_rmt_ip)); sct->client_wrk = cct->client_wrk; sct->c_proto = TRANSPORT_PROTO_NONE; sct->client_opaque = cct->client_opaque; - sct->actual_tp = ll_ct->actual_tp; + sct->actual_tp = cct->actual_tp; sct->peer_index = cct->c_c_index; cct->peer_index = sct->c_c_index; @@ -347,7 +701,7 @@ ct_accept_rpc_wrk_handler (void *accept_args) sct->c_is_ip4); ss->connection_index = sct->c_c_index; ss->listener_handle = listen_session_get_handle (ll); - ss->session_state = SESSION_STATE_CREATED; + session_set_state (ss, SESSION_STATE_CREATED); server_wrk = application_listener_select_worker (ll); ss->app_wrk_index = server_wrk->wrk_index; @@ -357,21 +711,57 @@ ct_accept_rpc_wrk_handler (void *accept_args) if (ct_init_accepted_session (server_wrk, sct, ss, ll)) { + ct_session_connect_notify (ss, SESSION_E_ALLOC); ct_connection_free (sct); session_free (ss); return; } - ss->session_state = SESSION_STATE_ACCEPTING; + cct->server_wrk = sct->server_wrk; + cct->seg_ctx_index = sct->seg_ctx_index; + cct->ct_seg_index = sct->ct_seg_index; + cct->client_rx_fifo = ss->tx_fifo; + cct->client_tx_fifo = ss->rx_fifo; + cct->client_rx_fifo->refcnt++; + cct->client_tx_fifo->refcnt++; + cct->segment_handle = sct->segment_handle; + + session_set_state (ss, SESSION_STATE_ACCEPTING); if (app_worker_accept_notify (server_wrk, ss)) { + ct_session_connect_notify (ss, SESSION_E_REFUSED); + ct_session_dealloc_fifos (sct, ss->rx_fifo, ss->tx_fifo); ct_connection_free (sct); - segment_manager_dealloc_fifos (ss->rx_fifo, ss->tx_fifo); session_free (ss); - return; } +} - cct->segment_handle = sct->segment_handle; +static void +ct_accept_rpc_wrk_handler (void *rpc_args) +{ + u32 thread_index, ho_index, n_connects, i, n_pending; + const u32 max_connects = 32; + ct_worker_t *wrk; + + thread_index = pointer_to_uword (rpc_args); + wrk = ct_worker_get (thread_index); + + /* Sub without lock as main enqueues with worker barrier */ + n_pending = clib_fifo_elts (wrk->pending_connects); + n_connects = clib_min (n_pending, max_connects); + + for (i = 0; i < n_connects; i++) + { + clib_fifo_sub1 (wrk->pending_connects, ho_index); + ct_accept_one (thread_index, ho_index); + } + + if (n_pending == n_connects) + wrk->have_connects = 0; + else + session_send_rpc_evt_to_thread_force ( + thread_index, ct_accept_rpc_wrk_handler, + uword_to_pointer (thread_index, void *)); } static int @@ -381,6 +771,7 @@ ct_connect (app_worker_t * client_wrk, session_t * ll, u32 thread_index, ho_index; ct_main_t *cm = &ct_main; ct_connection_t *ho; + ct_worker_t *wrk; /* Simple round-robin policy for spreading sessions over workers. We skip * thread index 0, i.e., offset the index by 1, when we have workers as it @@ -406,21 +797,30 @@ ct_connect (app_worker_t * client_wrk, session_t * ll, clib_memcpy (&ho->c_rmt_ip, &sep->ip, sizeof (sep->ip)); ho->flags |= CT_CONN_F_CLIENT; ho->c_s_index = ~0; + ho->actual_tp = sep->original_tp; /* * Accept connection on thread selected above. Connected reply comes * after server accepts the connection. */ - session_send_rpc_evt_to_thread_force (thread_index, - ct_accept_rpc_wrk_handler, - uword_to_pointer (ho_index, void *)); + wrk = ct_worker_get (thread_index); + + /* Worker barrier held, add without additional lock */ + clib_fifo_add1 (wrk->pending_connects, ho_index); + if (!wrk->have_connects) + { + wrk->have_connects = 1; + session_send_rpc_evt_to_thread_force ( + thread_index, ct_accept_rpc_wrk_handler, + uword_to_pointer (thread_index, void *)); + } return ho_index; } static u32 -ct_start_listen (u32 app_listener_index, transport_endpoint_t * tep) +ct_start_listen (u32 app_listener_index, transport_endpoint_cfg_t *tep) { session_endpoint_cfg_t *sep; ct_connection_t *ct; @@ -535,21 +935,138 @@ global_scope: table_index = session_lookup_get_index_for_fib (fib_proto, sep->fib_index); ll = session_lookup_listener_wildcard (table_index, sep); - if (ll) + /* Avoid connecting app to own listener */ + if (ll && ll->app_index != app->app_index) return ct_connect (app_wrk, ll, sep_ext); /* Failed to connect but no error */ return SESSION_E_LOCAL_CONNECT; } +static inline int +ct_close_is_reset (ct_connection_t *ct, session_t *s) +{ + if (ct->flags & CT_CONN_F_CLIENT) + return (svm_fifo_max_dequeue (ct->client_rx_fifo) > 0); + else + return (svm_fifo_max_dequeue (s->rx_fifo) > 0); +} + +static void +ct_session_postponed_cleanup (ct_connection_t *ct) +{ + ct_connection_t *peer_ct; + app_worker_t *app_wrk; + session_t *s; + + s = session_get (ct->c_s_index, ct->c_thread_index); + app_wrk = app_worker_get_if_valid (s->app_wrk_index); + + peer_ct = ct_connection_get (ct->peer_index, ct->c_thread_index); + if (peer_ct) + { + if (ct_close_is_reset (ct, s)) + session_transport_reset_notify (&peer_ct->connection); + else + session_transport_closing_notify (&peer_ct->connection); + } + session_transport_closed_notify (&ct->connection); + + if (ct->flags & CT_CONN_F_CLIENT) + { + if (app_wrk) + app_worker_cleanup_notify (app_wrk, s, SESSION_CLEANUP_TRANSPORT); + + /* Normal free for client session as the fifos are allocated through + * the connects segment manager in a segment that's not shared with + * the server */ + ct_session_dealloc_fifos (ct, ct->client_rx_fifo, ct->client_tx_fifo); + session_free_w_fifos (s); + } + else + { + /* Manual session and fifo segment cleanup to avoid implicit + * segment manager cleanups and notifications */ + app_wrk = app_worker_get_if_valid (s->app_wrk_index); + if (app_wrk) + { + app_worker_cleanup_notify (app_wrk, s, SESSION_CLEANUP_TRANSPORT); + app_worker_cleanup_notify (app_wrk, s, SESSION_CLEANUP_SESSION); + } + + ct_session_dealloc_fifos (ct, s->rx_fifo, s->tx_fifo); + session_free (s); + } + + ct_connection_free (ct); +} + +static void +ct_handle_cleanups (void *args) +{ + uword thread_index = pointer_to_uword (args); + const u32 max_cleanups = 100; + ct_cleanup_req_t *req; + ct_connection_t *ct; + u32 n_to_handle = 0; + ct_worker_t *wrk; + session_t *s; + + wrk = ct_worker_get (thread_index); + wrk->have_cleanups = 0; + n_to_handle = clib_fifo_elts (wrk->pending_cleanups); + n_to_handle = clib_min (n_to_handle, max_cleanups); + + while (n_to_handle) + { + clib_fifo_sub2 (wrk->pending_cleanups, req); + ct = ct_connection_get (req->ct_index, thread_index); + s = session_get (ct->c_s_index, ct->c_thread_index); + if (!svm_fifo_has_event (s->tx_fifo)) + ct_session_postponed_cleanup (ct); + else + clib_fifo_add1 (wrk->pending_cleanups, *req); + n_to_handle -= 1; + } + + if (clib_fifo_elts (wrk->pending_cleanups)) + { + wrk->have_cleanups = 1; + session_send_rpc_evt_to_thread_force ( + thread_index, ct_handle_cleanups, + uword_to_pointer (thread_index, void *)); + } +} + +static void +ct_program_cleanup (ct_connection_t *ct) +{ + ct_cleanup_req_t *req; + uword thread_index; + ct_worker_t *wrk; + + thread_index = ct->c_thread_index; + wrk = ct_worker_get (ct->c_thread_index); + + clib_fifo_add2 (wrk->pending_cleanups, req); + req->ct_index = ct->c_c_index; + + if (wrk->have_cleanups) + return; + + wrk->have_cleanups = 1; + session_send_rpc_evt_to_thread_force ( + thread_index, ct_handle_cleanups, uword_to_pointer (thread_index, void *)); +} + static void ct_session_close (u32 ct_index, u32 thread_index) { ct_connection_t *ct, *peer_ct; - app_worker_t *app_wrk; session_t *s; ct = ct_connection_get (ct_index, thread_index); + s = session_get (ct->c_s_index, ct->c_thread_index); peer_ct = ct_connection_get (ct->peer_index, thread_index); if (peer_ct) { @@ -557,25 +1074,20 @@ ct_session_close (u32 ct_index, u32 thread_index) /* Make sure session was allocated */ if (peer_ct->flags & CT_CONN_F_HALF_OPEN) { - app_wrk = app_worker_get (peer_ct->client_wrk); - app_worker_connect_notify (app_wrk, 0, SESSION_E_REFUSED, - peer_ct->client_opaque); + ct_session_connect_notify (s, SESSION_E_REFUSED); + ct->peer_index = ~0; + } + else if (peer_ct->c_s_index == ~0) + { + /* should not happen */ + clib_warning ("ct peer without session"); + ct_connection_free (peer_ct); } - else if (peer_ct->c_s_index != ~0) - session_transport_closing_notify (&peer_ct->connection); - else - ct_connection_free (peer_ct); } - s = session_get (ct->c_s_index, ct->c_thread_index); - app_wrk = app_worker_get_if_valid (s->app_wrk_index); - if (app_wrk) - app_worker_del_segment_notify (app_wrk, ct->segment_handle); - session_free_w_fifos (s); - if (ct->flags & CT_CONN_F_CLIENT) - segment_manager_dealloc_fifos (ct->client_rx_fifo, ct->client_tx_fifo); - - ct_connection_free (ct); + /* Do not send closed notify to make sure pending tx events are + * still delivered and program cleanup */ + ct_program_cleanup (ct); } static transport_connection_t * @@ -634,12 +1146,17 @@ static int ct_app_rx_evt (transport_connection_t * tc) { ct_connection_t *ct = (ct_connection_t *) tc, *peer_ct; - session_t *ps; + session_t *ps, *s; + s = session_get (ct->c_s_index, ct->c_thread_index); + if (session_has_transport (s) || s->session_state < SESSION_STATE_READY) + return -1; peer_ct = ct_connection_get (ct->peer_index, tc->thread_index); - if (!peer_ct) + if (!peer_ct || (peer_ct->flags & CT_CONN_F_HALF_OPEN)) return -1; ps = session_get (peer_ct->c_s_index, peer_ct->c_thread_index); + if (ps->session_state >= SESSION_STATE_TRANSPORT_CLOSING) + return -1; return session_dequeue_notify (ps); } @@ -710,12 +1227,13 @@ format_ct_session (u8 * s, va_list * args) clib_error_t * ct_enable_disable (vlib_main_t * vm, u8 is_en) { + vlib_thread_main_t *vtm = &vlib_thread_main; ct_main_t *cm = &ct_main; cm->n_workers = vlib_num_workers (); - vec_validate (cm->connections, cm->n_workers); + vec_validate (cm->wrk, vtm->n_vlib_mains); clib_spinlock_init (&cm->ho_reuseable_lock); - + clib_rwlock_init (&cm->app_segs_lock); return 0; } @@ -745,12 +1263,22 @@ static const transport_proto_vft_t cut_thru_proto = { }; /* *INDENT-ON* */ +static inline int +ct_session_can_tx (session_t *s) +{ + return (s->session_state == SESSION_STATE_READY || + s->session_state == SESSION_STATE_CLOSING || + s->session_state == SESSION_STATE_APP_CLOSED); +} + int ct_session_tx (session_t * s) { ct_connection_t *ct, *peer_ct; session_t *peer_s; + if (!ct_session_can_tx (s)) + return 0; ct = (ct_connection_t *) session_get_transport (s); peer_ct = ct_connection_get (ct->peer_index, ct->c_thread_index); if (!peer_ct)