2 * Copyright (c) 2017 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.
17 #include <vlib/vlib.h>
18 #include <vnet/vnet.h>
19 #include <vppinfra/elog.h>
20 #include <vnet/session/transport.h>
21 #include <vnet/session/session.h>
22 #include <vnet/session/application.h>
23 #include <vnet/session/application_interface.h>
24 #include <vnet/session/session_debug.h>
25 #include <svm/queue.h>
28 session_mq_accepted_reply_handler (void *data)
30 session_accepted_reply_msg_t *mp = (session_accepted_reply_msg_t *) data;
31 vnet_disconnect_args_t _a = { 0 }, *a = &_a;
32 app_worker_t *app_wrk;
36 /* Server isn't interested, kill the session */
39 a->app_index = mp->context;
40 a->handle = mp->handle;
41 vnet_disconnect_session (a);
45 if (session_handle_is_local (mp->handle))
47 ls = application_get_local_session_from_handle (mp->handle);
50 clib_warning ("unknown local handle 0x%lx", mp->handle);
53 app_wrk = app_worker_get (ls->app_wrk_index);
54 if (app_wrk->app_index != mp->context)
56 clib_warning ("server %u doesn't own local handle 0x%lx",
57 mp->context, mp->handle);
60 if (application_local_session_connect_notify (ls))
62 ls->session_state = SESSION_STATE_READY;
66 s = session_get_from_handle_if_valid (mp->handle);
69 clib_warning ("session doesn't exist");
72 app_wrk = app_worker_get (s->app_wrk_index);
73 if (app_wrk->app_index != mp->context)
75 clib_warning ("app doesn't own session");
78 s->session_state = SESSION_STATE_READY;
79 if (!svm_fifo_is_empty (s->server_rx_fifo))
80 app_worker_lock_and_send_event (app_wrk, s, FIFO_EVENT_APP_RX);
85 session_mq_reset_reply_handler (void *data)
87 session_reset_reply_msg_t *mp;
88 app_worker_t *app_wrk;
91 u32 index, thread_index;
93 mp = (session_reset_reply_msg_t *) data;
94 app = application_lookup (mp->client_index);
98 session_parse_handle (mp->handle, &index, &thread_index);
99 s = session_get_if_valid (index, thread_index);
102 clib_warning ("Invalid session!");
105 app_wrk = app_worker_get (s->app_wrk_index);
106 if (!app_wrk || app_wrk->app_index != app->app_index)
108 clib_warning ("App % does not own handle 0x%lx!", app->app_index,
113 /* Client objected to resetting the session, log and continue */
116 clib_warning ("client retval %d", mp->retval);
120 /* This comes as a response to a reset, transport only waiting for
121 * confirmation to remove connection state, no need to disconnect */
122 stream_session_cleanup (s);
126 session_mq_disconnected_handler (void *data)
128 session_disconnected_reply_msg_t *rmp;
129 vnet_disconnect_args_t _a, *a = &_a;
130 svm_msg_q_msg_t _msg, *msg = &_msg;
131 session_disconnected_msg_t *mp;
132 app_worker_t *app_wrk;
133 session_event_t *evt;
138 mp = (session_disconnected_msg_t *) data;
139 if (!(s = session_get_from_handle_if_valid (mp->handle)))
141 clib_warning ("could not disconnect handle %llu", mp->handle);
144 app_wrk = app_worker_get (s->app_wrk_index);
145 app = application_lookup (mp->client_index);
146 if (!(app_wrk && app && app->app_index == app_wrk->app_index))
148 clib_warning ("could not disconnect session: %llu app: %u",
149 mp->handle, mp->client_index);
153 a->handle = mp->handle;
154 a->app_index = app_wrk->wrk_index;
155 rv = vnet_disconnect_session (a);
157 svm_msg_q_lock_and_alloc_msg_w_ring (app_wrk->event_queue,
158 SESSION_MQ_CTRL_EVT_RING,
160 svm_msg_q_unlock (app_wrk->event_queue);
161 evt = svm_msg_q_msg_data (app_wrk->event_queue, msg);
162 clib_memset (evt, 0, sizeof (*evt));
163 evt->event_type = SESSION_CTRL_EVT_DISCONNECTED;
164 rmp = (session_disconnected_reply_msg_t *) evt->data;
165 rmp->handle = mp->handle;
166 rmp->context = mp->context;
168 svm_msg_q_add (app_wrk->event_queue, msg, SVM_Q_WAIT);
172 session_mq_disconnected_reply_handler (void *data)
174 session_disconnected_reply_msg_t *mp;
175 vnet_disconnect_args_t _a, *a = &_a;
178 mp = (session_disconnected_reply_msg_t *) data;
180 /* Client objected to disconnecting the session, log and continue */
183 clib_warning ("client retval %d", mp->retval);
187 /* Disconnect has been confirmed. Confirm close to transport */
188 app = application_lookup (mp->context);
191 a->handle = mp->handle;
192 a->app_index = app->app_index;
193 vnet_disconnect_session (a);
197 vlib_node_registration_t session_queue_node;
202 u32 server_thread_index;
203 } session_queue_trace_t;
205 /* packet trace format function */
207 format_session_queue_trace (u8 * s, va_list * args)
209 CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
210 CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
211 session_queue_trace_t *t = va_arg (*args, session_queue_trace_t *);
213 s = format (s, "SESSION_QUEUE: session index %d, server thread index %d",
214 t->session_index, t->server_thread_index);
218 #define foreach_session_queue_error \
219 _(TX, "Packets transmitted") \
220 _(TIMER, "Timer events") \
221 _(NO_BUFFER, "Out of buffers")
225 #define _(sym,str) SESSION_QUEUE_ERROR_##sym,
226 foreach_session_queue_error
228 SESSION_QUEUE_N_ERROR,
229 } session_queue_error_t;
231 static char *session_queue_error_strings[] = {
232 #define _(sym,string) string,
233 foreach_session_queue_error
239 SESSION_TX_NO_BUFFERS = -2,
245 session_tx_trace_frame (vlib_main_t * vm, vlib_node_runtime_t * node,
246 u32 next_index, u32 * to_next, u16 n_segs,
247 stream_session_t * s, u32 n_trace)
249 session_queue_trace_t *t;
253 for (i = 0; i < clib_min (n_trace, n_segs); i++)
255 b = vlib_get_buffer (vm, to_next[i - n_segs]);
256 vlib_trace_buffer (vm, node, next_index, b, 1 /* follow_chain */ );
257 t = vlib_add_trace (vm, node, b, sizeof (*t));
258 t->session_index = s->session_index;
259 t->server_thread_index = s->thread_index;
261 vlib_set_trace_count (vm, node, n_trace - i);
265 session_tx_fifo_chain_tail (vlib_main_t * vm, session_tx_context_t * ctx,
266 vlib_buffer_t * b, u16 * n_bufs, u8 peek_data)
268 session_manager_main_t *smm = &session_manager_main;
269 vlib_buffer_t *chain_b, *prev_b;
270 u32 chain_bi0, to_deq, left_from_seg;
271 u16 len_to_deq, n_bytes_read;
274 b->flags |= VLIB_BUFFER_TOTAL_LENGTH_VALID;
275 b->total_length_not_including_first_buffer = 0;
278 left_from_seg = clib_min (ctx->snd_mss - b->current_length,
280 to_deq = left_from_seg;
281 for (j = 1; j < ctx->n_bufs_per_seg; j++)
284 len_to_deq = clib_min (to_deq, ctx->deq_per_buf);
287 chain_bi0 = smm->tx_buffers[ctx->s->thread_index][*n_bufs];
288 _vec_len (smm->tx_buffers[ctx->s->thread_index]) = *n_bufs;
290 chain_b = vlib_get_buffer (vm, chain_bi0);
291 chain_b->current_data = 0;
292 data = vlib_buffer_get_current (chain_b);
295 n_bytes_read = svm_fifo_peek (ctx->s->server_tx_fifo,
296 ctx->tx_offset, len_to_deq, data);
297 ctx->tx_offset += n_bytes_read;
301 if (ctx->transport_vft->tx_type == TRANSPORT_TX_DGRAM)
303 svm_fifo_t *f = ctx->s->server_tx_fifo;
304 session_dgram_hdr_t *hdr = &ctx->hdr;
306 deq_now = clib_min (hdr->data_length - hdr->data_offset,
308 n_bytes_read = svm_fifo_peek (f, hdr->data_offset, deq_now,
310 ASSERT (n_bytes_read > 0);
312 hdr->data_offset += n_bytes_read;
313 if (hdr->data_offset == hdr->data_length)
315 u32 offset = hdr->data_length + SESSION_CONN_HDR_LEN;
316 svm_fifo_dequeue_drop (f, offset);
320 n_bytes_read = svm_fifo_dequeue_nowait (ctx->s->server_tx_fifo,
323 ASSERT (n_bytes_read == len_to_deq);
324 chain_b->current_length = n_bytes_read;
325 b->total_length_not_including_first_buffer += chain_b->current_length;
327 /* update previous buffer */
328 prev_b->next_buffer = chain_bi0;
329 prev_b->flags |= VLIB_BUFFER_NEXT_PRESENT;
331 /* update current buffer */
332 chain_b->next_buffer = 0;
334 to_deq -= n_bytes_read;
339 && b->total_length_not_including_first_buffer == left_from_seg);
340 ctx->left_to_snd -= left_from_seg;
344 session_output_try_get_buffers (vlib_main_t * vm,
345 session_manager_main_t * smm,
346 u32 thread_index, u16 * n_bufs, u32 wanted)
349 vec_validate_aligned (smm->tx_buffers[thread_index], wanted - 1,
350 CLIB_CACHE_LINE_BYTES);
351 n_alloc = vlib_buffer_alloc (vm, &smm->tx_buffers[thread_index][*n_bufs],
354 _vec_len (smm->tx_buffers[thread_index]) = *n_bufs;
359 session_tx_fill_buffer (vlib_main_t * vm, session_tx_context_t * ctx,
360 vlib_buffer_t * b, u16 * n_bufs, u8 peek_data)
367 * Start with the first buffer in chain
370 b->flags = VNET_BUFFER_F_LOCALLY_ORIGINATED;
373 data0 = vlib_buffer_make_headroom (b, MAX_HDRS_LEN);
374 len_to_deq = clib_min (ctx->left_to_snd, ctx->deq_per_first_buf);
378 n_bytes_read = svm_fifo_peek (ctx->s->server_tx_fifo, ctx->tx_offset,
380 ASSERT (n_bytes_read > 0);
381 /* Keep track of progress locally, transport is also supposed to
382 * increment it independently when pushing the header */
383 ctx->tx_offset += n_bytes_read;
387 if (ctx->transport_vft->tx_type == TRANSPORT_TX_DGRAM)
389 session_dgram_hdr_t *hdr = &ctx->hdr;
390 svm_fifo_t *f = ctx->s->server_tx_fifo;
394 ASSERT (hdr->data_length > hdr->data_offset);
395 deq_now = clib_min (hdr->data_length - hdr->data_offset,
397 offset = hdr->data_offset + SESSION_CONN_HDR_LEN;
398 n_bytes_read = svm_fifo_peek (f, offset, deq_now, data0);
399 ASSERT (n_bytes_read > 0);
401 if (ctx->s->session_state == SESSION_STATE_LISTENING)
403 ip_copy (&ctx->tc->rmt_ip, &hdr->rmt_ip, ctx->tc->is_ip4);
404 ctx->tc->rmt_port = hdr->rmt_port;
406 hdr->data_offset += n_bytes_read;
407 if (hdr->data_offset == hdr->data_length)
409 offset = hdr->data_length + SESSION_CONN_HDR_LEN;
410 svm_fifo_dequeue_drop (f, offset);
415 n_bytes_read = svm_fifo_dequeue_nowait (ctx->s->server_tx_fifo,
417 ASSERT (n_bytes_read > 0);
420 b->current_length = n_bytes_read;
421 ctx->left_to_snd -= n_bytes_read;
424 * Fill in the remaining buffers in the chain, if any
426 if (PREDICT_FALSE (ctx->n_bufs_per_seg > 1 && ctx->left_to_snd))
427 session_tx_fifo_chain_tail (vm, ctx, b, n_bufs, peek_data);
430 SESSION_EVT_DBG(SESSION_EVT_DEQ, ctx->s, ({
431 ed->data[0] = FIFO_EVENT_APP_TX;
432 ed->data[1] = ctx->max_dequeue;
433 ed->data[2] = len_to_deq;
434 ed->data[3] = ctx->left_to_snd;
440 session_tx_not_ready (stream_session_t * s, u8 peek_data)
444 /* Can retransmit for closed sessions but can't send new data if
445 * session is not ready or closed */
446 if (s->session_state < SESSION_STATE_READY)
448 if (s->session_state == SESSION_STATE_CLOSED)
454 always_inline transport_connection_t *
455 session_tx_get_transport (session_tx_context_t * ctx, u8 peek_data)
459 return ctx->transport_vft->get_connection (ctx->s->connection_index,
460 ctx->s->thread_index);
464 if (ctx->s->session_state == SESSION_STATE_LISTENING)
465 return ctx->transport_vft->get_listener (ctx->s->connection_index);
468 return ctx->transport_vft->get_connection (ctx->s->connection_index,
469 ctx->s->thread_index);
475 session_tx_set_dequeue_params (vlib_main_t * vm, session_tx_context_t * ctx,
476 u32 max_segs, u8 peek_data)
478 u32 n_bytes_per_buf, n_bytes_per_seg;
479 ctx->max_dequeue = svm_fifo_max_dequeue (ctx->s->server_tx_fifo);
482 /* Offset in rx fifo from where to peek data */
483 ctx->tx_offset = ctx->transport_vft->tx_fifo_offset (ctx->tc);
484 if (PREDICT_FALSE (ctx->tx_offset >= ctx->max_dequeue))
486 ctx->max_len_to_snd = 0;
489 ctx->max_dequeue -= ctx->tx_offset;
493 if (ctx->transport_vft->tx_type == TRANSPORT_TX_DGRAM)
495 if (ctx->max_dequeue <= sizeof (ctx->hdr))
497 ctx->max_len_to_snd = 0;
500 svm_fifo_peek (ctx->s->server_tx_fifo, 0, sizeof (ctx->hdr),
502 ASSERT (ctx->hdr.data_length > ctx->hdr.data_offset);
503 ctx->max_dequeue = ctx->hdr.data_length - ctx->hdr.data_offset;
506 ASSERT (ctx->max_dequeue > 0);
508 /* Ensure we're not writing more than transport window allows */
509 if (ctx->max_dequeue < ctx->snd_space)
511 /* Constrained by tx queue. Try to send only fully formed segments */
512 ctx->max_len_to_snd =
513 (ctx->max_dequeue > ctx->snd_mss) ?
514 ctx->max_dequeue - ctx->max_dequeue % ctx->snd_mss : ctx->max_dequeue;
519 /* Expectation is that snd_space0 is already a multiple of snd_mss */
520 ctx->max_len_to_snd = ctx->snd_space;
523 /* Check if we're tx constrained by the node */
524 ctx->n_segs_per_evt = ceil ((f64) ctx->max_len_to_snd / ctx->snd_mss);
525 if (ctx->n_segs_per_evt > max_segs)
527 ctx->n_segs_per_evt = max_segs;
528 ctx->max_len_to_snd = max_segs * ctx->snd_mss;
531 n_bytes_per_buf = vlib_buffer_free_list_buffer_size (vm,
532 VLIB_BUFFER_DEFAULT_FREE_LIST_INDEX);
533 ASSERT (n_bytes_per_buf > MAX_HDRS_LEN);
534 n_bytes_per_seg = MAX_HDRS_LEN + ctx->snd_mss;
535 ctx->n_bufs_per_seg = ceil ((f64) n_bytes_per_seg / n_bytes_per_buf);
536 ctx->deq_per_buf = clib_min (ctx->snd_mss, n_bytes_per_buf);
537 ctx->deq_per_first_buf = clib_min (ctx->snd_mss,
538 n_bytes_per_buf - MAX_HDRS_LEN);
542 session_tx_fifo_read_and_snd_i (vlib_main_t * vm, vlib_node_runtime_t * node,
544 stream_session_t * s, int *n_tx_packets,
547 u32 next_index, next0, next1, *to_next, n_left_to_next;
548 u32 n_trace = vlib_get_trace_count (vm, node), n_bufs_needed = 0;
549 u32 thread_index = s->thread_index, n_left, pbi;
550 session_manager_main_t *smm = &session_manager_main;
551 session_tx_context_t *ctx = &smm->ctx[thread_index];
552 transport_proto_t tp;
556 if (PREDICT_FALSE ((rv = session_tx_not_ready (s, peek_data))))
559 vec_add1 (smm->pending_event_vector[thread_index], *e);
560 return SESSION_TX_NO_DATA;
563 next_index = smm->session_type_to_next[s->session_type];
564 next0 = next1 = next_index;
566 tp = session_get_transport_proto (s);
568 ctx->transport_vft = transport_protocol_get_vft (tp);
569 ctx->tc = session_tx_get_transport (ctx, peek_data);
570 ctx->snd_mss = ctx->transport_vft->send_mss (ctx->tc);
572 transport_connection_max_tx_burst (ctx->tc, vm->clib_time.last_cpu_time);
573 if (ctx->snd_space == 0 || ctx->snd_mss == 0)
575 vec_add1 (smm->pending_event_vector[thread_index], *e);
576 return SESSION_TX_NO_DATA;
579 /* Allow enqueuing of a new event */
580 svm_fifo_unset_event (s->server_tx_fifo);
582 /* Check how much we can pull. */
583 session_tx_set_dequeue_params (vm, ctx, VLIB_FRAME_SIZE - *n_tx_packets,
586 if (PREDICT_FALSE (!ctx->max_len_to_snd))
587 return SESSION_TX_NO_DATA;
589 n_bufs = vec_len (smm->tx_buffers[thread_index]);
590 n_bufs_needed = ctx->n_segs_per_evt * ctx->n_bufs_per_seg;
593 * Make sure we have at least one full frame of buffers ready
595 if (n_bufs < n_bufs_needed)
597 session_output_try_get_buffers (vm, smm, thread_index, &n_bufs,
598 ctx->n_bufs_per_seg * VLIB_FRAME_SIZE);
599 if (PREDICT_FALSE (n_bufs < n_bufs_needed))
601 vec_add1 (smm->pending_event_vector[thread_index], *e);
602 return SESSION_TX_NO_BUFFERS;
607 * Write until we fill up a frame
609 vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
610 if (PREDICT_FALSE (ctx->n_segs_per_evt > n_left_to_next))
612 ctx->n_segs_per_evt = n_left_to_next;
613 ctx->max_len_to_snd = ctx->snd_mss * n_left_to_next;
615 ctx->left_to_snd = ctx->max_len_to_snd;
616 n_left = ctx->n_segs_per_evt;
620 vlib_buffer_t *b0, *b1;
623 pbi = smm->tx_buffers[thread_index][n_bufs - 3];
624 pb = vlib_get_buffer (vm, pbi);
625 vlib_prefetch_buffer_header (pb, STORE);
626 pbi = smm->tx_buffers[thread_index][n_bufs - 4];
627 pb = vlib_get_buffer (vm, pbi);
628 vlib_prefetch_buffer_header (pb, STORE);
630 to_next[0] = bi0 = smm->tx_buffers[thread_index][--n_bufs];
631 to_next[1] = bi1 = smm->tx_buffers[thread_index][--n_bufs];
633 b0 = vlib_get_buffer (vm, bi0);
634 b1 = vlib_get_buffer (vm, bi1);
636 session_tx_fill_buffer (vm, ctx, b0, &n_bufs, peek_data);
637 session_tx_fill_buffer (vm, ctx, b1, &n_bufs, peek_data);
639 ctx->transport_vft->push_header (ctx->tc, b0);
640 ctx->transport_vft->push_header (ctx->tc, b1);
646 VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b0);
647 VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b1);
649 vlib_validate_buffer_enqueue_x2 (vm, node, next_index, to_next,
650 n_left_to_next, bi0, bi1, next0,
660 pbi = smm->tx_buffers[thread_index][n_bufs - 2];
661 pb = vlib_get_buffer (vm, pbi);
662 vlib_prefetch_buffer_header (pb, STORE);
665 to_next[0] = bi0 = smm->tx_buffers[thread_index][--n_bufs];
666 b0 = vlib_get_buffer (vm, bi0);
667 session_tx_fill_buffer (vm, ctx, b0, &n_bufs, peek_data);
669 /* Ask transport to push header after current_length and
670 * total_length_not_including_first_buffer are updated */
671 ctx->transport_vft->push_header (ctx->tc, b0);
677 VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b0);
679 vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
680 n_left_to_next, bi0, next0);
683 if (PREDICT_FALSE (n_trace > 0))
684 session_tx_trace_frame (vm, node, next_index, to_next,
685 ctx->n_segs_per_evt, s, n_trace);
687 _vec_len (smm->tx_buffers[thread_index]) = n_bufs;
688 *n_tx_packets += ctx->n_segs_per_evt;
689 transport_connection_update_tx_stats (ctx->tc, ctx->max_len_to_snd);
690 vlib_put_next_frame (vm, node, next_index, n_left_to_next);
692 /* If we couldn't dequeue all bytes mark as partially read */
693 ASSERT (ctx->left_to_snd == 0);
694 if (ctx->max_len_to_snd < ctx->max_dequeue)
695 if (svm_fifo_set_event (s->server_tx_fifo))
696 vec_add1 (smm->pending_event_vector[thread_index], *e);
698 if (!peek_data && ctx->transport_vft->tx_type == TRANSPORT_TX_DGRAM)
700 /* Fix dgram pre header */
701 if (ctx->max_len_to_snd < ctx->max_dequeue)
702 svm_fifo_overwrite_head (s->server_tx_fifo, (u8 *) & ctx->hdr,
703 sizeof (session_dgram_pre_hdr_t));
704 /* More data needs to be read */
705 else if (svm_fifo_max_dequeue (s->server_tx_fifo) > 0)
706 if (svm_fifo_set_event (s->server_tx_fifo))
707 vec_add1 (smm->pending_event_vector[thread_index], *e);
709 return SESSION_TX_OK;
713 session_tx_fifo_peek_and_snd (vlib_main_t * vm, vlib_node_runtime_t * node,
715 stream_session_t * s, int *n_tx_pkts)
717 return session_tx_fifo_read_and_snd_i (vm, node, e, s, n_tx_pkts, 1);
721 session_tx_fifo_dequeue_and_snd (vlib_main_t * vm, vlib_node_runtime_t * node,
723 stream_session_t * s, int *n_tx_pkts)
725 return session_tx_fifo_read_and_snd_i (vm, node, e, s, n_tx_pkts, 0);
729 session_tx_fifo_dequeue_internal (vlib_main_t * vm,
730 vlib_node_runtime_t * node,
732 stream_session_t * s, int *n_tx_pkts)
735 if (PREDICT_FALSE (s->session_state == SESSION_STATE_CLOSED))
737 app = application_get (s->t_app_index);
738 svm_fifo_unset_event (s->server_tx_fifo);
739 return app->cb_fns.builtin_app_tx_callback (s);
742 always_inline stream_session_t *
743 session_event_get_session (session_event_t * e, u8 thread_index)
745 return session_get_if_valid (e->fifo->master_session_index, thread_index);
749 session_update_dispatch_period (session_manager_main_t * smm, f64 now,
752 f64 sample, prev_period = smm->dispatch_period[thread_index], a = 0.8;
754 sample = now - smm->last_vlib_time[thread_index];
755 smm->dispatch_period[thread_index] = a * sample + (1 - a) * prev_period;
756 smm->last_vlib_time[thread_index] = now;
760 session_queue_node_fn (vlib_main_t * vm, vlib_node_runtime_t * node,
761 vlib_frame_t * frame)
763 session_manager_main_t *smm = vnet_get_session_manager_main ();
764 u32 thread_index = vm->thread_index, n_to_dequeue, n_events;
765 session_event_t *pending_events, *e;
766 session_event_t *fifo_events;
767 svm_msg_q_msg_t _msg, *msg = &_msg;
768 f64 now = vlib_time_now (vm);
769 int n_tx_packets = 0, i, rv;
770 app_worker_t *app_wrk;
775 SESSION_EVT_DBG (SESSION_EVT_POLL_GAP_TRACK, smm, thread_index);
778 * Update transport time
780 session_update_dispatch_period (smm, now, thread_index);
781 transport_update_time (now, thread_index);
784 * Get vpp queue events that we can dequeue without blocking
786 mq = smm->vpp_event_queues[thread_index];
787 fifo_events = smm->free_event_vector[thread_index];
788 n_to_dequeue = svm_msg_q_size (mq);
789 pending_events = smm->pending_event_vector[thread_index];
791 if (!n_to_dequeue && !vec_len (pending_events)
792 && !vec_len (smm->pending_disconnects[thread_index]))
795 SESSION_EVT_DBG (SESSION_EVT_DEQ_NODE, 0);
798 * If we didn't manage to process previous events try going
799 * over them again without dequeuing new ones.
800 * XXX: Handle senders to sessions that can't keep up
802 if (0 && vec_len (pending_events) >= 100)
804 clib_warning ("too many fifo events unsolved");
808 /* See you in the next life, don't be late
809 * XXX: we may need priorities here */
810 if (svm_msg_q_try_lock (mq))
813 for (i = 0; i < n_to_dequeue; i++)
815 vec_add2 (fifo_events, e, 1);
816 svm_msg_q_sub_w_lock (mq, msg);
817 clib_memcpy (e, svm_msg_q_msg_data (mq, msg), sizeof (*e));
818 svm_msg_q_free_msg (mq, msg);
821 svm_msg_q_unlock (mq);
823 vec_append (fifo_events, pending_events);
824 vec_append (fifo_events, smm->pending_disconnects[thread_index]);
826 _vec_len (pending_events) = 0;
827 smm->pending_event_vector[thread_index] = pending_events;
828 _vec_len (smm->pending_disconnects[thread_index]) = 0;
831 n_events = vec_len (fifo_events);
832 for (i = 0; i < n_events; i++)
834 stream_session_t *s; /* $$$ prefetch 1 ahead maybe */
839 switch (e->event_type)
841 case FIFO_EVENT_APP_TX:
842 /* Don't try to send more that one frame per dispatch cycle */
843 if (n_tx_packets == VLIB_FRAME_SIZE)
845 vec_add1 (smm->pending_event_vector[thread_index], *e);
849 s = session_event_get_session (e, thread_index);
850 if (PREDICT_FALSE (!s))
852 clib_warning ("session was freed!");
856 want_tx_evt = svm_fifo_want_tx_evt (s->server_tx_fifo);
857 /* Spray packets in per session type frames, since they go to
859 rv = (smm->session_tx_fns[s->session_type]) (vm, node, e, s,
861 if (PREDICT_TRUE (rv == SESSION_TX_OK))
863 if (PREDICT_FALSE (want_tx_evt))
865 svm_fifo_set_want_tx_evt (s->server_tx_fifo, 0);
866 session_dequeue_notify (s);
869 else if (PREDICT_FALSE (rv == SESSION_TX_NO_BUFFERS))
871 vlib_node_increment_counter (vm, node->node_index,
872 SESSION_QUEUE_ERROR_NO_BUFFER, 1);
876 case FIFO_EVENT_DISCONNECT:
877 /* Make sure stream disconnects run after the pending list is
879 s = session_get_from_handle (e->session_handle);
883 vec_add1 (smm->pending_disconnects[thread_index], *e);
886 /* If tx queue is still not empty, wait */
887 if (svm_fifo_max_dequeue (s->server_tx_fifo))
889 vec_add1 (smm->pending_disconnects[thread_index], *e);
893 stream_session_disconnect_transport (s);
895 case FIFO_EVENT_BUILTIN_RX:
896 s = session_event_get_session (e, thread_index);
897 if (PREDICT_FALSE (!s || s->session_state >= SESSION_STATE_CLOSING))
899 svm_fifo_unset_event (s->server_rx_fifo);
900 app_wrk = app_worker_get (s->app_wrk_index);
901 app = application_get (app_wrk->app_index);
902 app->cb_fns.builtin_app_rx_callback (s);
904 case FIFO_EVENT_BUILTIN_TX:
905 s = session_get_from_handle_if_valid (e->session_handle);
906 if (PREDICT_TRUE (s != 0))
907 session_tx_fifo_dequeue_internal (vm, node, e, s, &n_tx_packets);
911 (*fp) (e->rpc_args.arg);
913 case SESSION_CTRL_EVT_DISCONNECTED:
914 session_mq_disconnected_handler (e->data);
916 case SESSION_CTRL_EVT_ACCEPTED_REPLY:
917 session_mq_accepted_reply_handler (e->data);
919 case SESSION_CTRL_EVT_CONNECTED_REPLY:
921 case SESSION_CTRL_EVT_DISCONNECTED_REPLY:
922 session_mq_disconnected_reply_handler (e->data);
924 case SESSION_CTRL_EVT_RESET_REPLY:
925 session_mq_reset_reply_handler (e->data);
928 clib_warning ("unhandled event type %d", e->event_type);
932 _vec_len (fifo_events) = 0;
933 smm->free_event_vector[thread_index] = fifo_events;
935 vlib_node_increment_counter (vm, session_queue_node.index,
936 SESSION_QUEUE_ERROR_TX, n_tx_packets);
938 SESSION_EVT_DBG (SESSION_EVT_DISPATCH_END, smm, thread_index);
944 VLIB_REGISTER_NODE (session_queue_node) =
946 .function = session_queue_node_fn,
947 .name = "session-queue",
948 .format_trace = format_session_queue_trace,
949 .type = VLIB_NODE_TYPE_INPUT,
950 .n_errors = ARRAY_LEN (session_queue_error_strings),
951 .error_strings = session_queue_error_strings,
952 .state = VLIB_NODE_STATE_DISABLED,
957 dump_thread_0_event_queue (void)
959 session_manager_main_t *smm = vnet_get_session_manager_main ();
960 vlib_main_t *vm = &vlib_global_main;
961 u32 my_thread_index = vm->thread_index;
962 session_event_t _e, *e = &_e;
963 svm_msg_q_ring_t *ring;
964 stream_session_t *s0;
965 svm_msg_q_msg_t *msg;
969 mq = smm->vpp_event_queues[my_thread_index];
972 for (i = 0; i < mq->q->cursize; i++)
974 msg = (svm_msg_q_msg_t *) (&mq->q->data[0] + mq->q->elsize * index);
975 ring = svm_msg_q_ring (mq, msg->ring_index);
976 clib_memcpy (e, svm_msg_q_msg_data (mq, msg), ring->elsize);
978 switch (e->event_type)
980 case FIFO_EVENT_APP_TX:
981 s0 = session_event_get_session (e, my_thread_index);
982 fformat (stdout, "[%04d] TX session %d\n", i, s0->session_index);
985 case FIFO_EVENT_DISCONNECT:
986 s0 = session_get_from_handle (e->session_handle);
987 fformat (stdout, "[%04d] disconnect session %d\n", i,
991 case FIFO_EVENT_BUILTIN_RX:
992 s0 = session_event_get_session (e, my_thread_index);
993 fformat (stdout, "[%04d] builtin_rx %d\n", i, s0->session_index);
997 fformat (stdout, "[%04d] RPC call %llx with %llx\n",
998 i, (u64) (e->rpc_args.fp), (u64) (e->rpc_args.arg));
1002 fformat (stdout, "[%04d] unhandled event type %d\n",
1009 if (index == mq->q->maxsize)
1015 session_node_cmp_event (session_event_t * e, svm_fifo_t * f)
1017 stream_session_t *s;
1018 switch (e->event_type)
1020 case FIFO_EVENT_APP_RX:
1021 case FIFO_EVENT_APP_TX:
1022 case FIFO_EVENT_BUILTIN_RX:
1026 case FIFO_EVENT_DISCONNECT:
1028 case FIFO_EVENT_RPC:
1029 s = session_get_from_handle (e->session_handle);
1032 clib_warning ("session has event but doesn't exist!");
1035 if (s->server_rx_fifo == f || s->server_tx_fifo == f)
1045 session_node_lookup_fifo_event (svm_fifo_t * f, session_event_t * e)
1047 session_manager_main_t *smm = vnet_get_session_manager_main ();
1049 session_event_t *pending_event_vector, *evt;
1050 int i, index, found = 0;
1051 svm_msg_q_msg_t *msg;
1052 svm_msg_q_ring_t *ring;
1056 thread_index = f->master_thread_index;
1060 mq = smm->vpp_event_queues[thread_index];
1061 index = mq->q->head;
1062 for (i = 0; i < mq->q->cursize; i++)
1064 msg = (svm_msg_q_msg_t *) (&mq->q->data[0] + mq->q->elsize * index);
1065 ring = svm_msg_q_ring (mq, msg->ring_index);
1066 clib_memcpy (e, svm_msg_q_msg_data (mq, msg), ring->elsize);
1067 found = session_node_cmp_event (e, f);
1070 if (++index == mq->q->maxsize)
1074 * Search pending events vector
1076 pending_event_vector = smm->pending_event_vector[thread_index];
1077 vec_foreach (evt, pending_event_vector)
1079 found = session_node_cmp_event (evt, f);
1082 clib_memcpy (e, evt, sizeof (*evt));
1089 static clib_error_t *
1090 session_queue_exit (vlib_main_t * vm)
1092 if (vec_len (vlib_mains) < 2)
1096 * Shut off (especially) worker-thread session nodes.
1097 * Otherwise, vpp can crash as the main thread unmaps the
1100 vlib_worker_thread_barrier_sync (vm);
1101 session_node_enable_disable (0 /* is_enable */ );
1102 vlib_worker_thread_barrier_release (vm);
1106 VLIB_MAIN_LOOP_EXIT_FUNCTION (session_queue_exit);
1109 session_queue_process (vlib_main_t * vm, vlib_node_runtime_t * rt,
1112 f64 now, timeout = 1.0;
1113 uword *event_data = 0;
1118 vlib_process_wait_for_event_or_clock (vm, timeout);
1119 now = vlib_time_now (vm);
1120 event_type = vlib_process_get_events (vm, (uword **) & event_data);
1124 case SESSION_Q_PROCESS_FLUSH_FRAMES:
1125 /* Flush the frames by updating all transports times */
1126 transport_update_time (now, 0);
1128 case SESSION_Q_PROCESS_STOP:
1132 /* Timed out. Update time for all transports to trigger all
1133 * outstanding retransmits. */
1134 transport_update_time (now, 0);
1137 vec_reset_length (event_data);
1143 VLIB_REGISTER_NODE (session_queue_process_node) =
1145 .function = session_queue_process,
1146 .type = VLIB_NODE_TYPE_PROCESS,
1147 .name = "session-queue-process",
1148 .state = VLIB_NODE_STATE_DISABLED,
1154 * fd.io coding-style-patch-verification: ON
1157 * eval: (c-set-style "gnu")