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