src/vnet/session/transport.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 #include <vnet/session/transport.h>
  17 #include <vnet/session/session.h>
  18 #include <vnet/fib/fib.h>
  19
  20 /**
  21  * Per-type vector of transport protocol virtual function tables
  22  */
  23 transport_proto_vft_t *tp_vfts;
  24
  25 /*
  26  * Port allocator seed
  27  */
  28 static u32 port_allocator_seed;
  29
  30 /*
  31  * Local endpoints table
  32  */
  33 static transport_endpoint_table_t local_endpoints_table;
  34
  35 /*
  36  * Pool of local endpoints
  37  */
  38 static transport_endpoint_t *local_endpoints;
  39
  40 /*
  41  * Local endpoints pool lock
  42  */
  43 static clib_spinlock_t local_endpoints_lock;
  44
  45 u8 *
  46 format_transport_proto (u8 * s, va_list * args)
  47 {
  48   u32 transport_proto = va_arg (*args, u32);
  49
  50   if (tp_vfts[transport_proto].transport_options.name)
  51     s = format (s, "%s", tp_vfts[transport_proto].transport_options.name);
  52   else
  53     s = format (s, "n/a");
  54
  55   return s;
  56 }
  57
  58 u8 *
  59 format_transport_proto_short (u8 * s, va_list * args)
  60 {
  61   u32 transport_proto = va_arg (*args, u32);
  62   char *short_name;
  63
  64   short_name = tp_vfts[transport_proto].transport_options.short_name;
  65   if (short_name)
  66     s = format (s, "%s", short_name);
  67   else
  68     s = format (s, "NA");
  69
  70   return s;
  71 }
  72
  73 u8 *
  74 format_transport_connection (u8 * s, va_list * args)
  75 {
  76   u32 transport_proto = va_arg (*args, u32);
  77   u32 conn_index = va_arg (*args, u32);
  78   u32 thread_index = va_arg (*args, u32);
  79   u32 verbose = va_arg (*args, u32);
  80   transport_proto_vft_t *tp_vft;
  81   transport_connection_t *tc;
  82   u32 indent;
  83
  84   tp_vft = transport_protocol_get_vft (transport_proto);
  85   if (!tp_vft)
  86     return s;
  87
  88   s = format (s, "%U", tp_vft->format_connection, conn_index, thread_index,
  89               verbose);
  90   tc = tp_vft->get_connection (conn_index, thread_index);
  91   if (tc && transport_connection_is_tx_paced (tc) && verbose > 1)
  92     {
  93       indent = format_get_indent (s) + 1;
  94       s = format (s, "%Upacer: %U\n", format_white_space, indent,
  95                   format_transport_pacer, &tc->pacer, tc->thread_index);
  96       s = format (s, "%Utransport: flags 0x%x\n", format_white_space, indent,
  97                   tc->flags);
  98     }
  99   return s;
 100 }
 101
 102 u8 *
 103 format_transport_listen_connection (u8 * s, va_list * args)
 104 {
 105   u32 transport_proto = va_arg (*args, u32);
 106   transport_proto_vft_t *tp_vft;
 107
 108   tp_vft = transport_protocol_get_vft (transport_proto);
 109   if (!tp_vft)
 110     return s;
 111
 112   s = (tp_vft->format_listener) (s, args);
 113   return s;
 114 }
 115
 116 u8 *
 117 format_transport_half_open_connection (u8 * s, va_list * args)
 118 {
 119   u32 transport_proto = va_arg (*args, u32);
 120   u32 listen_index = va_arg (*args, u32);
 121   transport_proto_vft_t *tp_vft;
 122
 123   tp_vft = transport_protocol_get_vft (transport_proto);
 124   if (!tp_vft)
 125     return s;
 126
 127   s = format (s, "%U", tp_vft->format_half_open, listen_index);
 128   return s;
 129 }
 130
 131 static u8
 132 unformat_transport_str_match (unformat_input_t * input, const char *str)
 133 {
 134   int i;
 135
 136   if (strlen (str) > vec_len (input->buffer) - input->index)
 137     return 0;
 138
 139   for (i = 0; i < strlen (str); i++)
 140     {
 141       if (input->buffer[i + input->index] != str[i])
 142         return 0;
 143     }
 144   return 1;
 145 }
 146
 147 uword
 148 unformat_transport_proto (unformat_input_t * input, va_list * args)
 149 {
 150   u32 *proto = va_arg (*args, u32 *);
 151   transport_proto_vft_t *tp_vft;
 152   u8 longest_match = 0, match;
 153   char *str, *str_match = 0;
 154   transport_proto_t tp;
 155
 156   for (tp = 0; tp < vec_len (tp_vfts); tp++)
 157     {
 158       tp_vft = &tp_vfts[tp];
 159       str = tp_vft->transport_options.name;
 160       if (!str)
 161         continue;
 162       if (unformat_transport_str_match (input, str))
 163         {
 164           match = strlen (str);
 165           if (match > longest_match)
 166             {
 167               *proto = tp;
 168               longest_match = match;
 169               str_match = str;
 170             }
 171         }
 172     }
 173   if (longest_match)
 174     {
 175       unformat (input, str_match);
 176       return 1;
 177     }
 178
 179   return 0;
 180 }
 181
 182 u8 *
 183 format_transport_protos (u8 * s, va_list * args)
 184 {
 185   transport_proto_vft_t *tp_vft;
 186
 187   vec_foreach (tp_vft, tp_vfts)
 188     s = format (s, "%s\n", tp_vft->transport_options.name);
 189
 190   return s;
 191 }
 192
 193 u32
 194 transport_endpoint_lookup (transport_endpoint_table_t * ht, u8 proto,
 195                            ip46_address_t * ip, u16 port)
 196 {
 197   clib_bihash_kv_24_8_t kv;
 198   int rv;
 199
 200   kv.key[0] = ip->as_u64[0];
 201   kv.key[1] = ip->as_u64[1];
 202   kv.key[2] = (u64) port << 8 | (u64) proto;
 203
 204   rv = clib_bihash_search_inline_24_8 (ht, &kv);
 205   if (rv == 0)
 206     return kv.value;
 207
 208   return ENDPOINT_INVALID_INDEX;
 209 }
 210
 211 void
 212 transport_endpoint_table_add (transport_endpoint_table_t * ht, u8 proto,
 213                               transport_endpoint_t * te, u32 value)
 214 {
 215   clib_bihash_kv_24_8_t kv;
 216
 217   kv.key[0] = te->ip.as_u64[0];
 218   kv.key[1] = te->ip.as_u64[1];
 219   kv.key[2] = (u64) te->port << 8 | (u64) proto;
 220   kv.value = value;
 221
 222   clib_bihash_add_del_24_8 (ht, &kv, 1);
 223 }
 224
 225 void
 226 transport_endpoint_table_del (transport_endpoint_table_t * ht, u8 proto,
 227                               transport_endpoint_t * te)
 228 {
 229   clib_bihash_kv_24_8_t kv;
 230
 231   kv.key[0] = te->ip.as_u64[0];
 232   kv.key[1] = te->ip.as_u64[1];
 233   kv.key[2] = (u64) te->port << 8 | (u64) proto;
 234
 235   clib_bihash_add_del_24_8 (ht, &kv, 0);
 236 }
 237
 238 void
 239 transport_register_protocol (transport_proto_t transport_proto,
 240                              const transport_proto_vft_t * vft,
 241                              fib_protocol_t fib_proto, u32 output_node)
 242 {
 243   u8 is_ip4 = fib_proto == FIB_PROTOCOL_IP4;
 244
 245   vec_validate (tp_vfts, transport_proto);
 246   tp_vfts[transport_proto] = *vft;
 247
 248   session_register_transport (transport_proto, vft, is_ip4, output_node);
 249 }
 250
 251 transport_proto_t
 252 transport_register_new_protocol (const transport_proto_vft_t * vft,
 253                                  fib_protocol_t fib_proto, u32 output_node)
 254 {
 255   transport_proto_t transport_proto;
 256   u8 is_ip4;
 257
 258   transport_proto = session_add_transport_proto ();
 259   is_ip4 = fib_proto == FIB_PROTOCOL_IP4;
 260
 261   vec_validate (tp_vfts, transport_proto);
 262   tp_vfts[transport_proto] = *vft;
 263
 264   session_register_transport (transport_proto, vft, is_ip4, output_node);
 265
 266   return transport_proto;
 267 }
 268
 269 /**
 270  * Get transport virtual function table
 271  *
 272  * @param type - session type (not protocol type)
 273  */
 274 transport_proto_vft_t *
 275 transport_protocol_get_vft (transport_proto_t transport_proto)
 276 {
 277   if (transport_proto >= vec_len (tp_vfts))
 278     return 0;
 279   return &tp_vfts[transport_proto];
 280 }
 281
 282 u8
 283 transport_half_open_has_fifos (transport_proto_t tp)
 284 {
 285   return tp_vfts[tp].transport_options.half_open_has_fifos;
 286 }
 287
 288 transport_service_type_t
 289 transport_protocol_service_type (transport_proto_t tp)
 290 {
 291   return tp_vfts[tp].transport_options.service_type;
 292 }
 293
 294 transport_tx_fn_type_t
 295 transport_protocol_tx_fn_type (transport_proto_t tp)
 296 {
 297   return tp_vfts[tp].transport_options.tx_type;
 298 }
 299
 300 void
 301 transport_cleanup (transport_proto_t tp, u32 conn_index, u8 thread_index)
 302 {
 303   tp_vfts[tp].cleanup (conn_index, thread_index);
 304 }
 305
 306 int
 307 transport_connect (transport_proto_t tp, transport_endpoint_cfg_t * tep)
 308 {
 309   return tp_vfts[tp].connect (tep);
 310 }
 311
 312 void
 313 transport_close (transport_proto_t tp, u32 conn_index, u8 thread_index)
 314 {
 315   tp_vfts[tp].close (conn_index, thread_index);
 316 }
 317
 318 void
 319 transport_reset (transport_proto_t tp, u32 conn_index, u8 thread_index)
 320 {
 321   if (tp_vfts[tp].reset)
 322     tp_vfts[tp].reset (conn_index, thread_index);
 323   else
 324     tp_vfts[tp].close (conn_index, thread_index);
 325 }
 326
 327 u32
 328 transport_start_listen (transport_proto_t tp, u32 session_index,
 329                         transport_endpoint_t * tep)
 330 {
 331   return tp_vfts[tp].start_listen (session_index, tep);
 332 }
 333
 334 u32
 335 transport_stop_listen (transport_proto_t tp, u32 conn_index)
 336 {
 337   return tp_vfts[tp].stop_listen (conn_index);
 338 }
 339
 340 u8
 341 transport_protocol_is_cl (transport_proto_t tp)
 342 {
 343   return (tp_vfts[tp].transport_options.service_type == TRANSPORT_SERVICE_CL);
 344 }
 345
 346 always_inline void
 347 default_get_transport_endpoint (transport_connection_t * tc,
 348                                 transport_endpoint_t * tep, u8 is_lcl)
 349 {
 350   if (is_lcl)
 351     {
 352       tep->port = tc->lcl_port;
 353       tep->is_ip4 = tc->is_ip4;
 354       clib_memcpy_fast (&tep->ip, &tc->lcl_ip, sizeof (tc->lcl_ip));
 355     }
 356   else
 357     {
 358       tep->port = tc->rmt_port;
 359       tep->is_ip4 = tc->is_ip4;
 360       clib_memcpy_fast (&tep->ip, &tc->rmt_ip, sizeof (tc->rmt_ip));
 361     }
 362 }
 363
 364 void
 365 transport_get_endpoint (transport_proto_t tp, u32 conn_index,
 366                         u32 thread_index, transport_endpoint_t * tep,
 367                         u8 is_lcl)
 368 {
 369   if (tp_vfts[tp].get_transport_endpoint)
 370     tp_vfts[tp].get_transport_endpoint (conn_index, thread_index, tep,
 371                                         is_lcl);
 372   else
 373     {
 374       transport_connection_t *tc;
 375       tc = transport_get_connection (tp, conn_index, thread_index);
 376       default_get_transport_endpoint (tc, tep, is_lcl);
 377     }
 378 }
 379
 380 void
 381 transport_get_listener_endpoint (transport_proto_t tp, u32 conn_index,
 382                                  transport_endpoint_t * tep, u8 is_lcl)
 383 {
 384   if (tp_vfts[tp].get_transport_listener_endpoint)
 385     tp_vfts[tp].get_transport_listener_endpoint (conn_index, tep, is_lcl);
 386   else
 387     {
 388       transport_connection_t *tc;
 389       tc = transport_get_listener (tp, conn_index);
 390       default_get_transport_endpoint (tc, tep, is_lcl);
 391     }
 392 }
 393
 394 #define PORT_MASK ((1 << 16)- 1)
 395
 396 void
 397 transport_endpoint_del (u32 tepi)
 398 {
 399   clib_spinlock_lock_if_init (&local_endpoints_lock);
 400   pool_put_index (local_endpoints, tepi);
 401   clib_spinlock_unlock_if_init (&local_endpoints_lock);
 402 }
 403
 404 always_inline transport_endpoint_t *
 405 transport_endpoint_new (void)
 406 {
 407   transport_endpoint_t *tep;
 408   pool_get_zero (local_endpoints, tep);
 409   return tep;
 410 }
 411
 412 void
 413 transport_endpoint_cleanup (u8 proto, ip46_address_t * lcl_ip, u16 port)
 414 {
 415   u32 tepi;
 416   transport_endpoint_t *tep;
 417
 418   /* Cleanup local endpoint if this was an active connect */
 419   tepi = transport_endpoint_lookup (&local_endpoints_table, proto, lcl_ip,
 420                                     clib_net_to_host_u16 (port));
 421   if (tepi != ENDPOINT_INVALID_INDEX)
 422     {
 423       tep = pool_elt_at_index (local_endpoints, tepi);
 424       transport_endpoint_table_del (&local_endpoints_table, proto, tep);
 425       transport_endpoint_del (tepi);
 426     }
 427 }
 428
 429 static void
 430 transport_endpoint_mark_used (u8 proto, ip46_address_t * ip, u16 port)
 431 {
 432   transport_endpoint_t *tep;
 433   clib_spinlock_lock_if_init (&local_endpoints_lock);
 434   tep = transport_endpoint_new ();
 435   clib_memcpy_fast (&tep->ip, ip, sizeof (*ip));
 436   tep->port = port;
 437   transport_endpoint_table_add (&local_endpoints_table, proto, tep,
 438                                 tep - local_endpoints);
 439   clib_spinlock_unlock_if_init (&local_endpoints_lock);
 440 }
 441
 442 /**
 443  * Allocate local port and add if successful add entry to local endpoint
 444  * table to mark the pair as used.
 445  */
 446 int
 447 transport_alloc_local_port (u8 proto, ip46_address_t * ip)
 448 {
 449   u16 min = 1024, max = 65535;  /* XXX configurable ? */
 450   int tries, limit;
 451   u32 tei;
 452
 453   limit = max - min;
 454
 455   /* Only support active opens from thread 0 */
 456   ASSERT (vlib_get_thread_index () == 0);
 457
 458   /* Search for first free slot */
 459   for (tries = 0; tries < limit; tries++)
 460     {
 461       u16 port = 0;
 462
 463       /* Find a port in the specified range */
 464       while (1)
 465         {
 466           port = random_u32 (&port_allocator_seed) & PORT_MASK;
 467           if (PREDICT_TRUE (port >= min && port < max))
 468             break;
 469         }
 470
 471       /* Look it up. If not found, we're done */
 472       tei = transport_endpoint_lookup (&local_endpoints_table, proto, ip,
 473                                        port);
 474       if (tei == ENDPOINT_INVALID_INDEX)
 475         {
 476           transport_endpoint_mark_used (proto, ip, port);
 477           return port;
 478         }
 479     }
 480   return -1;
 481 }
 482
 483 static clib_error_t *
 484 transport_get_interface_ip (u32 sw_if_index, u8 is_ip4, ip46_address_t * addr)
 485 {
 486   if (is_ip4)
 487     {
 488       ip4_address_t *ip4;
 489       ip4 = ip_interface_get_first_ip (sw_if_index, 1);
 490       if (!ip4)
 491         return clib_error_return (0, "no routable ip4 address on %U",
 492                                   format_vnet_sw_if_index_name,
 493                                   vnet_get_main (), sw_if_index);
 494       addr->ip4.as_u32 = ip4->as_u32;
 495     }
 496   else
 497     {
 498       ip6_address_t *ip6;
 499       ip6 = ip_interface_get_first_ip (sw_if_index, 0);
 500       if (ip6 == 0)
 501         return clib_error_return (0, "no routable ip6 addresses on %U",
 502                                   format_vnet_sw_if_index_name,
 503                                   vnet_get_main (), sw_if_index);
 504       clib_memcpy_fast (&addr->ip6, ip6, sizeof (*ip6));
 505     }
 506   return 0;
 507 }
 508
 509 static clib_error_t *
 510 transport_find_local_ip_for_remote (u32 sw_if_index,
 511                                     transport_endpoint_t * rmt,
 512                                     ip46_address_t * lcl_addr)
 513 {
 514   fib_node_index_t fei;
 515   fib_prefix_t prefix;
 516
 517   if (sw_if_index == ENDPOINT_INVALID_INDEX)
 518     {
 519       /* Find a FIB path to the destination */
 520       clib_memcpy_fast (&prefix.fp_addr, &rmt->ip, sizeof (rmt->ip));
 521       prefix.fp_proto = rmt->is_ip4 ? FIB_PROTOCOL_IP4 : FIB_PROTOCOL_IP6;
 522       prefix.fp_len = rmt->is_ip4 ? 32 : 128;
 523
 524       ASSERT (rmt->fib_index != ENDPOINT_INVALID_INDEX);
 525       fei = fib_table_lookup (rmt->fib_index, &prefix);
 526
 527       /* Couldn't find route to destination. Bail out. */
 528       if (fei == FIB_NODE_INDEX_INVALID)
 529         return clib_error_return (0, "no route to %U", format_ip46_address,
 530                                   &rmt->ip, (rmt->is_ip4 == 0) + 1);
 531
 532       sw_if_index = fib_entry_get_resolving_interface (fei);
 533       if (sw_if_index == ENDPOINT_INVALID_INDEX)
 534         return clib_error_return (0, "no resolving interface for %U",
 535                                   format_ip46_address, &rmt->ip,
 536                                   (rmt->is_ip4 == 0) + 1);
 537     }
 538
 539   clib_memset (lcl_addr, 0, sizeof (*lcl_addr));
 540   return transport_get_interface_ip (sw_if_index, rmt->is_ip4, lcl_addr);
 541 }
 542
 543 int
 544 transport_alloc_local_endpoint (u8 proto, transport_endpoint_cfg_t * rmt_cfg,
 545                                 ip46_address_t * lcl_addr, u16 * lcl_port)
 546 {
 547   transport_endpoint_t *rmt = (transport_endpoint_t *) rmt_cfg;
 548   clib_error_t *error;
 549   int port;
 550   u32 tei;
 551
 552   /*
 553    * Find the local address
 554    */
 555   if (ip_is_zero (&rmt_cfg->peer.ip, rmt_cfg->peer.is_ip4))
 556     {
 557       error = transport_find_local_ip_for_remote (rmt_cfg->peer.sw_if_index,
 558                                                   rmt, lcl_addr);
 559       if (error)
 560         {
 561           clib_error_report (error);
 562           return -1;
 563         }
 564     }
 565   else
 566     {
 567       /* Assume session layer vetted this address */
 568       clib_memcpy_fast (lcl_addr, &rmt_cfg->peer.ip,
 569                         sizeof (rmt_cfg->peer.ip));
 570     }
 571
 572   /*
 573    * Allocate source port
 574    */
 575   if (rmt_cfg->peer.port == 0)
 576     {
 577       port = transport_alloc_local_port (proto, lcl_addr);
 578       if (port < 1)
 579         {
 580           clib_warning ("Failed to allocate src port");
 581           return -1;
 582         }
 583       *lcl_port = port;
 584     }
 585   else
 586     {
 587       port = clib_net_to_host_u16 (rmt_cfg->peer.port);
 588       tei = transport_endpoint_lookup (&local_endpoints_table, proto,
 589                                        lcl_addr, port);
 590       if (tei != ENDPOINT_INVALID_INDEX)
 591         return -1;
 592
 593       transport_endpoint_mark_used (proto, lcl_addr, port);
 594       *lcl_port = port;
 595     }
 596
 597   return 0;
 598 }
 599
 600 u8 *
 601 format_clib_us_time (u8 * s, va_list * args)
 602 {
 603   clib_us_time_t t = va_arg (*args, clib_us_time_t);
 604   if (t < 1e3)
 605     s = format (s, "%u us", t);
 606   else
 607     s = format (s, "%.3f s", (f64) t * CLIB_US_TIME_PERIOD);
 608   return s;
 609 }
 610
 611 u8 *
 612 format_transport_pacer (u8 * s, va_list * args)
 613 {
 614   spacer_t *pacer = va_arg (*args, spacer_t *);
 615   u32 thread_index = va_arg (*args, int);
 616   clib_us_time_t now, diff;
 617
 618   now = transport_us_time_now (thread_index);
 619   diff = now - pacer->last_update;
 620   s = format (s, "rate %lu bucket %lu t/p %.3f last_update %U idle %u",
 621               pacer->bytes_per_sec, pacer->bucket, pacer->tokens_per_period,
 622               format_clib_us_time, diff, pacer->idle_timeout_us);
 623   return s;
 624 }
 625
 626 static inline u32
 627 spacer_max_burst (spacer_t * pacer, clib_us_time_t time_now)
 628 {
 629   u64 n_periods = (time_now - pacer->last_update);
 630   u64 inc;
 631
 632   if (PREDICT_FALSE (n_periods > pacer->idle_timeout_us))
 633     {
 634       pacer->last_update = time_now;
 635       pacer->bucket = TRANSPORT_PACER_MIN_BURST;
 636       return TRANSPORT_PACER_MIN_BURST;
 637     }
 638
 639   if ((inc = (f32) n_periods * pacer->tokens_per_period) > 10)
 640     {
 641       pacer->last_update = time_now;
 642       pacer->bucket = clib_min (pacer->bucket + inc, pacer->bytes_per_sec);
 643     }
 644
 645   return clib_min (pacer->bucket, TRANSPORT_PACER_MAX_BURST);
 646 }
 647
 648 static inline void
 649 spacer_update_bucket (spacer_t * pacer, u32 bytes)
 650 {
 651   ASSERT (pacer->bucket >= bytes);
 652   pacer->bucket -= bytes;
 653 }
 654
 655 static inline void
 656 spacer_set_pace_rate (spacer_t * pacer, u64 rate_bytes_per_sec,
 657                       clib_us_time_t rtt)
 658 {
 659   ASSERT (rate_bytes_per_sec != 0);
 660   pacer->bytes_per_sec = rate_bytes_per_sec;
 661   pacer->tokens_per_period = rate_bytes_per_sec * CLIB_US_TIME_PERIOD;
 662   pacer->idle_timeout_us = clib_max (rtt * TRANSPORT_PACER_IDLE_FACTOR,
 663                                      TRANSPORT_PACER_MIN_IDLE);
 664 }
 665
 666 static inline u64
 667 spacer_pace_rate (spacer_t * pacer)
 668 {
 669   return pacer->bytes_per_sec;
 670 }
 671
 672 static inline void
 673 spacer_reset (spacer_t * pacer, clib_us_time_t time_now, u64 bucket)
 674 {
 675   pacer->last_update = time_now;
 676   pacer->bucket = bucket;
 677 }
 678
 679 void
 680 transport_connection_tx_pacer_reset (transport_connection_t * tc,
 681                                      u64 rate_bytes_per_sec, u32 start_bucket,
 682                                      clib_us_time_t rtt)
 683 {
 684   spacer_set_pace_rate (&tc->pacer, rate_bytes_per_sec, rtt);
 685   spacer_reset (&tc->pacer, transport_us_time_now (tc->thread_index),
 686                 start_bucket);
 687 }
 688
 689 void
 690 transport_connection_tx_pacer_reset_bucket (transport_connection_t * tc,
 691                                             u32 bucket)
 692 {
 693   spacer_reset (&tc->pacer, transport_us_time_now (tc->thread_index), bucket);
 694 }
 695
 696 void
 697 transport_connection_tx_pacer_init (transport_connection_t * tc,
 698                                     u64 rate_bytes_per_sec,
 699                                     u32 initial_bucket)
 700 {
 701   tc->flags |= TRANSPORT_CONNECTION_F_IS_TX_PACED;
 702   transport_connection_tx_pacer_reset (tc, rate_bytes_per_sec,
 703                                        initial_bucket, 1e6);
 704 }
 705
 706 void
 707 transport_connection_tx_pacer_update (transport_connection_t * tc,
 708                                       u64 bytes_per_sec, clib_us_time_t rtt)
 709 {
 710   spacer_set_pace_rate (&tc->pacer, bytes_per_sec, rtt);
 711 }
 712
 713 u32
 714 transport_connection_tx_pacer_burst (transport_connection_t * tc)
 715 {
 716   return spacer_max_burst (&tc->pacer,
 717                            transport_us_time_now (tc->thread_index));
 718 }
 719
 720 u64
 721 transport_connection_tx_pacer_rate (transport_connection_t * tc)
 722 {
 723   return spacer_pace_rate (&tc->pacer);
 724 }
 725
 726 void
 727 transport_connection_update_tx_bytes (transport_connection_t * tc, u32 bytes)
 728 {
 729   if (transport_connection_is_tx_paced (tc))
 730     spacer_update_bucket (&tc->pacer, bytes);
 731 }
 732
 733 void
 734 transport_connection_tx_pacer_update_bytes (transport_connection_t * tc,
 735                                             u32 bytes)
 736 {
 737   spacer_update_bucket (&tc->pacer, bytes);
 738 }
 739
 740 void
 741 transport_connection_reschedule (transport_connection_t * tc)
 742 {
 743   tc->flags &= ~TRANSPORT_CONNECTION_F_DESCHED;
 744   transport_connection_tx_pacer_reset_bucket (tc, TRANSPORT_PACER_MIN_BURST);
 745   if (transport_max_tx_dequeue (tc))
 746     sesssion_reschedule_tx (tc);
 747   else
 748     {
 749       session_t *s = session_get (tc->s_index, tc->thread_index);
 750       svm_fifo_unset_event (s->tx_fifo);
 751       if (svm_fifo_max_dequeue_cons (s->tx_fifo))
 752         if (svm_fifo_set_event (s->tx_fifo))
 753           sesssion_reschedule_tx (tc);
 754     }
 755 }
 756
 757 void
 758 transport_update_time (clib_time_type_t time_now, u8 thread_index)
 759 {
 760   transport_proto_vft_t *vft;
 761   vec_foreach (vft, tp_vfts)
 762   {
 763     if (vft->update_time)
 764       (vft->update_time) (time_now, thread_index);
 765   }
 766 }
 767
 768 void
 769 transport_enable_disable (vlib_main_t * vm, u8 is_en)
 770 {
 771   transport_proto_vft_t *vft;
 772   vec_foreach (vft, tp_vfts)
 773   {
 774     if (vft->enable)
 775       (vft->enable) (vm, is_en);
 776   }
 777 }
 778
 779 void
 780 transport_init (void)
 781 {
 782   vlib_thread_main_t *vtm = vlib_get_thread_main ();
 783   session_main_t *smm = vnet_get_session_main ();
 784   u32 num_threads;
 785
 786   if (smm->local_endpoints_table_buckets == 0)
 787     smm->local_endpoints_table_buckets = 250000;
 788   if (smm->local_endpoints_table_memory == 0)
 789     smm->local_endpoints_table_memory = 512 << 20;
 790
 791   /* Initialize [port-allocator] random number seed */
 792   port_allocator_seed = (u32) clib_cpu_time_now ();
 793
 794   clib_bihash_init_24_8 (&local_endpoints_table, "local endpoints table",
 795                          smm->local_endpoints_table_buckets,
 796                          smm->local_endpoints_table_memory);
 797   num_threads = 1 /* main thread */  + vtm->n_threads;
 798   if (num_threads > 1)
 799     clib_spinlock_init (&local_endpoints_lock);
 800 }
 801
 802 /*
 803  * fd.io coding-style-patch-verification: ON
 804  *
 805  * Local Variables:
 806  * eval: (c-set-style "gnu")
 807  * End:
 808  */