vnet/vnet/devices/dpdk/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 <vnet/devices/dpdk/dpdk.h>
  23
  24 #include "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   _(RING_FULL, "Tx packet drops (ring full)")           \
  30   _(PKT_DROP, "Tx packet drops (dpdk tx failure)")      \
  31   _(REPL_FAIL, "Tx packet drops (replication failure)")
  32
  33 typedef enum
  34 {
  35 #define _(f,s) DPDK_TX_FUNC_ERROR_##f,
  36   foreach_dpdk_tx_func_error
  37 #undef _
  38     DPDK_TX_FUNC_N_ERROR,
  39 } dpdk_tx_func_error_t;
  40
  41 static char *dpdk_tx_func_error_strings[] = {
  42 #define _(n,s) s,
  43   foreach_dpdk_tx_func_error
  44 #undef _
  45 };
  46
  47 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       return NULL;
  64     }
  65 }
  66
  67 clib_error_t *
  68 dpdk_set_mc_filter (vnet_hw_interface_t * hi,
  69                     struct ether_addr mc_addr_vec[], int naddr)
  70 {
  71   int error;
  72   dpdk_main_t *dm = &dpdk_main;
  73   dpdk_device_t *xd = vec_elt_at_index (dm->devices, hi->dev_instance);
  74
  75   error = rte_eth_dev_set_mc_addr_list (xd->device_index, mc_addr_vec, naddr);
  76
  77   if (error)
  78     {
  79       return clib_error_return (0, "mc addr list failed: %d", error);
  80     }
  81   else
  82     {
  83       return NULL;
  84     }
  85 }
  86
  87 struct rte_mbuf *
  88 dpdk_replicate_packet_mb (vlib_buffer_t * b)
  89 {
  90   vlib_main_t *vm = vlib_get_main ();
  91   vlib_buffer_main_t *bm = vm->buffer_main;
  92   struct rte_mbuf *first_mb = 0, *new_mb, *pkt_mb, **prev_mb_next = 0;
  93   u8 nb_segs, nb_segs_left;
  94   u32 copy_bytes;
  95   unsigned socket_id = rte_socket_id ();
  96
  97   ASSERT (bm->pktmbuf_pools[socket_id]);
  98   pkt_mb = rte_mbuf_from_vlib_buffer (b);
  99   nb_segs = pkt_mb->nb_segs;
 100   for (nb_segs_left = nb_segs; nb_segs_left; nb_segs_left--)
 101     {
 102       if (PREDICT_FALSE (pkt_mb == 0))
 103         {
 104           clib_warning ("Missing %d mbuf chain segment(s):   "
 105                         "(nb_segs = %d, nb_segs_left = %d)!",
 106                         nb_segs - nb_segs_left, nb_segs, nb_segs_left);
 107           if (first_mb)
 108             rte_pktmbuf_free (first_mb);
 109           return NULL;
 110         }
 111       new_mb = rte_pktmbuf_alloc (bm->pktmbuf_pools[socket_id]);
 112       if (PREDICT_FALSE (new_mb == 0))
 113         {
 114           if (first_mb)
 115             rte_pktmbuf_free (first_mb);
 116           return NULL;
 117         }
 118
 119       /*
 120        * Copy packet info into 1st segment.
 121        */
 122       if (first_mb == 0)
 123         {
 124           first_mb = new_mb;
 125           rte_pktmbuf_pkt_len (first_mb) = pkt_mb->pkt_len;
 126           first_mb->nb_segs = pkt_mb->nb_segs;
 127           first_mb->port = pkt_mb->port;
 128 #ifdef DAW_FIXME                // TX Offload support TBD
 129           first_mb->vlan_macip = pkt_mb->vlan_macip;
 130           first_mb->hash = pkt_mb->hash;
 131           first_mb->ol_flags = pkt_mb->ol_flags
 132 #endif
 133         }
 134       else
 135         {
 136           ASSERT (prev_mb_next != 0);
 137           *prev_mb_next = new_mb;
 138         }
 139
 140       /*
 141        * Copy packet segment data into new mbuf segment.
 142        */
 143       rte_pktmbuf_data_len (new_mb) = pkt_mb->data_len;
 144       copy_bytes = pkt_mb->data_len + RTE_PKTMBUF_HEADROOM;
 145       ASSERT (copy_bytes <= pkt_mb->buf_len);
 146       clib_memcpy (new_mb->buf_addr, pkt_mb->buf_addr, copy_bytes);
 147
 148       prev_mb_next = &new_mb->next;
 149       pkt_mb = pkt_mb->next;
 150     }
 151
 152   ASSERT (pkt_mb == 0);
 153   __rte_mbuf_sanity_check (first_mb, 1);
 154
 155   return first_mb;
 156 }
 157
 158 struct rte_mbuf *
 159 dpdk_zerocopy_replicate_packet_mb (vlib_buffer_t * b)
 160 {
 161   vlib_main_t *vm = vlib_get_main ();
 162   vlib_buffer_main_t *bm = vm->buffer_main;
 163   struct rte_mbuf *first_mb = 0, *new_mb, *pkt_mb, **prev_mb_next = 0;
 164   u8 nb_segs, nb_segs_left;
 165   unsigned socket_id = rte_socket_id ();
 166
 167   ASSERT (bm->pktmbuf_pools[socket_id]);
 168   pkt_mb = rte_mbuf_from_vlib_buffer (b);
 169   nb_segs = pkt_mb->nb_segs;
 170   for (nb_segs_left = nb_segs; nb_segs_left; nb_segs_left--)
 171     {
 172       if (PREDICT_FALSE (pkt_mb == 0))
 173         {
 174           clib_warning ("Missing %d mbuf chain segment(s):   "
 175                         "(nb_segs = %d, nb_segs_left = %d)!",
 176                         nb_segs - nb_segs_left, nb_segs, nb_segs_left);
 177           if (first_mb)
 178             rte_pktmbuf_free (first_mb);
 179           return NULL;
 180         }
 181       new_mb = rte_pktmbuf_clone (pkt_mb, bm->pktmbuf_pools[socket_id]);
 182       if (PREDICT_FALSE (new_mb == 0))
 183         {
 184           if (first_mb)
 185             rte_pktmbuf_free (first_mb);
 186           return NULL;
 187         }
 188
 189       /*
 190        * Copy packet info into 1st segment.
 191        */
 192       if (first_mb == 0)
 193         {
 194           first_mb = new_mb;
 195           rte_pktmbuf_pkt_len (first_mb) = pkt_mb->pkt_len;
 196           first_mb->nb_segs = pkt_mb->nb_segs;
 197           first_mb->port = pkt_mb->port;
 198 #ifdef DAW_FIXME                // TX Offload support TBD
 199           first_mb->vlan_macip = pkt_mb->vlan_macip;
 200           first_mb->hash = pkt_mb->hash;
 201           first_mb->ol_flags = pkt_mb->ol_flags
 202 #endif
 203         }
 204       else
 205         {
 206           ASSERT (prev_mb_next != 0);
 207           *prev_mb_next = new_mb;
 208         }
 209
 210       /*
 211        * Copy packet segment data into new mbuf segment.
 212        */
 213       rte_pktmbuf_data_len (new_mb) = pkt_mb->data_len;
 214
 215       prev_mb_next = &new_mb->next;
 216       pkt_mb = pkt_mb->next;
 217     }
 218
 219   ASSERT (pkt_mb == 0);
 220   __rte_mbuf_sanity_check (first_mb, 1);
 221
 222   return first_mb;
 223
 224
 225 }
 226
 227 static void
 228 dpdk_tx_trace_buffer (dpdk_main_t * dm,
 229                       vlib_node_runtime_t * node,
 230                       dpdk_device_t * xd,
 231                       u16 queue_id, u32 buffer_index, vlib_buffer_t * buffer)
 232 {
 233   vlib_main_t *vm = vlib_get_main ();
 234   dpdk_tx_dma_trace_t *t0;
 235   struct rte_mbuf *mb;
 236
 237   mb = rte_mbuf_from_vlib_buffer (buffer);
 238
 239   t0 = vlib_add_trace (vm, node, buffer, sizeof (t0[0]));
 240   t0->queue_index = queue_id;
 241   t0->device_index = xd->device_index;
 242   t0->buffer_index = buffer_index;
 243   clib_memcpy (&t0->mb, mb, sizeof (t0->mb));
 244   clib_memcpy (&t0->buffer, buffer,
 245                sizeof (buffer[0]) - sizeof (buffer->pre_data));
 246   clib_memcpy (t0->buffer.pre_data, buffer->data + buffer->current_data,
 247                sizeof (t0->buffer.pre_data));
 248 }
 249
 250 /*
 251  * This function calls the dpdk's tx_burst function to transmit the packets
 252  * on the tx_vector. It manages a lock per-device if the device does not
 253  * support multiple queues. It returns the number of packets untransmitted
 254  * on the tx_vector. If all packets are transmitted (the normal case), the
 255  * function returns 0.
 256  *
 257  * The function assumes there is at least one packet on the tx_vector.
 258  */
 259 static_always_inline
 260   u32 tx_burst_vector_internal (vlib_main_t * vm,
 261                                 dpdk_device_t * xd,
 262                                 struct rte_mbuf **tx_vector)
 263 {
 264   dpdk_main_t *dm = &dpdk_main;
 265   u32 n_packets;
 266   u32 tx_head;
 267   u32 tx_tail;
 268   u32 n_retry;
 269   int rv;
 270   int queue_id;
 271   tx_ring_hdr_t *ring;
 272
 273   ring = vec_header (tx_vector, sizeof (*ring));
 274
 275   n_packets = ring->tx_head - ring->tx_tail;
 276
 277   tx_head = ring->tx_head % xd->nb_tx_desc;
 278
 279   /*
 280    * Ensure rte_eth_tx_burst is not called with 0 packets, which can lead to
 281    * unpredictable results.
 282    */
 283   ASSERT (n_packets > 0);
 284
 285   /*
 286    * Check for tx_vector overflow. If this fails it is a system configuration
 287    * error. The ring should be sized big enough to handle the largest un-flowed
 288    * off burst from a traffic manager. A larger size also helps performance
 289    * a bit because it decreases the probability of having to issue two tx_burst
 290    * calls due to a ring wrap.
 291    */
 292   ASSERT (n_packets < xd->nb_tx_desc);
 293   ASSERT (ring->tx_tail == 0);
 294
 295   n_retry = 16;
 296   queue_id = vm->cpu_index;
 297
 298   do
 299     {
 300       /* start the burst at the tail */
 301       tx_tail = ring->tx_tail % xd->nb_tx_desc;
 302
 303       /*
 304        * This device only supports one TX queue,
 305        * and we're running multi-threaded...
 306        */
 307       if (PREDICT_FALSE (xd->lockp != 0))
 308         {
 309           queue_id = queue_id % xd->tx_q_used;
 310           while (__sync_lock_test_and_set (xd->lockp[queue_id], 1))
 311             /* zzzz */
 312             queue_id = (queue_id + 1) % xd->tx_q_used;
 313         }
 314
 315       if (PREDICT_FALSE (xd->flags & DPDK_DEVICE_FLAG_HQOS))    /* HQoS ON */
 316         {
 317           /* no wrap, transmit in one burst */
 318           dpdk_device_hqos_per_worker_thread_t *hqos =
 319             &xd->hqos_wt[vm->cpu_index];
 320
 321           dpdk_hqos_metadata_set (hqos,
 322                                   &tx_vector[tx_tail], tx_head - tx_tail);
 323           rv = rte_ring_sp_enqueue_burst (hqos->swq,
 324                                           (void **) &tx_vector[tx_tail],
 325                                           (uint16_t) (tx_head - tx_tail));
 326         }
 327       else if (PREDICT_TRUE (xd->flags & DPDK_DEVICE_FLAG_PMD))
 328         {
 329           /* no wrap, transmit in one burst */
 330           rv = rte_eth_tx_burst (xd->device_index,
 331                                  (uint16_t) queue_id,
 332                                  &tx_vector[tx_tail],
 333                                  (uint16_t) (tx_head - tx_tail));
 334         }
 335       else
 336         {
 337           ASSERT (0);
 338           rv = 0;
 339         }
 340
 341       if (PREDICT_FALSE (xd->lockp != 0))
 342         *xd->lockp[queue_id] = 0;
 343
 344       if (PREDICT_FALSE (rv < 0))
 345         {
 346           // emit non-fatal message, bump counter
 347           vnet_main_t *vnm = dm->vnet_main;
 348           vnet_interface_main_t *im = &vnm->interface_main;
 349           u32 node_index;
 350
 351           node_index = vec_elt_at_index (im->hw_interfaces,
 352                                          xd->vlib_hw_if_index)->tx_node_index;
 353
 354           vlib_error_count (vm, node_index, DPDK_TX_FUNC_ERROR_BAD_RETVAL, 1);
 355           clib_warning ("rte_eth_tx_burst[%d]: error %d", xd->device_index,
 356                         rv);
 357           return n_packets;     // untransmitted packets
 358         }
 359       ring->tx_tail += (u16) rv;
 360       n_packets -= (uint16_t) rv;
 361     }
 362   while (rv && n_packets && (n_retry > 0));
 363
 364   return n_packets;
 365 }
 366
 367 /*
 368  * Transmits the packets on the frame to the interface associated with the
 369  * node. It first copies packets on the frame to a tx_vector containing the
 370  * rte_mbuf pointers. It then passes this vector to tx_burst_vector_internal
 371  * which calls the dpdk tx_burst function.
 372  */
 373 static uword
 374 dpdk_interface_tx (vlib_main_t * vm,
 375                    vlib_node_runtime_t * node, vlib_frame_t * f)
 376 {
 377   dpdk_main_t *dm = &dpdk_main;
 378   vnet_interface_output_runtime_t *rd = (void *) node->runtime_data;
 379   dpdk_device_t *xd = vec_elt_at_index (dm->devices, rd->dev_instance);
 380   u32 n_packets = f->n_vectors;
 381   u32 n_left;
 382   u32 *from;
 383   struct rte_mbuf **tx_vector;
 384   int i;
 385   int queue_id;
 386   u32 my_cpu;
 387   u32 tx_pkts = 0;
 388   tx_ring_hdr_t *ring;
 389   u32 n_on_ring;
 390
 391   my_cpu = vm->cpu_index;
 392
 393   queue_id = my_cpu;
 394
 395   tx_vector = xd->tx_vectors[queue_id];
 396   ring = vec_header (tx_vector, sizeof (*ring));
 397
 398   n_on_ring = ring->tx_head - ring->tx_tail;
 399   from = vlib_frame_vector_args (f);
 400
 401   ASSERT (n_packets <= VLIB_FRAME_SIZE);
 402
 403   if (PREDICT_FALSE (n_on_ring + n_packets > xd->nb_tx_desc))
 404     {
 405       /*
 406        * Overflowing the ring should never happen.
 407        * If it does then drop the whole frame.
 408        */
 409       vlib_error_count (vm, node->node_index, DPDK_TX_FUNC_ERROR_RING_FULL,
 410                         n_packets);
 411
 412       while (n_packets--)
 413         {
 414           u32 bi0 = from[n_packets];
 415           vlib_buffer_t *b0 = vlib_get_buffer (vm, bi0);
 416           struct rte_mbuf *mb0 = rte_mbuf_from_vlib_buffer (b0);
 417           rte_pktmbuf_free (mb0);
 418         }
 419       return n_on_ring;
 420     }
 421
 422   if (PREDICT_FALSE (dm->tx_pcap_enable))
 423     {
 424       n_left = n_packets;
 425       while (n_left > 0)
 426         {
 427           u32 bi0 = from[0];
 428           vlib_buffer_t *b0 = vlib_get_buffer (vm, bi0);
 429           if (dm->pcap_sw_if_index == 0 ||
 430               dm->pcap_sw_if_index == vnet_buffer (b0)->sw_if_index[VLIB_TX])
 431             pcap_add_buffer (&dm->pcap_main, vm, bi0, 512);
 432           from++;
 433           n_left--;
 434         }
 435     }
 436
 437   from = vlib_frame_vector_args (f);
 438   n_left = n_packets;
 439   i = ring->tx_head % xd->nb_tx_desc;
 440
 441   while (n_left >= 4)
 442     {
 443       u32 bi0, bi1;
 444       u32 pi0, pi1;
 445       struct rte_mbuf *mb0, *mb1;
 446       struct rte_mbuf *prefmb0, *prefmb1;
 447       vlib_buffer_t *b0, *b1;
 448       vlib_buffer_t *pref0, *pref1;
 449       i16 delta0, delta1;
 450       u16 new_data_len0, new_data_len1;
 451       u16 new_pkt_len0, new_pkt_len1;
 452       u32 any_clone;
 453
 454       pi0 = from[2];
 455       pi1 = from[3];
 456       pref0 = vlib_get_buffer (vm, pi0);
 457       pref1 = vlib_get_buffer (vm, pi1);
 458
 459       prefmb0 = rte_mbuf_from_vlib_buffer (pref0);
 460       prefmb1 = rte_mbuf_from_vlib_buffer (pref1);
 461
 462       CLIB_PREFETCH (prefmb0, CLIB_CACHE_LINE_BYTES, LOAD);
 463       CLIB_PREFETCH (pref0, CLIB_CACHE_LINE_BYTES, LOAD);
 464       CLIB_PREFETCH (prefmb1, CLIB_CACHE_LINE_BYTES, LOAD);
 465       CLIB_PREFETCH (pref1, CLIB_CACHE_LINE_BYTES, LOAD);
 466
 467       bi0 = from[0];
 468       bi1 = from[1];
 469       from += 2;
 470
 471       b0 = vlib_get_buffer (vm, bi0);
 472       b1 = vlib_get_buffer (vm, bi1);
 473
 474       mb0 = rte_mbuf_from_vlib_buffer (b0);
 475       mb1 = rte_mbuf_from_vlib_buffer (b1);
 476
 477       any_clone = (b0->flags & VLIB_BUFFER_RECYCLE)
 478         | (b1->flags & VLIB_BUFFER_RECYCLE);
 479       if (PREDICT_FALSE (any_clone != 0))
 480         {
 481           if (PREDICT_FALSE ((b0->flags & VLIB_BUFFER_RECYCLE) != 0))
 482             {
 483               struct rte_mbuf *mb0_new = dpdk_replicate_packet_mb (b0);
 484               if (PREDICT_FALSE (mb0_new == 0))
 485                 {
 486                   vlib_error_count (vm, node->node_index,
 487                                     DPDK_TX_FUNC_ERROR_REPL_FAIL, 1);
 488                   b0->flags |= VLIB_BUFFER_REPL_FAIL;
 489                 }
 490               else
 491                 mb0 = mb0_new;
 492               vec_add1 (dm->recycle[my_cpu], bi0);
 493             }
 494           if (PREDICT_FALSE ((b1->flags & VLIB_BUFFER_RECYCLE) != 0))
 495             {
 496               struct rte_mbuf *mb1_new = dpdk_replicate_packet_mb (b1);
 497               if (PREDICT_FALSE (mb1_new == 0))
 498                 {
 499                   vlib_error_count (vm, node->node_index,
 500                                     DPDK_TX_FUNC_ERROR_REPL_FAIL, 1);
 501                   b1->flags |= VLIB_BUFFER_REPL_FAIL;
 502                 }
 503               else
 504                 mb1 = mb1_new;
 505               vec_add1 (dm->recycle[my_cpu], bi1);
 506             }
 507         }
 508
 509       delta0 = PREDICT_FALSE (b0->flags & VLIB_BUFFER_REPL_FAIL) ? 0 :
 510         vlib_buffer_length_in_chain (vm, b0) - (i16) mb0->pkt_len;
 511       delta1 = PREDICT_FALSE (b1->flags & VLIB_BUFFER_REPL_FAIL) ? 0 :
 512         vlib_buffer_length_in_chain (vm, b1) - (i16) mb1->pkt_len;
 513
 514       new_data_len0 = (u16) ((i16) mb0->data_len + delta0);
 515       new_data_len1 = (u16) ((i16) mb1->data_len + delta1);
 516       new_pkt_len0 = (u16) ((i16) mb0->pkt_len + delta0);
 517       new_pkt_len1 = (u16) ((i16) mb1->pkt_len + delta1);
 518
 519       b0->current_length = new_data_len0;
 520       b1->current_length = new_data_len1;
 521       mb0->data_len = new_data_len0;
 522       mb1->data_len = new_data_len1;
 523       mb0->pkt_len = new_pkt_len0;
 524       mb1->pkt_len = new_pkt_len1;
 525
 526       mb0->data_off = (PREDICT_FALSE (b0->flags & VLIB_BUFFER_REPL_FAIL)) ?
 527         mb0->data_off : (u16) (RTE_PKTMBUF_HEADROOM + b0->current_data);
 528       mb1->data_off = (PREDICT_FALSE (b1->flags & VLIB_BUFFER_REPL_FAIL)) ?
 529         mb1->data_off : (u16) (RTE_PKTMBUF_HEADROOM + b1->current_data);
 530
 531       if (PREDICT_FALSE (node->flags & VLIB_NODE_FLAG_TRACE))
 532         {
 533           if (b0->flags & VLIB_BUFFER_IS_TRACED)
 534             dpdk_tx_trace_buffer (dm, node, xd, queue_id, bi0, b0);
 535           if (b1->flags & VLIB_BUFFER_IS_TRACED)
 536             dpdk_tx_trace_buffer (dm, node, xd, queue_id, bi1, b1);
 537         }
 538
 539       if (PREDICT_TRUE (any_clone == 0))
 540         {
 541           tx_vector[i % xd->nb_tx_desc] = mb0;
 542           i++;
 543           tx_vector[i % xd->nb_tx_desc] = mb1;
 544           i++;
 545         }
 546       else
 547         {
 548           /* cloning was done, need to check for failure */
 549           if (PREDICT_TRUE ((b0->flags & VLIB_BUFFER_REPL_FAIL) == 0))
 550             {
 551               tx_vector[i % xd->nb_tx_desc] = mb0;
 552               i++;
 553             }
 554           if (PREDICT_TRUE ((b1->flags & VLIB_BUFFER_REPL_FAIL) == 0))
 555             {
 556               tx_vector[i % xd->nb_tx_desc] = mb1;
 557               i++;
 558             }
 559         }
 560
 561       n_left -= 2;
 562     }
 563   while (n_left > 0)
 564     {
 565       u32 bi0;
 566       struct rte_mbuf *mb0;
 567       vlib_buffer_t *b0;
 568       i16 delta0;
 569       u16 new_data_len0;
 570       u16 new_pkt_len0;
 571
 572       bi0 = from[0];
 573       from++;
 574
 575       b0 = vlib_get_buffer (vm, bi0);
 576
 577       mb0 = rte_mbuf_from_vlib_buffer (b0);
 578       if (PREDICT_FALSE ((b0->flags & VLIB_BUFFER_RECYCLE) != 0))
 579         {
 580           struct rte_mbuf *mb0_new = dpdk_replicate_packet_mb (b0);
 581           if (PREDICT_FALSE (mb0_new == 0))
 582             {
 583               vlib_error_count (vm, node->node_index,
 584                                 DPDK_TX_FUNC_ERROR_REPL_FAIL, 1);
 585               b0->flags |= VLIB_BUFFER_REPL_FAIL;
 586             }
 587           else
 588             mb0 = mb0_new;
 589           vec_add1 (dm->recycle[my_cpu], bi0);
 590         }
 591
 592       delta0 = PREDICT_FALSE (b0->flags & VLIB_BUFFER_REPL_FAIL) ? 0 :
 593         vlib_buffer_length_in_chain (vm, b0) - (i16) mb0->pkt_len;
 594
 595       new_data_len0 = (u16) ((i16) mb0->data_len + delta0);
 596       new_pkt_len0 = (u16) ((i16) mb0->pkt_len + delta0);
 597
 598       b0->current_length = new_data_len0;
 599       mb0->data_len = new_data_len0;
 600       mb0->pkt_len = new_pkt_len0;
 601       mb0->data_off = (PREDICT_FALSE (b0->flags & VLIB_BUFFER_REPL_FAIL)) ?
 602         mb0->data_off : (u16) (RTE_PKTMBUF_HEADROOM + b0->current_data);
 603
 604       if (PREDICT_FALSE (node->flags & VLIB_NODE_FLAG_TRACE))
 605         if (b0->flags & VLIB_BUFFER_IS_TRACED)
 606           dpdk_tx_trace_buffer (dm, node, xd, queue_id, bi0, b0);
 607
 608       if (PREDICT_TRUE ((b0->flags & VLIB_BUFFER_REPL_FAIL) == 0))
 609         {
 610           tx_vector[i % xd->nb_tx_desc] = mb0;
 611           i++;
 612         }
 613       n_left--;
 614     }
 615
 616   /* account for additional packets in the ring */
 617   ring->tx_head += n_packets;
 618   n_on_ring = ring->tx_head - ring->tx_tail;
 619
 620   /* transmit as many packets as possible */
 621   n_packets = tx_burst_vector_internal (vm, xd, tx_vector);
 622
 623   /*
 624    * tx_pkts is the number of packets successfully transmitted
 625    * This is the number originally on ring minus the number remaining on ring
 626    */
 627   tx_pkts = n_on_ring - n_packets;
 628
 629   {
 630     /* If there is no callback then drop any non-transmitted packets */
 631     if (PREDICT_FALSE (n_packets))
 632       {
 633         vlib_simple_counter_main_t *cm;
 634         vnet_main_t *vnm = vnet_get_main ();
 635
 636         cm = vec_elt_at_index (vnm->interface_main.sw_if_counters,
 637                                VNET_INTERFACE_COUNTER_TX_ERROR);
 638
 639         vlib_increment_simple_counter (cm, my_cpu, xd->vlib_sw_if_index,
 640                                        n_packets);
 641
 642         vlib_error_count (vm, node->node_index, DPDK_TX_FUNC_ERROR_PKT_DROP,
 643                           n_packets);
 644
 645         while (n_packets--)
 646           rte_pktmbuf_free (tx_vector[ring->tx_tail + n_packets]);
 647       }
 648
 649     /* Reset head/tail to avoid unnecessary wrap */
 650     ring->tx_head = 0;
 651     ring->tx_tail = 0;
 652   }
 653
 654   /* Recycle replicated buffers */
 655   if (PREDICT_FALSE (vec_len (dm->recycle[my_cpu])))
 656     {
 657       vlib_buffer_free (vm, dm->recycle[my_cpu],
 658                         vec_len (dm->recycle[my_cpu]));
 659       _vec_len (dm->recycle[my_cpu]) = 0;
 660     }
 661
 662   ASSERT (ring->tx_head >= ring->tx_tail);
 663
 664   return tx_pkts;
 665 }
 666
 667 static void
 668 dpdk_clear_hw_interface_counters (u32 instance)
 669 {
 670   dpdk_main_t *dm = &dpdk_main;
 671   dpdk_device_t *xd = vec_elt_at_index (dm->devices, instance);
 672
 673   /*
 674    * Set the "last_cleared_stats" to the current stats, so that
 675    * things appear to clear from a display perspective.
 676    */
 677   dpdk_update_counters (xd, vlib_time_now (dm->vlib_main));
 678
 679   clib_memcpy (&xd->last_cleared_stats, &xd->stats, sizeof (xd->stats));
 680   clib_memcpy (xd->last_cleared_xstats, xd->xstats,
 681                vec_len (xd->last_cleared_xstats) *
 682                sizeof (xd->last_cleared_xstats[0]));
 683
 684 }
 685
 686 static clib_error_t *
 687 dpdk_interface_admin_up_down (vnet_main_t * vnm, u32 hw_if_index, u32 flags)
 688 {
 689   vnet_hw_interface_t *hif = vnet_get_hw_interface (vnm, hw_if_index);
 690   uword is_up = (flags & VNET_SW_INTERFACE_FLAG_ADMIN_UP) != 0;
 691   dpdk_main_t *dm = &dpdk_main;
 692   dpdk_device_t *xd = vec_elt_at_index (dm->devices, hif->dev_instance);
 693   int rv = 0;
 694
 695   if (is_up)
 696     {
 697       f64 now = vlib_time_now (dm->vlib_main);
 698
 699       if ((xd->flags & DPDK_DEVICE_FLAG_ADMIN_UP) == 0)
 700         rv = rte_eth_dev_start (xd->device_index);
 701
 702       if (xd->flags & DPDK_DEVICE_FLAG_PROMISC)
 703         rte_eth_promiscuous_enable (xd->device_index);
 704       else
 705         rte_eth_promiscuous_disable (xd->device_index);
 706
 707       rte_eth_allmulticast_enable (xd->device_index);
 708       xd->flags |= DPDK_DEVICE_FLAG_ADMIN_UP;
 709       dpdk_update_counters (xd, now);
 710       dpdk_update_link_state (xd, now);
 711     }
 712   else
 713     {
 714       xd->flags &= ~DPDK_DEVICE_FLAG_ADMIN_UP;
 715
 716       rte_eth_allmulticast_disable (xd->device_index);
 717       vnet_hw_interface_set_flags (vnm, xd->vlib_hw_if_index, 0);
 718       rte_eth_dev_stop (xd->device_index);
 719
 720       /* For bonded interface, stop slave links */
 721       if (xd->pmd == VNET_DPDK_PMD_BOND)
 722         {
 723           u8 slink[16];
 724           int nlink = rte_eth_bond_slaves_get (xd->device_index, slink, 16);
 725           while (nlink >= 1)
 726             {
 727               u8 dpdk_port = slink[--nlink];
 728               rte_eth_dev_stop (dpdk_port);
 729             }
 730         }
 731     }
 732
 733   if (rv < 0)
 734     clib_warning ("rte_eth_dev_%s error: %d", is_up ? "start" : "stop", rv);
 735
 736   return /* no error */ 0;
 737 }
 738
 739 /*
 740  * Dynamically redirect all pkts from a specific interface
 741  * to the specified node
 742  */
 743 static void
 744 dpdk_set_interface_next_node (vnet_main_t * vnm, u32 hw_if_index,
 745                               u32 node_index)
 746 {
 747   dpdk_main_t *xm = &dpdk_main;
 748   vnet_hw_interface_t *hw = vnet_get_hw_interface (vnm, hw_if_index);
 749   dpdk_device_t *xd = vec_elt_at_index (xm->devices, hw->dev_instance);
 750
 751   /* Shut off redirection */
 752   if (node_index == ~0)
 753     {
 754       xd->per_interface_next_index = node_index;
 755       return;
 756     }
 757
 758   xd->per_interface_next_index =
 759     vlib_node_add_next (xm->vlib_main, dpdk_input_node.index, node_index);
 760 }
 761
 762
 763 static clib_error_t *
 764 dpdk_subif_add_del_function (vnet_main_t * vnm,
 765                              u32 hw_if_index,
 766                              struct vnet_sw_interface_t *st, int is_add)
 767 {
 768   dpdk_main_t *xm = &dpdk_main;
 769   vnet_hw_interface_t *hw = vnet_get_hw_interface (vnm, hw_if_index);
 770   dpdk_device_t *xd = vec_elt_at_index (xm->devices, hw->dev_instance);
 771   vnet_sw_interface_t *t = (vnet_sw_interface_t *) st;
 772   int r, vlan_offload;
 773   u32 prev_subifs = xd->num_subifs;
 774   clib_error_t *err = 0;
 775
 776   if (is_add)
 777     xd->num_subifs++;
 778   else if (xd->num_subifs)
 779     xd->num_subifs--;
 780
 781   if ((xd->flags & DPDK_DEVICE_FLAG_PMD) == 0)
 782     goto done;
 783
 784   /* currently we program VLANS only for IXGBE VF and I40E VF */
 785   if ((xd->pmd != VNET_DPDK_PMD_IXGBEVF) && (xd->pmd != VNET_DPDK_PMD_I40EVF))
 786     goto done;
 787
 788   if (t->sub.eth.flags.no_tags == 1)
 789     goto done;
 790
 791   if ((t->sub.eth.flags.one_tag != 1) || (t->sub.eth.flags.exact_match != 1))
 792     {
 793       xd->num_subifs = prev_subifs;
 794       err = clib_error_return (0, "unsupported VLAN setup");
 795       goto done;
 796     }
 797
 798   vlan_offload = rte_eth_dev_get_vlan_offload (xd->device_index);
 799   vlan_offload |= ETH_VLAN_FILTER_OFFLOAD;
 800
 801   if ((r = rte_eth_dev_set_vlan_offload (xd->device_index, vlan_offload)))
 802     {
 803       xd->num_subifs = prev_subifs;
 804       err = clib_error_return (0, "rte_eth_dev_set_vlan_offload[%d]: err %d",
 805                                xd->device_index, r);
 806       goto done;
 807     }
 808
 809
 810   if ((r =
 811        rte_eth_dev_vlan_filter (xd->device_index, t->sub.eth.outer_vlan_id,
 812                                 is_add)))
 813     {
 814       xd->num_subifs = prev_subifs;
 815       err = clib_error_return (0, "rte_eth_dev_vlan_filter[%d]: err %d",
 816                                xd->device_index, r);
 817       goto done;
 818     }
 819
 820 done:
 821   if (xd->num_subifs)
 822     xd->flags |= DPDK_DEVICE_FLAG_HAVE_SUBIF;
 823   else
 824     xd->flags &= ~DPDK_DEVICE_FLAG_HAVE_SUBIF;
 825
 826   return err;
 827 }
 828
 829 /* *INDENT-OFF* */
 830 VNET_DEVICE_CLASS (dpdk_device_class) = {
 831   .name = "dpdk",
 832   .tx_function = dpdk_interface_tx,
 833   .tx_function_n_errors = DPDK_TX_FUNC_N_ERROR,
 834   .tx_function_error_strings = dpdk_tx_func_error_strings,
 835   .format_device_name = format_dpdk_device_name,
 836   .format_device = format_dpdk_device,
 837   .format_tx_trace = format_dpdk_tx_dma_trace,
 838   .clear_counters = dpdk_clear_hw_interface_counters,
 839   .admin_up_down_function = dpdk_interface_admin_up_down,
 840   .subif_add_del_function = dpdk_subif_add_del_function,
 841   .rx_redirect_to_node = dpdk_set_interface_next_node,
 842   .no_flatten_output_chains = 1,
 843   .mac_addr_change_function = dpdk_set_mac_address,
 844 };
 845
 846 VLIB_DEVICE_TX_FUNCTION_MULTIARCH (dpdk_device_class, dpdk_interface_tx)
 847 /* *INDENT-ON* */
 848
 849 #define UP_DOWN_FLAG_EVENT 1
 850
 851 uword
 852 admin_up_down_process (vlib_main_t * vm,
 853                        vlib_node_runtime_t * rt, vlib_frame_t * f)
 854 {
 855   clib_error_t *error = 0;
 856   uword event_type;
 857   uword *event_data = 0;
 858   u32 sw_if_index;
 859   u32 flags;
 860
 861   while (1)
 862     {
 863       vlib_process_wait_for_event (vm);
 864
 865       event_type = vlib_process_get_events (vm, &event_data);
 866
 867       dpdk_main.admin_up_down_in_progress = 1;
 868
 869       switch (event_type)
 870         {
 871         case UP_DOWN_FLAG_EVENT:
 872           {
 873             if (vec_len (event_data) == 2)
 874               {
 875                 sw_if_index = event_data[0];
 876                 flags = event_data[1];
 877                 error =
 878                   vnet_sw_interface_set_flags (vnet_get_main (), sw_if_index,
 879                                                flags);
 880                 clib_error_report (error);
 881               }
 882           }
 883           break;
 884         }
 885
 886       vec_reset_length (event_data);
 887
 888       dpdk_main.admin_up_down_in_progress = 0;
 889
 890     }
 891   return 0;                     /* or not */
 892 }
 893
 894 /* *INDENT-OFF* */
 895 VLIB_REGISTER_NODE (admin_up_down_process_node,static) = {
 896     .function = admin_up_down_process,
 897     .type = VLIB_NODE_TYPE_PROCESS,
 898     .name = "admin-up-down-process",
 899     .process_log2_n_stack_bytes = 17,  // 256KB
 900 };
 901 /* *INDENT-ON* */
 902
 903 /*
 904  * fd.io coding-style-patch-verification: ON
 905  *
 906  * Local Variables:
 907  * eval: (c-set-style "gnu")
 908  * End:
 909  */