src/vnet/bonding/device.c

   1 /*
   2  *------------------------------------------------------------------
   3  * Copyright (c) 2017 Cisco and/or its affiliates.
   4  * Licensed under the Apache License, Version 2.0 (the "License");
   5  * you may not use this file except in compliance with the License.
   6  * You may obtain a copy of the License at:
   7  *
   8  *     http://www.apache.org/licenses/LICENSE-2.0
   9  *
  10  * Unless required by applicable law or agreed to in writing, software
  11  * distributed under the License is distributed on an "AS IS" BASIS,
  12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  13  * See the License for the specific language governing permissions and
  14  * limitations under the License.
  15  *------------------------------------------------------------------
  16  */
  17
  18 #define _GNU_SOURCE
  19 #include <stdint.h>
  20 #include <vnet/ethernet/ethernet.h>
  21 #include <vnet/ip/ip4_packet.h>
  22 #include <vnet/ip/ip6_packet.h>
  23 #include <vnet/ip/ip6_hop_by_hop_packet.h>
  24 #include <vnet/bonding/node.h>
  25 #include <vppinfra/lb_hash_hash.h>
  26 #include <vnet/ip/ip.h>
  27 #include <vnet/ethernet/arp_packet.h>
  28
  29 #define foreach_bond_tx_error     \
  30   _(NONE, "no error")             \
  31   _(IF_DOWN, "interface down")    \
  32   _(NO_SLAVE, "no slave")
  33
  34 typedef enum
  35 {
  36 #define _(f,s) BOND_TX_ERROR_##f,
  37   foreach_bond_tx_error
  38 #undef _
  39     BOND_TX_N_ERROR,
  40 } bond_tx_error_t;
  41
  42 static char *bond_tx_error_strings[] = {
  43 #define _(n,s) s,
  44   foreach_bond_tx_error
  45 #undef _
  46 };
  47
  48 static u8 *
  49 format_bond_tx_trace (u8 * s, va_list * args)
  50 {
  51   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
  52   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
  53   bond_packet_trace_t *t = va_arg (*args, bond_packet_trace_t *);
  54   vnet_hw_interface_t *hw, *hw1;
  55   vnet_main_t *vnm = vnet_get_main ();
  56
  57   hw = vnet_get_sup_hw_interface (vnm, t->sw_if_index);
  58   hw1 = vnet_get_sup_hw_interface (vnm, t->bond_sw_if_index);
  59   s = format (s, "src %U, dst %U, %s -> %s",
  60               format_ethernet_address, t->ethernet.src_address,
  61               format_ethernet_address, t->ethernet.dst_address,
  62               hw->name, hw1->name);
  63
  64   return s;
  65 }
  66
  67 #ifndef CLIB_MARCH_VARIANT
  68 u8 *
  69 format_bond_interface_name (u8 * s, va_list * args)
  70 {
  71   u32 dev_instance = va_arg (*args, u32);
  72   bond_main_t *bm = &bond_main;
  73   bond_if_t *bif = pool_elt_at_index (bm->interfaces, dev_instance);
  74
  75   s = format (s, "BondEthernet%lu", bif->id);
  76
  77   return s;
  78 }
  79 #endif
  80
  81 static __clib_unused clib_error_t *
  82 bond_set_l2_mode_function (vnet_main_t * vnm,
  83                            struct vnet_hw_interface_t *bif_hw,
  84                            i32 l2_if_adjust)
  85 {
  86   bond_if_t *bif;
  87   u32 *sw_if_index;
  88   struct vnet_hw_interface_t *sif_hw;
  89
  90   bif = bond_get_master_by_sw_if_index (bif_hw->sw_if_index);
  91   if (!bif)
  92     return 0;
  93
  94   if ((bif_hw->l2_if_count == 1) && (l2_if_adjust == 1))
  95     {
  96       /* Just added first L2 interface on this port */
  97       vec_foreach (sw_if_index, bif->slaves)
  98       {
  99         sif_hw = vnet_get_sup_hw_interface (vnm, *sw_if_index);
 100         ethernet_set_flags (vnm, sif_hw->hw_if_index,
 101                             ETHERNET_INTERFACE_FLAG_ACCEPT_ALL);
 102
 103         /* ensure all packets go to ethernet-input */
 104         ethernet_set_rx_redirect (vnm, sif_hw, 1);
 105       }
 106     }
 107
 108   return 0;
 109 }
 110
 111 static __clib_unused clib_error_t *
 112 bond_subif_add_del_function (vnet_main_t * vnm, u32 hw_if_index,
 113                              struct vnet_sw_interface_t *st, int is_add)
 114 {
 115   /* Nothing for now */
 116   return 0;
 117 }
 118
 119 static clib_error_t *
 120 bond_interface_admin_up_down (vnet_main_t * vnm, u32 hw_if_index, u32 flags)
 121 {
 122   vnet_hw_interface_t *hif = vnet_get_hw_interface (vnm, hw_if_index);
 123   uword is_up = (flags & VNET_SW_INTERFACE_FLAG_ADMIN_UP) != 0;
 124   bond_main_t *bm = &bond_main;
 125   bond_if_t *bif = pool_elt_at_index (bm->interfaces, hif->dev_instance);
 126
 127   bif->admin_up = is_up;
 128   if (is_up && vec_len (bif->active_slaves))
 129     vnet_hw_interface_set_flags (vnm, bif->hw_if_index,
 130                                  VNET_HW_INTERFACE_FLAG_LINK_UP);
 131   return 0;
 132 }
 133
 134 static_always_inline void
 135 bond_tx_add_to_queue (bond_per_thread_data_t * ptd, u32 port, u32 bi)
 136 {
 137   u32 idx = ptd->per_port_queue[port].n_buffers++;
 138   ptd->per_port_queue[port].buffers[idx] = bi;
 139 }
 140
 141 static_always_inline u32
 142 bond_lb_broadcast (vlib_main_t * vm, vlib_node_runtime_t * node,
 143                    bond_if_t * bif, vlib_buffer_t * b0, uword n_slaves)
 144 {
 145   bond_main_t *bm = &bond_main;
 146   vlib_buffer_t *c0;
 147   int port;
 148   u32 sw_if_index;
 149   u16 thread_index = vm->thread_index;
 150   bond_per_thread_data_t *ptd = vec_elt_at_index (bm->per_thread_data,
 151                                                   thread_index);
 152
 153   for (port = 1; port < n_slaves; port++)
 154     {
 155       sw_if_index = *vec_elt_at_index (bif->active_slaves, port);
 156       c0 = vlib_buffer_copy (vm, b0);
 157       if (PREDICT_TRUE (c0 != 0))
 158         {
 159           vnet_buffer (c0)->sw_if_index[VLIB_TX] = sw_if_index;
 160           bond_tx_add_to_queue (ptd, port, vlib_get_buffer_index (vm, c0));
 161         }
 162     }
 163
 164   return 0;
 165 }
 166
 167 static_always_inline u32
 168 bond_lb_l2 (vlib_main_t * vm, vlib_node_runtime_t * node,
 169             bond_if_t * bif, vlib_buffer_t * b0, uword n_slaves)
 170 {
 171   ethernet_header_t *eth = (ethernet_header_t *) vlib_buffer_get_current (b0);
 172   u64 *dst = (u64 *) & eth->dst_address[0];
 173   u64 a = clib_mem_unaligned (dst, u64);
 174   u32 *src = (u32 *) & eth->src_address[2];
 175   u32 b = clib_mem_unaligned (src, u32);
 176
 177   return lb_hash_hash_2_tuples (a, b);
 178 }
 179
 180 static_always_inline u16 *
 181 bond_locate_ethertype (ethernet_header_t * eth)
 182 {
 183   u16 *ethertype_p;
 184   ethernet_vlan_header_t *vlan;
 185
 186   if (!ethernet_frame_is_tagged (clib_net_to_host_u16 (eth->type)))
 187     {
 188       ethertype_p = &eth->type;
 189     }
 190   else
 191     {
 192       vlan = (void *) (eth + 1);
 193       ethertype_p = &vlan->type;
 194       if (*ethertype_p == ntohs (ETHERNET_TYPE_VLAN))
 195         {
 196           vlan++;
 197           ethertype_p = &vlan->type;
 198         }
 199     }
 200   return ethertype_p;
 201 }
 202
 203 static_always_inline u32
 204 bond_lb_l23 (vlib_main_t * vm, vlib_node_runtime_t * node,
 205              bond_if_t * bif, vlib_buffer_t * b0, uword n_slaves)
 206 {
 207   ethernet_header_t *eth = (ethernet_header_t *) vlib_buffer_get_current (b0);
 208   u8 ip_version;
 209   ip4_header_t *ip4;
 210   u16 ethertype, *ethertype_p;
 211   u32 *mac1, *mac2, *mac3;
 212
 213   ethertype_p = bond_locate_ethertype (eth);
 214   ethertype = clib_mem_unaligned (ethertype_p, u16);
 215
 216   if ((ethertype != htons (ETHERNET_TYPE_IP4)) &&
 217       (ethertype != htons (ETHERNET_TYPE_IP6)))
 218     return (bond_lb_l2 (vm, node, bif, b0, n_slaves));
 219
 220   ip4 = (ip4_header_t *) (ethertype_p + 1);
 221   ip_version = (ip4->ip_version_and_header_length >> 4);
 222
 223   if (ip_version == 0x4)
 224     {
 225       u32 a, c;
 226
 227       mac1 = (u32 *) & eth->dst_address[0];
 228       mac2 = (u32 *) & eth->dst_address[4];
 229       mac3 = (u32 *) & eth->src_address[2];
 230
 231       a = clib_mem_unaligned (mac1, u32) ^ clib_mem_unaligned (mac2, u32) ^
 232         clib_mem_unaligned (mac3, u32);
 233       c =
 234         lb_hash_hash_2_tuples (clib_mem_unaligned (&ip4->address_pair, u64),
 235                                a);
 236       return c;
 237     }
 238   else if (ip_version == 0x6)
 239     {
 240       u64 a;
 241       u32 c;
 242       ip6_header_t *ip6 = (ip6_header_t *) (eth + 1);
 243
 244       mac1 = (u32 *) & eth->dst_address[0];
 245       mac2 = (u32 *) & eth->dst_address[4];
 246       mac3 = (u32 *) & eth->src_address[2];
 247
 248       a = clib_mem_unaligned (mac1, u32) ^ clib_mem_unaligned (mac2, u32) ^
 249         clib_mem_unaligned (mac3, u32);
 250       c =
 251         lb_hash_hash (clib_mem_unaligned
 252                       (&ip6->src_address.as_uword[0], uword),
 253                       clib_mem_unaligned (&ip6->src_address.as_uword[1],
 254                                           uword),
 255                       clib_mem_unaligned (&ip6->dst_address.as_uword[0],
 256                                           uword),
 257                       clib_mem_unaligned (&ip6->dst_address.as_uword[1],
 258                                           uword), a);
 259       return c;
 260     }
 261   return (bond_lb_l2 (vm, node, bif, b0, n_slaves));
 262 }
 263
 264 static_always_inline u32
 265 bond_lb_l34 (vlib_main_t * vm, vlib_node_runtime_t * node,
 266              bond_if_t * bif, vlib_buffer_t * b0, uword n_slaves)
 267 {
 268   ethernet_header_t *eth = (ethernet_header_t *) vlib_buffer_get_current (b0);
 269   u8 ip_version;
 270   uword is_tcp_udp;
 271   ip4_header_t *ip4;
 272   u16 ethertype, *ethertype_p;
 273
 274   ethertype_p = bond_locate_ethertype (eth);
 275   ethertype = clib_mem_unaligned (ethertype_p, u16);
 276
 277   if ((ethertype != htons (ETHERNET_TYPE_IP4)) &&
 278       (ethertype != htons (ETHERNET_TYPE_IP6)))
 279     return (bond_lb_l2 (vm, node, bif, b0, n_slaves));
 280
 281   ip4 = (ip4_header_t *) (ethertype_p + 1);
 282   ip_version = (ip4->ip_version_and_header_length >> 4);
 283
 284   if (ip_version == 0x4)
 285     {
 286       u32 a, t1, t2;
 287       tcp_header_t *tcp = (void *) (ip4 + 1);
 288
 289       is_tcp_udp = (ip4->protocol == IP_PROTOCOL_TCP) ||
 290         (ip4->protocol == IP_PROTOCOL_UDP);
 291       t1 = is_tcp_udp ? clib_mem_unaligned (&tcp->src, u16) : 0;
 292       t2 = is_tcp_udp ? clib_mem_unaligned (&tcp->dst, u16) : 0;
 293       a = t1 ^ t2;
 294       return
 295         lb_hash_hash_2_tuples (clib_mem_unaligned (&ip4->address_pair, u64),
 296                                a);
 297     }
 298   else if (ip_version == 0x6)
 299     {
 300       u64 a;
 301       u32 c, t1, t2;
 302       ip6_header_t *ip6 = (ip6_header_t *) (eth + 1);
 303       tcp_header_t *tcp = (void *) (ip6 + 1);
 304
 305       is_tcp_udp = 0;
 306       if (PREDICT_TRUE ((ip6->protocol == IP_PROTOCOL_TCP) ||
 307                         (ip6->protocol == IP_PROTOCOL_UDP)))
 308         {
 309           is_tcp_udp = 1;
 310           tcp = (void *) (ip6 + 1);
 311         }
 312       else if (ip6->protocol == IP_PROTOCOL_IP6_HOP_BY_HOP_OPTIONS)
 313         {
 314           ip6_hop_by_hop_header_t *hbh =
 315             (ip6_hop_by_hop_header_t *) (ip6 + 1);
 316           if ((hbh->protocol == IP_PROTOCOL_TCP)
 317               || (hbh->protocol == IP_PROTOCOL_UDP))
 318             {
 319               is_tcp_udp = 1;
 320               tcp = (tcp_header_t *) ((u8 *) hbh + ((hbh->length + 1) << 3));
 321             }
 322         }
 323       t1 = is_tcp_udp ? clib_mem_unaligned (&tcp->src, u16) : 0;
 324       t2 = is_tcp_udp ? clib_mem_unaligned (&tcp->dst, u16) : 0;
 325       a = t1 ^ t2;
 326       c =
 327         lb_hash_hash (clib_mem_unaligned
 328                       (&ip6->src_address.as_uword[0], uword),
 329                       clib_mem_unaligned (&ip6->src_address.as_uword[1],
 330                                           uword),
 331                       clib_mem_unaligned (&ip6->dst_address.as_uword[0],
 332                                           uword),
 333                       clib_mem_unaligned (&ip6->dst_address.as_uword[1],
 334                                           uword), a);
 335       return c;
 336     }
 337
 338   return (bond_lb_l2 (vm, node, bif, b0, n_slaves));
 339 }
 340
 341 static_always_inline u32
 342 bond_lb_round_robin (vlib_main_t * vm,
 343                      vlib_node_runtime_t * node,
 344                      bond_if_t * bif, vlib_buffer_t * b0, uword n_slaves)
 345 {
 346   bif->lb_rr_last_index++;
 347   if (bif->lb_rr_last_index >= n_slaves)
 348     bif->lb_rr_last_index = 0;
 349
 350   return bif->lb_rr_last_index;
 351 }
 352
 353 static_always_inline void
 354 bond_tx_inline (vlib_main_t * vm, vlib_node_runtime_t * node,
 355                 bond_if_t * bif, vlib_buffer_t ** b,
 356                 u32 * h, u32 n_left, uword n_slaves, u32 lb_alg)
 357 {
 358   while (n_left >= 4)
 359     {
 360       // Prefetch next iteration
 361       if (n_left >= 8)
 362         {
 363           vlib_buffer_t **pb = b + 4;
 364
 365           vlib_prefetch_buffer_header (pb[0], LOAD);
 366           vlib_prefetch_buffer_header (pb[1], LOAD);
 367           vlib_prefetch_buffer_header (pb[2], LOAD);
 368           vlib_prefetch_buffer_header (pb[3], LOAD);
 369
 370           CLIB_PREFETCH (pb[0]->data, CLIB_CACHE_LINE_BYTES, LOAD);
 371           CLIB_PREFETCH (pb[1]->data, CLIB_CACHE_LINE_BYTES, LOAD);
 372           CLIB_PREFETCH (pb[2]->data, CLIB_CACHE_LINE_BYTES, LOAD);
 373           CLIB_PREFETCH (pb[3]->data, CLIB_CACHE_LINE_BYTES, LOAD);
 374         }
 375
 376       VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b[0]);
 377       VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b[1]);
 378       VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b[2]);
 379       VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b[3]);
 380
 381       if (lb_alg == BOND_LB_L2)
 382         {
 383           h[0] = bond_lb_l2 (vm, node, bif, b[0], n_slaves);
 384           h[1] = bond_lb_l2 (vm, node, bif, b[1], n_slaves);
 385           h[2] = bond_lb_l2 (vm, node, bif, b[2], n_slaves);
 386           h[3] = bond_lb_l2 (vm, node, bif, b[3], n_slaves);
 387         }
 388       else if (lb_alg == BOND_LB_L34)
 389         {
 390           h[0] = bond_lb_l34 (vm, node, bif, b[0], n_slaves);
 391           h[1] = bond_lb_l34 (vm, node, bif, b[1], n_slaves);
 392           h[2] = bond_lb_l34 (vm, node, bif, b[2], n_slaves);
 393           h[3] = bond_lb_l34 (vm, node, bif, b[3], n_slaves);
 394         }
 395       else if (lb_alg == BOND_LB_L23)
 396         {
 397           h[0] = bond_lb_l23 (vm, node, bif, b[0], n_slaves);
 398           h[1] = bond_lb_l23 (vm, node, bif, b[1], n_slaves);
 399           h[2] = bond_lb_l23 (vm, node, bif, b[2], n_slaves);
 400           h[3] = bond_lb_l23 (vm, node, bif, b[3], n_slaves);
 401         }
 402       else if (lb_alg == BOND_LB_RR)
 403         {
 404           h[0] = bond_lb_round_robin (vm, node, bif, b[0], n_slaves);
 405           h[1] = bond_lb_round_robin (vm, node, bif, b[1], n_slaves);
 406           h[2] = bond_lb_round_robin (vm, node, bif, b[2], n_slaves);
 407           h[3] = bond_lb_round_robin (vm, node, bif, b[3], n_slaves);
 408         }
 409       else if (lb_alg == BOND_LB_BC)
 410         {
 411           h[0] = bond_lb_broadcast (vm, node, bif, b[0], n_slaves);
 412           h[1] = bond_lb_broadcast (vm, node, bif, b[1], n_slaves);
 413           h[2] = bond_lb_broadcast (vm, node, bif, b[2], n_slaves);
 414           h[3] = bond_lb_broadcast (vm, node, bif, b[3], n_slaves);
 415         }
 416       else
 417         {
 418           ASSERT (0);
 419         }
 420
 421       n_left -= 4;
 422       b += 4;
 423       h += 4;
 424     }
 425
 426   while (n_left > 0)
 427     {
 428       VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b[0]);
 429
 430       if (bif->lb == BOND_LB_L2)
 431         h[0] = bond_lb_l2 (vm, node, bif, b[0], n_slaves);
 432       else if (bif->lb == BOND_LB_L34)
 433         h[0] = bond_lb_l34 (vm, node, bif, b[0], n_slaves);
 434       else if (bif->lb == BOND_LB_L23)
 435         h[0] = bond_lb_l23 (vm, node, bif, b[0], n_slaves);
 436       else if (bif->lb == BOND_LB_RR)
 437         h[0] = bond_lb_round_robin (vm, node, bif, b[0], n_slaves);
 438       else if (bif->lb == BOND_LB_BC)
 439         h[0] = bond_lb_broadcast (vm, node, bif, b[0], n_slaves);
 440       else
 441         {
 442           ASSERT (0);
 443         }
 444
 445       n_left -= 1;
 446       b += 1;
 447     }
 448 }
 449
 450 static_always_inline void
 451 bond_hash_to_port (u32 * h, u32 n_left, u32 n_slaves, int use_modulo_shortcut)
 452 {
 453   u32 mask = n_slaves - 1;
 454
 455 #ifdef CLIB_HAVE_VEC256
 456   /* only lower 16 bits of hash due to single precision fp arithmetic */
 457   u32x8 mask8, sc8u, h8a, h8b;
 458   f32x8 sc8f;
 459
 460   if (use_modulo_shortcut)
 461     {
 462       mask8 = u32x8_splat (mask);
 463     }
 464   else
 465     {
 466       mask8 = u32x8_splat (0xffff);
 467       sc8u = u32x8_splat (n_slaves);
 468       sc8f = f32x8_from_u32x8 (sc8u);
 469     }
 470
 471   while (n_left > 16)
 472     {
 473       h8a = u32x8_load_unaligned (h) & mask8;
 474       h8b = u32x8_load_unaligned (h + 8) & mask8;
 475
 476       if (use_modulo_shortcut == 0)
 477         {
 478           h8a -= sc8u * u32x8_from_f32x8 (f32x8_from_u32x8 (h8a) / sc8f);
 479           h8b -= sc8u * u32x8_from_f32x8 (f32x8_from_u32x8 (h8b) / sc8f);
 480         }
 481
 482       u32x8_store_unaligned (h8a, h);
 483       u32x8_store_unaligned (h8b, h + 8);
 484       n_left -= 16;
 485       h += 16;
 486     }
 487 #endif
 488
 489   while (n_left > 4)
 490     {
 491       if (use_modulo_shortcut)
 492         {
 493           h[0] &= mask;
 494           h[1] &= mask;
 495           h[2] &= mask;
 496           h[3] &= mask;
 497         }
 498       else
 499         {
 500           h[0] %= n_slaves;
 501           h[1] %= n_slaves;
 502           h[2] %= n_slaves;
 503           h[3] %= n_slaves;
 504         }
 505       n_left -= 4;
 506       h += 4;
 507     }
 508   while (n_left)
 509     {
 510       if (use_modulo_shortcut)
 511         h[0] &= mask;
 512       else
 513         h[0] %= n_slaves;
 514       n_left -= 1;
 515       h += 1;
 516     }
 517 }
 518
 519 static_always_inline void
 520 bond_update_sw_if_index (bond_per_thread_data_t * ptd, bond_if_t * bif,
 521                          u32 * bi, vlib_buffer_t ** b, u32 * data, u32 n_left,
 522                          int single_sw_if_index)
 523 {
 524   u32 sw_if_index = data[0];
 525   u32 *h = data;
 526
 527   while (n_left >= 4)
 528     {
 529       // Prefetch next iteration
 530       if (n_left >= 8)
 531         {
 532           vlib_buffer_t **pb = b + 4;
 533           vlib_prefetch_buffer_header (pb[0], LOAD);
 534           vlib_prefetch_buffer_header (pb[1], LOAD);
 535           vlib_prefetch_buffer_header (pb[2], LOAD);
 536           vlib_prefetch_buffer_header (pb[3], LOAD);
 537         }
 538
 539       if (PREDICT_FALSE (single_sw_if_index))
 540         {
 541           vnet_buffer (b[0])->sw_if_index[VLIB_TX] = sw_if_index;
 542           vnet_buffer (b[1])->sw_if_index[VLIB_TX] = sw_if_index;
 543           vnet_buffer (b[2])->sw_if_index[VLIB_TX] = sw_if_index;
 544           vnet_buffer (b[3])->sw_if_index[VLIB_TX] = sw_if_index;
 545
 546           bond_tx_add_to_queue (ptd, 0, bi[0]);
 547           bond_tx_add_to_queue (ptd, 0, bi[1]);
 548           bond_tx_add_to_queue (ptd, 0, bi[2]);
 549           bond_tx_add_to_queue (ptd, 0, bi[3]);
 550         }
 551       else
 552         {
 553           u32 sw_if_index[4];
 554
 555           sw_if_index[0] = *vec_elt_at_index (bif->active_slaves, h[0]);
 556           sw_if_index[1] = *vec_elt_at_index (bif->active_slaves, h[1]);
 557           sw_if_index[2] = *vec_elt_at_index (bif->active_slaves, h[2]);
 558           sw_if_index[3] = *vec_elt_at_index (bif->active_slaves, h[3]);
 559
 560           vnet_buffer (b[0])->sw_if_index[VLIB_TX] = sw_if_index[0];
 561           vnet_buffer (b[1])->sw_if_index[VLIB_TX] = sw_if_index[1];
 562           vnet_buffer (b[2])->sw_if_index[VLIB_TX] = sw_if_index[2];
 563           vnet_buffer (b[3])->sw_if_index[VLIB_TX] = sw_if_index[3];
 564
 565           bond_tx_add_to_queue (ptd, h[0], bi[0]);
 566           bond_tx_add_to_queue (ptd, h[1], bi[1]);
 567           bond_tx_add_to_queue (ptd, h[2], bi[2]);
 568           bond_tx_add_to_queue (ptd, h[3], bi[3]);
 569         }
 570
 571       bi += 4;
 572       h += 4;
 573       b += 4;
 574       n_left -= 4;
 575     }
 576   while (n_left)
 577     {
 578       if (PREDICT_FALSE (single_sw_if_index))
 579         {
 580           vnet_buffer (b[0])->sw_if_index[VLIB_TX] = sw_if_index;
 581           bond_tx_add_to_queue (ptd, 0, bi[0]);
 582         }
 583       else
 584         {
 585           u32 sw_if_index0 = *vec_elt_at_index (bif->active_slaves, h[0]);
 586
 587           vnet_buffer (b[0])->sw_if_index[VLIB_TX] = sw_if_index0;
 588           bond_tx_add_to_queue (ptd, h[0], bi[0]);
 589         }
 590
 591       bi += 1;
 592       h += 1;
 593       b += 1;
 594       n_left -= 1;
 595     }
 596 }
 597
 598 static_always_inline void
 599 bond_tx_trace (vlib_main_t * vm, vlib_node_runtime_t * node, bond_if_t * bif,
 600                vlib_buffer_t ** b, u32 n_left, u32 * h)
 601 {
 602   uword n_trace = vlib_get_trace_count (vm, node);
 603
 604   while (n_trace > 0 && n_left > 0)
 605     {
 606       bond_packet_trace_t *t0;
 607       ethernet_header_t *eth;
 608       u32 next0 = 0;
 609
 610       vlib_trace_buffer (vm, node, next0, b[0], 0 /* follow_chain */ );
 611       vlib_set_trace_count (vm, node, --n_trace);
 612       t0 = vlib_add_trace (vm, node, b[0], sizeof (*t0));
 613       eth = (ethernet_header_t *) vlib_buffer_get_current (b[0]);
 614       t0->ethernet = *eth;
 615       t0->sw_if_index = vnet_buffer (b[0])->sw_if_index[VLIB_TX];
 616       if (!h)
 617         {
 618           t0->bond_sw_if_index = *vec_elt_at_index (bif->active_slaves, 0);
 619         }
 620       else
 621         {
 622           t0->bond_sw_if_index = *vec_elt_at_index (bif->active_slaves, h[0]);
 623           h++;
 624         }
 625       b++;
 626       n_left--;
 627     }
 628 }
 629
 630 VNET_DEVICE_CLASS_TX_FN (bond_dev_class) (vlib_main_t * vm,
 631                                           vlib_node_runtime_t * node,
 632                                           vlib_frame_t * frame)
 633 {
 634   vnet_interface_output_runtime_t *rund = (void *) node->runtime_data;
 635   bond_main_t *bm = &bond_main;
 636   u16 thread_index = vm->thread_index;
 637   bond_if_t *bif = pool_elt_at_index (bm->interfaces, rund->dev_instance);
 638   uword n_slaves;
 639   vlib_buffer_t *bufs[VLIB_FRAME_SIZE];
 640   u32 *from = vlib_frame_vector_args (frame);
 641   u32 n_left = frame->n_vectors;
 642   u32 hashes[VLIB_FRAME_SIZE], *h;
 643   vnet_main_t *vnm = vnet_get_main ();
 644   bond_per_thread_data_t *ptd = vec_elt_at_index (bm->per_thread_data,
 645                                                   thread_index);
 646   u32 p, sw_if_index;
 647
 648   if (PREDICT_FALSE (bif->admin_up == 0))
 649     {
 650       vlib_buffer_free (vm, vlib_frame_vector_args (frame), frame->n_vectors);
 651       vlib_increment_simple_counter (vnet_main.interface_main.sw_if_counters +
 652                                      VNET_INTERFACE_COUNTER_DROP,
 653                                      thread_index, bif->sw_if_index,
 654                                      frame->n_vectors);
 655       vlib_error_count (vm, node->node_index, BOND_TX_ERROR_IF_DOWN,
 656                         frame->n_vectors);
 657       return frame->n_vectors;
 658     }
 659
 660   n_slaves = vec_len (bif->active_slaves);
 661   if (PREDICT_FALSE (n_slaves == 0))
 662     {
 663       vlib_buffer_free (vm, vlib_frame_vector_args (frame), frame->n_vectors);
 664       vlib_increment_simple_counter (vnet_main.interface_main.sw_if_counters +
 665                                      VNET_INTERFACE_COUNTER_DROP,
 666                                      thread_index, bif->sw_if_index,
 667                                      frame->n_vectors);
 668       vlib_error_count (vm, node->node_index, BOND_TX_ERROR_NO_SLAVE,
 669                         frame->n_vectors);
 670       return frame->n_vectors;
 671     }
 672
 673   vlib_get_buffers (vm, from, bufs, n_left);
 674
 675   /* active-backup mode, ship everything to first sw if index */
 676   if ((bif->lb == BOND_LB_AB) || PREDICT_FALSE (n_slaves == 1))
 677     {
 678       sw_if_index = *vec_elt_at_index (bif->active_slaves, 0);
 679
 680       bond_tx_trace (vm, node, bif, bufs, frame->n_vectors, 0);
 681       bond_update_sw_if_index (ptd, bif, from, bufs, &sw_if_index, n_left,
 682                                /* single_sw_if_index */ 1);
 683       goto done;
 684     }
 685
 686   if (bif->lb == BOND_LB_BC)
 687     {
 688       sw_if_index = *vec_elt_at_index (bif->active_slaves, 0);
 689
 690       bond_tx_inline (vm, node, bif, bufs, hashes, n_left, n_slaves,
 691                       BOND_LB_BC);
 692       bond_tx_trace (vm, node, bif, bufs, frame->n_vectors, 0);
 693       bond_update_sw_if_index (ptd, bif, from, bufs, &sw_if_index, n_left,
 694                                /* single_sw_if_index */ 1);
 695       goto done;
 696     }
 697
 698   if (bif->lb == BOND_LB_L2)
 699     bond_tx_inline (vm, node, bif, bufs, hashes, n_left, n_slaves,
 700                     BOND_LB_L2);
 701   else if (bif->lb == BOND_LB_L34)
 702     bond_tx_inline (vm, node, bif, bufs, hashes, n_left, n_slaves,
 703                     BOND_LB_L34);
 704   else if (bif->lb == BOND_LB_L23)
 705     bond_tx_inline (vm, node, bif, bufs, hashes, n_left, n_slaves,
 706                     BOND_LB_L23);
 707   else if (bif->lb == BOND_LB_RR)
 708     bond_tx_inline (vm, node, bif, bufs, hashes, n_left, n_slaves,
 709                     BOND_LB_RR);
 710   else
 711     ASSERT (0);
 712
 713   /* calculate port out of hash */
 714   h = hashes;
 715   if (BOND_MODULO_SHORTCUT (n_slaves))
 716     bond_hash_to_port (h, frame->n_vectors, n_slaves, 1);
 717   else
 718     bond_hash_to_port (h, frame->n_vectors, n_slaves, 0);
 719
 720   bond_tx_trace (vm, node, bif, bufs, frame->n_vectors, h);
 721
 722   bond_update_sw_if_index (ptd, bif, from, bufs, hashes, frame->n_vectors,
 723                            /* single_sw_if_index */ 0);
 724
 725 done:
 726   for (p = 0; p < n_slaves; p++)
 727     {
 728       vlib_frame_t *f;
 729       u32 *to_next;
 730
 731       sw_if_index = *vec_elt_at_index (bif->active_slaves, p);
 732       if (PREDICT_TRUE (ptd->per_port_queue[p].n_buffers))
 733         {
 734           f = vnet_get_frame_to_sw_interface (vnm, sw_if_index);
 735           f->n_vectors = ptd->per_port_queue[p].n_buffers;
 736           to_next = vlib_frame_vector_args (f);
 737           clib_memcpy_fast (to_next, ptd->per_port_queue[p].buffers,
 738                             f->n_vectors * sizeof (u32));
 739           vnet_put_frame_to_sw_interface (vnm, sw_if_index, f);
 740           ptd->per_port_queue[p].n_buffers = 0;
 741         }
 742     }
 743
 744   vlib_increment_simple_counter (vnet_main.interface_main.sw_if_counters
 745                                  + VNET_INTERFACE_COUNTER_TX, thread_index,
 746                                  bif->sw_if_index, frame->n_vectors);
 747
 748   return frame->n_vectors;
 749 }
 750
 751 static walk_rc_t
 752 bond_active_interface_switch_cb (vnet_main_t * vnm, u32 sw_if_index,
 753                                  void *arg)
 754 {
 755   bond_main_t *bm = &bond_main;
 756
 757   send_ip4_garp (bm->vlib_main, sw_if_index);
 758   send_ip6_na (bm->vlib_main, sw_if_index);
 759
 760   return (WALK_CONTINUE);
 761 }
 762
 763 static uword
 764 bond_process (vlib_main_t * vm, vlib_node_runtime_t * rt, vlib_frame_t * f)
 765 {
 766   vnet_main_t *vnm = vnet_get_main ();
 767   uword event_type, *event_data = 0;
 768
 769   while (1)
 770     {
 771       u32 i;
 772       u32 hw_if_index;
 773
 774       vlib_process_wait_for_event (vm);
 775       event_type = vlib_process_get_events (vm, &event_data);
 776       ASSERT (event_type == BOND_SEND_GARP_NA);
 777       for (i = 0; i < vec_len (event_data); i++)
 778         {
 779           hw_if_index = event_data[i];
 780           /* walk hw interface to process all subinterfaces */
 781           vnet_hw_interface_walk_sw (vnm, hw_if_index,
 782                                      bond_active_interface_switch_cb, 0);
 783         }
 784       vec_reset_length (event_data);
 785     }
 786   return 0;
 787 }
 788
 789 /* *INDENT-OFF* */
 790 VLIB_REGISTER_NODE (bond_process_node) = {
 791   .function = bond_process,
 792   .type = VLIB_NODE_TYPE_PROCESS,
 793   .name = "bond-process",
 794 };
 795 /* *INDENT-ON* */
 796
 797 /* *INDENT-OFF* */
 798 VNET_DEVICE_CLASS (bond_dev_class) = {
 799   .name = "bond",
 800   .tx_function_n_errors = BOND_TX_N_ERROR,
 801   .tx_function_error_strings = bond_tx_error_strings,
 802   .format_device_name = format_bond_interface_name,
 803   .set_l2_mode_function = bond_set_l2_mode_function,
 804   .admin_up_down_function = bond_interface_admin_up_down,
 805   .subif_add_del_function = bond_subif_add_del_function,
 806   .format_tx_trace = format_bond_tx_trace,
 807 };
 808
 809 /* *INDENT-ON* */
 810
 811 /*
 812  * fd.io coding-style-patch-verification: ON
 813  *
 814  * Local Variables:
 815  * eval: (c-set-style "gnu")
 816  * End:
 817  */