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