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