src/vnet/session/session.c

   1 /*
   2  * Copyright (c) 2017-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:
   6  *
   7  *     http://www.apache.org/licenses/LICENSE-2.0
   8  *
   9  * Unless required by applicable law or agreed to in writing, software
  10  * distributed under the License is distributed on an "AS IS" BASIS,
  11  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  12  * See the License for the specific language governing permissions and
  13  * limitations under the License.
  14  */
  15 /**
  16  * @file
  17  * @brief Session and session manager
  18  */
  19
  20 #include <vnet/session/session.h>
  21 #include <vnet/session/application.h>
  22 #include <vnet/dpo/load_balance.h>
  23 #include <vnet/fib/ip4_fib.h>
  24
  25 session_main_t session_main;
  26
  27 static inline int
  28 session_send_evt_to_thread (void *data, void *args, u32 thread_index,
  29                             session_evt_type_t evt_type)
  30 {
  31   session_worker_t *wrk = session_main_get_worker (thread_index);
  32   session_event_t *evt;
  33   svm_msg_q_msg_t msg;
  34   svm_msg_q_t *mq;
  35
  36   mq = wrk->vpp_event_queue;
  37   if (PREDICT_FALSE (svm_msg_q_lock (mq)))
  38     return -1;
  39   if (PREDICT_FALSE (svm_msg_q_is_full (mq)
  40                      || svm_msg_q_ring_is_full (mq, SESSION_MQ_IO_EVT_RING)))
  41     {
  42       svm_msg_q_unlock (mq);
  43       return -2;
  44     }
  45   switch (evt_type)
  46     {
  47     case SESSION_CTRL_EVT_RPC:
  48       msg = svm_msg_q_alloc_msg_w_ring (mq, SESSION_MQ_IO_EVT_RING);
  49       evt = (session_event_t *) svm_msg_q_msg_data (mq, &msg);
  50       evt->rpc_args.fp = data;
  51       evt->rpc_args.arg = args;
  52       break;
  53     case SESSION_IO_EVT_RX:
  54     case SESSION_IO_EVT_TX:
  55     case SESSION_IO_EVT_TX_FLUSH:
  56     case SESSION_IO_EVT_BUILTIN_RX:
  57       msg = svm_msg_q_alloc_msg_w_ring (mq, SESSION_MQ_IO_EVT_RING);
  58       evt = (session_event_t *) svm_msg_q_msg_data (mq, &msg);
  59       evt->session_index = *(u32 *) data;
  60       break;
  61     case SESSION_IO_EVT_BUILTIN_TX:
  62     case SESSION_CTRL_EVT_CLOSE:
  63     case SESSION_CTRL_EVT_RESET:
  64       msg = svm_msg_q_alloc_msg_w_ring (mq, SESSION_MQ_IO_EVT_RING);
  65       evt = (session_event_t *) svm_msg_q_msg_data (mq, &msg);
  66       evt->session_handle = session_handle ((session_t *) data);
  67       break;
  68     default:
  69       clib_warning ("evt unhandled!");
  70       svm_msg_q_unlock (mq);
  71       return -1;
  72     }
  73   evt->event_type = evt_type;
  74
  75   svm_msg_q_add_and_unlock (mq, &msg);
  76
  77   if (PREDICT_FALSE (wrk->state == SESSION_WRK_INTERRUPT))
  78     vlib_node_set_interrupt_pending (wrk->vm, session_queue_node.index);
  79
  80   return 0;
  81 }
  82
  83 int
  84 session_send_io_evt_to_thread (svm_fifo_t * f, session_evt_type_t evt_type)
  85 {
  86   return session_send_evt_to_thread (&f->shr->master_session_index, 0,
  87                                      f->master_thread_index, evt_type);
  88 }
  89
  90 int
  91 session_send_io_evt_to_thread_custom (void *data, u32 thread_index,
  92                                       session_evt_type_t evt_type)
  93 {
  94   return session_send_evt_to_thread (data, 0, thread_index, evt_type);
  95 }
  96
  97 int
  98 session_send_ctrl_evt_to_thread (session_t * s, session_evt_type_t evt_type)
  99 {
 100   /* only events supported are disconnect, shutdown and reset */
 101   ASSERT (evt_type == SESSION_CTRL_EVT_CLOSE ||
 102           evt_type == SESSION_CTRL_EVT_HALF_CLOSE ||
 103           evt_type == SESSION_CTRL_EVT_RESET);
 104   return session_send_evt_to_thread (s, 0, s->thread_index, evt_type);
 105 }
 106
 107 void
 108 session_send_rpc_evt_to_thread_force (u32 thread_index, void *fp,
 109                                       void *rpc_args)
 110 {
 111   session_send_evt_to_thread (fp, rpc_args, thread_index,
 112                               SESSION_CTRL_EVT_RPC);
 113 }
 114
 115 void
 116 session_send_rpc_evt_to_thread (u32 thread_index, void *fp, void *rpc_args)
 117 {
 118   if (thread_index != vlib_get_thread_index ())
 119     session_send_rpc_evt_to_thread_force (thread_index, fp, rpc_args);
 120   else
 121     {
 122       void (*fnp) (void *) = fp;
 123       fnp (rpc_args);
 124     }
 125 }
 126
 127 void
 128 session_add_self_custom_tx_evt (transport_connection_t * tc, u8 has_prio)
 129 {
 130   session_t *s = session_get (tc->s_index, tc->thread_index);
 131
 132   ASSERT (s->thread_index == vlib_get_thread_index ());
 133   ASSERT (s->session_state != SESSION_STATE_TRANSPORT_DELETED);
 134
 135   if (!(s->flags & SESSION_F_CUSTOM_TX))
 136     {
 137       s->flags |= SESSION_F_CUSTOM_TX;
 138       if (svm_fifo_set_event (s->tx_fifo)
 139           || transport_connection_is_descheduled (tc))
 140         {
 141           session_evt_elt_t *elt;
 142           session_worker_t *wrk;
 143
 144           wrk = session_main_get_worker (tc->thread_index);
 145           if (has_prio)
 146             elt = session_evt_alloc_new (wrk);
 147           else
 148             elt = session_evt_alloc_old (wrk);
 149           elt->evt.session_index = tc->s_index;
 150           elt->evt.event_type = SESSION_IO_EVT_TX;
 151           tc->flags &= ~TRANSPORT_CONNECTION_F_DESCHED;
 152
 153           if (PREDICT_FALSE (wrk->state == SESSION_WRK_INTERRUPT))
 154             vlib_node_set_interrupt_pending (wrk->vm,
 155                                              session_queue_node.index);
 156         }
 157     }
 158 }
 159
 160 void
 161 sesssion_reschedule_tx (transport_connection_t * tc)
 162 {
 163   session_worker_t *wrk = session_main_get_worker (tc->thread_index);
 164   session_evt_elt_t *elt;
 165
 166   ASSERT (tc->thread_index == vlib_get_thread_index ());
 167
 168   elt = session_evt_alloc_new (wrk);
 169   elt->evt.session_index = tc->s_index;
 170   elt->evt.event_type = SESSION_IO_EVT_TX;
 171
 172   if (PREDICT_FALSE (wrk->state == SESSION_WRK_INTERRUPT))
 173     vlib_node_set_interrupt_pending (wrk->vm, session_queue_node.index);
 174 }
 175
 176 static void
 177 session_program_transport_ctrl_evt (session_t * s, session_evt_type_t evt)
 178 {
 179   u32 thread_index = vlib_get_thread_index ();
 180   session_evt_elt_t *elt;
 181   session_worker_t *wrk;
 182
 183   /* If we are in the handler thread, or being called with the worker barrier
 184    * held, just append a new event to pending disconnects vector. */
 185   if (vlib_thread_is_main_w_barrier () || thread_index == s->thread_index)
 186     {
 187       wrk = session_main_get_worker (s->thread_index);
 188       elt = session_evt_alloc_ctrl (wrk);
 189       clib_memset (&elt->evt, 0, sizeof (session_event_t));
 190       elt->evt.session_handle = session_handle (s);
 191       elt->evt.event_type = evt;
 192
 193       if (PREDICT_FALSE (wrk->state == SESSION_WRK_INTERRUPT))
 194         vlib_node_set_interrupt_pending (wrk->vm, session_queue_node.index);
 195     }
 196   else
 197     session_send_ctrl_evt_to_thread (s, evt);
 198 }
 199
 200 session_t *
 201 session_alloc (u32 thread_index)
 202 {
 203   session_worker_t *wrk = &session_main.wrk[thread_index];
 204   session_t *s;
 205   u8 will_expand = 0;
 206   pool_get_aligned_will_expand (wrk->sessions, will_expand,
 207                                 CLIB_CACHE_LINE_BYTES);
 208   /* If we have peekers, let them finish */
 209   if (PREDICT_FALSE (will_expand && vlib_num_workers ()))
 210     {
 211       clib_rwlock_writer_lock (&wrk->peekers_rw_locks);
 212       pool_get_aligned (wrk->sessions, s, CLIB_CACHE_LINE_BYTES);
 213       clib_rwlock_writer_unlock (&wrk->peekers_rw_locks);
 214     }
 215   else
 216     {
 217       pool_get_aligned (wrk->sessions, s, CLIB_CACHE_LINE_BYTES);
 218     }
 219   clib_memset (s, 0, sizeof (*s));
 220   s->session_index = s - wrk->sessions;
 221   s->thread_index = thread_index;
 222   s->app_index = APP_INVALID_INDEX;
 223   return s;
 224 }
 225
 226 void
 227 session_free (session_t * s)
 228 {
 229   if (CLIB_DEBUG)
 230     {
 231       u8 thread_index = s->thread_index;
 232       clib_memset (s, 0xFA, sizeof (*s));
 233       pool_put (session_main.wrk[thread_index].sessions, s);
 234       return;
 235     }
 236   SESSION_EVT (SESSION_EVT_FREE, s);
 237   pool_put (session_main.wrk[s->thread_index].sessions, s);
 238 }
 239
 240 u8
 241 session_is_valid (u32 si, u8 thread_index)
 242 {
 243   session_t *s;
 244   transport_connection_t *tc;
 245
 246   s = pool_elt_at_index (session_main.wrk[thread_index].sessions, si);
 247
 248   if (s->thread_index != thread_index || s->session_index != si)
 249     return 0;
 250
 251   if (s->session_state == SESSION_STATE_TRANSPORT_DELETED
 252       || s->session_state <= SESSION_STATE_LISTENING)
 253     return 1;
 254
 255   if (s->session_state == SESSION_STATE_CONNECTING &&
 256       (s->flags & SESSION_F_HALF_OPEN))
 257     return 1;
 258
 259   tc = session_get_transport (s);
 260   if (s->connection_index != tc->c_index
 261       || s->thread_index != tc->thread_index || tc->s_index != si)
 262     return 0;
 263
 264   return 1;
 265 }
 266
 267 static void
 268 session_cleanup_notify (session_t * s, session_cleanup_ntf_t ntf)
 269 {
 270   app_worker_t *app_wrk;
 271
 272   app_wrk = app_worker_get_if_valid (s->app_wrk_index);
 273   if (!app_wrk)
 274     return;
 275   app_worker_cleanup_notify (app_wrk, s, ntf);
 276 }
 277
 278 void
 279 session_free_w_fifos (session_t * s)
 280 {
 281   session_cleanup_notify (s, SESSION_CLEANUP_SESSION);
 282   segment_manager_dealloc_fifos (s->rx_fifo, s->tx_fifo);
 283   session_free (s);
 284 }
 285
 286 /**
 287  * Cleans up session and lookup table.
 288  *
 289  * Transport connection must still be valid.
 290  */
 291 static void
 292 session_delete (session_t * s)
 293 {
 294   int rv;
 295
 296   /* Delete from the main lookup table. */
 297   if ((rv = session_lookup_del_session (s)))
 298     clib_warning ("session %u hash delete rv %d", s->session_index, rv);
 299
 300   session_free_w_fifos (s);
 301 }
 302
 303 void
 304 session_cleanup_half_open (session_handle_t ho_handle)
 305 {
 306   session_t *ho = session_get_from_handle (ho_handle);
 307
 308   /* App transports can migrate their half-opens */
 309   if (ho->flags & SESSION_F_IS_MIGRATING)
 310     {
 311       /* Session still migrating, move to closed state to signal that the
 312        * session should be removed. */
 313       if (ho->connection_index == ~0)
 314         {
 315           ho->session_state = SESSION_STATE_CLOSED;
 316           return;
 317         }
 318       /* Migrated transports are no longer half-opens */
 319       transport_cleanup (session_get_transport_proto (ho),
 320                          ho->connection_index, ho->app_index /* overloaded */);
 321     }
 322   else
 323     transport_cleanup_half_open (session_get_transport_proto (ho),
 324                                  ho->connection_index);
 325   session_free (ho);
 326 }
 327
 328 static void
 329 session_half_open_free (session_t *ho)
 330 {
 331   app_worker_t *app_wrk;
 332
 333   ASSERT (vlib_get_thread_index () <= 1);
 334   app_wrk = app_worker_get (ho->app_wrk_index);
 335   app_worker_del_half_open (app_wrk, ho);
 336   session_free (ho);
 337 }
 338
 339 static void
 340 session_half_open_free_rpc (void *args)
 341 {
 342   session_t *ho = ho_session_get (pointer_to_uword (args));
 343   session_half_open_free (ho);
 344 }
 345
 346 void
 347 session_half_open_delete_notify (transport_connection_t *tc)
 348 {
 349   /* Notification from ctrl thread accepted without rpc */
 350   if (!tc->thread_index)
 351     {
 352       session_half_open_free (ho_session_get (tc->s_index));
 353     }
 354   else
 355     {
 356       void *args = uword_to_pointer ((uword) tc->s_index, void *);
 357       session_send_rpc_evt_to_thread_force (0, session_half_open_free_rpc,
 358                                             args);
 359     }
 360 }
 361
 362 void
 363 session_half_open_migrate_notify (transport_connection_t *tc)
 364 {
 365   session_t *ho;
 366
 367   ho = ho_session_get (tc->s_index);
 368   ho->flags |= SESSION_F_IS_MIGRATING;
 369   ho->connection_index = ~0;
 370 }
 371
 372 int
 373 session_half_open_migrated_notify (transport_connection_t *tc)
 374 {
 375   session_t *ho;
 376
 377   ho = ho_session_get (tc->s_index);
 378
 379   /* App probably detached so the half-open must be cleaned up */
 380   if (ho->session_state == SESSION_STATE_CLOSED)
 381     {
 382       session_half_open_delete_notify (tc);
 383       return -1;
 384     }
 385   ho->connection_index = tc->c_index;
 386   /* Overload app index for half-open with new thread */
 387   ho->app_index = tc->thread_index;
 388   return 0;
 389 }
 390
 391 session_t *
 392 session_alloc_for_connection (transport_connection_t * tc)
 393 {
 394   session_t *s;
 395   u32 thread_index = tc->thread_index;
 396
 397   ASSERT (thread_index == vlib_get_thread_index ()
 398           || transport_protocol_is_cl (tc->proto));
 399
 400   s = session_alloc (thread_index);
 401   s->session_type = session_type_from_proto_and_ip (tc->proto, tc->is_ip4);
 402   s->session_state = SESSION_STATE_CLOSED;
 403
 404   /* Attach transport to session and vice versa */
 405   s->connection_index = tc->c_index;
 406   tc->s_index = s->session_index;
 407   return s;
 408 }
 409
 410 session_t *
 411 session_alloc_for_half_open (transport_connection_t *tc)
 412 {
 413   session_t *s;
 414
 415   s = ho_session_alloc ();
 416   s->session_type = session_type_from_proto_and_ip (tc->proto, tc->is_ip4);
 417   s->connection_index = tc->c_index;
 418   tc->s_index = s->session_index;
 419   return s;
 420 }
 421
 422 /**
 423  * Discards bytes from buffer chain
 424  *
 425  * It discards n_bytes_to_drop starting at first buffer after chain_b
 426  */
 427 always_inline void
 428 session_enqueue_discard_chain_bytes (vlib_main_t * vm, vlib_buffer_t * b,
 429                                      vlib_buffer_t ** chain_b,
 430                                      u32 n_bytes_to_drop)
 431 {
 432   vlib_buffer_t *next = *chain_b;
 433   u32 to_drop = n_bytes_to_drop;
 434   ASSERT (b->flags & VLIB_BUFFER_NEXT_PRESENT);
 435   while (to_drop && (next->flags & VLIB_BUFFER_NEXT_PRESENT))
 436     {
 437       next = vlib_get_buffer (vm, next->next_buffer);
 438       if (next->current_length > to_drop)
 439         {
 440           vlib_buffer_advance (next, to_drop);
 441           to_drop = 0;
 442         }
 443       else
 444         {
 445           to_drop -= next->current_length;
 446           next->current_length = 0;
 447         }
 448     }
 449   *chain_b = next;
 450
 451   if (to_drop == 0)
 452     b->total_length_not_including_first_buffer -= n_bytes_to_drop;
 453 }
 454
 455 /**
 456  * Enqueue buffer chain tail
 457  */
 458 always_inline int
 459 session_enqueue_chain_tail (session_t * s, vlib_buffer_t * b,
 460                             u32 offset, u8 is_in_order)
 461 {
 462   vlib_buffer_t *chain_b;
 463   u32 chain_bi, len, diff;
 464   vlib_main_t *vm = vlib_get_main ();
 465   u8 *data;
 466   u32 written = 0;
 467   int rv = 0;
 468
 469   if (is_in_order && offset)
 470     {
 471       diff = offset - b->current_length;
 472       if (diff > b->total_length_not_including_first_buffer)
 473         return 0;
 474       chain_b = b;
 475       session_enqueue_discard_chain_bytes (vm, b, &chain_b, diff);
 476       chain_bi = vlib_get_buffer_index (vm, chain_b);
 477     }
 478   else
 479     chain_bi = b->next_buffer;
 480
 481   do
 482     {
 483       chain_b = vlib_get_buffer (vm, chain_bi);
 484       data = vlib_buffer_get_current (chain_b);
 485       len = chain_b->current_length;
 486       if (!len)
 487         continue;
 488       if (is_in_order)
 489         {
 490           rv = svm_fifo_enqueue (s->rx_fifo, len, data);
 491           if (rv == len)
 492             {
 493               written += rv;
 494             }
 495           else if (rv < len)
 496             {
 497               return (rv > 0) ? (written + rv) : written;
 498             }
 499           else if (rv > len)
 500             {
 501               written += rv;
 502
 503               /* written more than what was left in chain */
 504               if (written > b->total_length_not_including_first_buffer)
 505                 return written;
 506
 507               /* drop the bytes that have already been delivered */
 508               session_enqueue_discard_chain_bytes (vm, b, &chain_b, rv - len);
 509             }
 510         }
 511       else
 512         {
 513           rv = svm_fifo_enqueue_with_offset (s->rx_fifo, offset, len, data);
 514           if (rv)
 515             {
 516               clib_warning ("failed to enqueue multi-buffer seg");
 517               return -1;
 518             }
 519           offset += len;
 520         }
 521     }
 522   while ((chain_bi = (chain_b->flags & VLIB_BUFFER_NEXT_PRESENT)
 523           ? chain_b->next_buffer : 0));
 524
 525   if (is_in_order)
 526     return written;
 527
 528   return 0;
 529 }
 530
 531 void
 532 session_fifo_tuning (session_t * s, svm_fifo_t * f,
 533                      session_ft_action_t act, u32 len)
 534 {
 535   if (s->flags & SESSION_F_CUSTOM_FIFO_TUNING)
 536     {
 537       app_worker_t *app_wrk = app_worker_get (s->app_wrk_index);
 538       app_worker_session_fifo_tuning (app_wrk, s, f, act, len);
 539       if (CLIB_ASSERT_ENABLE)
 540         {
 541           segment_manager_t *sm;
 542           sm = segment_manager_get (f->segment_manager);
 543           ASSERT (f->shr->size >= 4096);
 544           ASSERT (f->shr->size <= sm->max_fifo_size);
 545         }
 546     }
 547 }
 548
 549 /*
 550  * Enqueue data for delivery to session peer. Does not notify peer of enqueue
 551  * event but on request can queue notification events for later delivery by
 552  * calling stream_server_flush_enqueue_events().
 553  *
 554  * @param tc Transport connection which is to be enqueued data
 555  * @param b Buffer to be enqueued
 556  * @param offset Offset at which to start enqueueing if out-of-order
 557  * @param queue_event Flag to indicate if peer is to be notified or if event
 558  *                    is to be queued. The former is useful when more data is
 559  *                    enqueued and only one event is to be generated.
 560  * @param is_in_order Flag to indicate if data is in order
 561  * @return Number of bytes enqueued or a negative value if enqueueing failed.
 562  */
 563 int
 564 session_enqueue_stream_connection (transport_connection_t * tc,
 565                                    vlib_buffer_t * b, u32 offset,
 566                                    u8 queue_event, u8 is_in_order)
 567 {
 568   session_t *s;
 569   int enqueued = 0, rv, in_order_off;
 570
 571   s = session_get (tc->s_index, tc->thread_index);
 572
 573   if (is_in_order)
 574     {
 575       enqueued = svm_fifo_enqueue (s->rx_fifo,
 576                                    b->current_length,
 577                                    vlib_buffer_get_current (b));
 578       if (PREDICT_FALSE ((b->flags & VLIB_BUFFER_NEXT_PRESENT)
 579                          && enqueued >= 0))
 580         {
 581           in_order_off = enqueued > b->current_length ? enqueued : 0;
 582           rv = session_enqueue_chain_tail (s, b, in_order_off, 1);
 583           if (rv > 0)
 584             enqueued += rv;
 585         }
 586     }
 587   else
 588     {
 589       rv = svm_fifo_enqueue_with_offset (s->rx_fifo, offset,
 590                                          b->current_length,
 591                                          vlib_buffer_get_current (b));
 592       if (PREDICT_FALSE ((b->flags & VLIB_BUFFER_NEXT_PRESENT) && !rv))
 593         session_enqueue_chain_tail (s, b, offset + b->current_length, 0);
 594       /* if something was enqueued, report even this as success for ooo
 595        * segment handling */
 596       return rv;
 597     }
 598
 599   if (queue_event)
 600     {
 601       /* Queue RX event on this fifo. Eventually these will need to be flushed
 602        * by calling stream_server_flush_enqueue_events () */
 603       session_worker_t *wrk;
 604
 605       wrk = session_main_get_worker (s->thread_index);
 606       if (!(s->flags & SESSION_F_RX_EVT))
 607         {
 608           s->flags |= SESSION_F_RX_EVT;
 609           vec_add1 (wrk->session_to_enqueue[tc->proto], s->session_index);
 610         }
 611
 612       session_fifo_tuning (s, s->rx_fifo, SESSION_FT_ACTION_ENQUEUED, 0);
 613     }
 614
 615   return enqueued;
 616 }
 617
 618 int
 619 session_enqueue_dgram_connection (session_t * s,
 620                                   session_dgram_hdr_t * hdr,
 621                                   vlib_buffer_t * b, u8 proto, u8 queue_event)
 622 {
 623   int rv;
 624
 625   ASSERT (svm_fifo_max_enqueue_prod (s->rx_fifo)
 626           >= b->current_length + sizeof (*hdr));
 627
 628   if (PREDICT_TRUE (!(b->flags & VLIB_BUFFER_NEXT_PRESENT)))
 629     {
 630       /* *INDENT-OFF* */
 631       svm_fifo_seg_t segs[2] = {
 632           { (u8 *) hdr, sizeof (*hdr) },
 633           { vlib_buffer_get_current (b), b->current_length }
 634       };
 635       /* *INDENT-ON* */
 636
 637       rv = svm_fifo_enqueue_segments (s->rx_fifo, segs, 2,
 638                                       0 /* allow_partial */ );
 639     }
 640   else
 641     {
 642       vlib_main_t *vm = vlib_get_main ();
 643       svm_fifo_seg_t *segs = 0, *seg;
 644       vlib_buffer_t *it = b;
 645       u32 n_segs = 1;
 646
 647       vec_add2 (segs, seg, 1);
 648       seg->data = (u8 *) hdr;
 649       seg->len = sizeof (*hdr);
 650       while (it)
 651         {
 652           vec_add2 (segs, seg, 1);
 653           seg->data = vlib_buffer_get_current (it);
 654           seg->len = it->current_length;
 655           n_segs++;
 656           if (!(it->flags & VLIB_BUFFER_NEXT_PRESENT))
 657             break;
 658           it = vlib_get_buffer (vm, it->next_buffer);
 659         }
 660       rv = svm_fifo_enqueue_segments (s->rx_fifo, segs, n_segs,
 661                                       0 /* allow partial */ );
 662       vec_free (segs);
 663     }
 664
 665   if (queue_event && rv > 0)
 666     {
 667       /* Queue RX event on this fifo. Eventually these will need to be flushed
 668        * by calling stream_server_flush_enqueue_events () */
 669       session_worker_t *wrk;
 670
 671       wrk = session_main_get_worker (s->thread_index);
 672       if (!(s->flags & SESSION_F_RX_EVT))
 673         {
 674           s->flags |= SESSION_F_RX_EVT;
 675           vec_add1 (wrk->session_to_enqueue[proto], s->session_index);
 676         }
 677
 678       session_fifo_tuning (s, s->rx_fifo, SESSION_FT_ACTION_ENQUEUED, 0);
 679     }
 680   return rv > 0 ? rv : 0;
 681 }
 682
 683 int
 684 session_tx_fifo_peek_bytes (transport_connection_t * tc, u8 * buffer,
 685                             u32 offset, u32 max_bytes)
 686 {
 687   session_t *s = session_get (tc->s_index, tc->thread_index);
 688   return svm_fifo_peek (s->tx_fifo, offset, max_bytes, buffer);
 689 }
 690
 691 u32
 692 session_tx_fifo_dequeue_drop (transport_connection_t * tc, u32 max_bytes)
 693 {
 694   session_t *s = session_get (tc->s_index, tc->thread_index);
 695   u32 rv;
 696
 697   rv = svm_fifo_dequeue_drop (s->tx_fifo, max_bytes);
 698   session_fifo_tuning (s, s->tx_fifo, SESSION_FT_ACTION_DEQUEUED, rv);
 699
 700   if (svm_fifo_needs_deq_ntf (s->tx_fifo, max_bytes))
 701     session_dequeue_notify (s);
 702
 703   return rv;
 704 }
 705
 706 static inline int
 707 session_notify_subscribers (u32 app_index, session_t * s,
 708                             svm_fifo_t * f, session_evt_type_t evt_type)
 709 {
 710   app_worker_t *app_wrk;
 711   application_t *app;
 712   int i;
 713
 714   app = application_get (app_index);
 715   if (!app)
 716     return -1;
 717
 718   for (i = 0; i < f->shr->n_subscribers; i++)
 719     {
 720       app_wrk = application_get_worker (app, f->shr->subscribers[i]);
 721       if (!app_wrk)
 722         continue;
 723       if (app_worker_lock_and_send_event (app_wrk, s, evt_type))
 724         return -1;
 725     }
 726
 727   return 0;
 728 }
 729
 730 /**
 731  * Notify session peer that new data has been enqueued.
 732  *
 733  * @param s     Stream session for which the event is to be generated.
 734  * @param lock  Flag to indicate if call should lock message queue.
 735  *
 736  * @return 0 on success or negative number if failed to send notification.
 737  */
 738 static inline int
 739 session_enqueue_notify_inline (session_t * s)
 740 {
 741   app_worker_t *app_wrk;
 742   u32 session_index;
 743   u8 n_subscribers;
 744
 745   session_index = s->session_index;
 746   n_subscribers = svm_fifo_n_subscribers (s->rx_fifo);
 747
 748   app_wrk = app_worker_get_if_valid (s->app_wrk_index);
 749   if (PREDICT_FALSE (!app_wrk))
 750     {
 751       SESSION_DBG ("invalid s->app_index = %d", s->app_wrk_index);
 752       return 0;
 753     }
 754
 755   SESSION_EVT (SESSION_EVT_ENQ, s, svm_fifo_max_dequeue_prod (s->rx_fifo));
 756
 757   s->flags &= ~SESSION_F_RX_EVT;
 758
 759   /* Application didn't confirm accept yet */
 760   if (PREDICT_FALSE (s->session_state == SESSION_STATE_ACCEPTING))
 761     return 0;
 762
 763   if (PREDICT_FALSE (app_worker_lock_and_send_event (app_wrk, s,
 764                                                      SESSION_IO_EVT_RX)))
 765     return -1;
 766
 767   if (PREDICT_FALSE (n_subscribers))
 768     {
 769       s = session_get (session_index, vlib_get_thread_index ());
 770       return session_notify_subscribers (app_wrk->app_index, s,
 771                                          s->rx_fifo, SESSION_IO_EVT_RX);
 772     }
 773
 774   return 0;
 775 }
 776
 777 int
 778 session_enqueue_notify (session_t * s)
 779 {
 780   return session_enqueue_notify_inline (s);
 781 }
 782
 783 static void
 784 session_enqueue_notify_rpc (void *arg)
 785 {
 786   u32 session_index = pointer_to_uword (arg);
 787   session_t *s;
 788
 789   s = session_get_if_valid (session_index, vlib_get_thread_index ());
 790   if (!s)
 791     return;
 792
 793   session_enqueue_notify (s);
 794 }
 795
 796 /**
 797  * Like session_enqueue_notify, but can be called from a thread that does not
 798  * own the session.
 799  */
 800 void
 801 session_enqueue_notify_thread (session_handle_t sh)
 802 {
 803   u32 thread_index = session_thread_from_handle (sh);
 804   u32 session_index = session_index_from_handle (sh);
 805
 806   /*
 807    * Pass session index (u32) as opposed to handle (u64) in case pointers
 808    * are not 64-bit.
 809    */
 810   session_send_rpc_evt_to_thread (thread_index,
 811                                   session_enqueue_notify_rpc,
 812                                   uword_to_pointer (session_index, void *));
 813 }
 814
 815 int
 816 session_dequeue_notify (session_t * s)
 817 {
 818   app_worker_t *app_wrk;
 819
 820   svm_fifo_clear_deq_ntf (s->tx_fifo);
 821
 822   app_wrk = app_worker_get_if_valid (s->app_wrk_index);
 823   if (PREDICT_FALSE (!app_wrk))
 824     return -1;
 825
 826   if (PREDICT_FALSE (app_worker_lock_and_send_event (app_wrk, s,
 827                                                      SESSION_IO_EVT_TX)))
 828     return -1;
 829
 830   if (PREDICT_FALSE (s->tx_fifo->shr->n_subscribers))
 831     return session_notify_subscribers (app_wrk->app_index, s,
 832                                        s->tx_fifo, SESSION_IO_EVT_TX);
 833
 834   return 0;
 835 }
 836
 837 /**
 838  * Flushes queue of sessions that are to be notified of new data
 839  * enqueued events.
 840  *
 841  * @param thread_index Thread index for which the flush is to be performed.
 842  * @return 0 on success or a positive number indicating the number of
 843  *         failures due to API queue being full.
 844  */
 845 int
 846 session_main_flush_enqueue_events (u8 transport_proto, u32 thread_index)
 847 {
 848   session_worker_t *wrk = session_main_get_worker (thread_index);
 849   session_t *s;
 850   int i, errors = 0;
 851   u32 *indices;
 852
 853   indices = wrk->session_to_enqueue[transport_proto];
 854
 855   for (i = 0; i < vec_len (indices); i++)
 856     {
 857       s = session_get_if_valid (indices[i], thread_index);
 858       if (PREDICT_FALSE (!s))
 859         {
 860           errors++;
 861           continue;
 862         }
 863
 864       session_fifo_tuning (s, s->rx_fifo, SESSION_FT_ACTION_ENQUEUED,
 865                            0 /* TODO/not needed */ );
 866
 867       if (PREDICT_FALSE (session_enqueue_notify_inline (s)))
 868         errors++;
 869     }
 870
 871   vec_reset_length (indices);
 872   wrk->session_to_enqueue[transport_proto] = indices;
 873
 874   return errors;
 875 }
 876
 877 int
 878 session_main_flush_all_enqueue_events (u8 transport_proto)
 879 {
 880   vlib_thread_main_t *vtm = vlib_get_thread_main ();
 881   int i, errors = 0;
 882   for (i = 0; i < 1 + vtm->n_threads; i++)
 883     errors += session_main_flush_enqueue_events (transport_proto, i);
 884   return errors;
 885 }
 886
 887 int
 888 session_stream_connect_notify (transport_connection_t * tc,
 889                                session_error_t err)
 890 {
 891   u32 opaque = 0, new_ti, new_si;
 892   app_worker_t *app_wrk;
 893   session_t *s = 0, *ho;
 894
 895   /*
 896    * Cleanup half-open table
 897    */
 898   session_lookup_del_half_open (tc);
 899
 900   ho = ho_session_get (tc->s_index);
 901   opaque = ho->opaque;
 902   app_wrk = app_worker_get_if_valid (ho->app_wrk_index);
 903   if (!app_wrk)
 904     return -1;
 905
 906   if (err)
 907     return app_worker_connect_notify (app_wrk, s, err, opaque);
 908
 909   s = session_alloc_for_connection (tc);
 910   s->session_state = SESSION_STATE_CONNECTING;
 911   s->app_wrk_index = app_wrk->wrk_index;
 912   new_si = s->session_index;
 913   new_ti = s->thread_index;
 914
 915   if ((err = app_worker_init_connected (app_wrk, s)))
 916     {
 917       session_free (s);
 918       app_worker_connect_notify (app_wrk, 0, err, opaque);
 919       return -1;
 920     }
 921
 922   s = session_get (new_si, new_ti);
 923   s->session_state = SESSION_STATE_READY;
 924   session_lookup_add_connection (tc, session_handle (s));
 925
 926   if (app_worker_connect_notify (app_wrk, s, SESSION_E_NONE, opaque))
 927     {
 928       session_lookup_del_connection (tc);
 929       /* Avoid notifying app about rejected session cleanup */
 930       s = session_get (new_si, new_ti);
 931       segment_manager_dealloc_fifos (s->rx_fifo, s->tx_fifo);
 932       session_free (s);
 933       return -1;
 934     }
 935
 936   return 0;
 937 }
 938
 939 typedef union session_switch_pool_reply_args_
 940 {
 941   struct
 942   {
 943     u32 session_index;
 944     u16 thread_index;
 945     u8 is_closed;
 946   };
 947   u64 as_u64;
 948 } session_switch_pool_reply_args_t;
 949
 950 STATIC_ASSERT (sizeof (session_switch_pool_reply_args_t) <= sizeof (uword),
 951                "switch pool reply args size");
 952
 953 static void
 954 session_switch_pool_reply (void *arg)
 955 {
 956   session_switch_pool_reply_args_t rargs;
 957   session_t *s;
 958
 959   rargs.as_u64 = pointer_to_uword (arg);
 960   s = session_get_if_valid (rargs.session_index, rargs.thread_index);
 961   if (!s)
 962     return;
 963
 964   /* Session closed during migration. Clean everything up */
 965   if (rargs.is_closed)
 966     {
 967       transport_cleanup (session_get_transport_proto (s), s->connection_index,
 968                          s->thread_index);
 969       segment_manager_dealloc_fifos (s->rx_fifo, s->tx_fifo);
 970       session_free (s);
 971       return;
 972     }
 973
 974   /* Notify app that it has data on the new session */
 975   session_enqueue_notify (s);
 976 }
 977
 978 typedef struct _session_switch_pool_args
 979 {
 980   u32 session_index;
 981   u32 thread_index;
 982   u32 new_thread_index;
 983   u32 new_session_index;
 984 } session_switch_pool_args_t;
 985
 986 /**
 987  * Notify old thread of the session pool switch
 988  */
 989 static void
 990 session_switch_pool (void *cb_args)
 991 {
 992   session_switch_pool_args_t *args = (session_switch_pool_args_t *) cb_args;
 993   session_switch_pool_reply_args_t rargs;
 994   session_handle_t new_sh;
 995   segment_manager_t *sm;
 996   app_worker_t *app_wrk;
 997   session_t *s;
 998
 999   ASSERT (args->thread_index == vlib_get_thread_index ());
1000   s = session_get (args->session_index, args->thread_index);
1001
1002   /* Check if session closed during migration */
1003   rargs.is_closed = s->session_state >= SESSION_STATE_TRANSPORT_CLOSING;
1004
1005   transport_cleanup (session_get_transport_proto (s), s->connection_index,
1006                      s->thread_index);
1007
1008   app_wrk = app_worker_get_if_valid (s->app_wrk_index);
1009   if (app_wrk)
1010     {
1011       /* Cleanup fifo segment slice state for fifos */
1012       sm = app_worker_get_connect_segment_manager (app_wrk);
1013       segment_manager_detach_fifo (sm, &s->rx_fifo);
1014       segment_manager_detach_fifo (sm, &s->tx_fifo);
1015
1016       /* Notify app, using old session, about the migration event */
1017       if (!rargs.is_closed)
1018         {
1019           new_sh = session_make_handle (args->new_session_index,
1020                                         args->new_thread_index);
1021           app_worker_migrate_notify (app_wrk, s, new_sh);
1022         }
1023     }
1024
1025   /* Trigger app read and fifo updates on the new thread */
1026   rargs.session_index = args->new_session_index;
1027   rargs.thread_index = args->new_thread_index;
1028   session_send_rpc_evt_to_thread (args->new_thread_index,
1029                                   session_switch_pool_reply,
1030                                   uword_to_pointer (rargs.as_u64, void *));
1031
1032   session_free (s);
1033   clib_mem_free (cb_args);
1034 }
1035
1036 /**
1037  * Move dgram session to the right thread
1038  */
1039 int
1040 session_dgram_connect_notify (transport_connection_t * tc,
1041                               u32 old_thread_index, session_t ** new_session)
1042 {
1043   session_t *new_s;
1044   session_switch_pool_args_t *rpc_args;
1045   segment_manager_t *sm;
1046   app_worker_t *app_wrk;
1047
1048   /*
1049    * Clone half-open session to the right thread.
1050    */
1051   new_s = session_clone_safe (tc->s_index, old_thread_index);
1052   new_s->connection_index = tc->c_index;
1053   new_s->session_state = SESSION_STATE_READY;
1054   new_s->flags |= SESSION_F_IS_MIGRATING;
1055
1056   if (!(tc->flags & TRANSPORT_CONNECTION_F_NO_LOOKUP))
1057     session_lookup_add_connection (tc, session_handle (new_s));
1058
1059   app_wrk = app_worker_get_if_valid (new_s->app_wrk_index);
1060   if (app_wrk)
1061     {
1062       /* New set of fifos attached to the same shared memory */
1063       sm = app_worker_get_connect_segment_manager (app_wrk);
1064       segment_manager_attach_fifo (sm, &new_s->rx_fifo, new_s);
1065       segment_manager_attach_fifo (sm, &new_s->tx_fifo, new_s);
1066     }
1067
1068   /*
1069    * Ask thread owning the old session to clean it up and make us the tx
1070    * fifo owner
1071    */
1072   rpc_args = clib_mem_alloc (sizeof (*rpc_args));
1073   rpc_args->new_session_index = new_s->session_index;
1074   rpc_args->new_thread_index = new_s->thread_index;
1075   rpc_args->session_index = tc->s_index;
1076   rpc_args->thread_index = old_thread_index;
1077   session_send_rpc_evt_to_thread (rpc_args->thread_index, session_switch_pool,
1078                                   rpc_args);
1079
1080   tc->s_index = new_s->session_index;
1081   new_s->connection_index = tc->c_index;
1082   *new_session = new_s;
1083   return 0;
1084 }
1085
1086 /**
1087  * Notification from transport that connection is being closed.
1088  *
1089  * A disconnect is sent to application but state is not removed. Once
1090  * disconnect is acknowledged by application, session disconnect is called.
1091  * Ultimately this leads to close being called on transport (passive close).
1092  */
1093 void
1094 session_transport_closing_notify (transport_connection_t * tc)
1095 {
1096   app_worker_t *app_wrk;
1097   session_t *s;
1098
1099   s = session_get (tc->s_index, tc->thread_index);
1100   if (s->session_state >= SESSION_STATE_TRANSPORT_CLOSING)
1101     return;
1102
1103   /* Wait for reply from app before sending notification as the
1104    * accept might be rejected */
1105   if (s->session_state == SESSION_STATE_ACCEPTING)
1106     {
1107       s->session_state = SESSION_STATE_TRANSPORT_CLOSING;
1108       return;
1109     }
1110
1111   s->session_state = SESSION_STATE_TRANSPORT_CLOSING;
1112   app_wrk = app_worker_get (s->app_wrk_index);
1113   app_worker_close_notify (app_wrk, s);
1114 }
1115
1116 /**
1117  * Notification from transport that connection is being deleted
1118  *
1119  * This removes the session if it is still valid. It should be called only on
1120  * previously fully established sessions. For instance failed connects should
1121  * call stream_session_connect_notify and indicate that the connect has
1122  * failed.
1123  */
1124 void
1125 session_transport_delete_notify (transport_connection_t * tc)
1126 {
1127   session_t *s;
1128
1129   /* App might've been removed already */
1130   if (!(s = session_get_if_valid (tc->s_index, tc->thread_index)))
1131     return;
1132
1133   switch (s->session_state)
1134     {
1135     case SESSION_STATE_CREATED:
1136       /* Session was created but accept notification was not yet sent to the
1137        * app. Cleanup everything. */
1138       session_lookup_del_session (s);
1139       segment_manager_dealloc_fifos (s->rx_fifo, s->tx_fifo);
1140       session_free (s);
1141       break;
1142     case SESSION_STATE_ACCEPTING:
1143     case SESSION_STATE_TRANSPORT_CLOSING:
1144     case SESSION_STATE_CLOSING:
1145     case SESSION_STATE_TRANSPORT_CLOSED:
1146       /* If transport finishes or times out before we get a reply
1147        * from the app, mark transport as closed and wait for reply
1148        * before removing the session. Cleanup session table in advance
1149        * because transport will soon be closed and closed sessions
1150        * are assumed to have been removed from the lookup table */
1151       session_lookup_del_session (s);
1152       s->session_state = SESSION_STATE_TRANSPORT_DELETED;
1153       session_cleanup_notify (s, SESSION_CLEANUP_TRANSPORT);
1154       svm_fifo_dequeue_drop_all (s->tx_fifo);
1155       break;
1156     case SESSION_STATE_APP_CLOSED:
1157       /* Cleanup lookup table as transport needs to still be valid.
1158        * Program transport close to ensure that all session events
1159        * have been cleaned up. Once transport close is called, the
1160        * session is just removed because both transport and app have
1161        * confirmed the close*/
1162       session_lookup_del_session (s);
1163       s->session_state = SESSION_STATE_TRANSPORT_DELETED;
1164       session_cleanup_notify (s, SESSION_CLEANUP_TRANSPORT);
1165       svm_fifo_dequeue_drop_all (s->tx_fifo);
1166       session_program_transport_ctrl_evt (s, SESSION_CTRL_EVT_CLOSE);
1167       break;
1168     case SESSION_STATE_TRANSPORT_DELETED:
1169       break;
1170     case SESSION_STATE_CLOSED:
1171       session_cleanup_notify (s, SESSION_CLEANUP_TRANSPORT);
1172       session_delete (s);
1173       break;
1174     default:
1175       clib_warning ("session state %u", s->session_state);
1176       session_cleanup_notify (s, SESSION_CLEANUP_TRANSPORT);
1177       session_delete (s);
1178       break;
1179     }
1180 }
1181
1182 /**
1183  * Notification from transport that it is closed
1184  *
1185  * Should be called by transport, prior to calling delete notify, once it
1186  * knows that no more data will be exchanged. This could serve as an
1187  * early acknowledgment of an active close especially if transport delete
1188  * can be delayed a long time, e.g., tcp time-wait.
1189  */
1190 void
1191 session_transport_closed_notify (transport_connection_t * tc)
1192 {
1193   app_worker_t *app_wrk;
1194   session_t *s;
1195
1196   if (!(s = session_get_if_valid (tc->s_index, tc->thread_index)))
1197     return;
1198
1199   /* Transport thinks that app requested close but it actually didn't.
1200    * Can happen for tcp:
1201    * 1)if fin and rst are received in close succession.
1202    * 2)if app shutdown the connection.  */
1203   if (s->session_state == SESSION_STATE_READY)
1204     {
1205       session_transport_closing_notify (tc);
1206       svm_fifo_dequeue_drop_all (s->tx_fifo);
1207       s->session_state = SESSION_STATE_TRANSPORT_CLOSED;
1208     }
1209   /* If app close has not been received or has not yet resulted in
1210    * a transport close, only mark the session transport as closed */
1211   else if (s->session_state <= SESSION_STATE_CLOSING)
1212     {
1213       s->session_state = SESSION_STATE_TRANSPORT_CLOSED;
1214     }
1215   /* If app also closed, switch to closed */
1216   else if (s->session_state == SESSION_STATE_APP_CLOSED)
1217     s->session_state = SESSION_STATE_CLOSED;
1218
1219   app_wrk = app_worker_get_if_valid (s->app_wrk_index);
1220   if (app_wrk)
1221     app_worker_transport_closed_notify (app_wrk, s);
1222 }
1223
1224 /**
1225  * Notify application that connection has been reset.
1226  */
1227 void
1228 session_transport_reset_notify (transport_connection_t * tc)
1229 {
1230   app_worker_t *app_wrk;
1231   session_t *s;
1232
1233   s = session_get (tc->s_index, tc->thread_index);
1234   svm_fifo_dequeue_drop_all (s->tx_fifo);
1235   if (s->session_state >= SESSION_STATE_TRANSPORT_CLOSING)
1236     return;
1237   if (s->session_state == SESSION_STATE_ACCEPTING)
1238     {
1239       s->session_state = SESSION_STATE_TRANSPORT_CLOSING;
1240       return;
1241     }
1242   s->session_state = SESSION_STATE_TRANSPORT_CLOSING;
1243   app_wrk = app_worker_get (s->app_wrk_index);
1244   app_worker_reset_notify (app_wrk, s);
1245 }
1246
1247 int
1248 session_stream_accept_notify (transport_connection_t * tc)
1249 {
1250   app_worker_t *app_wrk;
1251   session_t *s;
1252
1253   s = session_get (tc->s_index, tc->thread_index);
1254   app_wrk = app_worker_get_if_valid (s->app_wrk_index);
1255   if (!app_wrk)
1256     return -1;
1257   if (s->session_state != SESSION_STATE_CREATED)
1258     return 0;
1259   s->session_state = SESSION_STATE_ACCEPTING;
1260   if (app_worker_accept_notify (app_wrk, s))
1261     {
1262       /* On transport delete, no notifications should be sent. Unless, the
1263        * accept is retried and successful. */
1264       s->session_state = SESSION_STATE_CREATED;
1265       return -1;
1266     }
1267   return 0;
1268 }
1269
1270 /**
1271  * Accept a stream session. Optionally ping the server by callback.
1272  */
1273 int
1274 session_stream_accept (transport_connection_t * tc, u32 listener_index,
1275                        u32 thread_index, u8 notify)
1276 {
1277   session_t *s;
1278   int rv;
1279
1280   s = session_alloc_for_connection (tc);
1281   s->listener_handle = ((u64) thread_index << 32) | (u64) listener_index;
1282   s->session_state = SESSION_STATE_CREATED;
1283
1284   if ((rv = app_worker_init_accepted (s)))
1285     {
1286       session_free (s);
1287       return rv;
1288     }
1289
1290   session_lookup_add_connection (tc, session_handle (s));
1291
1292   /* Shoulder-tap the server */
1293   if (notify)
1294     {
1295       app_worker_t *app_wrk = app_worker_get (s->app_wrk_index);
1296       if ((rv = app_worker_accept_notify (app_wrk, s)))
1297         {
1298           session_lookup_del_session (s);
1299           segment_manager_dealloc_fifos (s->rx_fifo, s->tx_fifo);
1300           session_free (s);
1301           return rv;
1302         }
1303     }
1304
1305   return 0;
1306 }
1307
1308 int
1309 session_dgram_accept (transport_connection_t * tc, u32 listener_index,
1310                       u32 thread_index)
1311 {
1312   app_worker_t *app_wrk;
1313   session_t *s;
1314   int rv;
1315
1316   s = session_alloc_for_connection (tc);
1317   s->listener_handle = ((u64) thread_index << 32) | (u64) listener_index;
1318
1319   if ((rv = app_worker_init_accepted (s)))
1320     {
1321       session_free (s);
1322       return rv;
1323     }
1324
1325   session_lookup_add_connection (tc, session_handle (s));
1326
1327   app_wrk = app_worker_get (s->app_wrk_index);
1328   if ((rv = app_worker_accept_notify (app_wrk, s)))
1329     {
1330       session_lookup_del_session (s);
1331       segment_manager_dealloc_fifos (s->rx_fifo, s->tx_fifo);
1332       session_free (s);
1333       return rv;
1334     }
1335
1336   return 0;
1337 }
1338
1339 int
1340 session_open_cl (session_endpoint_cfg_t *rmt, session_handle_t *rsh)
1341 {
1342   transport_connection_t *tc;
1343   transport_endpoint_cfg_t *tep;
1344   app_worker_t *app_wrk;
1345   session_handle_t sh;
1346   session_t *s;
1347   int rv;
1348
1349   tep = session_endpoint_to_transport_cfg (rmt);
1350   rv = transport_connect (rmt->transport_proto, tep);
1351   if (rv < 0)
1352     {
1353       SESSION_DBG ("Transport failed to open connection.");
1354       return rv;
1355     }
1356
1357   tc = transport_get_half_open (rmt->transport_proto, (u32) rv);
1358
1359   /* For dgram type of service, allocate session and fifos now */
1360   app_wrk = app_worker_get (rmt->app_wrk_index);
1361   s = session_alloc_for_connection (tc);
1362   s->app_wrk_index = app_wrk->wrk_index;
1363   s->session_state = SESSION_STATE_OPENED;
1364   if (app_worker_init_connected (app_wrk, s))
1365     {
1366       session_free (s);
1367       return -1;
1368     }
1369
1370   sh = session_handle (s);
1371   *rsh = sh;
1372
1373   session_lookup_add_connection (tc, sh);
1374   return app_worker_connect_notify (app_wrk, s, SESSION_E_NONE, rmt->opaque);
1375 }
1376
1377 int
1378 session_open_vc (session_endpoint_cfg_t *rmt, session_handle_t *rsh)
1379 {
1380   transport_connection_t *tc;
1381   transport_endpoint_cfg_t *tep;
1382   app_worker_t *app_wrk;
1383   session_t *ho;
1384   int rv;
1385
1386   tep = session_endpoint_to_transport_cfg (rmt);
1387   rv = transport_connect (rmt->transport_proto, tep);
1388   if (rv < 0)
1389     {
1390       SESSION_DBG ("Transport failed to open connection.");
1391       return rv;
1392     }
1393
1394   tc = transport_get_half_open (rmt->transport_proto, (u32) rv);
1395
1396   app_wrk = app_worker_get (rmt->app_wrk_index);
1397
1398   /* If transport offers a vc service, only allocate established
1399    * session once the connection has been established.
1400    * In the meantime allocate half-open session for tracking purposes
1401    * associate half-open connection to it and add session to app-worker
1402    * half-open table. These are needed to allocate the established
1403    * session on transport notification, and to cleanup the half-open
1404    * session if the app detaches before connection establishment.
1405    */
1406   ho = session_alloc_for_half_open (tc);
1407   ho->app_wrk_index = app_wrk->wrk_index;
1408   ho->ho_index = app_worker_add_half_open (app_wrk, session_handle (ho));
1409   ho->opaque = rmt->opaque;
1410   *rsh = session_handle (ho);
1411
1412   if (!(tc->flags & TRANSPORT_CONNECTION_F_NO_LOOKUP))
1413     session_lookup_add_half_open (tc, tc->c_index);
1414
1415   return 0;
1416 }
1417
1418 int
1419 session_open_app (session_endpoint_cfg_t *rmt, session_handle_t *rsh)
1420 {
1421   transport_endpoint_cfg_t *tep_cfg = session_endpoint_to_transport_cfg (rmt);
1422
1423   /* Not supported for now */
1424   *rsh = SESSION_INVALID_HANDLE;
1425   return transport_connect (rmt->transport_proto, tep_cfg);
1426 }
1427
1428 typedef int (*session_open_service_fn) (session_endpoint_cfg_t *,
1429                                         session_handle_t *);
1430
1431 /* *INDENT-OFF* */
1432 static session_open_service_fn session_open_srv_fns[TRANSPORT_N_SERVICES] = {
1433   session_open_vc,
1434   session_open_cl,
1435   session_open_app,
1436 };
1437 /* *INDENT-ON* */
1438
1439 /**
1440  * Ask transport to open connection to remote transport endpoint.
1441  *
1442  * Stores handle for matching request with reply since the call can be
1443  * asynchronous. For instance, for TCP the 3-way handshake must complete
1444  * before reply comes. Session is only created once connection is established.
1445  *
1446  * @param app_index Index of the application requesting the connect
1447  * @param st Session type requested.
1448  * @param tep Remote transport endpoint
1449  * @param opaque Opaque data (typically, api_context) the application expects
1450  *               on open completion.
1451  */
1452 int
1453 session_open (session_endpoint_cfg_t *rmt, session_handle_t *rsh)
1454 {
1455   transport_service_type_t tst;
1456   tst = transport_protocol_service_type (rmt->transport_proto);
1457   return session_open_srv_fns[tst](rmt, rsh);
1458 }
1459
1460 /**
1461  * Ask transport to listen on session endpoint.
1462  *
1463  * @param s Session for which listen will be called. Note that unlike
1464  *          established sessions, listen sessions are not associated to a
1465  *          thread.
1466  * @param sep Local endpoint to be listened on.
1467  */
1468 int
1469 session_listen (session_t * ls, session_endpoint_cfg_t * sep)
1470 {
1471   transport_endpoint_t *tep;
1472   int tc_index;
1473   u32 s_index;
1474
1475   /* Transport bind/listen */
1476   tep = session_endpoint_to_transport (sep);
1477   s_index = ls->session_index;
1478   tc_index = transport_start_listen (session_get_transport_proto (ls),
1479                                      s_index, tep);
1480
1481   if (tc_index < 0)
1482     return tc_index;
1483
1484   /* Attach transport to session. Lookup tables are populated by the app
1485    * worker because local tables (for ct sessions) are not backed by a fib */
1486   ls = listen_session_get (s_index);
1487   ls->connection_index = tc_index;
1488
1489   return 0;
1490 }
1491
1492 /**
1493  * Ask transport to stop listening on local transport endpoint.
1494  *
1495  * @param s Session to stop listening on. It must be in state LISTENING.
1496  */
1497 int
1498 session_stop_listen (session_t * s)
1499 {
1500   transport_proto_t tp = session_get_transport_proto (s);
1501   transport_connection_t *tc;
1502
1503   if (s->session_state != SESSION_STATE_LISTENING)
1504     return SESSION_E_NOLISTEN;
1505
1506   tc = transport_get_listener (tp, s->connection_index);
1507
1508   /* If no transport, assume everything was cleaned up already */
1509   if (!tc)
1510     return SESSION_E_NONE;
1511
1512   if (!(tc->flags & TRANSPORT_CONNECTION_F_NO_LOOKUP))
1513     session_lookup_del_connection (tc);
1514
1515   transport_stop_listen (tp, s->connection_index);
1516   return 0;
1517 }
1518
1519 /**
1520  * Initialize session half-closing procedure.
1521  *
1522  * Note that half-closing will not change the state of the session.
1523  */
1524 void
1525 session_half_close (session_t *s)
1526 {
1527   if (!s)
1528     return;
1529
1530   session_program_transport_ctrl_evt (s, SESSION_CTRL_EVT_HALF_CLOSE);
1531 }
1532
1533 /**
1534  * Initialize session closing procedure.
1535  *
1536  * Request is always sent to session node to ensure that all outstanding
1537  * requests are served before transport is notified.
1538  */
1539 void
1540 session_close (session_t * s)
1541 {
1542   if (!s)
1543     return;
1544
1545   if (s->session_state >= SESSION_STATE_CLOSING)
1546     {
1547       /* Session will only be removed once both app and transport
1548        * acknowledge the close */
1549       if (s->session_state == SESSION_STATE_TRANSPORT_CLOSED
1550           || s->session_state == SESSION_STATE_TRANSPORT_DELETED)
1551         session_program_transport_ctrl_evt (s, SESSION_CTRL_EVT_CLOSE);
1552       return;
1553     }
1554
1555   /* App closed so stop propagating dequeue notifications */
1556   svm_fifo_clear_deq_ntf (s->tx_fifo);
1557   s->session_state = SESSION_STATE_CLOSING;
1558   session_program_transport_ctrl_evt (s, SESSION_CTRL_EVT_CLOSE);
1559 }
1560
1561 /**
1562  * Force a close without waiting for data to be flushed
1563  */
1564 void
1565 session_reset (session_t * s)
1566 {
1567   if (s->session_state >= SESSION_STATE_CLOSING)
1568     return;
1569   /* Drop all outstanding tx data */
1570   svm_fifo_dequeue_drop_all (s->tx_fifo);
1571   s->session_state = SESSION_STATE_CLOSING;
1572   session_program_transport_ctrl_evt (s, SESSION_CTRL_EVT_RESET);
1573 }
1574
1575 /**
1576  * Notify transport the session can be half-disconnected.
1577  *
1578  * Must be called from the session's thread.
1579  */
1580 void
1581 session_transport_half_close (session_t *s)
1582 {
1583   /* Only READY session can be half-closed */
1584   if (s->session_state != SESSION_STATE_READY)
1585     {
1586       return;
1587     }
1588
1589   transport_half_close (session_get_transport_proto (s), s->connection_index,
1590                         s->thread_index);
1591 }
1592
1593 /**
1594  * Notify transport the session can be disconnected. This should eventually
1595  * result in a delete notification that allows us to cleanup session state.
1596  * Called for both active/passive disconnects.
1597  *
1598  * Must be called from the session's thread.
1599  */
1600 void
1601 session_transport_close (session_t * s)
1602 {
1603   if (s->session_state >= SESSION_STATE_APP_CLOSED)
1604     {
1605       if (s->session_state == SESSION_STATE_TRANSPORT_CLOSED)
1606         s->session_state = SESSION_STATE_CLOSED;
1607       /* If transport is already deleted, just free the session */
1608       else if (s->session_state >= SESSION_STATE_TRANSPORT_DELETED)
1609         session_free_w_fifos (s);
1610       return;
1611     }
1612
1613   /* If the tx queue wasn't drained, the transport can continue to try
1614    * sending the outstanding data (in closed state it cannot). It MUST however
1615    * at one point, either after sending everything or after a timeout, call
1616    * delete notify. This will finally lead to the complete cleanup of the
1617    * session.
1618    */
1619   s->session_state = SESSION_STATE_APP_CLOSED;
1620
1621   transport_close (session_get_transport_proto (s), s->connection_index,
1622                    s->thread_index);
1623 }
1624
1625 /**
1626  * Force transport close
1627  */
1628 void
1629 session_transport_reset (session_t * s)
1630 {
1631   if (s->session_state >= SESSION_STATE_APP_CLOSED)
1632     {
1633       if (s->session_state == SESSION_STATE_TRANSPORT_CLOSED)
1634         s->session_state = SESSION_STATE_CLOSED;
1635       else if (s->session_state >= SESSION_STATE_TRANSPORT_DELETED)
1636         session_free_w_fifos (s);
1637       return;
1638     }
1639
1640   s->session_state = SESSION_STATE_APP_CLOSED;
1641   transport_reset (session_get_transport_proto (s), s->connection_index,
1642                    s->thread_index);
1643 }
1644
1645 /**
1646  * Cleanup transport and session state.
1647  *
1648  * Notify transport of the cleanup and free the session. This should
1649  * be called only if transport reported some error and is already
1650  * closed.
1651  */
1652 void
1653 session_transport_cleanup (session_t * s)
1654 {
1655   /* Delete from main lookup table before we axe the the transport */
1656   session_lookup_del_session (s);
1657   if (s->session_state != SESSION_STATE_TRANSPORT_DELETED)
1658     transport_cleanup (session_get_transport_proto (s), s->connection_index,
1659                        s->thread_index);
1660   /* Since we called cleanup, no delete notification will come. So, make
1661    * sure the session is properly freed. */
1662   segment_manager_dealloc_fifos (s->rx_fifo, s->tx_fifo);
1663   session_free (s);
1664 }
1665
1666 /**
1667  * Allocate worker mqs in share-able segment
1668  *
1669  * That can only be a newly created memfd segment, that must be mapped
1670  * by all apps/stack users unless private rx mqs are enabled.
1671  */
1672 void
1673 session_vpp_wrk_mqs_alloc (session_main_t *smm)
1674 {
1675   u32 mq_q_length = 2048, evt_size = sizeof (session_event_t);
1676   fifo_segment_t *mqs_seg = &smm->wrk_mqs_segment;
1677   svm_msg_q_cfg_t _cfg, *cfg = &_cfg;
1678   uword mqs_seg_size;
1679   int i;
1680
1681   mq_q_length = clib_max (mq_q_length, smm->configured_wrk_mq_length);
1682
1683   svm_msg_q_ring_cfg_t rc[SESSION_MQ_N_RINGS] = {
1684     { mq_q_length, evt_size, 0 }, { mq_q_length >> 1, 256, 0 }
1685   };
1686   cfg->consumer_pid = 0;
1687   cfg->n_rings = 2;
1688   cfg->q_nitems = mq_q_length;
1689   cfg->ring_cfgs = rc;
1690
1691   /*
1692    * Compute mqs segment size based on rings config and leave space
1693    * for passing extended configuration messages, i.e., data allocated
1694    * outside of the rings. If provided with a config value, accept it
1695    * if larger than minimum size.
1696    */
1697   mqs_seg_size = svm_msg_q_size_to_alloc (cfg) * vec_len (smm->wrk);
1698   mqs_seg_size = mqs_seg_size + (32 << 10);
1699   mqs_seg_size = clib_max (mqs_seg_size, smm->wrk_mqs_segment_size);
1700
1701   mqs_seg->ssvm.ssvm_size = mqs_seg_size;
1702   mqs_seg->ssvm.my_pid = getpid ();
1703   mqs_seg->ssvm.name = format (0, "%s%c", "session: wrk-mqs-segment", 0);
1704
1705   if (ssvm_server_init (&mqs_seg->ssvm, SSVM_SEGMENT_MEMFD))
1706     {
1707       clib_warning ("failed to initialize queue segment");
1708       return;
1709     }
1710
1711   fifo_segment_init (mqs_seg);
1712
1713   /* Special fifo segment that's filled only with mqs */
1714   mqs_seg->h->n_mqs = vec_len (smm->wrk);
1715
1716   for (i = 0; i < vec_len (smm->wrk); i++)
1717     smm->wrk[i].vpp_event_queue = fifo_segment_msg_q_alloc (mqs_seg, i, cfg);
1718 }
1719
1720 fifo_segment_t *
1721 session_main_get_wrk_mqs_segment (void)
1722 {
1723   return &session_main.wrk_mqs_segment;
1724 }
1725
1726 u64
1727 session_segment_handle (session_t * s)
1728 {
1729   svm_fifo_t *f;
1730
1731   if (!s->rx_fifo)
1732     return SESSION_INVALID_HANDLE;
1733
1734   f = s->rx_fifo;
1735   return segment_manager_make_segment_handle (f->segment_manager,
1736                                               f->segment_index);
1737 }
1738
1739 /* *INDENT-OFF* */
1740 static session_fifo_rx_fn *session_tx_fns[TRANSPORT_TX_N_FNS] = {
1741     session_tx_fifo_peek_and_snd,
1742     session_tx_fifo_dequeue_and_snd,
1743     session_tx_fifo_dequeue_internal,
1744     session_tx_fifo_dequeue_and_snd
1745 };
1746 /* *INDENT-ON* */
1747
1748 void
1749 session_register_transport (transport_proto_t transport_proto,
1750                             const transport_proto_vft_t * vft, u8 is_ip4,
1751                             u32 output_node)
1752 {
1753   session_main_t *smm = &session_main;
1754   session_type_t session_type;
1755   u32 next_index = ~0;
1756
1757   session_type = session_type_from_proto_and_ip (transport_proto, is_ip4);
1758
1759   vec_validate (smm->session_type_to_next, session_type);
1760   vec_validate (smm->session_tx_fns, session_type);
1761
1762   if (output_node != ~0)
1763     next_index = vlib_node_add_next (vlib_get_main (),
1764                                      session_queue_node.index, output_node);
1765
1766   smm->session_type_to_next[session_type] = next_index;
1767   smm->session_tx_fns[session_type] =
1768     session_tx_fns[vft->transport_options.tx_type];
1769 }
1770
1771 void
1772 session_register_update_time_fn (session_update_time_fn fn, u8 is_add)
1773 {
1774   session_main_t *smm = &session_main;
1775   session_update_time_fn *fi;
1776   u32 fi_pos = ~0;
1777   u8 found = 0;
1778
1779   vec_foreach (fi, smm->update_time_fns)
1780     {
1781       if (*fi == fn)
1782         {
1783           fi_pos = fi - smm->update_time_fns;
1784           found = 1;
1785           break;
1786         }
1787     }
1788
1789   if (is_add)
1790     {
1791       if (found)
1792         {
1793           clib_warning ("update time fn %p already registered", fn);
1794           return;
1795         }
1796       vec_add1 (smm->update_time_fns, fn);
1797     }
1798   else
1799     {
1800       vec_del1 (smm->update_time_fns, fi_pos);
1801     }
1802 }
1803
1804 transport_proto_t
1805 session_add_transport_proto (void)
1806 {
1807   session_main_t *smm = &session_main;
1808   session_worker_t *wrk;
1809   u32 thread;
1810
1811   smm->last_transport_proto_type += 1;
1812
1813   for (thread = 0; thread < vec_len (smm->wrk); thread++)
1814     {
1815       wrk = session_main_get_worker (thread);
1816       vec_validate (wrk->session_to_enqueue, smm->last_transport_proto_type);
1817     }
1818
1819   return smm->last_transport_proto_type;
1820 }
1821
1822 transport_connection_t *
1823 session_get_transport (session_t * s)
1824 {
1825   if (s->session_state != SESSION_STATE_LISTENING)
1826     return transport_get_connection (session_get_transport_proto (s),
1827                                      s->connection_index, s->thread_index);
1828   else
1829     return transport_get_listener (session_get_transport_proto (s),
1830                                    s->connection_index);
1831 }
1832
1833 void
1834 session_get_endpoint (session_t * s, transport_endpoint_t * tep, u8 is_lcl)
1835 {
1836   if (s->session_state != SESSION_STATE_LISTENING)
1837     return transport_get_endpoint (session_get_transport_proto (s),
1838                                    s->connection_index, s->thread_index, tep,
1839                                    is_lcl);
1840   else
1841     return transport_get_listener_endpoint (session_get_transport_proto (s),
1842                                             s->connection_index, tep, is_lcl);
1843 }
1844
1845 int
1846 session_transport_attribute (session_t *s, u8 is_get,
1847                              transport_endpt_attr_t *attr)
1848 {
1849   if (s->session_state < SESSION_STATE_READY)
1850     return -1;
1851
1852   return transport_connection_attribute (session_get_transport_proto (s),
1853                                          s->connection_index, s->thread_index,
1854                                          is_get, attr);
1855 }
1856
1857 transport_connection_t *
1858 listen_session_get_transport (session_t * s)
1859 {
1860   return transport_get_listener (session_get_transport_proto (s),
1861                                  s->connection_index);
1862 }
1863
1864 void
1865 session_queue_run_on_main_thread (vlib_main_t * vm)
1866 {
1867   ASSERT (vlib_get_thread_index () == 0);
1868   vlib_node_set_interrupt_pending (vm, session_queue_node.index);
1869 }
1870
1871 static clib_error_t *
1872 session_manager_main_enable (vlib_main_t * vm)
1873 {
1874   session_main_t *smm = &session_main;
1875   vlib_thread_main_t *vtm = vlib_get_thread_main ();
1876   u32 num_threads, preallocated_sessions_per_worker;
1877   session_worker_t *wrk;
1878   int i;
1879
1880   /* We only initialize once and do not de-initialized on disable */
1881   if (smm->is_initialized)
1882     goto done;
1883
1884   num_threads = 1 /* main thread */  + vtm->n_threads;
1885
1886   if (num_threads < 1)
1887     return clib_error_return (0, "n_thread_stacks not set");
1888
1889   /* Allocate cache line aligned worker contexts */
1890   vec_validate_aligned (smm->wrk, num_threads - 1, CLIB_CACHE_LINE_BYTES);
1891
1892   for (i = 0; i < num_threads; i++)
1893     {
1894       wrk = &smm->wrk[i];
1895       wrk->ctrl_head = clib_llist_make_head (wrk->event_elts, evt_list);
1896       wrk->new_head = clib_llist_make_head (wrk->event_elts, evt_list);
1897       wrk->old_head = clib_llist_make_head (wrk->event_elts, evt_list);
1898       wrk->pending_connects = clib_llist_make_head (wrk->event_elts, evt_list);
1899       wrk->vm = vlib_get_main_by_index (i);
1900       wrk->last_vlib_time = vlib_time_now (vm);
1901       wrk->last_vlib_us_time = wrk->last_vlib_time * CLIB_US_TIME_FREQ;
1902       wrk->timerfd = -1;
1903       vec_validate (wrk->session_to_enqueue, smm->last_transport_proto_type);
1904
1905       if (num_threads > 1)
1906         clib_rwlock_init (&smm->wrk[i].peekers_rw_locks);
1907
1908       if (!smm->no_adaptive && smm->use_private_rx_mqs)
1909         session_wrk_enable_adaptive_mode (wrk);
1910     }
1911
1912   /* Allocate vpp event queues segment and queue */
1913   session_vpp_wrk_mqs_alloc (smm);
1914
1915   /* Initialize segment manager properties */
1916   segment_manager_main_init ();
1917
1918   /* Preallocate sessions */
1919   if (smm->preallocated_sessions)
1920     {
1921       if (num_threads == 1)
1922         {
1923           pool_init_fixed (smm->wrk[0].sessions, smm->preallocated_sessions);
1924         }
1925       else
1926         {
1927           int j;
1928           preallocated_sessions_per_worker =
1929             (1.1 * (f64) smm->preallocated_sessions /
1930              (f64) (num_threads - 1));
1931
1932           for (j = 1; j < num_threads; j++)
1933             {
1934               pool_init_fixed (smm->wrk[j].sessions,
1935                                preallocated_sessions_per_worker);
1936             }
1937         }
1938     }
1939
1940   session_lookup_init ();
1941   app_namespaces_init ();
1942   transport_init ();
1943   smm->is_initialized = 1;
1944
1945 done:
1946
1947   smm->is_enabled = 1;
1948
1949   /* Enable transports */
1950   transport_enable_disable (vm, 1);
1951   session_debug_init ();
1952
1953   return 0;
1954 }
1955
1956 static void
1957 session_manager_main_disable (vlib_main_t * vm)
1958 {
1959   transport_enable_disable (vm, 0 /* is_en */ );
1960 }
1961
1962 void
1963 session_node_enable_disable (u8 is_en)
1964 {
1965   u8 mstate = is_en ? VLIB_NODE_STATE_INTERRUPT : VLIB_NODE_STATE_DISABLED;
1966   u8 state = is_en ? VLIB_NODE_STATE_POLLING : VLIB_NODE_STATE_DISABLED;
1967   session_main_t *sm = &session_main;
1968   vlib_main_t *vm;
1969   vlib_node_t *n;
1970   int n_vlibs, i;
1971
1972   n_vlibs = vlib_get_n_threads ();
1973   for (i = 0; i < n_vlibs; i++)
1974     {
1975       vm = vlib_get_main_by_index (i);
1976       /* main thread with workers and not polling */
1977       if (i == 0 && n_vlibs > 1)
1978         {
1979           vlib_node_set_state (vm, session_queue_node.index, mstate);
1980           if (is_en)
1981             {
1982               session_main_get_worker (0)->state = SESSION_WRK_INTERRUPT;
1983               vlib_node_set_state (vm, session_queue_process_node.index,
1984                                    state);
1985               n = vlib_get_node (vm, session_queue_process_node.index);
1986               vlib_start_process (vm, n->runtime_index);
1987             }
1988           else
1989             {
1990               vlib_process_signal_event_mt (vm,
1991                                             session_queue_process_node.index,
1992                                             SESSION_Q_PROCESS_STOP, 0);
1993             }
1994           if (!sm->poll_main)
1995             continue;
1996         }
1997       vlib_node_set_state (vm, session_queue_node.index, state);
1998     }
1999
2000   if (sm->use_private_rx_mqs)
2001     application_enable_rx_mqs_nodes (is_en);
2002 }
2003
2004 clib_error_t *
2005 vnet_session_enable_disable (vlib_main_t * vm, u8 is_en)
2006 {
2007   clib_error_t *error = 0;
2008   if (is_en)
2009     {
2010       if (session_main.is_enabled)
2011         return 0;
2012
2013       error = session_manager_main_enable (vm);
2014       session_node_enable_disable (is_en);
2015     }
2016   else
2017     {
2018       session_main.is_enabled = 0;
2019       session_manager_main_disable (vm);
2020       session_node_enable_disable (is_en);
2021     }
2022
2023   return error;
2024 }
2025
2026 clib_error_t *
2027 session_main_init (vlib_main_t * vm)
2028 {
2029   session_main_t *smm = &session_main;
2030
2031   smm->is_enabled = 0;
2032   smm->session_enable_asap = 0;
2033   smm->poll_main = 0;
2034   smm->use_private_rx_mqs = 0;
2035   smm->no_adaptive = 0;
2036   smm->last_transport_proto_type = TRANSPORT_PROTO_HTTP;
2037
2038   return 0;
2039 }
2040
2041 static clib_error_t *
2042 session_main_loop_init (vlib_main_t * vm)
2043 {
2044   session_main_t *smm = &session_main;
2045   if (smm->session_enable_asap)
2046     {
2047       vlib_worker_thread_barrier_sync (vm);
2048       vnet_session_enable_disable (vm, 1 /* is_en */ );
2049       vlib_worker_thread_barrier_release (vm);
2050     }
2051   return 0;
2052 }
2053
2054 VLIB_INIT_FUNCTION (session_main_init);
2055 VLIB_MAIN_LOOP_ENTER_FUNCTION (session_main_loop_init);
2056
2057 static clib_error_t *
2058 session_config_fn (vlib_main_t * vm, unformat_input_t * input)
2059 {
2060   session_main_t *smm = &session_main;
2061   u32 nitems;
2062   uword tmp;
2063
2064   while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
2065     {
2066       if (unformat (input, "wrk-mq-length %d", &nitems))
2067         {
2068           if (nitems >= 2048)
2069             smm->configured_wrk_mq_length = nitems;
2070           else
2071             clib_warning ("event queue length %d too small, ignored", nitems);
2072         }
2073       else if (unformat (input, "preallocated-sessions %d",
2074                          &smm->preallocated_sessions))
2075         ;
2076       else if (unformat (input, "v4-session-table-buckets %d",
2077                          &smm->configured_v4_session_table_buckets))
2078         ;
2079       else if (unformat (input, "v4-halfopen-table-buckets %d",
2080                          &smm->configured_v4_halfopen_table_buckets))
2081         ;
2082       else if (unformat (input, "v6-session-table-buckets %d",
2083                          &smm->configured_v6_session_table_buckets))
2084         ;
2085       else if (unformat (input, "v6-halfopen-table-buckets %d",
2086                          &smm->configured_v6_halfopen_table_buckets))
2087         ;
2088       else if (unformat (input, "v4-session-table-memory %U",
2089                          unformat_memory_size, &tmp))
2090         {
2091           if (tmp >= 0x100000000)
2092             return clib_error_return (0, "memory size %llx (%lld) too large",
2093                                       tmp, tmp);
2094           smm->configured_v4_session_table_memory = tmp;
2095         }
2096       else if (unformat (input, "v4-halfopen-table-memory %U",
2097                          unformat_memory_size, &tmp))
2098         {
2099           if (tmp >= 0x100000000)
2100             return clib_error_return (0, "memory size %llx (%lld) too large",
2101                                       tmp, tmp);
2102           smm->configured_v4_halfopen_table_memory = tmp;
2103         }
2104       else if (unformat (input, "v6-session-table-memory %U",
2105                          unformat_memory_size, &tmp))
2106         {
2107           if (tmp >= 0x100000000)
2108             return clib_error_return (0, "memory size %llx (%lld) too large",
2109                                       tmp, tmp);
2110           smm->configured_v6_session_table_memory = tmp;
2111         }
2112       else if (unformat (input, "v6-halfopen-table-memory %U",
2113                          unformat_memory_size, &tmp))
2114         {
2115           if (tmp >= 0x100000000)
2116             return clib_error_return (0, "memory size %llx (%lld) too large",
2117                                       tmp, tmp);
2118           smm->configured_v6_halfopen_table_memory = tmp;
2119         }
2120       else if (unformat (input, "local-endpoints-table-memory %U",
2121                          unformat_memory_size, &tmp))
2122         {
2123           if (tmp >= 0x100000000)
2124             return clib_error_return (0, "memory size %llx (%lld) too large",
2125                                       tmp, tmp);
2126           smm->local_endpoints_table_memory = tmp;
2127         }
2128       else if (unformat (input, "local-endpoints-table-buckets %d",
2129                          &smm->local_endpoints_table_buckets))
2130         ;
2131       else if (unformat (input, "enable"))
2132         smm->session_enable_asap = 1;
2133       else if (unformat (input, "use-app-socket-api"))
2134         (void) appns_sapi_enable_disable (1 /* is_enable */);
2135       else if (unformat (input, "poll-main"))
2136         smm->poll_main = 1;
2137       else if (unformat (input, "use-private-rx-mqs"))
2138         smm->use_private_rx_mqs = 1;
2139       else if (unformat (input, "no-adaptive"))
2140         smm->no_adaptive = 1;
2141       /*
2142        * Deprecated but maintained for compatibility
2143        */
2144       else if (unformat (input, "evt_qs_memfd_seg"))
2145         ;
2146       else if (unformat (input, "segment-baseva 0x%lx", &tmp))
2147         ;
2148       else if (unformat (input, "evt_qs_seg_size %U", unformat_memory_size,
2149                          &tmp))
2150         ;
2151       else if (unformat (input, "event-queue-length %d", &nitems))
2152         {
2153           if (nitems >= 2048)
2154             smm->configured_wrk_mq_length = nitems;
2155           else
2156             clib_warning ("event queue length %d too small, ignored", nitems);
2157         }
2158       else
2159         return clib_error_return (0, "unknown input `%U'",
2160                                   format_unformat_error, input);
2161     }
2162   return 0;
2163 }
2164
2165 VLIB_CONFIG_FUNCTION (session_config_fn, "session");
2166
2167 /*
2168  * fd.io coding-style-patch-verification: ON
2169  *
2170  * Local Variables:
2171  * eval: (c-set-style "gnu")
2172  * End:
2173  */