VPP-189 Fix coverity warnings
[vpp.git] / 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 #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 static char * dpdk_tx_func_error_strings[] = {
41 #define _(n,s) s,
42     foreach_dpdk_tx_func_error
43 #undef _
44 };
45
46 clib_error_t *
47 dpdk_set_mac_address (vnet_hw_interface_t * hi, char * address)
48 {
49    int error;
50    dpdk_main_t * dm = &dpdk_main;
51    dpdk_device_t * xd = vec_elt_at_index (dm->devices, hi->dev_instance);
52
53    error=rte_eth_dev_default_mac_addr_set(xd->device_index,
54                                           (struct ether_addr *) address);
55
56    if (error) {
57      return clib_error_return (0, "mac address set failed: %d", error);
58    } else {
59      return NULL;
60   }
61 }
62
63 clib_error_t *
64 dpdk_set_mc_filter (vnet_hw_interface_t * hi,
65                     struct ether_addr mc_addr_vec[], int naddr)
66 {
67   int error;
68   dpdk_main_t * dm = &dpdk_main;
69   dpdk_device_t * xd = vec_elt_at_index (dm->devices, hi->dev_instance);
70
71   error=rte_eth_dev_set_mc_addr_list(xd->device_index, mc_addr_vec, naddr);
72
73   if (error) {
74     return clib_error_return (0, "mc addr list failed: %d", error);
75   } else {
76     return NULL;
77   }
78 }
79
80 struct rte_mbuf * dpdk_replicate_packet_mb (vlib_buffer_t * b)
81 {
82   vlib_main_t * vm = vlib_get_main();
83   vlib_buffer_main_t * bm = vm->buffer_main;
84   struct rte_mbuf * first_mb = 0, * new_mb, * pkt_mb, ** prev_mb_next = 0;
85   u8 nb_segs, nb_segs_left;
86   u32 copy_bytes;
87   unsigned socket_id = rte_socket_id();
88
89   ASSERT (bm->pktmbuf_pools[socket_id]);
90   pkt_mb = rte_mbuf_from_vlib_buffer(b);
91   nb_segs = pkt_mb->nb_segs;
92   for (nb_segs_left = nb_segs; nb_segs_left; nb_segs_left--)
93     {
94       if (PREDICT_FALSE(pkt_mb == 0))
95         {
96           clib_warning ("Missing %d mbuf chain segment(s):   "
97                         "(nb_segs = %d, nb_segs_left = %d)!",
98                         nb_segs - nb_segs_left, nb_segs, nb_segs_left);
99           if (first_mb)
100             rte_pktmbuf_free(first_mb);
101           return NULL;
102         }
103       new_mb = rte_pktmbuf_alloc (bm->pktmbuf_pools[socket_id]);
104       if (PREDICT_FALSE(new_mb == 0))
105         {
106           if (first_mb)
107             rte_pktmbuf_free(first_mb);
108           return NULL;
109         }
110       
111       /*
112        * Copy packet info into 1st segment.
113        */
114       if (first_mb == 0)
115         {
116           first_mb = new_mb;
117           rte_pktmbuf_pkt_len (first_mb) = pkt_mb->pkt_len;
118           first_mb->nb_segs = pkt_mb->nb_segs;
119           first_mb->port = pkt_mb->port;
120 #ifdef DAW_FIXME // TX Offload support TBD
121           first_mb->vlan_macip = pkt_mb->vlan_macip;
122           first_mb->hash = pkt_mb->hash;
123           first_mb->ol_flags = pkt_mb->ol_flags
124 #endif
125         }
126       else
127         {
128           ASSERT(prev_mb_next != 0);
129           *prev_mb_next = new_mb;
130         }
131       
132       /*
133        * Copy packet segment data into new mbuf segment.
134        */
135       rte_pktmbuf_data_len (new_mb) = pkt_mb->data_len;
136       copy_bytes = pkt_mb->data_len + RTE_PKTMBUF_HEADROOM;
137       ASSERT(copy_bytes <= pkt_mb->buf_len);
138       clib_memcpy(new_mb->buf_addr, pkt_mb->buf_addr, copy_bytes);
139
140       prev_mb_next = &new_mb->next;
141       pkt_mb = pkt_mb->next;
142     }
143
144   ASSERT(pkt_mb == 0);
145   __rte_mbuf_sanity_check(first_mb, 1);
146
147   return first_mb;
148 }
149
150 struct rte_mbuf * dpdk_zerocopy_replicate_packet_mb (vlib_buffer_t * b)
151 {
152   vlib_main_t * vm = vlib_get_main();
153   vlib_buffer_main_t * bm = vm->buffer_main;
154   struct rte_mbuf * first_mb = 0, * new_mb, * pkt_mb, ** prev_mb_next = 0;
155   u8 nb_segs, nb_segs_left;
156   unsigned socket_id = rte_socket_id();
157
158   ASSERT (bm->pktmbuf_pools[socket_id]);
159   pkt_mb = rte_mbuf_from_vlib_buffer(b);
160   nb_segs = pkt_mb->nb_segs;
161   for (nb_segs_left = nb_segs; nb_segs_left; nb_segs_left--)
162     {
163       if (PREDICT_FALSE(pkt_mb == 0))
164         {
165           clib_warning ("Missing %d mbuf chain segment(s):   "
166                         "(nb_segs = %d, nb_segs_left = %d)!",
167                         nb_segs - nb_segs_left, nb_segs, nb_segs_left);
168           if (first_mb)
169             rte_pktmbuf_free(first_mb);
170           return NULL;
171         }
172       new_mb = rte_pktmbuf_clone(pkt_mb, bm->pktmbuf_pools[socket_id]);
173       if (PREDICT_FALSE(new_mb == 0))
174         {
175           if (first_mb)
176             rte_pktmbuf_free(first_mb);
177           return NULL;
178         }
179       
180       /*
181        * Copy packet info into 1st segment.
182        */
183       if (first_mb == 0)
184         {
185           first_mb = new_mb;
186           rte_pktmbuf_pkt_len (first_mb) = pkt_mb->pkt_len;
187           first_mb->nb_segs = pkt_mb->nb_segs;
188           first_mb->port = pkt_mb->port;
189 #ifdef DAW_FIXME // TX Offload support TBD
190           first_mb->vlan_macip = pkt_mb->vlan_macip;
191           first_mb->hash = pkt_mb->hash;
192           first_mb->ol_flags = pkt_mb->ol_flags
193 #endif
194         }
195       else
196         {
197           ASSERT(prev_mb_next != 0);
198           *prev_mb_next = new_mb;
199         }
200       
201       /*
202        * Copy packet segment data into new mbuf segment.
203        */
204       rte_pktmbuf_data_len (new_mb) = pkt_mb->data_len;
205
206       prev_mb_next = &new_mb->next;
207       pkt_mb = pkt_mb->next;
208     }
209
210   ASSERT(pkt_mb == 0);
211   __rte_mbuf_sanity_check(first_mb, 1);
212
213   return first_mb;
214
215
216 }
217
218 static void
219 dpdk_tx_trace_buffer (dpdk_main_t * dm,
220                       vlib_node_runtime_t * node,
221                       dpdk_device_t * xd,
222                       u16 queue_id,
223                       u32 buffer_index,
224                       vlib_buffer_t * buffer)
225 {
226   vlib_main_t * vm = vlib_get_main();
227   dpdk_tx_dma_trace_t * t0;
228   struct rte_mbuf * mb;
229
230   mb = rte_mbuf_from_vlib_buffer(buffer);
231
232   t0 = vlib_add_trace (vm, node, buffer, sizeof (t0[0]));
233   t0->queue_index = queue_id;
234   t0->device_index = xd->device_index;
235   t0->buffer_index = buffer_index;
236   clib_memcpy (&t0->mb, mb, sizeof (t0->mb));
237   clib_memcpy (&t0->buffer, buffer, sizeof (buffer[0]) - sizeof (buffer->pre_data));
238   clib_memcpy (t0->buffer.pre_data, buffer->data + buffer->current_data,
239           sizeof (t0->buffer.pre_data));
240 }
241
242 /*
243  * This function calls the dpdk's tx_burst function to transmit the packets
244  * on the tx_vector. It manages a lock per-device if the device does not
245  * support multiple queues. It returns the number of packets untransmitted 
246  * on the tx_vector. If all packets are transmitted (the normal case), the 
247  * function returns 0.
248  * 
249  * The tx_burst function may not be able to transmit all packets because the 
250  * dpdk ring is full. If a flowcontrol callback function has been configured
251  * then the function simply returns. If no callback has been configured, the 
252  * function will retry calling tx_burst with the remaining packets. This will 
253  * continue until all packets are transmitted or tx_burst indicates no packets
254  * could be transmitted. (The caller can drop the remaining packets.)
255  *
256  * The function assumes there is at least one packet on the tx_vector.
257  */
258 static_always_inline
259 u32 tx_burst_vector_internal (vlib_main_t * vm, 
260                               dpdk_device_t * xd,
261                               struct rte_mbuf ** tx_vector)
262 {
263   dpdk_main_t * dm = &dpdk_main;
264   u32 n_packets;
265   u32 tx_head;
266   u32 tx_tail;
267   u32 n_retry;
268   int rv;
269   int queue_id;
270   tx_ring_hdr_t *ring;
271
272   ring = vec_header(tx_vector, sizeof(*ring));
273
274   n_packets = ring->tx_head - ring->tx_tail;
275
276   tx_head = ring->tx_head % DPDK_TX_RING_SIZE;
277
278   /*
279    * Ensure rte_eth_tx_burst is not called with 0 packets, which can lead to
280    * unpredictable results.
281    */
282   ASSERT(n_packets > 0);
283
284   /*
285    * Check for tx_vector overflow. If this fails it is a system configuration
286    * error. The ring should be sized big enough to handle the largest un-flowed
287    * off burst from a traffic manager. A larger size also helps performance
288    * a bit because it decreases the probability of having to issue two tx_burst
289    * calls due to a ring wrap.
290    */
291   ASSERT(n_packets < DPDK_TX_RING_SIZE);
292
293   /*
294    * If there is no flowcontrol callback, there is only temporary buffering
295    * on the tx_vector and so the tail should always be 0.
296    */
297   ASSERT(dm->flowcontrol_callback || ring->tx_tail == 0);
298
299   /*
300    * If there is a flowcontrol callback, don't retry any incomplete tx_bursts. 
301    * Apply backpressure instead. If there is no callback, keep retrying until
302    * a tx_burst sends no packets. n_retry of 255 essentially means no retry 
303    * limit.
304    */
305   n_retry = dm->flowcontrol_callback ? 0 : 255;
306
307   queue_id = vm->cpu_index;
308
309   do {
310       /* start the burst at the tail */
311       tx_tail = ring->tx_tail % DPDK_TX_RING_SIZE;
312
313       /* 
314        * This device only supports one TX queue,
315        * and we're running multi-threaded...
316        */
317       if (PREDICT_FALSE(xd->dev_type != VNET_DPDK_DEV_VHOST_USER &&
318         xd->lockp != 0))
319         {
320           queue_id = queue_id % xd->tx_q_used;
321           while (__sync_lock_test_and_set (xd->lockp[queue_id], 1))
322             /* zzzz */
323             queue_id = (queue_id + 1) % xd->tx_q_used;
324         }
325
326       if (PREDICT_TRUE(xd->dev_type == VNET_DPDK_DEV_ETH)) 
327         {
328           if (PREDICT_TRUE(tx_head > tx_tail)) 
329             {
330               /* no wrap, transmit in one burst */
331               rv = rte_eth_tx_burst(xd->device_index, 
332                                     (uint16_t) queue_id,
333                                     &tx_vector[tx_tail], 
334                                     (uint16_t) (tx_head-tx_tail));
335             }
336           else 
337             {
338               /* 
339                * This can only happen if there is a flowcontrol callback.
340                * We need to split the transmit into two calls: one for
341                * the packets up to the wrap point, and one to continue
342                * at the start of the ring.
343                * Transmit pkts up to the wrap point.
344                */
345               rv = rte_eth_tx_burst(xd->device_index, 
346                                     (uint16_t) queue_id,
347                                     &tx_vector[tx_tail], 
348                                     (uint16_t) (DPDK_TX_RING_SIZE - tx_tail));
349
350               /* 
351                * If we transmitted everything we wanted, then allow 1 retry 
352                * so we can try to transmit the rest. If we didn't transmit
353                * everything, stop now.
354                */
355               n_retry = (rv == DPDK_TX_RING_SIZE - tx_tail) ? 1 : 0;
356             }
357         } 
358 #if DPDK_VHOST_USER
359       else if (xd->dev_type == VNET_DPDK_DEV_VHOST_USER)
360         {
361           u32 offset = 0;
362           if (xd->need_txlock) {
363             queue_id = 0;
364             while (__sync_lock_test_and_set (xd->lockp[queue_id], 1));
365           }
366           else {
367               dpdk_device_and_queue_t * dq;
368               vec_foreach (dq, dm->devices_by_cpu[vm->cpu_index])
369               {
370                 if (xd->device_index == dq->device)
371                     break; 
372               }
373               assert (dq);
374               offset = dq->queue_id * VIRTIO_QNUM;
375           }
376           if (PREDICT_TRUE(tx_head > tx_tail)) 
377             {
378               int i; u32 bytes = 0;
379               struct rte_mbuf **pkts = &tx_vector[tx_tail];
380               for (i = 0; i < (tx_head - tx_tail); i++) {
381                   struct rte_mbuf *buff = pkts[i];
382                   bytes += rte_pktmbuf_data_len(buff);
383               } 
384                 
385               /* no wrap, transmit in one burst */
386               rv = rte_vhost_enqueue_burst(&xd->vu_vhost_dev, offset + VIRTIO_RXQ,
387                                            &tx_vector[tx_tail],
388                                            (uint16_t) (tx_head-tx_tail));
389               if (PREDICT_TRUE(rv > 0))
390                 {
391                   dpdk_vu_vring *vring = &(xd->vu_intf->vrings[offset + VIRTIO_TXQ]);
392                   vring->packets += rv;
393                   vring->bytes += bytes;
394
395                   if (dpdk_vhost_user_want_interrupt(xd, offset + VIRTIO_RXQ)) {
396                     vring = &(xd->vu_intf->vrings[offset + VIRTIO_RXQ]);
397                     vring->n_since_last_int += rv;
398
399                     f64 now = vlib_time_now (vm);
400                     if (vring->int_deadline < now ||
401                         vring->n_since_last_int > dm->conf->vhost_coalesce_frames)
402                       dpdk_vhost_user_send_interrupt(vm, xd, offset + VIRTIO_RXQ);
403                   }
404
405                   int c = rv;
406                   while(c--)
407                     rte_pktmbuf_free (tx_vector[tx_tail+c]);
408                 }
409             }
410           else
411             {
412               /*
413                * If we transmitted everything we wanted, then allow 1 retry
414                * so we can try to transmit the rest. If we didn't transmit
415                * everything, stop now.
416                */
417               int i; u32 bytes = 0;
418               struct rte_mbuf **pkts = &tx_vector[tx_tail];
419               for (i = 0; i < (DPDK_TX_RING_SIZE - tx_tail); i++) {
420                   struct rte_mbuf *buff = pkts[i];
421                   bytes += rte_pktmbuf_data_len(buff);
422               }
423               rv = rte_vhost_enqueue_burst(&xd->vu_vhost_dev, offset + VIRTIO_RXQ,
424                                            &tx_vector[tx_tail], 
425                                            (uint16_t) (DPDK_TX_RING_SIZE - tx_tail));
426
427               if (PREDICT_TRUE(rv > 0))
428                 {
429                   dpdk_vu_vring *vring = &(xd->vu_intf->vrings[offset + VIRTIO_TXQ]);
430                   vring->packets += rv;
431                   vring->bytes += bytes;
432
433                   if (dpdk_vhost_user_want_interrupt(xd, offset + VIRTIO_RXQ)) {
434                     vring = &(xd->vu_intf->vrings[offset + VIRTIO_RXQ]);
435                     vring->n_since_last_int += rv;
436
437                     f64 now = vlib_time_now (vm);
438                     if (vring->int_deadline < now ||
439                         vring->n_since_last_int > dm->conf->vhost_coalesce_frames)
440                       dpdk_vhost_user_send_interrupt(vm, xd, offset + VIRTIO_RXQ);
441                   }
442
443                   int c = rv;
444                   while(c--)
445                     rte_pktmbuf_free (tx_vector[tx_tail+c]);
446                 }
447
448               n_retry = (rv == DPDK_TX_RING_SIZE - tx_tail) ? 1 : 0;
449             }
450
451           if (xd->need_txlock)
452             *xd->lockp[queue_id] = 0;
453         }
454 #endif
455 #if RTE_LIBRTE_KNI
456       else if (xd->dev_type == VNET_DPDK_DEV_KNI)
457         {
458           if (PREDICT_TRUE(tx_head > tx_tail)) 
459             {
460               /* no wrap, transmit in one burst */
461               rv = rte_kni_tx_burst(xd->kni, 
462                                     &tx_vector[tx_tail], 
463                                     (uint16_t) (tx_head-tx_tail));
464             }
465           else 
466             {
467               /* 
468                * This can only happen if there is a flowcontrol callback.
469                * We need to split the transmit into two calls: one for
470                * the packets up to the wrap point, and one to continue
471                * at the start of the ring.
472                * Transmit pkts up to the wrap point.
473                */
474               rv = rte_kni_tx_burst(xd->kni, 
475                                     &tx_vector[tx_tail], 
476                                     (uint16_t) (DPDK_TX_RING_SIZE - tx_tail));
477
478               /* 
479                * If we transmitted everything we wanted, then allow 1 retry 
480                * so we can try to transmit the rest. If we didn't transmit
481                * everything, stop now.
482                */
483               n_retry = (rv == DPDK_TX_RING_SIZE - tx_tail) ? 1 : 0;
484             }
485         } 
486 #endif
487       else
488         {
489           ASSERT(0);
490           rv = 0;
491         }
492
493       if (PREDICT_FALSE(xd->dev_type != VNET_DPDK_DEV_VHOST_USER &&
494             xd->lockp != 0))
495           *xd->lockp[queue_id] = 0;
496
497       if (PREDICT_FALSE(rv < 0))
498         {
499           // emit non-fatal message, bump counter
500           vnet_main_t * vnm = dm->vnet_main;
501           vnet_interface_main_t * im = &vnm->interface_main;
502           u32 node_index;
503
504           node_index = vec_elt_at_index(im->hw_interfaces, 
505                                         xd->vlib_hw_if_index)->tx_node_index;
506
507           vlib_error_count (vm, node_index, DPDK_TX_FUNC_ERROR_BAD_RETVAL, 1);
508           clib_warning ("rte_eth_tx_burst[%d]: error %d", xd->device_index, rv);
509           return n_packets; // untransmitted packets
510         }
511       ring->tx_tail += (u16)rv;
512       n_packets -= (uint16_t) rv;
513   } while (rv && n_packets && (n_retry>0));
514
515   return n_packets;
516 }
517
518
519 /*
520  * This function transmits any packets on the interface's tx_vector and returns
521  * the number of packets untransmitted on the tx_vector. If the tx_vector is 
522  * empty the function simply returns 0. 
523  *
524  * It is intended to be called by a traffic manager which has flowed-off an
525  * interface to see if the interface can be flowed-on again.
526  */
527 u32 dpdk_interface_tx_vector (vlib_main_t * vm, u32 dev_instance)
528 {
529   dpdk_main_t * dm = &dpdk_main;
530   dpdk_device_t * xd;
531   int queue_id;
532   struct rte_mbuf ** tx_vector;
533   tx_ring_hdr_t *ring;
534  
535   /* param is dev_instance and not hw_if_index to save another lookup */
536   xd = vec_elt_at_index (dm->devices, dev_instance);
537
538   queue_id = vm->cpu_index;
539   tx_vector = xd->tx_vectors[queue_id];
540
541   /* If no packets on the ring, don't bother calling tx function */
542   ring = vec_header(tx_vector, sizeof(*ring));
543   if (ring->tx_head == ring->tx_tail) 
544     {
545       return 0;
546     }
547
548   return tx_burst_vector_internal (vm, xd, tx_vector);
549 }
550
551 /*
552  * Transmits the packets on the frame to the interface associated with the
553  * node. It first copies packets on the frame to a tx_vector containing the 
554  * rte_mbuf pointers. It then passes this vector to tx_burst_vector_internal 
555  * which calls the dpdk tx_burst function.
556  *
557  * The tx_vector is treated slightly differently depending on whether or
558  * not a flowcontrol callback function has been configured. If there is no
559  * callback, the tx_vector is a temporary array of rte_mbuf packet pointers.
560  * Its entries are written and consumed before the function exits. 
561  *
562  * If there is a callback then the transmit is being invoked in the presence
563  * of a traffic manager. Here the tx_vector is treated like a ring of rte_mbuf
564  * pointers. If not all packets can be transmitted, the untransmitted packets
565  * stay on the tx_vector until the next call. The callback allows the traffic
566  * manager to flow-off dequeues to the interface. The companion function
567  * dpdk_interface_tx_vector() allows the traffic manager to detect when
568  * it should flow-on the interface again.
569  */
570 static uword
571 dpdk_interface_tx (vlib_main_t * vm,
572            vlib_node_runtime_t * node,
573            vlib_frame_t * f)
574 {
575   dpdk_main_t * dm = &dpdk_main;
576   vnet_interface_output_runtime_t * rd = (void *) node->runtime_data;
577   dpdk_device_t * xd = vec_elt_at_index (dm->devices, rd->dev_instance);
578   u32 n_packets = f->n_vectors;
579   u32 n_left;
580   u32 * from;
581   struct rte_mbuf ** tx_vector;
582   int i;
583   int queue_id;
584   u32 my_cpu;
585   u32 tx_pkts = 0;
586   tx_ring_hdr_t *ring;
587   u32 n_on_ring;
588
589   my_cpu = vm->cpu_index;
590
591   queue_id = my_cpu;
592
593   tx_vector = xd->tx_vectors[queue_id];
594   ring = vec_header(tx_vector, sizeof(*ring));
595
596   n_on_ring = ring->tx_head - ring->tx_tail;
597   from = vlib_frame_vector_args (f);
598
599   ASSERT(n_packets <= VLIB_FRAME_SIZE);
600
601   if (PREDICT_FALSE(n_on_ring + n_packets > DPDK_TX_RING_SIZE))
602     {
603       /*
604        * Overflowing the ring should never happen. 
605        * If it does then drop the whole frame.
606        */
607       vlib_error_count (vm, node->node_index, DPDK_TX_FUNC_ERROR_RING_FULL,
608                         n_packets);
609
610       while (n_packets--) 
611         {
612           u32 bi0 = from[n_packets];
613           vlib_buffer_t *b0 = vlib_get_buffer (vm, bi0);
614           struct rte_mbuf *mb0 = rte_mbuf_from_vlib_buffer(b0);
615           rte_pktmbuf_free (mb0);
616         }
617       return n_on_ring;
618     }
619
620   if (PREDICT_FALSE(dm->tx_pcap_enable))
621     {
622       n_left = n_packets;
623       while (n_left > 0)
624         {
625           u32 bi0 = from[0];
626           vlib_buffer_t * b0 = vlib_get_buffer (vm, bi0);
627           if (dm->pcap_sw_if_index == 0 ||
628               dm->pcap_sw_if_index == vnet_buffer(b0)->sw_if_index [VLIB_TX])
629               pcap_add_buffer (&dm->pcap_main, vm, bi0, 512);
630           from++;
631           n_left--;
632         }
633     }
634
635   from = vlib_frame_vector_args (f);
636   n_left = n_packets;
637   i = ring->tx_head % DPDK_TX_RING_SIZE;
638
639   while (n_left >= 4)
640     {
641       u32 bi0, bi1;
642       u32 pi0, pi1;
643       struct rte_mbuf * mb0, * mb1;
644       struct rte_mbuf * prefmb0, * prefmb1;
645       vlib_buffer_t * b0, * b1;
646       vlib_buffer_t * pref0, * pref1;
647       i16 delta0, delta1;
648       u16 new_data_len0, new_data_len1;
649       u16 new_pkt_len0, new_pkt_len1;
650       u32 any_clone;
651
652       pi0 = from[2];
653       pi1 = from[3];
654       pref0 = vlib_get_buffer (vm, pi0);
655       pref1 = vlib_get_buffer (vm, pi1);
656
657       prefmb0 = rte_mbuf_from_vlib_buffer(pref0);
658       prefmb1 = rte_mbuf_from_vlib_buffer(pref1);
659
660       CLIB_PREFETCH(prefmb0, CLIB_CACHE_LINE_BYTES, LOAD);
661       CLIB_PREFETCH(pref0, CLIB_CACHE_LINE_BYTES, LOAD);
662       CLIB_PREFETCH(prefmb1, CLIB_CACHE_LINE_BYTES, LOAD);
663       CLIB_PREFETCH(pref1, CLIB_CACHE_LINE_BYTES, LOAD);
664
665       bi0 = from[0];
666       bi1 = from[1];
667       from += 2;
668       
669       b0 = vlib_get_buffer (vm, bi0);
670       b1 = vlib_get_buffer (vm, bi1);
671
672       mb0 = rte_mbuf_from_vlib_buffer(b0);
673       mb1 = rte_mbuf_from_vlib_buffer(b1);
674
675       any_clone = (b0->flags & VLIB_BUFFER_RECYCLE)
676           | (b1->flags & VLIB_BUFFER_RECYCLE);
677       if (PREDICT_FALSE(any_clone != 0))
678         {
679             if (PREDICT_FALSE
680                 ((b0->flags & VLIB_BUFFER_RECYCLE) != 0))
681             {
682               struct rte_mbuf * mb0_new = dpdk_replicate_packet_mb (b0);
683               if (PREDICT_FALSE(mb0_new == 0))
684                 {
685                   vlib_error_count (vm, node->node_index,
686                                     DPDK_TX_FUNC_ERROR_REPL_FAIL, 1);
687                   b0->flags |= VLIB_BUFFER_REPL_FAIL;
688                 }
689               else
690                 mb0 = mb0_new;
691               vec_add1 (dm->recycle[my_cpu], bi0);
692             }
693           if (PREDICT_FALSE
694               ((b1->flags & VLIB_BUFFER_RECYCLE) != 0))
695             {
696               struct rte_mbuf * mb1_new = dpdk_replicate_packet_mb (b1);
697               if (PREDICT_FALSE(mb1_new == 0))
698                 {
699                   vlib_error_count (vm, node->node_index,
700                                     DPDK_TX_FUNC_ERROR_REPL_FAIL, 1);
701                   b1->flags |= VLIB_BUFFER_REPL_FAIL;
702                 }
703               else
704                 mb1 = mb1_new;
705               vec_add1 (dm->recycle[my_cpu], bi1);
706             }
707         }
708
709       delta0 = PREDICT_FALSE(b0->flags & VLIB_BUFFER_REPL_FAIL) ? 0 :
710         vlib_buffer_length_in_chain (vm, b0) - (i16) mb0->pkt_len;
711       delta1 = PREDICT_FALSE(b1->flags & VLIB_BUFFER_REPL_FAIL) ? 0 :
712         vlib_buffer_length_in_chain (vm, b1) - (i16) mb1->pkt_len;
713       
714       new_data_len0 = (u16)((i16) mb0->data_len + delta0);
715       new_data_len1 = (u16)((i16) mb1->data_len + delta1);
716       new_pkt_len0 = (u16)((i16) mb0->pkt_len + delta0);
717       new_pkt_len1 = (u16)((i16) mb1->pkt_len + delta1);
718
719       b0->current_length = new_data_len0;
720       b1->current_length = new_data_len1;
721       mb0->data_len = new_data_len0;
722       mb1->data_len = new_data_len1;
723       mb0->pkt_len = new_pkt_len0;
724       mb1->pkt_len = new_pkt_len1;
725
726       mb0->data_off = (PREDICT_FALSE(b0->flags & VLIB_BUFFER_REPL_FAIL)) ?
727         mb0->data_off : (u16)(RTE_PKTMBUF_HEADROOM + b0->current_data);
728       mb1->data_off = (PREDICT_FALSE(b1->flags & VLIB_BUFFER_REPL_FAIL)) ?
729         mb1->data_off : (u16)(RTE_PKTMBUF_HEADROOM + b1->current_data);
730
731       if (PREDICT_FALSE(node->flags & VLIB_NODE_FLAG_TRACE))
732         {
733           if (b0->flags & VLIB_BUFFER_IS_TRACED)
734             dpdk_tx_trace_buffer (dm, node, xd, queue_id, bi0, b0);
735           if (b1->flags & VLIB_BUFFER_IS_TRACED)
736             dpdk_tx_trace_buffer (dm, node, xd, queue_id, bi1, b1);
737         }
738
739       if (PREDICT_TRUE(any_clone == 0))
740         {
741           tx_vector[i % DPDK_TX_RING_SIZE] = mb0;
742           i++;
743           tx_vector[i % DPDK_TX_RING_SIZE] = mb1;
744           i++;
745         }
746       else
747         {
748           /* cloning was done, need to check for failure */
749           if (PREDICT_TRUE((b0->flags & VLIB_BUFFER_REPL_FAIL) == 0))
750             {
751               tx_vector[i % DPDK_TX_RING_SIZE] = mb0;
752               i++;
753             }
754           if (PREDICT_TRUE((b1->flags & VLIB_BUFFER_REPL_FAIL) == 0))
755             {
756               tx_vector[i % DPDK_TX_RING_SIZE] = mb1;
757               i++;
758             }
759         }
760       
761       n_left -= 2;
762     }
763   while (n_left > 0)
764     {
765       u32 bi0;
766       struct rte_mbuf * mb0;
767       vlib_buffer_t * b0;
768       i16 delta0;
769       u16 new_data_len0;
770       u16 new_pkt_len0;
771
772       bi0 = from[0];
773       from++;
774       
775       b0 = vlib_get_buffer (vm, bi0);
776
777       mb0 = rte_mbuf_from_vlib_buffer(b0);
778       if (PREDICT_FALSE((b0->flags & VLIB_BUFFER_RECYCLE) != 0))
779         {
780           struct rte_mbuf * mb0_new = dpdk_replicate_packet_mb (b0);
781           if (PREDICT_FALSE(mb0_new == 0))
782             {
783               vlib_error_count (vm, node->node_index,
784                                 DPDK_TX_FUNC_ERROR_REPL_FAIL, 1);
785               b0->flags |= VLIB_BUFFER_REPL_FAIL;
786             }
787           else
788             mb0 = mb0_new;
789           vec_add1 (dm->recycle[my_cpu], bi0);
790         }
791
792       delta0 = PREDICT_FALSE(b0->flags & VLIB_BUFFER_REPL_FAIL) ? 0 :
793         vlib_buffer_length_in_chain (vm, b0) - (i16) mb0->pkt_len;
794       
795       new_data_len0 = (u16)((i16) mb0->data_len + delta0);
796       new_pkt_len0 = (u16)((i16) mb0->pkt_len + delta0);
797       
798       b0->current_length = new_data_len0;
799       mb0->data_len = new_data_len0;
800       mb0->pkt_len = new_pkt_len0;
801       mb0->data_off = (PREDICT_FALSE(b0->flags & VLIB_BUFFER_REPL_FAIL)) ?
802         mb0->data_off : (u16)(RTE_PKTMBUF_HEADROOM + b0->current_data);
803
804       if (PREDICT_FALSE(node->flags & VLIB_NODE_FLAG_TRACE))
805         if (b0->flags & VLIB_BUFFER_IS_TRACED)
806           dpdk_tx_trace_buffer (dm, node, xd, queue_id, bi0, b0);
807
808       if (PREDICT_TRUE((b0->flags & VLIB_BUFFER_REPL_FAIL) == 0))
809         {
810           tx_vector[i % DPDK_TX_RING_SIZE] = mb0;
811           i++;
812         }
813       n_left--;
814     }
815
816   /* account for additional packets in the ring */
817   ring->tx_head += n_packets;
818   n_on_ring = ring->tx_head - ring->tx_tail;
819
820   /* transmit as many packets as possible */
821   n_packets = tx_burst_vector_internal (vm, xd, tx_vector);
822
823   /*
824    * tx_pkts is the number of packets successfully transmitted
825    * This is the number originally on ring minus the number remaining on ring
826    */
827   tx_pkts = n_on_ring - n_packets; 
828
829   if (PREDICT_FALSE(dm->flowcontrol_callback != 0))
830     {
831       if (PREDICT_FALSE(n_packets))
832         {
833           /* Callback may want to enable flowcontrol */
834           dm->flowcontrol_callback(vm, xd->vlib_hw_if_index, ring->tx_head - ring->tx_tail);
835         } 
836       else 
837         {
838           /* Reset head/tail to avoid unnecessary wrap */
839           ring->tx_head = 0;
840           ring->tx_tail = 0;
841         }
842     }
843   else 
844     {
845       /* If there is no callback then drop any non-transmitted packets */
846       if (PREDICT_FALSE(n_packets))
847         {
848           vlib_simple_counter_main_t * cm;
849           vnet_main_t * vnm = vnet_get_main();
850
851           cm = vec_elt_at_index (vnm->interface_main.sw_if_counters,
852                                  VNET_INTERFACE_COUNTER_TX_ERROR);
853
854           vlib_increment_simple_counter (cm, my_cpu, xd->vlib_sw_if_index, n_packets);
855
856           vlib_error_count (vm, node->node_index, DPDK_TX_FUNC_ERROR_PKT_DROP,
857                             n_packets);
858
859           while (n_packets--)
860             rte_pktmbuf_free (tx_vector[ring->tx_tail + n_packets]);
861         }
862
863         /* Reset head/tail to avoid unnecessary wrap */
864       ring->tx_head = 0;
865       ring->tx_tail = 0;
866     }
867
868   /* Recycle replicated buffers */
869   if (PREDICT_FALSE(vec_len(dm->recycle[my_cpu])))
870     {
871       vlib_buffer_free (vm, dm->recycle[my_cpu], vec_len(dm->recycle[my_cpu]));
872       _vec_len(dm->recycle[my_cpu]) = 0;
873     }
874
875   ASSERT(ring->tx_head >= ring->tx_tail);
876
877   return tx_pkts;
878 }
879
880 static int dpdk_device_renumber (vnet_hw_interface_t * hi,
881                                  u32 new_dev_instance)
882 {
883 #if DPDK_VHOST_USER
884   dpdk_main_t * dm = &dpdk_main;
885   dpdk_device_t * xd = vec_elt_at_index (dm->devices, hi->dev_instance);
886
887   if (!xd || xd->dev_type != VNET_DPDK_DEV_VHOST_USER) {
888     clib_warning("cannot renumber non-vhost-user interface (sw_if_index: %d)",
889                  hi->sw_if_index);
890     return 0;
891   }
892
893   xd->vu_if_id = new_dev_instance;
894 #endif
895   return 0;
896 }
897
898 static void dpdk_clear_hw_interface_counters (u32 instance)
899 {
900   dpdk_main_t * dm = &dpdk_main;
901   dpdk_device_t * xd = vec_elt_at_index (dm->devices, instance);
902
903   /*
904    * DAW-FIXME: VMXNET3 device stop/start doesn't work, 
905    * therefore fake the stop in the dpdk driver by
906    * silently dropping all of the incoming pkts instead of 
907    * stopping the driver / hardware.
908    */
909   if (xd->admin_up != 0xff)
910     {
911       /*
912        * Set the "last_cleared_stats" to the current stats, so that
913        * things appear to clear from a display perspective.
914        */
915       dpdk_update_counters (xd, vlib_time_now (dm->vlib_main));
916
917       clib_memcpy (&xd->last_cleared_stats, &xd->stats, sizeof(xd->stats));
918       clib_memcpy (xd->last_cleared_xstats, xd->xstats,
919               vec_len(xd->last_cleared_xstats) *
920               sizeof(xd->last_cleared_xstats[0]));
921     }
922   else
923     {
924       /*
925        * Internally rte_eth_xstats_reset() is calling rte_eth_stats_reset(),
926        * so we're only calling xstats_reset() here.
927        */
928       rte_eth_xstats_reset (xd->device_index);
929       memset (&xd->stats, 0, sizeof(xd->stats));
930       memset (&xd->last_stats, 0, sizeof (xd->last_stats));
931     }
932
933 #if DPDK_VHOST_USER
934   if (PREDICT_FALSE(xd->dev_type == VNET_DPDK_DEV_VHOST_USER)) {
935     int i;
936     for (i = 0; i < xd->rx_q_used * VIRTIO_QNUM; i++) {
937       xd->vu_intf->vrings[i].packets = 0;
938       xd->vu_intf->vrings[i].bytes = 0;
939     }
940   }
941 #endif
942 }
943
944 #ifdef RTE_LIBRTE_KNI
945 static int
946 kni_config_network_if(u8 port_id, u8 if_up)
947 {
948   vnet_main_t * vnm = vnet_get_main();
949   dpdk_main_t * dm = &dpdk_main;
950   dpdk_device_t * xd;
951   uword *p;
952
953   p = hash_get (dm->dpdk_device_by_kni_port_id, port_id);
954   if (p == 0) {
955     clib_warning("unknown interface");
956     return 0;
957   } else {
958     xd = vec_elt_at_index (dm->devices, p[0]);
959   }
960
961   vnet_hw_interface_set_flags (vnm, xd->vlib_hw_if_index,
962                                if_up ? VNET_HW_INTERFACE_FLAG_LINK_UP |
963                                ETH_LINK_FULL_DUPLEX : 0);
964   return 0;
965 }
966
967 static int
968 kni_change_mtu(u8 port_id, unsigned new_mtu)
969 {
970   vnet_main_t * vnm = vnet_get_main();
971   dpdk_main_t * dm = &dpdk_main;
972   dpdk_device_t * xd;
973   uword *p;
974   vnet_hw_interface_t * hif;
975
976   p = hash_get (dm->dpdk_device_by_kni_port_id, port_id);
977   if (p == 0) {
978     clib_warning("unknown interface");
979     return 0;
980   } else {
981     xd = vec_elt_at_index (dm->devices, p[0]);
982   }
983   hif = vnet_get_hw_interface (vnm, xd->vlib_hw_if_index);
984
985   hif->max_packet_bytes = new_mtu;
986
987   return 0;
988 }
989 #endif
990
991 static clib_error_t *
992 dpdk_interface_admin_up_down (vnet_main_t * vnm, u32 hw_if_index, u32 flags)
993 {
994   vnet_hw_interface_t * hif = vnet_get_hw_interface (vnm, hw_if_index);
995   uword is_up = (flags & VNET_SW_INTERFACE_FLAG_ADMIN_UP) != 0;
996   dpdk_main_t * dm = &dpdk_main;
997   dpdk_device_t * xd = vec_elt_at_index (dm->devices, hif->dev_instance);
998   int rv = 0;
999
1000 #ifdef RTE_LIBRTE_KNI
1001   if (xd->dev_type == VNET_DPDK_DEV_KNI)
1002   {
1003       if (is_up)
1004       {
1005           struct rte_kni_conf conf;
1006           struct rte_kni_ops ops;
1007           vlib_main_t * vm = vlib_get_main();
1008           vlib_buffer_main_t * bm = vm->buffer_main;
1009           memset(&conf, 0, sizeof(conf));
1010           snprintf(conf.name, RTE_KNI_NAMESIZE, "vpp%u", xd->kni_port_id);
1011           conf.mbuf_size = VLIB_BUFFER_DATA_SIZE;
1012           memset(&ops, 0, sizeof(ops));
1013           ops.port_id = xd->kni_port_id;
1014           ops.change_mtu = kni_change_mtu;
1015           ops.config_network_if = kni_config_network_if;
1016
1017           xd->kni = rte_kni_alloc(bm->pktmbuf_pools[rte_socket_id()], &conf, &ops);
1018           if (!xd->kni)
1019           {
1020             clib_warning("failed to allocate kni interface");
1021           }
1022           else
1023           {
1024             hif->max_packet_bytes = 1500; /* kni interface default value */
1025             xd->admin_up = 1;
1026           }
1027       }
1028       else
1029       {
1030         xd->admin_up = 0;
1031         int kni_rv;
1032
1033         kni_rv = rte_kni_release(xd->kni);
1034         if (kni_rv < 0)
1035           clib_warning ("rte_kni_release returned %d", kni_rv);
1036       }
1037       return 0;
1038   }
1039 #endif
1040 #if DPDK_VHOST_USER
1041   if (xd->dev_type == VNET_DPDK_DEV_VHOST_USER)
1042     {
1043       if (is_up)
1044         {
1045           if (xd->vu_is_running)
1046             vnet_hw_interface_set_flags (vnm, xd->vlib_hw_if_index,
1047                                  VNET_HW_INTERFACE_FLAG_LINK_UP |
1048                                  ETH_LINK_FULL_DUPLEX );
1049           xd->admin_up = 1;
1050         }
1051       else
1052         {
1053           vnet_hw_interface_set_flags (vnm, xd->vlib_hw_if_index, 0);
1054                               xd->admin_up = 0;
1055         }
1056
1057       return 0;
1058     }
1059 #endif
1060
1061
1062   if (is_up)
1063     {
1064       f64 now = vlib_time_now (dm->vlib_main);
1065
1066       /*
1067        * DAW-FIXME: VMXNET3 device stop/start doesn't work, 
1068        * therefore fake the stop in the dpdk driver by
1069        * silently dropping all of the incoming pkts instead of 
1070        * stopping the driver / hardware.
1071        */
1072       if (xd->admin_up == 0)
1073         rv = rte_eth_dev_start (xd->device_index);
1074
1075       if (xd->promisc)
1076           rte_eth_promiscuous_enable(xd->device_index);
1077       else
1078           rte_eth_promiscuous_disable(xd->device_index);
1079
1080       rte_eth_allmulticast_enable (xd->device_index);
1081       xd->admin_up = 1;
1082       dpdk_update_counters (xd, now);
1083       dpdk_update_link_state (xd, now);
1084     }
1085   else
1086     {
1087       /*
1088        * DAW-FIXME: VMXNET3 device stop/start doesn't work,
1089        * therefore fake the stop in the dpdk driver by
1090        * silently dropping all of the incoming pkts instead of
1091        * stopping the driver / hardware.
1092        */
1093       if (xd->pmd != VNET_DPDK_PMD_VMXNET3)
1094          xd->admin_up = 0;
1095       else
1096          xd->admin_up = ~0;
1097
1098       rte_eth_allmulticast_disable (xd->device_index);
1099       vnet_hw_interface_set_flags (vnm, xd->vlib_hw_if_index, 0);
1100
1101       /*
1102        * DAW-FIXME: VMXNET3 device stop/start doesn't work, 
1103        * therefore fake the stop in the dpdk driver by
1104        * silently dropping all of the incoming pkts instead of 
1105        * stopping the driver / hardware.
1106        */
1107       if (xd->pmd != VNET_DPDK_PMD_VMXNET3)
1108           rte_eth_dev_stop (xd->device_index);
1109
1110       /* For bonded interface, stop slave links */
1111       if (xd->pmd == VNET_DPDK_PMD_BOND) 
1112         {
1113           u8  slink[16];
1114           int nlink = rte_eth_bond_slaves_get(xd->device_index, slink, 16);
1115           while (nlink >=1) 
1116             {
1117               u8 dpdk_port = slink[--nlink];
1118               rte_eth_dev_stop (dpdk_port);
1119             }
1120         }
1121     }
1122
1123   if (rv < 0)
1124     clib_warning ("rte_eth_dev_%s error: %d", is_up ? "start" : "stop",
1125                   rv);
1126
1127   return /* no error */ 0;
1128 }
1129
1130 /*
1131  * Dynamically redirect all pkts from a specific interface
1132  * to the specified node
1133  */
1134 static void dpdk_set_interface_next_node (vnet_main_t *vnm, u32 hw_if_index,
1135                                           u32 node_index)
1136 {
1137   dpdk_main_t * xm = &dpdk_main;
1138   vnet_hw_interface_t *hw = vnet_get_hw_interface (vnm, hw_if_index);
1139   dpdk_device_t * xd = vec_elt_at_index (xm->devices, hw->dev_instance);
1140   
1141   /* Shut off redirection */
1142   if (node_index == ~0)
1143     {
1144       xd->per_interface_next_index = node_index;
1145       return;
1146     }
1147   
1148   xd->per_interface_next_index = 
1149     vlib_node_add_next (xm->vlib_main, dpdk_input_node.index, node_index);
1150 }
1151
1152
1153 static clib_error_t *
1154 dpdk_subif_add_del_function (vnet_main_t * vnm,
1155                              u32 hw_if_index,
1156                              struct vnet_sw_interface_t * st,
1157                              int is_add)
1158 {
1159   dpdk_main_t * xm = &dpdk_main;
1160   vnet_hw_interface_t *hw = vnet_get_hw_interface (vnm, hw_if_index);
1161   dpdk_device_t * xd = vec_elt_at_index (xm->devices, hw->dev_instance);
1162   vnet_sw_interface_t * t = (vnet_sw_interface_t *) st;
1163   int r, vlan_offload;
1164   u32 prev_subifs = xd->vlan_subifs;
1165
1166   if (is_add) xd->vlan_subifs++;
1167   else if (xd->vlan_subifs) xd->vlan_subifs--;
1168
1169   if (xd->dev_type != VNET_DPDK_DEV_ETH)
1170         return 0;
1171
1172   /* currently we program VLANS only for IXGBE VF and I40E VF */
1173   if ((xd->pmd != VNET_DPDK_PMD_IXGBEVF) &&
1174       (xd->pmd != VNET_DPDK_PMD_I40EVF))
1175         return 0;
1176
1177   if (t->sub.eth.flags.no_tags == 1)
1178         return 0;
1179
1180   if ((t->sub.eth.flags.one_tag != 1) || (t->sub.eth.flags.exact_match != 1 )) {
1181         xd->vlan_subifs = prev_subifs;
1182         return clib_error_return (0, "unsupported VLAN setup");
1183   }
1184
1185   vlan_offload = rte_eth_dev_get_vlan_offload(xd->device_index);
1186   vlan_offload |= ETH_VLAN_FILTER_OFFLOAD;
1187
1188   if ((r = rte_eth_dev_set_vlan_offload(xd->device_index, vlan_offload))) {
1189         xd->vlan_subifs = prev_subifs;
1190         return clib_error_return (0, "rte_eth_dev_set_vlan_offload[%d]: err %d",
1191                                   xd->device_index, r);
1192   }
1193
1194
1195   if ((r = rte_eth_dev_vlan_filter(xd->device_index, t->sub.eth.outer_vlan_id, is_add))) {
1196         xd->vlan_subifs = prev_subifs;
1197         return clib_error_return (0, "rte_eth_dev_vlan_filter[%d]: err %d",
1198                                  xd->device_index, r);
1199   }
1200
1201   return 0;
1202 }
1203
1204 VNET_DEVICE_CLASS (dpdk_device_class) = {
1205   .name = "dpdk",
1206   .tx_function = dpdk_interface_tx,
1207   .tx_function_n_errors = DPDK_TX_FUNC_N_ERROR,
1208   .tx_function_error_strings = dpdk_tx_func_error_strings,
1209   .format_device_name = format_dpdk_device_name,
1210   .format_device = format_dpdk_device,
1211   .format_tx_trace = format_dpdk_tx_dma_trace,
1212   .clear_counters = dpdk_clear_hw_interface_counters,
1213   .admin_up_down_function = dpdk_interface_admin_up_down,
1214   .subif_add_del_function = dpdk_subif_add_del_function,
1215   .rx_redirect_to_node = dpdk_set_interface_next_node,
1216   .no_flatten_output_chains = 1,
1217   .name_renumber = dpdk_device_renumber,
1218 };
1219
1220 VLIB_DEVICE_TX_FUNCTION_MULTIARCH (dpdk_device_class,
1221                                    dpdk_interface_tx)
1222
1223 void dpdk_set_flowcontrol_callback (vlib_main_t *vm, 
1224                                     dpdk_flowcontrol_callback_t callback)
1225 {
1226   dpdk_main.flowcontrol_callback = callback;
1227 }
1228
1229 #define UP_DOWN_FLAG_EVENT 1
1230
1231
1232 u32 dpdk_get_admin_up_down_in_progress (void)
1233 {
1234   return dpdk_main.admin_up_down_in_progress;
1235 }
1236
1237 uword
1238 admin_up_down_process (vlib_main_t * vm,
1239                        vlib_node_runtime_t * rt,
1240                        vlib_frame_t * f)
1241 {
1242   clib_error_t * error = 0;
1243   uword event_type;
1244   uword *event_data = 0;
1245   u32 sw_if_index;
1246   u32 flags;
1247
1248   while (1)  
1249     { 
1250       vlib_process_wait_for_event (vm);
1251
1252       event_type = vlib_process_get_events (vm, &event_data);
1253
1254       dpdk_main.admin_up_down_in_progress = 1;
1255
1256       switch (event_type) {
1257         case UP_DOWN_FLAG_EVENT:
1258         {
1259             if (vec_len(event_data) == 2) {
1260               sw_if_index = event_data[0];
1261               flags = event_data[1];
1262               error = vnet_sw_interface_set_flags (vnet_get_main(), sw_if_index, flags);
1263               clib_error_report(error);
1264             }
1265         }
1266         break;
1267       }
1268
1269       vec_reset_length (event_data);
1270
1271       dpdk_main.admin_up_down_in_progress = 0;
1272
1273     }
1274   return 0; /* or not */
1275 }
1276
1277 VLIB_REGISTER_NODE (admin_up_down_process_node,static) = {
1278     .function = admin_up_down_process,
1279     .type = VLIB_NODE_TYPE_PROCESS,
1280     .name = "admin-up-down-process",
1281     .process_log2_n_stack_bytes = 17,  // 256KB
1282 };
1283
1284 /*
1285  * Asynchronously invoke vnet_sw_interface_set_flags via the admin_up_down 
1286  * process. Useful for avoiding long blocking delays (>150ms) in the dpdk 
1287  * drivers.
1288  * WARNING: when posting this event, no other interface-related calls should
1289  * be made (e.g. vnet_create_sw_interface()) while the event is being
1290  * processed (admin_up_down_in_progress). This is required in order to avoid 
1291  * race conditions in manipulating interface data structures.
1292  */
1293 void post_sw_interface_set_flags (vlib_main_t *vm, u32 sw_if_index, u32 flags)
1294 {
1295   uword * d = vlib_process_signal_event_data
1296       (vm, admin_up_down_process_node.index,
1297        UP_DOWN_FLAG_EVENT, 2, sizeof(u32));
1298   d[0] = sw_if_index;
1299   d[1] = flags;
1300 }
1301
1302 /*
1303  * Return a copy of the DPDK port stats in dest.
1304  */
1305 clib_error_t*
1306 dpdk_get_hw_interface_stats (u32 hw_if_index, struct rte_eth_stats* dest)
1307 {
1308   dpdk_main_t * dm = &dpdk_main;
1309   vnet_main_t * vnm = vnet_get_main();
1310   vnet_hw_interface_t * hi = vnet_get_hw_interface (vnm, hw_if_index);
1311   dpdk_device_t * xd = vec_elt_at_index (dm->devices, hi->dev_instance);
1312
1313   if (!dest) {
1314      return clib_error_return (0, "Missing or NULL argument");
1315   }
1316   if (!xd) {
1317      return clib_error_return (0, "Unable to get DPDK device from HW interface");
1318   }
1319
1320   dpdk_update_counters (xd, vlib_time_now (dm->vlib_main));
1321
1322   clib_memcpy(dest, &xd->stats, sizeof(xd->stats));
1323   return (0);
1324 }
1325
1326 /*
1327  * Return the number of dpdk mbufs
1328  */
1329 u32 dpdk_num_mbufs (void)
1330 {
1331   dpdk_main_t * dm = &dpdk_main;
1332
1333   return dm->conf->num_mbufs;
1334 }
1335
1336 /*
1337  * Return the pmd type for a given hardware interface
1338  */
1339 dpdk_pmd_t dpdk_get_pmd_type (vnet_hw_interface_t *hi)
1340 {
1341   dpdk_main_t   * dm = &dpdk_main;
1342   dpdk_device_t * xd;
1343
1344   assert (hi);
1345
1346   xd = vec_elt_at_index (dm->devices, hi->dev_instance);
1347
1348   assert (xd);
1349
1350   return xd->pmd;
1351 }
1352
1353 /*
1354  * Return the cpu socket for a given hardware interface
1355  */
1356 i8 dpdk_get_cpu_socket (vnet_hw_interface_t *hi)
1357 {
1358   dpdk_main_t   * dm = &dpdk_main;
1359   dpdk_device_t * xd;
1360
1361   assert (hi);
1362
1363   xd = vec_elt_at_index(dm->devices, hi->dev_instance);
1364
1365   assert (xd);
1366
1367   return xd->cpu_socket;
1368 }