src/vnet/session/application_worker.c

   1 /*
   2  * Copyright (c) 2019 Cisco and/or its affiliates.
   3  * Licensed under the Apache License, Version 2.0 (the "License");
   4  * you may not use this file except in compliance with the License.
   5  * You may obtain a copy of the License at:
   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 #include <vnet/session/application.h>
  17 #include <vnet/session/application_interface.h>
  18 #include <vnet/session/session.h>
  19
  20 /**
  21  * Pool of workers associated to apps
  22  */
  23 static app_worker_t *app_workers;
  24
  25 app_worker_t *
  26 app_worker_alloc (application_t * app)
  27 {
  28   app_worker_t *app_wrk;
  29   pool_get (app_workers, app_wrk);
  30   clib_memset (app_wrk, 0, sizeof (*app_wrk));
  31   app_wrk->wrk_index = app_wrk - app_workers;
  32   app_wrk->app_index = app->app_index;
  33   app_wrk->wrk_map_index = ~0;
  34   app_wrk->connects_seg_manager = APP_INVALID_SEGMENT_MANAGER_INDEX;
  35   app_wrk->first_segment_manager = APP_INVALID_SEGMENT_MANAGER_INDEX;
  36   APP_DBG ("New app %v worker %u", app_get_name (app), app_wrk->wrk_index);
  37   return app_wrk;
  38 }
  39
  40 app_worker_t *
  41 app_worker_get (u32 wrk_index)
  42 {
  43   return pool_elt_at_index (app_workers, wrk_index);
  44 }
  45
  46 app_worker_t *
  47 app_worker_get_if_valid (u32 wrk_index)
  48 {
  49   if (pool_is_free_index (app_workers, wrk_index))
  50     return 0;
  51   return pool_elt_at_index (app_workers, wrk_index);
  52 }
  53
  54 void
  55 app_worker_free (app_worker_t * app_wrk)
  56 {
  57   application_t *app = application_get (app_wrk->app_index);
  58   vnet_unlisten_args_t _a, *a = &_a;
  59   u64 handle, *handles = 0;
  60   segment_manager_t *sm;
  61   u32 sm_index;
  62   int i;
  63   app_listener_t *al;
  64   session_t *ls;
  65
  66   /*
  67    *  Listener cleanup
  68    */
  69
  70   /* *INDENT-OFF* */
  71   hash_foreach (handle, sm_index, app_wrk->listeners_table, ({
  72     ls = listen_session_get_from_handle (handle);
  73     al = app_listener_get (app, ls->al_index);
  74     vec_add1 (handles, app_listener_handle (al));
  75     sm = segment_manager_get (sm_index);
  76     sm->app_wrk_index = SEGMENT_MANAGER_INVALID_APP_INDEX;
  77   }));
  78   /* *INDENT-ON* */
  79
  80   for (i = 0; i < vec_len (handles); i++)
  81     {
  82       a->app_index = app->app_index;
  83       a->wrk_map_index = app_wrk->wrk_map_index;
  84       a->handle = handles[i];
  85       /* seg manager is removed when unbind completes */
  86       (void) vnet_unlisten (a);
  87     }
  88
  89   /*
  90    * Connects segment manager cleanup
  91    */
  92
  93   if (app_wrk->connects_seg_manager != APP_INVALID_SEGMENT_MANAGER_INDEX)
  94     {
  95       sm = segment_manager_get (app_wrk->connects_seg_manager);
  96       sm->app_wrk_index = SEGMENT_MANAGER_INVALID_APP_INDEX;
  97       sm->first_is_protected = 0;
  98       segment_manager_init_del (sm);
  99     }
 100
 101   /* If first segment manager is used by a listener */
 102   if (app_wrk->first_segment_manager != APP_INVALID_SEGMENT_MANAGER_INDEX
 103       && app_wrk->first_segment_manager != app_wrk->connects_seg_manager)
 104     {
 105       sm = segment_manager_get (app_wrk->first_segment_manager);
 106       sm->first_is_protected = 0;
 107       sm->app_wrk_index = SEGMENT_MANAGER_INVALID_APP_INDEX;
 108       /* .. and has no fifos, e.g. it might be used for redirected sessions,
 109        * remove it */
 110       if (!segment_manager_has_fifos (sm))
 111         segment_manager_del (sm);
 112     }
 113
 114   pool_put (app_workers, app_wrk);
 115   if (CLIB_DEBUG)
 116     clib_memset (app_wrk, 0xfe, sizeof (*app_wrk));
 117 }
 118
 119 application_t *
 120 app_worker_get_app (u32 wrk_index)
 121 {
 122   app_worker_t *app_wrk;
 123   app_wrk = app_worker_get_if_valid (wrk_index);
 124   if (!app_wrk)
 125     return 0;
 126   return application_get_if_valid (app_wrk->app_index);
 127 }
 128
 129 static segment_manager_t *
 130 app_worker_alloc_segment_manager (app_worker_t * app_wrk)
 131 {
 132   segment_manager_t *sm = 0;
 133
 134   /* If the first segment manager is not in use, don't allocate a new one */
 135   if (app_wrk->first_segment_manager != APP_INVALID_SEGMENT_MANAGER_INDEX
 136       && app_wrk->first_segment_manager_in_use == 0)
 137     {
 138       sm = segment_manager_get (app_wrk->first_segment_manager);
 139       app_wrk->first_segment_manager_in_use = 1;
 140       return sm;
 141     }
 142
 143   sm = segment_manager_new ();
 144   sm->app_wrk_index = app_wrk->wrk_index;
 145
 146   return sm;
 147 }
 148
 149 static int
 150 app_worker_alloc_session_fifos (segment_manager_t * sm, session_t * s)
 151 {
 152   svm_fifo_t *rx_fifo = 0, *tx_fifo = 0;
 153   u32 fifo_segment_index;
 154   int rv;
 155
 156   if ((rv = segment_manager_alloc_session_fifos (sm, &rx_fifo, &tx_fifo,
 157                                                  &fifo_segment_index)))
 158     return rv;
 159
 160   rx_fifo->master_session_index = s->session_index;
 161   rx_fifo->master_thread_index = s->thread_index;
 162
 163   tx_fifo->master_session_index = s->session_index;
 164   tx_fifo->master_thread_index = s->thread_index;
 165
 166   s->rx_fifo = rx_fifo;
 167   s->tx_fifo = tx_fifo;
 168   return 0;
 169 }
 170
 171 int
 172 app_worker_init_listener (app_worker_t * app_wrk, session_t * ls)
 173 {
 174   segment_manager_t *sm;
 175
 176   /* Allocate segment manager. All sessions derived out of a listen session
 177    * have fifos allocated by the same segment manager. */
 178   if (!(sm = app_worker_alloc_segment_manager (app_wrk)))
 179     return -1;
 180
 181   /* Keep track of the segment manager for the listener or this worker */
 182   hash_set (app_wrk->listeners_table, listen_session_get_handle (ls),
 183             segment_manager_index (sm));
 184
 185   if (session_transport_service_type (ls) == TRANSPORT_SERVICE_CL)
 186     {
 187       if (!ls->rx_fifo && app_worker_alloc_session_fifos (sm, ls))
 188         return -1;
 189     }
 190   return 0;
 191 }
 192
 193 int
 194 app_worker_start_listen (app_worker_t * app_wrk,
 195                          app_listener_t * app_listener)
 196 {
 197   session_t *ls;
 198
 199   if (clib_bitmap_get (app_listener->workers, app_wrk->wrk_map_index))
 200     return VNET_API_ERROR_ADDRESS_IN_USE;
 201
 202   app_listener->workers = clib_bitmap_set (app_listener->workers,
 203                                            app_wrk->wrk_map_index, 1);
 204
 205   if (app_listener->session_index != SESSION_INVALID_INDEX)
 206     {
 207       ls = session_get (app_listener->session_index, 0);
 208       if (app_worker_init_listener (app_wrk, ls))
 209         return -1;
 210     }
 211
 212   if (app_listener->local_index != SESSION_INVALID_INDEX)
 213     {
 214       ls = session_get (app_listener->local_index, 0);
 215       if (app_worker_init_listener (app_wrk, ls))
 216         return -1;
 217     }
 218
 219   return 0;
 220 }
 221
 222 static void
 223 app_worker_stop_listen_session (app_worker_t * app_wrk, session_t * ls)
 224 {
 225   session_handle_t handle;
 226   segment_manager_t *sm;
 227   uword *sm_indexp;
 228
 229   handle = listen_session_get_handle (ls);
 230   sm_indexp = hash_get (app_wrk->listeners_table, handle);
 231   if (PREDICT_FALSE (!sm_indexp))
 232     return;
 233
 234   sm = segment_manager_get (*sm_indexp);
 235   if (app_wrk->first_segment_manager == *sm_indexp)
 236     {
 237       /* Delete sessions but don't remove segment manager */
 238       app_wrk->first_segment_manager_in_use = 0;
 239       segment_manager_del_sessions (sm);
 240     }
 241   else
 242     {
 243       segment_manager_init_del (sm);
 244     }
 245   hash_unset (app_wrk->listeners_table, handle);
 246 }
 247
 248 int
 249 app_worker_stop_listen (app_worker_t * app_wrk, app_listener_t * al)
 250 {
 251   session_t *ls;
 252
 253   if (!clib_bitmap_get (al->workers, app_wrk->wrk_map_index))
 254     return 0;
 255
 256   if (al->session_index != SESSION_INVALID_INDEX)
 257     {
 258       ls = listen_session_get (al->session_index);
 259       app_worker_stop_listen_session (app_wrk, ls);
 260     }
 261
 262   if (al->local_index != SESSION_INVALID_INDEX)
 263     {
 264       ls = listen_session_get (al->local_index);
 265       app_worker_stop_listen_session (app_wrk, ls);
 266     }
 267
 268   clib_bitmap_set_no_check (al->workers, app_wrk->wrk_map_index, 0);
 269   if (clib_bitmap_is_zero (al->workers))
 270     app_listener_cleanup (al);
 271
 272   return 0;
 273 }
 274
 275 int
 276 app_worker_init_accepted (session_t * s)
 277 {
 278   app_worker_t *app_wrk;
 279   segment_manager_t *sm;
 280   session_t *listener;
 281
 282   listener = listen_session_get (s->listener_index);
 283   app_wrk = application_listener_select_worker (listener);
 284   s->app_wrk_index = app_wrk->wrk_index;
 285
 286   sm = app_worker_get_listen_segment_manager (app_wrk, listener);
 287   if (app_worker_alloc_session_fifos (sm, s))
 288     return -1;
 289
 290   return 0;
 291 }
 292
 293 int
 294 app_worker_accept_notify (app_worker_t * app_wrk, session_t * s)
 295 {
 296   application_t *app = application_get (app_wrk->app_index);
 297   return app->cb_fns.session_accept_callback (s);
 298 }
 299
 300 int
 301 app_worker_init_connected (app_worker_t * app_wrk, session_t * s)
 302 {
 303   application_t *app = application_get (app_wrk->app_index);
 304   segment_manager_t *sm;
 305
 306   /* Allocate fifos for session, unless the app is a builtin proxy */
 307   if (!application_is_builtin_proxy (app))
 308     {
 309       sm = app_worker_get_connect_segment_manager (app_wrk);
 310       if (app_worker_alloc_session_fifos (sm, s))
 311         return -1;
 312     }
 313   return 0;
 314 }
 315
 316 int
 317 app_worker_connect_notify (app_worker_t * app_wrk, session_t * s, u32 opaque)
 318 {
 319   application_t *app = application_get (app_wrk->app_index);
 320   return app->cb_fns.session_connected_callback (app_wrk->wrk_index, opaque,
 321                                                  s, s == 0 /* is_fail */ );
 322 }
 323
 324 int
 325 app_worker_close_notify (app_worker_t * app_wrk, session_t * s)
 326 {
 327   application_t *app = application_get (app_wrk->app_index);
 328   app->cb_fns.session_disconnect_callback (s);
 329   return 0;
 330 }
 331
 332 int
 333 app_worker_builtin_rx (app_worker_t * app_wrk, session_t * s)
 334 {
 335   application_t *app = application_get (app_wrk->app_index);
 336   app->cb_fns.builtin_app_rx_callback (s);
 337   return 0;
 338 }
 339
 340 int
 341 app_worker_own_session (app_worker_t * app_wrk, session_t * s)
 342 {
 343   segment_manager_t *sm;
 344   svm_fifo_t *rxf, *txf;
 345
 346   if (s->session_state == SESSION_STATE_LISTENING)
 347     return application_change_listener_owner (s, app_wrk);
 348
 349   s->app_wrk_index = app_wrk->wrk_index;
 350
 351   rxf = s->rx_fifo;
 352   txf = s->tx_fifo;
 353
 354   if (!rxf || !txf)
 355     return 0;
 356
 357   s->rx_fifo = 0;
 358   s->tx_fifo = 0;
 359
 360   sm = app_worker_get_or_alloc_connect_segment_manager (app_wrk);
 361   if (app_worker_alloc_session_fifos (sm, s))
 362     return -1;
 363
 364   if (!svm_fifo_is_empty (rxf))
 365     {
 366       clib_memcpy_fast (s->rx_fifo->data, rxf->data, rxf->nitems);
 367       s->rx_fifo->head = rxf->head;
 368       s->rx_fifo->tail = rxf->tail;
 369       s->rx_fifo->cursize = rxf->cursize;
 370     }
 371
 372   if (!svm_fifo_is_empty (txf))
 373     {
 374       clib_memcpy_fast (s->tx_fifo->data, txf->data, txf->nitems);
 375       s->tx_fifo->head = txf->head;
 376       s->tx_fifo->tail = txf->tail;
 377       s->tx_fifo->cursize = txf->cursize;
 378     }
 379
 380   segment_manager_dealloc_fifos (rxf, txf);
 381
 382   return 0;
 383 }
 384
 385 int
 386 app_worker_connect_session (app_worker_t * app, session_endpoint_t * sep,
 387                             u32 api_context)
 388 {
 389   int rv;
 390
 391   /* Make sure we have a segment manager for connects */
 392   app_worker_alloc_connects_segment_manager (app);
 393
 394   if ((rv = session_open (app->wrk_index, sep, api_context)))
 395     return rv;
 396
 397   return 0;
 398 }
 399
 400 int
 401 app_worker_alloc_connects_segment_manager (app_worker_t * app_wrk)
 402 {
 403   segment_manager_t *sm;
 404
 405   if (app_wrk->connects_seg_manager == APP_INVALID_SEGMENT_MANAGER_INDEX)
 406     {
 407       sm = app_worker_alloc_segment_manager (app_wrk);
 408       if (sm == 0)
 409         return -1;
 410       app_wrk->connects_seg_manager = segment_manager_index (sm);
 411     }
 412   return 0;
 413 }
 414
 415 segment_manager_t *
 416 app_worker_get_connect_segment_manager (app_worker_t * app)
 417 {
 418   ASSERT (app->connects_seg_manager != (u32) ~ 0);
 419   return segment_manager_get (app->connects_seg_manager);
 420 }
 421
 422 segment_manager_t *
 423 app_worker_get_or_alloc_connect_segment_manager (app_worker_t * app_wrk)
 424 {
 425   if (app_wrk->connects_seg_manager == (u32) ~ 0)
 426     app_worker_alloc_connects_segment_manager (app_wrk);
 427   return segment_manager_get (app_wrk->connects_seg_manager);
 428 }
 429
 430 segment_manager_t *
 431 app_worker_get_listen_segment_manager (app_worker_t * app,
 432                                        session_t * listener)
 433 {
 434   uword *smp;
 435   smp = hash_get (app->listeners_table, listen_session_get_handle (listener));
 436   ASSERT (smp != 0);
 437   return segment_manager_get (*smp);
 438 }
 439
 440 session_t *
 441 app_worker_first_listener (app_worker_t * app_wrk, u8 fib_proto,
 442                            u8 transport_proto)
 443 {
 444   session_t *listener;
 445   u64 handle;
 446   u32 sm_index;
 447   u8 sst;
 448
 449   sst = session_type_from_proto_and_ip (transport_proto,
 450                                         fib_proto == FIB_PROTOCOL_IP4);
 451
 452   /* *INDENT-OFF* */
 453    hash_foreach (handle, sm_index, app_wrk->listeners_table, ({
 454      listener = listen_session_get_from_handle (handle);
 455      if (listener->session_type == sst
 456          && listener->enqueue_epoch != SESSION_PROXY_LISTENER_INDEX)
 457        return listener;
 458    }));
 459   /* *INDENT-ON* */
 460
 461   return 0;
 462 }
 463
 464 session_t *
 465 app_worker_proxy_listener (app_worker_t * app_wrk, u8 fib_proto,
 466                            u8 transport_proto)
 467 {
 468   session_t *listener;
 469   u64 handle;
 470   u32 sm_index;
 471   u8 sst;
 472
 473   sst = session_type_from_proto_and_ip (transport_proto,
 474                                         fib_proto == FIB_PROTOCOL_IP4);
 475
 476   /* *INDENT-OFF* */
 477    hash_foreach (handle, sm_index, app_wrk->listeners_table, ({
 478      listener = listen_session_get_from_handle (handle);
 479      if (listener->session_type == sst
 480          && listener->enqueue_epoch == SESSION_PROXY_LISTENER_INDEX)
 481        return listener;
 482    }));
 483   /* *INDENT-ON* */
 484
 485   return 0;
 486 }
 487
 488 /**
 489  * Send an API message to the external app, to map new segment
 490  */
 491 int
 492 app_worker_add_segment_notify (app_worker_t * app_wrk, u64 segment_handle)
 493 {
 494   application_t *app = application_get (app_wrk->app_index);
 495   return app->cb_fns.add_segment_callback (app_wrk->api_client_index,
 496                                            segment_handle);
 497 }
 498
 499 int
 500 app_worker_del_segment_notify (app_worker_t * app_wrk, u64 segment_handle)
 501 {
 502   application_t *app = application_get (app_wrk->app_index);
 503   return app->cb_fns.del_segment_callback (app_wrk->api_client_index,
 504                                            segment_handle);
 505 }
 506
 507 static inline u8
 508 app_worker_application_is_builtin (app_worker_t * app_wrk)
 509 {
 510   return app_wrk->app_is_builtin;
 511 }
 512
 513 static inline int
 514 app_enqueue_evt (svm_msg_q_t * mq, svm_msg_q_msg_t * msg, u8 lock)
 515 {
 516   if (PREDICT_FALSE (svm_msg_q_is_full (mq)))
 517     {
 518       clib_warning ("evt q full");
 519       svm_msg_q_free_msg (mq, msg);
 520       if (lock)
 521         svm_msg_q_unlock (mq);
 522       return -1;
 523     }
 524
 525   if (lock)
 526     {
 527       svm_msg_q_add_and_unlock (mq, msg);
 528       return 0;
 529     }
 530
 531   /* Even when not locking the ring, we must wait for queue mutex */
 532   if (svm_msg_q_add (mq, msg, SVM_Q_WAIT))
 533     {
 534       clib_warning ("msg q add returned");
 535       return -1;
 536     }
 537   return 0;
 538 }
 539
 540 static inline int
 541 app_send_io_evt_rx (app_worker_t * app_wrk, session_t * s, u8 lock)
 542 {
 543   session_event_t *evt;
 544   svm_msg_q_msg_t msg;
 545   svm_msg_q_t *mq;
 546
 547   if (PREDICT_FALSE (s->session_state != SESSION_STATE_READY
 548                      && s->session_state != SESSION_STATE_LISTENING))
 549     {
 550       /* Session is closed so app will never clean up. Flush rx fifo */
 551       if (s->session_state == SESSION_STATE_CLOSED)
 552         svm_fifo_dequeue_drop_all (s->rx_fifo);
 553       return 0;
 554     }
 555
 556   if (app_worker_application_is_builtin (app_wrk))
 557     {
 558       application_t *app = application_get (app_wrk->app_index);
 559       return app->cb_fns.builtin_app_rx_callback (s);
 560     }
 561
 562   if (svm_fifo_has_event (s->rx_fifo))
 563     return 0;
 564
 565   mq = app_wrk->event_queue;
 566   if (lock)
 567     svm_msg_q_lock (mq);
 568
 569   if (PREDICT_FALSE (svm_msg_q_ring_is_full (mq, SESSION_MQ_IO_EVT_RING)))
 570     {
 571       clib_warning ("evt q rings full");
 572       if (lock)
 573         svm_msg_q_unlock (mq);
 574       return -1;
 575     }
 576
 577   msg = svm_msg_q_alloc_msg_w_ring (mq, SESSION_MQ_IO_EVT_RING);
 578   ASSERT (!svm_msg_q_msg_is_invalid (&msg));
 579
 580   evt = (session_event_t *) svm_msg_q_msg_data (mq, &msg);
 581   evt->session_index = s->rx_fifo->client_session_index;
 582   evt->event_type = SESSION_IO_EVT_RX;
 583
 584   (void) svm_fifo_set_event (s->rx_fifo);
 585
 586   if (app_enqueue_evt (mq, &msg, lock))
 587     return -1;
 588   return 0;
 589 }
 590
 591 static inline int
 592 app_send_io_evt_tx (app_worker_t * app_wrk, session_t * s, u8 lock)
 593 {
 594   svm_msg_q_t *mq;
 595   session_event_t *evt;
 596   svm_msg_q_msg_t msg;
 597
 598   if (app_worker_application_is_builtin (app_wrk))
 599     return 0;
 600
 601   mq = app_wrk->event_queue;
 602   if (lock)
 603     svm_msg_q_lock (mq);
 604
 605   if (PREDICT_FALSE (svm_msg_q_ring_is_full (mq, SESSION_MQ_IO_EVT_RING)))
 606     {
 607       clib_warning ("evt q rings full");
 608       if (lock)
 609         svm_msg_q_unlock (mq);
 610       return -1;
 611     }
 612
 613   msg = svm_msg_q_alloc_msg_w_ring (mq, SESSION_MQ_IO_EVT_RING);
 614   ASSERT (!svm_msg_q_msg_is_invalid (&msg));
 615
 616   evt = (session_event_t *) svm_msg_q_msg_data (mq, &msg);
 617   evt->event_type = SESSION_IO_EVT_TX;
 618   evt->session_index = s->tx_fifo->client_session_index;
 619
 620   return app_enqueue_evt (mq, &msg, lock);
 621 }
 622
 623 /* *INDENT-OFF* */
 624 typedef int (app_send_evt_handler_fn) (app_worker_t *app,
 625                                        session_t *s,
 626                                        u8 lock);
 627 static app_send_evt_handler_fn * const app_send_evt_handler_fns[2] = {
 628     app_send_io_evt_rx,
 629     app_send_io_evt_tx,
 630 };
 631 /* *INDENT-ON* */
 632
 633 /**
 634  * Send event to application
 635  *
 636  * Logic from queue perspective is non-blocking. If there's
 637  * not enough space to enqueue a message, we return.
 638  */
 639 int
 640 app_worker_send_event (app_worker_t * app, session_t * s, u8 evt_type)
 641 {
 642   ASSERT (app && evt_type <= SESSION_IO_EVT_TX);
 643   return app_send_evt_handler_fns[evt_type] (app, s, 0 /* lock */ );
 644 }
 645
 646 /**
 647  * Send event to application
 648  *
 649  * Logic from queue perspective is blocking. However, if queue is full,
 650  * we return.
 651  */
 652 int
 653 app_worker_lock_and_send_event (app_worker_t * app, session_t * s,
 654                                 u8 evt_type)
 655 {
 656   return app_send_evt_handler_fns[evt_type] (app, s, 1 /* lock */ );
 657 }
 658
 659 u8 *
 660 format_app_worker_listener (u8 * s, va_list * args)
 661 {
 662   app_worker_t *app_wrk = va_arg (*args, app_worker_t *);
 663   u64 handle = va_arg (*args, u64);
 664   u32 sm_index = va_arg (*args, u32);
 665   int verbose = va_arg (*args, int);
 666   session_t *listener;
 667   const u8 *app_name;
 668   u8 *str;
 669
 670   if (!app_wrk)
 671     {
 672       if (verbose)
 673         s = format (s, "%-40s%-25s%=10s%-15s%-15s%-10s", "Connection", "App",
 674                     "Wrk", "API Client", "ListenerID", "SegManager");
 675       else
 676         s = format (s, "%-40s%-25s%=10s", "Connection", "App", "Wrk");
 677
 678       return s;
 679     }
 680
 681   app_name = application_name_from_index (app_wrk->app_index);
 682   listener = listen_session_get_from_handle (handle);
 683   str = format (0, "%U", format_session, listener, verbose);
 684
 685   if (verbose)
 686     {
 687       char buf[32];
 688       sprintf (buf, "%u(%u)", app_wrk->wrk_map_index, app_wrk->wrk_index);
 689       s = format (s, "%-40s%-25s%=10s%-15u%-15u%-10u", str, app_name,
 690                   buf, app_wrk->api_client_index, handle, sm_index);
 691     }
 692   else
 693     s = format (s, "%-40s%-25s%=10u", str, app_name, app_wrk->wrk_map_index);
 694
 695   return s;
 696 }
 697
 698 u8 *
 699 format_app_worker (u8 * s, va_list * args)
 700 {
 701   app_worker_t *app_wrk = va_arg (*args, app_worker_t *);
 702   u32 indent = 1;
 703
 704   s = format (s, "%U wrk-index %u app-index %u map-index %u "
 705               "api-client-index %d\n", format_white_space, indent,
 706               app_wrk->wrk_index, app_wrk->app_index, app_wrk->wrk_map_index,
 707               app_wrk->api_client_index);
 708   return s;
 709 }
 710
 711 void
 712 app_worker_format_connects (app_worker_t * app_wrk, int verbose)
 713 {
 714   svm_fifo_segment_private_t *fifo_segment;
 715   vlib_main_t *vm = vlib_get_main ();
 716   segment_manager_t *sm;
 717   const u8 *app_name;
 718   u8 *s = 0;
 719
 720   /* Header */
 721   if (!app_wrk)
 722     {
 723       if (verbose)
 724         vlib_cli_output (vm, "%-40s%-20s%-15s%-10s", "Connection", "App",
 725                          "API Client", "SegManager");
 726       else
 727         vlib_cli_output (vm, "%-40s%-20s", "Connection", "App");
 728       return;
 729     }
 730
 731   if (app_wrk->connects_seg_manager == (u32) ~ 0)
 732     return;
 733
 734   app_name = application_name_from_index (app_wrk->app_index);
 735
 736   /* Across all fifo segments */
 737   sm = segment_manager_get (app_wrk->connects_seg_manager);
 738
 739   /* *INDENT-OFF* */
 740   segment_manager_foreach_segment_w_lock (fifo_segment, sm, ({
 741     svm_fifo_t *fifo;
 742     u8 *str;
 743
 744     fifo = svm_fifo_segment_get_fifo_list (fifo_segment);
 745     while (fifo)
 746       {
 747         u32 session_index, thread_index;
 748         session_t *session;
 749
 750         session_index = fifo->master_session_index;
 751         thread_index = fifo->master_thread_index;
 752
 753         session = session_get (session_index, thread_index);
 754         str = format (0, "%U", format_session, session, verbose);
 755
 756         if (verbose)
 757           s = format (s, "%-40s%-20s%-15u%-10u", str, app_name,
 758                       app_wrk->api_client_index, app_wrk->connects_seg_manager);
 759         else
 760           s = format (s, "%-40s%-20s", str, app_name);
 761
 762         vlib_cli_output (vm, "%v", s);
 763         vec_reset_length (s);
 764         vec_free (str);
 765
 766         fifo = fifo->next;
 767       }
 768     vec_free (s);
 769   }));
 770   /* *INDENT-ON* */
 771 }
 772
 773 /*
 774  * fd.io coding-style-patch-verification: ON
 775  *
 776  * Local Variables:
 777  * eval: (c-set-style "gnu")
 778  * End:
 779  */