src/plugins/dpdk/device/device.c

   1 /*
   2  * Copyright (c) 2015 Cisco and/or its affiliates.
   3  * Licensed under the Apache License, Version 2.0 (the "License");
   4  * you may not use this file except in compliance with the License.
   5  * You may obtain a copy of the License at:
   6  *
   7  *     http://www.apache.org/licenses/LICENSE-2.0
   8  *
   9  * Unless required by applicable law or agreed to in writing, software
  10  * distributed under the License is distributed on an "AS IS" BASIS,
  11  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  12  * See the License for the specific language governing permissions and
  13  * limitations under the License.
  14  */
  15 #include <vnet/vnet.h>
  16 #include <vppinfra/vec.h>
  17 #include <vppinfra/format.h>
  18 #include <vlib/unix/cj.h>
  19 #include <assert.h>
  20
  21 #include <vnet/ethernet/ethernet.h>
  22 #include <dpdk/device/dpdk.h>
  23
  24 #include <dpdk/device/dpdk_priv.h>
  25 #include <vppinfra/error.h>
  26
  27 #define foreach_dpdk_tx_func_error                      \
  28   _(BAD_RETVAL, "DPDK tx function returned an error")   \
  29   _(PKT_DROP, "Tx packet drops (dpdk tx failure)")      \
  30   _(REPL_FAIL, "Tx packet drops (replication failure)")
  31
  32 typedef enum
  33 {
  34 #define _(f,s) DPDK_TX_FUNC_ERROR_##f,
  35   foreach_dpdk_tx_func_error
  36 #undef _
  37     DPDK_TX_FUNC_N_ERROR,
  38 } dpdk_tx_func_error_t;
  39
  40 #ifndef CLIB_MULTIARCH_VARIANT
  41 static char *dpdk_tx_func_error_strings[] = {
  42 #define _(n,s) s,
  43   foreach_dpdk_tx_func_error
  44 #undef _
  45 };
  46
  47 static clib_error_t *
  48 dpdk_set_mac_address (vnet_hw_interface_t * hi, char *address)
  49 {
  50   int error;
  51   dpdk_main_t *dm = &dpdk_main;
  52   dpdk_device_t *xd = vec_elt_at_index (dm->devices, hi->dev_instance);
  53
  54   error = rte_eth_dev_default_mac_addr_set (xd->device_index,
  55                                             (struct ether_addr *) address);
  56
  57   if (error)
  58     {
  59       return clib_error_return (0, "mac address set failed: %d", error);
  60     }
  61   else
  62     {
  63       vec_reset_length (xd->default_mac_address);
  64       vec_add (xd->default_mac_address, address, sizeof (address));
  65       return NULL;
  66     }
  67 }
  68 #endif
  69
  70 static struct rte_mbuf *
  71 dpdk_replicate_packet_mb (vlib_buffer_t * b)
  72 {
  73   dpdk_main_t *dm = &dpdk_main;
  74   struct rte_mbuf **mbufs = 0, *s, *d;
  75   u8 nb_segs;
  76   unsigned socket_id = rte_socket_id ();
  77   int i;
  78
  79   ASSERT (dm->pktmbuf_pools[socket_id]);
  80   s = rte_mbuf_from_vlib_buffer (b);
  81   nb_segs = s->nb_segs;
  82   vec_validate (mbufs, nb_segs - 1);
  83
  84   if (rte_pktmbuf_alloc_bulk (dm->pktmbuf_pools[socket_id], mbufs, nb_segs))
  85     {
  86       vec_free (mbufs);
  87       return 0;
  88     }
  89
  90   d = mbufs[0];
  91   d->nb_segs = s->nb_segs;
  92   d->data_len = s->data_len;
  93   d->pkt_len = s->pkt_len;
  94   d->data_off = s->data_off;
  95   clib_memcpy (d->buf_addr, s->buf_addr, RTE_PKTMBUF_HEADROOM + s->data_len);
  96
  97   for (i = 1; i < nb_segs; i++)
  98     {
  99       d->next = mbufs[i];
 100       d = mbufs[i];
 101       s = s->next;
 102       d->data_len = s->data_len;
 103       clib_memcpy (d->buf_addr, s->buf_addr,
 104                    RTE_PKTMBUF_HEADROOM + s->data_len);
 105     }
 106
 107   d = mbufs[0];
 108   vec_free (mbufs);
 109   return d;
 110 }
 111
 112 static void
 113 dpdk_tx_trace_buffer (dpdk_main_t * dm, vlib_node_runtime_t * node,
 114                       dpdk_device_t * xd, u16 queue_id,
 115                       vlib_buffer_t * buffer)
 116 {
 117   vlib_main_t *vm = vlib_get_main ();
 118   dpdk_tx_trace_t *t0;
 119   struct rte_mbuf *mb;
 120
 121   mb = rte_mbuf_from_vlib_buffer (buffer);
 122
 123   t0 = vlib_add_trace (vm, node, buffer, sizeof (t0[0]));
 124   t0->queue_index = queue_id;
 125   t0->device_index = xd->device_index;
 126   t0->buffer_index = vlib_get_buffer_index (vm, buffer);
 127   clib_memcpy (&t0->mb, mb, sizeof (t0->mb));
 128   clib_memcpy (&t0->buffer, buffer,
 129                sizeof (buffer[0]) - sizeof (buffer->pre_data));
 130   clib_memcpy (t0->buffer.pre_data, buffer->data + buffer->current_data,
 131                sizeof (t0->buffer.pre_data));
 132   clib_memcpy (&t0->data, mb->buf_addr + mb->data_off, sizeof (t0->data));
 133 }
 134
 135 static_always_inline void
 136 dpdk_validate_rte_mbuf (vlib_main_t * vm, vlib_buffer_t * b,
 137                         int maybe_multiseg)
 138 {
 139   struct rte_mbuf *mb, *first_mb, *last_mb;
 140
 141   /* buffer is coming from non-dpdk source so we need to init
 142      rte_mbuf header */
 143   if (PREDICT_FALSE ((b->flags & VLIB_BUFFER_EXT_HDR_VALID) == 0))
 144     {
 145       vlib_buffer_t *b2 = b;
 146       last_mb = mb = rte_mbuf_from_vlib_buffer (b2);
 147       rte_pktmbuf_reset (mb);
 148       while (maybe_multiseg && (b2->flags & VLIB_BUFFER_NEXT_PRESENT))
 149         {
 150           b2 = vlib_get_buffer (vm, b2->next_buffer);
 151           mb = rte_mbuf_from_vlib_buffer (b2);
 152           rte_pktmbuf_reset (mb);
 153         }
 154     }
 155
 156   last_mb = first_mb = mb = rte_mbuf_from_vlib_buffer (b);
 157   first_mb->nb_segs = 1;
 158   mb->data_len = b->current_length;
 159   mb->pkt_len = maybe_multiseg ? vlib_buffer_length_in_chain (vm, b) :
 160     b->current_length;
 161   mb->data_off = VLIB_BUFFER_PRE_DATA_SIZE + b->current_data;
 162
 163   while (maybe_multiseg && (b->flags & VLIB_BUFFER_NEXT_PRESENT))
 164     {
 165       b = vlib_get_buffer (vm, b->next_buffer);
 166       mb = rte_mbuf_from_vlib_buffer (b);
 167       last_mb->next = mb;
 168       last_mb = mb;
 169       mb->data_len = b->current_length;
 170       mb->pkt_len = b->current_length;
 171       mb->data_off = VLIB_BUFFER_PRE_DATA_SIZE + b->current_data;
 172       first_mb->nb_segs++;
 173       if (PREDICT_FALSE (b->n_add_refs))
 174         {
 175           rte_mbuf_refcnt_update (mb, b->n_add_refs);
 176           b->n_add_refs = 0;
 177         }
 178     }
 179 }
 180
 181 /*
 182  * This function calls the dpdk's tx_burst function to transmit the packets.
 183  * It manages a lock per-device if the device does not
 184  * support multiple queues. It returns the number of packets untransmitted
 185  * If all packets are transmitted (the normal case), the function returns 0.
 186  */
 187 static_always_inline
 188   u32 tx_burst_vector_internal (vlib_main_t * vm,
 189                                 dpdk_device_t * xd,
 190                                 struct rte_mbuf **mb, u32 n_left)
 191 {
 192   dpdk_main_t *dm = &dpdk_main;
 193   u32 n_retry;
 194   int n_sent = 0;
 195   int queue_id;
 196
 197   n_retry = 16;
 198   queue_id = vm->thread_index;
 199
 200   do
 201     {
 202       /*
 203        * This device only supports one TX queue,
 204        * and we're running multi-threaded...
 205        */
 206       if (PREDICT_FALSE (xd->lockp != 0))
 207         {
 208           queue_id = queue_id % xd->tx_q_used;
 209           while (__sync_lock_test_and_set (xd->lockp[queue_id], 1))
 210             /* zzzz */
 211             queue_id = (queue_id + 1) % xd->tx_q_used;
 212         }
 213
 214       if (PREDICT_FALSE (xd->flags & DPDK_DEVICE_FLAG_HQOS))    /* HQoS ON */
 215         {
 216           /* no wrap, transmit in one burst */
 217           dpdk_device_hqos_per_worker_thread_t *hqos =
 218             &xd->hqos_wt[vm->thread_index];
 219
 220           ASSERT (hqos->swq != NULL);
 221
 222           dpdk_hqos_metadata_set (hqos, mb, n_left);
 223           n_sent = rte_ring_sp_enqueue_burst (hqos->swq, (void **) mb,
 224                                               n_left, 0);
 225         }
 226       else if (PREDICT_TRUE (xd->flags & DPDK_DEVICE_FLAG_PMD))
 227         {
 228           /* no wrap, transmit in one burst */
 229           n_sent = rte_eth_tx_burst (xd->device_index, queue_id, mb, n_left);
 230         }
 231       else
 232         {
 233           ASSERT (0);
 234           n_sent = 0;
 235         }
 236
 237       if (PREDICT_FALSE (xd->lockp != 0))
 238         *xd->lockp[queue_id] = 0;
 239
 240       if (PREDICT_FALSE (n_sent < 0))
 241         {
 242           // emit non-fatal message, bump counter
 243           vnet_main_t *vnm = dm->vnet_main;
 244           vnet_interface_main_t *im = &vnm->interface_main;
 245           u32 node_index;
 246
 247           node_index = vec_elt_at_index (im->hw_interfaces,
 248                                          xd->hw_if_index)->tx_node_index;
 249
 250           vlib_error_count (vm, node_index, DPDK_TX_FUNC_ERROR_BAD_RETVAL, 1);
 251           clib_warning ("rte_eth_tx_burst[%d]: error %d", xd->device_index,
 252                         n_sent);
 253           return n_left;        // untransmitted packets
 254         }
 255       n_left -= n_sent;
 256       mb += n_sent;
 257     }
 258   while (n_sent && n_left && (n_retry > 0));
 259
 260   return n_left;
 261 }
 262
 263 static_always_inline void
 264 dpdk_prefetch_buffer (vlib_main_t * vm, struct rte_mbuf *mb)
 265 {
 266   vlib_buffer_t *b = vlib_buffer_from_rte_mbuf (mb);
 267   CLIB_PREFETCH (mb, 2 * CLIB_CACHE_LINE_BYTES, STORE);
 268   CLIB_PREFETCH (b, CLIB_CACHE_LINE_BYTES, LOAD);
 269 }
 270
 271 static_always_inline void
 272 dpdk_buffer_recycle (vlib_main_t * vm, vlib_node_runtime_t * node,
 273                      vlib_buffer_t * b, u32 bi, struct rte_mbuf **mbp)
 274 {
 275   dpdk_main_t *dm = &dpdk_main;
 276   struct rte_mbuf *mb_new;
 277
 278   if (PREDICT_FALSE (b->flags & VLIB_BUFFER_RECYCLE) == 0)
 279     return;
 280
 281   mb_new = dpdk_replicate_packet_mb (b);
 282   if (PREDICT_FALSE (mb_new == 0))
 283     {
 284       vlib_error_count (vm, node->node_index,
 285                         DPDK_TX_FUNC_ERROR_REPL_FAIL, 1);
 286       b->flags |= VLIB_BUFFER_REPL_FAIL;
 287     }
 288   else
 289     *mbp = mb_new;
 290
 291   vec_add1 (dm->recycle[vm->thread_index], bi);
 292 }
 293
 294 static_always_inline void
 295 dpdk_buffer_tx_offload (dpdk_device_t * xd, vlib_buffer_t * b,
 296                         struct rte_mbuf *mb)
 297 {
 298   u32 ip_cksum = b->flags & VNET_BUFFER_F_OFFLOAD_IP_CKSUM;
 299   u32 tcp_cksum = b->flags & VNET_BUFFER_F_OFFLOAD_TCP_CKSUM;
 300   u32 udp_cksum = b->flags & VNET_BUFFER_F_OFFLOAD_UDP_CKSUM;
 301   int is_ip4 = b->flags & VNET_BUFFER_F_IS_IP4;
 302   u64 ol_flags;
 303
 304   /* Is there any work for us? */
 305   if (PREDICT_TRUE ((ip_cksum | tcp_cksum | udp_cksum) == 0))
 306     return;
 307
 308   mb->l2_len = vnet_buffer (b)->l3_hdr_offset - b->current_data;
 309   mb->l3_len = vnet_buffer (b)->l4_hdr_offset -
 310     vnet_buffer (b)->l3_hdr_offset;
 311   mb->outer_l3_len = 0;
 312   mb->outer_l2_len = 0;
 313   ol_flags = is_ip4 ? PKT_TX_IPV4 : PKT_TX_IPV6;
 314   ol_flags |= ip_cksum ? PKT_TX_IP_CKSUM : 0;
 315   ol_flags |= tcp_cksum ? PKT_TX_TCP_CKSUM : 0;
 316   ol_flags |= udp_cksum ? PKT_TX_UDP_CKSUM : 0;
 317   mb->ol_flags |= ol_flags;
 318
 319   /* we are trying to help compiler here by using local ol_flags with known
 320      state of all flags */
 321   if (xd->flags & DPDK_DEVICE_FLAG_INTEL_PHDR_CKSUM)
 322     rte_net_intel_cksum_flags_prepare (mb, ol_flags);
 323 }
 324
 325 /*
 326  * Transmits the packets on the frame to the interface associated with the
 327  * node. It first copies packets on the frame to a per-thread arrays
 328  * containing the rte_mbuf pointers.
 329  */
 330 uword
 331 CLIB_MULTIARCH_FN (dpdk_interface_tx) (vlib_main_t * vm,
 332                                        vlib_node_runtime_t * node,
 333                                        vlib_frame_t * f)
 334 {
 335   dpdk_main_t *dm = &dpdk_main;
 336   vnet_interface_output_runtime_t *rd = (void *) node->runtime_data;
 337   dpdk_device_t *xd = vec_elt_at_index (dm->devices, rd->dev_instance);
 338   u32 n_packets = f->n_vectors;
 339   u32 n_left;
 340   u32 *from;
 341   u32 thread_index = vm->thread_index;
 342   int queue_id = thread_index;
 343   u32 tx_pkts = 0, all_or_flags = 0;
 344   dpdk_per_thread_data_t *ptd = vec_elt_at_index (dm->per_thread_data,
 345                                                   thread_index);
 346   struct rte_mbuf **mb;
 347   vlib_buffer_t *b[4];
 348 #ifdef CLIB_HAVE_VEC256
 349   u64x4 off4 = u64x4_splat (buffer_main.buffer_mem_start -
 350                             sizeof (struct rte_mbuf));
 351   u32x8 permute_mask = { 0, 4, 1, 5, 2, 6, 3, 7 };
 352   u32x8 zero = { 0 };
 353 #endif
 354
 355   from = vlib_frame_vector_args (f);
 356
 357   ASSERT (n_packets <= VLIB_FRAME_SIZE);
 358
 359   /* TX PCAP tracing */
 360   if (PREDICT_FALSE (dm->tx_pcap_enable))
 361     {
 362       n_left = n_packets;
 363       while (n_left > 0)
 364         {
 365           u32 bi0 = from[0];
 366           vlib_buffer_t *b0 = vlib_get_buffer (vm, bi0);
 367           if (dm->pcap_sw_if_index == 0 ||
 368               dm->pcap_sw_if_index == vnet_buffer (b0)->sw_if_index[VLIB_TX])
 369             pcap_add_buffer (&dm->pcap_main, vm, bi0, 512);
 370           from++;
 371           n_left--;
 372         }
 373     }
 374
 375   /* calculate rte_mbuf pointers out of buffer indices */
 376   from = vlib_frame_vector_args (f);
 377   n_left = n_packets;
 378   mb = ptd->mbufs;
 379   while (n_left >= 8)
 380     {
 381 #ifdef CLIB_HAVE_VEC256
 382       u32x8 bi0, bi1;
 383       u64x4 mb0, mb1;
 384       /* load 4 bufer indices into lower part of 256-bit register */
 385       bi0 = u32x8_insert_lo (zero, u32x4_load_unaligned (from));
 386       bi1 = u32x8_insert_lo (zero, u32x4_load_unaligned (from + 4));
 387       /* permute 256-bit register so each buffer index is in own u64 */
 388       mb0 = (u64x4) u32x8_permute (bi0, permute_mask);
 389       mb1 = (u64x4) u32x8_permute (bi1, permute_mask);
 390       /* shift and add to get rte_mbuf pointer */
 391       mb0 <<= CLIB_LOG2_CACHE_LINE_BYTES;
 392       mb1 <<= CLIB_LOG2_CACHE_LINE_BYTES;
 393       u64x4_store_unaligned (mb0 + off4, mb);
 394       u64x4_store_unaligned (mb1 + off4, mb + 4);
 395 #else
 396       mb[0] = rte_mbuf_from_vlib_buffer (vlib_get_buffer (vm, from[0]));
 397       mb[1] = rte_mbuf_from_vlib_buffer (vlib_get_buffer (vm, from[1]));
 398       mb[2] = rte_mbuf_from_vlib_buffer (vlib_get_buffer (vm, from[2]));
 399       mb[3] = rte_mbuf_from_vlib_buffer (vlib_get_buffer (vm, from[3]));
 400       mb[4] = rte_mbuf_from_vlib_buffer (vlib_get_buffer (vm, from[4]));
 401       mb[5] = rte_mbuf_from_vlib_buffer (vlib_get_buffer (vm, from[5]));
 402       mb[6] = rte_mbuf_from_vlib_buffer (vlib_get_buffer (vm, from[6]));
 403       mb[7] = rte_mbuf_from_vlib_buffer (vlib_get_buffer (vm, from[7]));
 404 #endif
 405       from += 8;
 406       mb += 8;
 407       n_left -= 8;
 408     }
 409   while (n_left)
 410     {
 411       mb[0] = rte_mbuf_from_vlib_buffer (vlib_get_buffer (vm, from[0]));
 412       from++;
 413       mb++;
 414       n_left--;
 415     }
 416   from = vlib_frame_vector_args (f);
 417   n_left = n_packets;
 418   mb = ptd->mbufs;
 419
 420   while (n_left >= 8)
 421     {
 422       u32 or_flags;
 423
 424       dpdk_prefetch_buffer (vm, mb[4]);
 425       dpdk_prefetch_buffer (vm, mb[5]);
 426       dpdk_prefetch_buffer (vm, mb[6]);
 427       dpdk_prefetch_buffer (vm, mb[7]);
 428
 429       b[0] = vlib_buffer_from_rte_mbuf (mb[0]);
 430       b[1] = vlib_buffer_from_rte_mbuf (mb[1]);
 431       b[2] = vlib_buffer_from_rte_mbuf (mb[2]);
 432       b[3] = vlib_buffer_from_rte_mbuf (mb[3]);
 433
 434       or_flags = b[0]->flags | b[1]->flags | b[2]->flags | b[3]->flags;
 435       all_or_flags |= or_flags;
 436
 437       VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b[0]);
 438       VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b[1]);
 439       VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b[2]);
 440       VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b[3]);
 441
 442       if (or_flags & VLIB_BUFFER_NEXT_PRESENT)
 443         {
 444           dpdk_validate_rte_mbuf (vm, b[0], 1);
 445           dpdk_validate_rte_mbuf (vm, b[1], 1);
 446           dpdk_validate_rte_mbuf (vm, b[2], 1);
 447           dpdk_validate_rte_mbuf (vm, b[3], 1);
 448         }
 449       else
 450         {
 451           dpdk_validate_rte_mbuf (vm, b[0], 0);
 452           dpdk_validate_rte_mbuf (vm, b[1], 0);
 453           dpdk_validate_rte_mbuf (vm, b[2], 0);
 454           dpdk_validate_rte_mbuf (vm, b[3], 0);
 455         }
 456
 457       if (PREDICT_FALSE ((xd->flags & DPDK_DEVICE_FLAG_TX_OFFLOAD) &&
 458                          (or_flags &
 459                           (VNET_BUFFER_F_OFFLOAD_TCP_CKSUM
 460                            | VNET_BUFFER_F_OFFLOAD_IP_CKSUM
 461                            | VNET_BUFFER_F_OFFLOAD_UDP_CKSUM))))
 462         {
 463           dpdk_buffer_tx_offload (xd, b[0], mb[0]);
 464           dpdk_buffer_tx_offload (xd, b[1], mb[1]);
 465           dpdk_buffer_tx_offload (xd, b[2], mb[2]);
 466           dpdk_buffer_tx_offload (xd, b[3], mb[3]);
 467         }
 468
 469       if (PREDICT_FALSE (node->flags & VLIB_NODE_FLAG_TRACE))
 470         {
 471           if (b[0]->flags & VLIB_BUFFER_IS_TRACED)
 472             dpdk_tx_trace_buffer (dm, node, xd, queue_id, b[0]);
 473           if (b[1]->flags & VLIB_BUFFER_IS_TRACED)
 474             dpdk_tx_trace_buffer (dm, node, xd, queue_id, b[1]);
 475           if (b[2]->flags & VLIB_BUFFER_IS_TRACED)
 476             dpdk_tx_trace_buffer (dm, node, xd, queue_id, b[2]);
 477           if (b[3]->flags & VLIB_BUFFER_IS_TRACED)
 478             dpdk_tx_trace_buffer (dm, node, xd, queue_id, b[3]);
 479         }
 480
 481       mb += 4;
 482       n_left -= 4;
 483     }
 484   while (n_left > 0)
 485     {
 486       b[0] = vlib_buffer_from_rte_mbuf (mb[0]);
 487       all_or_flags |= b[0]->flags;
 488       VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b[0]);
 489
 490       dpdk_validate_rte_mbuf (vm, b[0], 1);
 491       dpdk_buffer_tx_offload (xd, b[0], mb[0]);
 492
 493       if (PREDICT_FALSE (node->flags & VLIB_NODE_FLAG_TRACE))
 494         if (b[0]->flags & VLIB_BUFFER_IS_TRACED)
 495           dpdk_tx_trace_buffer (dm, node, xd, queue_id, b[0]);
 496
 497       mb++;
 498       n_left--;
 499     }
 500
 501   /* run inly if we have buffers to recycle */
 502   if (PREDICT_FALSE (all_or_flags & VLIB_BUFFER_RECYCLE))
 503     {
 504       struct rte_mbuf **mb_old;
 505       from = vlib_frame_vector_args (f);
 506       n_left = n_packets;
 507       mb_old = mb = ptd->mbufs;
 508       while (n_left > 0)
 509         {
 510           b[0] = vlib_buffer_from_rte_mbuf (mb[0]);
 511           dpdk_buffer_recycle (vm, node, b[0], from[0], &mb_old[0]);
 512
 513           /* in case of REPL_FAIL we need to shift data */
 514           mb[0] = mb_old[0];
 515
 516           if (PREDICT_TRUE ((b[0]->flags & VLIB_BUFFER_REPL_FAIL) == 0))
 517             mb++;
 518           mb_old++;
 519           from++;
 520           n_left--;
 521         }
 522     }
 523
 524   /* transmit as many packets as possible */
 525   n_packets = mb - ptd->mbufs;
 526   n_left = tx_burst_vector_internal (vm, xd, ptd->mbufs, n_packets);
 527
 528   {
 529     /* If there is no callback then drop any non-transmitted packets */
 530     if (PREDICT_FALSE (n_left))
 531       {
 532         vlib_simple_counter_main_t *cm;
 533         vnet_main_t *vnm = vnet_get_main ();
 534
 535         cm = vec_elt_at_index (vnm->interface_main.sw_if_counters,
 536                                VNET_INTERFACE_COUNTER_TX_ERROR);
 537
 538         vlib_increment_simple_counter (cm, thread_index, xd->sw_if_index,
 539                                        n_left);
 540
 541         vlib_error_count (vm, node->node_index, DPDK_TX_FUNC_ERROR_PKT_DROP,
 542                           n_left);
 543
 544         while (n_left--)
 545           rte_pktmbuf_free (ptd->mbufs[n_packets - n_left]);
 546       }
 547   }
 548
 549   /* Recycle replicated buffers */
 550   if (PREDICT_FALSE (vec_len (dm->recycle[thread_index])))
 551     {
 552       vlib_buffer_free (vm, dm->recycle[thread_index],
 553                         vec_len (dm->recycle[thread_index]));
 554       _vec_len (dm->recycle[thread_index]) = 0;
 555     }
 556
 557   return tx_pkts;
 558 }
 559
 560 #ifndef CLIB_MULTIARCH_VARIANT
 561 static void
 562 dpdk_clear_hw_interface_counters (u32 instance)
 563 {
 564   dpdk_main_t *dm = &dpdk_main;
 565   dpdk_device_t *xd = vec_elt_at_index (dm->devices, instance);
 566
 567   /*
 568    * Set the "last_cleared_stats" to the current stats, so that
 569    * things appear to clear from a display perspective.
 570    */
 571   dpdk_update_counters (xd, vlib_time_now (dm->vlib_main));
 572
 573   clib_memcpy (&xd->last_cleared_stats, &xd->stats, sizeof (xd->stats));
 574   clib_memcpy (xd->last_cleared_xstats, xd->xstats,
 575                vec_len (xd->last_cleared_xstats) *
 576                sizeof (xd->last_cleared_xstats[0]));
 577
 578 }
 579
 580 static clib_error_t *
 581 dpdk_interface_admin_up_down (vnet_main_t * vnm, u32 hw_if_index, u32 flags)
 582 {
 583   vnet_hw_interface_t *hif = vnet_get_hw_interface (vnm, hw_if_index);
 584   uword is_up = (flags & VNET_SW_INTERFACE_FLAG_ADMIN_UP) != 0;
 585   dpdk_main_t *dm = &dpdk_main;
 586   dpdk_device_t *xd = vec_elt_at_index (dm->devices, hif->dev_instance);
 587
 588   if (xd->flags & DPDK_DEVICE_FLAG_PMD_INIT_FAIL)
 589     return clib_error_return (0, "Interface not initialized");
 590
 591   if (is_up)
 592     {
 593       vnet_hw_interface_set_flags (vnm, xd->hw_if_index,
 594                                    VNET_HW_INTERFACE_FLAG_LINK_UP);
 595       if ((xd->flags & DPDK_DEVICE_FLAG_ADMIN_UP) == 0)
 596         dpdk_device_start (xd);
 597       xd->flags |= DPDK_DEVICE_FLAG_ADMIN_UP;
 598       f64 now = vlib_time_now (dm->vlib_main);
 599       dpdk_update_counters (xd, now);
 600       dpdk_update_link_state (xd, now);
 601     }
 602   else
 603     {
 604       vnet_hw_interface_set_flags (vnm, xd->hw_if_index, 0);
 605       if ((xd->flags & DPDK_DEVICE_FLAG_ADMIN_UP) != 0)
 606         dpdk_device_stop (xd);
 607       xd->flags &= ~DPDK_DEVICE_FLAG_ADMIN_UP;
 608     }
 609
 610   return /* no error */ 0;
 611 }
 612
 613 /*
 614  * Dynamically redirect all pkts from a specific interface
 615  * to the specified node
 616  */
 617 static void
 618 dpdk_set_interface_next_node (vnet_main_t * vnm, u32 hw_if_index,
 619                               u32 node_index)
 620 {
 621   dpdk_main_t *xm = &dpdk_main;
 622   vnet_hw_interface_t *hw = vnet_get_hw_interface (vnm, hw_if_index);
 623   dpdk_device_t *xd = vec_elt_at_index (xm->devices, hw->dev_instance);
 624
 625   /* Shut off redirection */
 626   if (node_index == ~0)
 627     {
 628       xd->per_interface_next_index = node_index;
 629       return;
 630     }
 631
 632   xd->per_interface_next_index =
 633     vlib_node_add_next (xm->vlib_main, dpdk_input_node.index, node_index);
 634 }
 635
 636
 637 static clib_error_t *
 638 dpdk_subif_add_del_function (vnet_main_t * vnm,
 639                              u32 hw_if_index,
 640                              struct vnet_sw_interface_t *st, int is_add)
 641 {
 642   dpdk_main_t *xm = &dpdk_main;
 643   vnet_hw_interface_t *hw = vnet_get_hw_interface (vnm, hw_if_index);
 644   dpdk_device_t *xd = vec_elt_at_index (xm->devices, hw->dev_instance);
 645   vnet_sw_interface_t *t = (vnet_sw_interface_t *) st;
 646   int r, vlan_offload;
 647   u32 prev_subifs = xd->num_subifs;
 648   clib_error_t *err = 0;
 649
 650   if (is_add)
 651     xd->num_subifs++;
 652   else if (xd->num_subifs)
 653     xd->num_subifs--;
 654
 655   if ((xd->flags & DPDK_DEVICE_FLAG_PMD) == 0)
 656     goto done;
 657
 658   /* currently we program VLANS only for IXGBE VF and I40E VF */
 659   if ((xd->pmd != VNET_DPDK_PMD_IXGBEVF) && (xd->pmd != VNET_DPDK_PMD_I40EVF))
 660     goto done;
 661
 662   if (t->sub.eth.flags.no_tags == 1)
 663     goto done;
 664
 665   if ((t->sub.eth.flags.one_tag != 1) || (t->sub.eth.flags.exact_match != 1))
 666     {
 667       xd->num_subifs = prev_subifs;
 668       err = clib_error_return (0, "unsupported VLAN setup");
 669       goto done;
 670     }
 671
 672   vlan_offload = rte_eth_dev_get_vlan_offload (xd->device_index);
 673   vlan_offload |= ETH_VLAN_FILTER_OFFLOAD;
 674
 675   if ((r = rte_eth_dev_set_vlan_offload (xd->device_index, vlan_offload)))
 676     {
 677       xd->num_subifs = prev_subifs;
 678       err = clib_error_return (0, "rte_eth_dev_set_vlan_offload[%d]: err %d",
 679                                xd->device_index, r);
 680       goto done;
 681     }
 682
 683
 684   if ((r =
 685        rte_eth_dev_vlan_filter (xd->device_index, t->sub.eth.outer_vlan_id,
 686                                 is_add)))
 687     {
 688       xd->num_subifs = prev_subifs;
 689       err = clib_error_return (0, "rte_eth_dev_vlan_filter[%d]: err %d",
 690                                xd->device_index, r);
 691       goto done;
 692     }
 693
 694 done:
 695   if (xd->num_subifs)
 696     xd->flags |= DPDK_DEVICE_FLAG_HAVE_SUBIF;
 697   else
 698     xd->flags &= ~DPDK_DEVICE_FLAG_HAVE_SUBIF;
 699
 700   return err;
 701 }
 702
 703 /* *INDENT-OFF* */
 704 VNET_DEVICE_CLASS (dpdk_device_class) = {
 705   .name = "dpdk",
 706   .tx_function = dpdk_interface_tx,
 707   .tx_function_n_errors = DPDK_TX_FUNC_N_ERROR,
 708   .tx_function_error_strings = dpdk_tx_func_error_strings,
 709   .format_device_name = format_dpdk_device_name,
 710   .format_device = format_dpdk_device,
 711   .format_tx_trace = format_dpdk_tx_trace,
 712   .clear_counters = dpdk_clear_hw_interface_counters,
 713   .admin_up_down_function = dpdk_interface_admin_up_down,
 714   .subif_add_del_function = dpdk_subif_add_del_function,
 715   .rx_redirect_to_node = dpdk_set_interface_next_node,
 716   .mac_addr_change_function = dpdk_set_mac_address,
 717 };
 718 /* *INDENT-ON* */
 719
 720 #if __x86_64__
 721 vlib_node_function_t __clib_weak dpdk_interface_tx_avx512;
 722 vlib_node_function_t __clib_weak dpdk_interface_tx_avx2;
 723 static void __clib_constructor
 724 dpdk_interface_tx_multiarch_select (void)
 725 {
 726   if (dpdk_interface_tx_avx512 && clib_cpu_supports_avx512f ())
 727     dpdk_device_class.tx_function = dpdk_interface_tx_avx512;
 728   else if (dpdk_interface_tx_avx2 && clib_cpu_supports_avx2 ())
 729     dpdk_device_class.tx_function = dpdk_interface_tx_avx2;
 730 }
 731 #endif
 732 #endif
 733
 734 #define UP_DOWN_FLAG_EVENT 1
 735
 736 #ifndef CLIB_MULTIARCH_VARIANT
 737 uword
 738 admin_up_down_process (vlib_main_t * vm,
 739                        vlib_node_runtime_t * rt, vlib_frame_t * f)
 740 {
 741   clib_error_t *error = 0;
 742   uword event_type;
 743   uword *event_data = 0;
 744   u32 sw_if_index;
 745   u32 flags;
 746
 747   while (1)
 748     {
 749       vlib_process_wait_for_event (vm);
 750
 751       event_type = vlib_process_get_events (vm, &event_data);
 752
 753       dpdk_main.admin_up_down_in_progress = 1;
 754
 755       switch (event_type)
 756         {
 757         case UP_DOWN_FLAG_EVENT:
 758           {
 759             if (vec_len (event_data) == 2)
 760               {
 761                 sw_if_index = event_data[0];
 762                 flags = event_data[1];
 763                 error =
 764                   vnet_sw_interface_set_flags (vnet_get_main (), sw_if_index,
 765                                                flags);
 766                 clib_error_report (error);
 767               }
 768           }
 769           break;
 770         }
 771
 772       vec_reset_length (event_data);
 773
 774       dpdk_main.admin_up_down_in_progress = 0;
 775
 776     }
 777   return 0;                     /* or not */
 778 }
 779
 780 /* *INDENT-OFF* */
 781 VLIB_REGISTER_NODE (admin_up_down_process_node,static) = {
 782     .function = admin_up_down_process,
 783     .type = VLIB_NODE_TYPE_PROCESS,
 784     .name = "admin-up-down-process",
 785     .process_log2_n_stack_bytes = 17,  // 256KB
 786 };
 787 /* *INDENT-ON* */
 788 #endif
 789
 790 /*
 791  * fd.io coding-style-patch-verification: ON
 792  *
 793  * Local Variables:
 794  * eval: (c-set-style "gnu")
 795  * End:
 796  */