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