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