Move pkt replication counter to the opaque2 cache line
[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       else if (xd->dev_type == VNET_DPDK_DEV_VHOST_USER)
359         {
360           u32 offset = 0;
361           if (xd->need_txlock) {
362             queue_id = 0;
363             while (__sync_lock_test_and_set (xd->lockp[queue_id], 1));
364           }
365 #if RTE_VERSION >= RTE_VERSION_NUM(2, 2, 0, 0)
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 #endif
377           if (PREDICT_TRUE(tx_head > tx_tail)) 
378             {
379               int i; u32 bytes = 0;
380               struct rte_mbuf **pkts = &tx_vector[tx_tail];
381               for (i = 0; i < (tx_head - tx_tail); i++) {
382                   struct rte_mbuf *buff = pkts[i];
383                   bytes += rte_pktmbuf_data_len(buff);
384               } 
385                 
386               /* no wrap, transmit in one burst */
387               rv = rte_vhost_enqueue_burst(&xd->vu_vhost_dev, offset + VIRTIO_RXQ,
388                                            &tx_vector[tx_tail],
389                                            (uint16_t) (tx_head-tx_tail));
390               if (PREDICT_TRUE(rv > 0))
391                 {
392                   dpdk_vu_vring *vring = &(xd->vu_intf->vrings[offset + VIRTIO_TXQ]);
393                   vring->packets += rv;
394                   vring->bytes += bytes;
395
396                   if (dpdk_vhost_user_want_interrupt(xd, offset + VIRTIO_RXQ)) {
397                     vring = &(xd->vu_intf->vrings[offset + VIRTIO_RXQ]);
398                     vring->n_since_last_int += rv;
399
400                     f64 now = vlib_time_now (vm);
401                     if (vring->int_deadline < now ||
402                         vring->n_since_last_int > dm->conf->vhost_coalesce_frames)
403                       dpdk_vhost_user_send_interrupt(vm, xd, offset + VIRTIO_RXQ);
404                   }
405
406                   int c = rv;
407                   while(c--)
408                     rte_pktmbuf_free (tx_vector[tx_tail+c]);
409                 }
410             }
411           else
412             {
413               /*
414                * If we transmitted everything we wanted, then allow 1 retry
415                * so we can try to transmit the rest. If we didn't transmit
416                * everything, stop now.
417                */
418               int i; u32 bytes = 0;
419               struct rte_mbuf **pkts = &tx_vector[tx_tail];
420               for (i = 0; i < (DPDK_TX_RING_SIZE - tx_tail); i++) {
421                   struct rte_mbuf *buff = pkts[i];
422                   bytes += rte_pktmbuf_data_len(buff);
423               }
424               rv = rte_vhost_enqueue_burst(&xd->vu_vhost_dev, offset + VIRTIO_RXQ,
425                                            &tx_vector[tx_tail], 
426                                            (uint16_t) (DPDK_TX_RING_SIZE - tx_tail));
427
428               if (PREDICT_TRUE(rv > 0))
429                 {
430                   dpdk_vu_vring *vring = &(xd->vu_intf->vrings[offset + VIRTIO_TXQ]);
431                   vring->packets += rv;
432                   vring->bytes += bytes;
433
434                   if (dpdk_vhost_user_want_interrupt(xd, offset + VIRTIO_RXQ)) {
435                     vring = &(xd->vu_intf->vrings[offset + VIRTIO_RXQ]);
436                     vring->n_since_last_int += rv;
437
438                     f64 now = vlib_time_now (vm);
439                     if (vring->int_deadline < now ||
440                         vring->n_since_last_int > dm->conf->vhost_coalesce_frames)
441                       dpdk_vhost_user_send_interrupt(vm, xd, offset + VIRTIO_RXQ);
442                   }
443
444                   int c = rv;
445                   while(c--)
446                     rte_pktmbuf_free (tx_vector[tx_tail+c]);
447                 }
448
449               n_retry = (rv == DPDK_TX_RING_SIZE - tx_tail) ? 1 : 0;
450             }
451
452           if (xd->need_txlock)
453             *xd->lockp[queue_id] = 0;
454         }
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   dpdk_main_t * dm = &dpdk_main;
884   dpdk_device_t * xd = vec_elt_at_index (dm->devices, hi->dev_instance);
885
886   if (!xd || xd->dev_type != VNET_DPDK_DEV_VHOST_USER) {
887     clib_warning("cannot renumber non-vhost-user interface (sw_if_index: %d)",
888                  hi->sw_if_index);
889     return 0;
890   }
891
892   xd->vu_if_id = new_dev_instance;
893   return 0;
894 }
895
896 static void dpdk_clear_hw_interface_counters (u32 instance)
897 {
898   dpdk_main_t * dm = &dpdk_main;
899   dpdk_device_t * xd = vec_elt_at_index (dm->devices, instance);
900
901   /*
902    * DAW-FIXME: VMXNET3 device stop/start doesn't work, 
903    * therefore fake the stop in the dpdk driver by
904    * silently dropping all of the incoming pkts instead of 
905    * stopping the driver / hardware.
906    */
907   if (xd->admin_up != 0xff)
908     {
909       /*
910        * Set the "last_cleared_stats" to the current stats, so that
911        * things appear to clear from a display perspective.
912        */
913       dpdk_update_counters (xd, vlib_time_now (dm->vlib_main));
914
915       clib_memcpy (&xd->last_cleared_stats, &xd->stats, sizeof(xd->stats));
916       clib_memcpy (xd->last_cleared_xstats, xd->xstats,
917               vec_len(xd->last_cleared_xstats) *
918               sizeof(xd->last_cleared_xstats[0]));
919     }
920   else
921     {
922       /*
923        * Internally rte_eth_xstats_reset() is calling rte_eth_stats_reset(),
924        * so we're only calling xstats_reset() here.
925        */
926       rte_eth_xstats_reset (xd->device_index);
927       memset (&xd->stats, 0, sizeof(xd->stats));
928       memset (&xd->last_stats, 0, sizeof (xd->last_stats));
929     }
930
931   if (PREDICT_FALSE(xd->dev_type == VNET_DPDK_DEV_VHOST_USER)) {
932     int i;
933     for (i = 0; i < xd->rx_q_used * VIRTIO_QNUM; i++) {
934       xd->vu_intf->vrings[i].packets = 0;
935       xd->vu_intf->vrings[i].bytes = 0;
936     }
937   }
938 }
939
940 #ifdef RTE_LIBRTE_KNI
941 static int
942 kni_config_network_if(u8 port_id, u8 if_up)
943 {
944   vnet_main_t * vnm = vnet_get_main();
945   dpdk_main_t * dm = &dpdk_main;
946   dpdk_device_t * xd;
947   uword *p;
948
949   p = hash_get (dm->dpdk_device_by_kni_port_id, port_id);
950   if (p == 0) {
951     clib_warning("unknown interface");
952     return 0;
953   } else {
954     xd = vec_elt_at_index (dm->devices, p[0]);
955   }
956
957   vnet_hw_interface_set_flags (vnm, xd->vlib_hw_if_index,
958                                if_up ? VNET_HW_INTERFACE_FLAG_LINK_UP |
959                                ETH_LINK_FULL_DUPLEX : 0);
960   return 0;
961 }
962
963 static int
964 kni_change_mtu(u8 port_id, unsigned new_mtu)
965 {
966   vnet_main_t * vnm = vnet_get_main();
967   dpdk_main_t * dm = &dpdk_main;
968   dpdk_device_t * xd;
969   uword *p;
970   vnet_hw_interface_t * hif;
971
972   p = hash_get (dm->dpdk_device_by_kni_port_id, port_id);
973   if (p == 0) {
974     clib_warning("unknown interface");
975     return 0;
976   } else {
977     xd = vec_elt_at_index (dm->devices, p[0]);
978   }
979   hif = vnet_get_hw_interface (vnm, xd->vlib_hw_if_index);
980
981   hif->max_packet_bytes = new_mtu;
982
983   return 0;
984 }
985 #endif
986
987 static clib_error_t *
988 dpdk_interface_admin_up_down (vnet_main_t * vnm, u32 hw_if_index, u32 flags)
989 {
990   vnet_hw_interface_t * hif = vnet_get_hw_interface (vnm, hw_if_index);
991   uword is_up = (flags & VNET_SW_INTERFACE_FLAG_ADMIN_UP) != 0;
992   dpdk_main_t * dm = &dpdk_main;
993   dpdk_device_t * xd = vec_elt_at_index (dm->devices, hif->dev_instance);
994   int rv = 0;
995
996 #ifdef RTE_LIBRTE_KNI
997   if (xd->dev_type == VNET_DPDK_DEV_KNI)
998   {
999       if (is_up)
1000       {
1001           struct rte_kni_conf conf;
1002           struct rte_kni_ops ops;
1003           vlib_main_t * vm = vlib_get_main();
1004           vlib_buffer_main_t * bm = vm->buffer_main;
1005           memset(&conf, 0, sizeof(conf));
1006           snprintf(conf.name, RTE_KNI_NAMESIZE, "vpp%u", xd->kni_port_id);
1007           conf.mbuf_size = VLIB_BUFFER_DATA_SIZE;
1008           memset(&ops, 0, sizeof(ops));
1009           ops.port_id = xd->kni_port_id;
1010           ops.change_mtu = kni_change_mtu;
1011           ops.config_network_if = kni_config_network_if;
1012
1013           xd->kni = rte_kni_alloc(bm->pktmbuf_pools[rte_socket_id()], &conf, &ops);
1014           if (!xd->kni)
1015           {
1016             clib_warning("failed to allocate kni interface");
1017           }
1018           else
1019           {
1020             hif->max_packet_bytes = 1500; /* kni interface default value */
1021             xd->admin_up = 1;
1022           }
1023       }
1024       else
1025       {
1026         xd->admin_up = 0;
1027         rte_kni_release(xd->kni);
1028       }
1029       return 0;
1030   }
1031 #endif
1032   if (xd->dev_type == VNET_DPDK_DEV_VHOST_USER)
1033     {
1034       if (is_up)
1035         {
1036           if (xd->vu_is_running)
1037             vnet_hw_interface_set_flags (vnm, xd->vlib_hw_if_index,
1038                                  VNET_HW_INTERFACE_FLAG_LINK_UP |
1039                                  ETH_LINK_FULL_DUPLEX );
1040           xd->admin_up = 1;
1041         }
1042       else
1043         {
1044           vnet_hw_interface_set_flags (vnm, xd->vlib_hw_if_index, 0);
1045                               xd->admin_up = 0;
1046         }
1047
1048       return 0;
1049     }
1050
1051
1052   if (is_up)
1053     {
1054       f64 now = vlib_time_now (dm->vlib_main);
1055
1056       /*
1057        * DAW-FIXME: VMXNET3 device stop/start doesn't work, 
1058        * therefore fake the stop in the dpdk driver by
1059        * silently dropping all of the incoming pkts instead of 
1060        * stopping the driver / hardware.
1061        */
1062       if (xd->admin_up == 0)
1063         rv = rte_eth_dev_start (xd->device_index);
1064
1065       if (xd->promisc)
1066           rte_eth_promiscuous_enable(xd->device_index);
1067       else
1068           rte_eth_promiscuous_disable(xd->device_index);
1069
1070       rte_eth_allmulticast_enable (xd->device_index);
1071       xd->admin_up = 1;
1072       dpdk_update_counters (xd, now);
1073       dpdk_update_link_state (xd, now);
1074     }
1075   else
1076     {
1077       /*
1078        * DAW-FIXME: VMXNET3 device stop/start doesn't work,
1079        * therefore fake the stop in the dpdk driver by
1080        * silently dropping all of the incoming pkts instead of
1081        * stopping the driver / hardware.
1082        */
1083       if (xd->pmd != VNET_DPDK_PMD_VMXNET3)
1084          xd->admin_up = 0;
1085       else
1086          xd->admin_up = ~0;
1087
1088       rte_eth_allmulticast_disable (xd->device_index);
1089       vnet_hw_interface_set_flags (vnm, xd->vlib_hw_if_index, 0);
1090
1091       /*
1092        * DAW-FIXME: VMXNET3 device stop/start doesn't work, 
1093        * therefore fake the stop in the dpdk driver by
1094        * silently dropping all of the incoming pkts instead of 
1095        * stopping the driver / hardware.
1096        */
1097       if (xd->pmd != VNET_DPDK_PMD_VMXNET3)
1098           rte_eth_dev_stop (xd->device_index);
1099     }
1100
1101   if (rv < 0)
1102     clib_warning ("rte_eth_dev_%s error: %d", is_up ? "start" : "stop",
1103                   rv);
1104
1105   return /* no error */ 0;
1106 }
1107
1108 /*
1109  * Dynamically redirect all pkts from a specific interface
1110  * to the specified node
1111  */
1112 static void dpdk_set_interface_next_node (vnet_main_t *vnm, u32 hw_if_index,
1113                                           u32 node_index)
1114 {
1115   dpdk_main_t * xm = &dpdk_main;
1116   vnet_hw_interface_t *hw = vnet_get_hw_interface (vnm, hw_if_index);
1117   dpdk_device_t * xd = vec_elt_at_index (xm->devices, hw->dev_instance);
1118   
1119   /* Shut off redirection */
1120   if (node_index == ~0)
1121     {
1122       xd->per_interface_next_index = node_index;
1123       return;
1124     }
1125   
1126   xd->per_interface_next_index = 
1127     vlib_node_add_next (xm->vlib_main, dpdk_input_node.index, node_index);
1128 }
1129
1130
1131 static clib_error_t *
1132 dpdk_subif_add_del_function (vnet_main_t * vnm,
1133                              u32 hw_if_index,
1134                              struct vnet_sw_interface_t * st,
1135                              int is_add)
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   vnet_sw_interface_t * t = (vnet_sw_interface_t *) st;
1141   int r, vlan_offload;
1142   u32 prev_subifs = xd->vlan_subifs;
1143
1144   if (is_add) xd->vlan_subifs++;
1145   else if (xd->vlan_subifs) xd->vlan_subifs--;
1146
1147   if (xd->dev_type != VNET_DPDK_DEV_ETH)
1148         return 0;
1149
1150   /* currently we program VLANS only for IXGBE VF and I40E VF */
1151   if ((xd->pmd != VNET_DPDK_PMD_IXGBEVF) &&
1152       (xd->pmd != VNET_DPDK_PMD_I40EVF))
1153         return 0;
1154
1155   if (t->sub.eth.flags.no_tags == 1)
1156         return 0;
1157
1158   if ((t->sub.eth.flags.one_tag != 1) || (t->sub.eth.flags.exact_match != 1 )) {
1159         xd->vlan_subifs = prev_subifs;
1160         return clib_error_return (0, "unsupported VLAN setup");
1161   }
1162
1163   vlan_offload = rte_eth_dev_get_vlan_offload(xd->device_index);
1164   vlan_offload |= ETH_VLAN_FILTER_OFFLOAD;
1165
1166   if ((r = rte_eth_dev_set_vlan_offload(xd->device_index, vlan_offload))) {
1167         xd->vlan_subifs = prev_subifs;
1168         return clib_error_return (0, "rte_eth_dev_set_vlan_offload[%d]: err %d",
1169                                   xd->device_index, r);
1170   }
1171
1172
1173   if ((r = rte_eth_dev_vlan_filter(xd->device_index, t->sub.eth.outer_vlan_id, is_add))) {
1174         xd->vlan_subifs = prev_subifs;
1175         return clib_error_return (0, "rte_eth_dev_vlan_filter[%d]: err %d",
1176                                  xd->device_index, r);
1177   }
1178
1179   return 0;
1180 }
1181
1182 VNET_DEVICE_CLASS (dpdk_device_class) = {
1183   .name = "dpdk",
1184   .tx_function = dpdk_interface_tx,
1185   .tx_function_n_errors = DPDK_TX_FUNC_N_ERROR,
1186   .tx_function_error_strings = dpdk_tx_func_error_strings,
1187   .format_device_name = format_dpdk_device_name,
1188   .format_device = format_dpdk_device,
1189   .format_tx_trace = format_dpdk_tx_dma_trace,
1190   .clear_counters = dpdk_clear_hw_interface_counters,
1191   .admin_up_down_function = dpdk_interface_admin_up_down,
1192   .subif_add_del_function = dpdk_subif_add_del_function,
1193   .rx_redirect_to_node = dpdk_set_interface_next_node,
1194   .no_flatten_output_chains = 1,
1195   .name_renumber = dpdk_device_renumber,
1196 };
1197
1198 VLIB_DEVICE_TX_FUNCTION_MULTIARCH (dpdk_device_class,
1199                                    dpdk_interface_tx)
1200
1201 void dpdk_set_flowcontrol_callback (vlib_main_t *vm, 
1202                                     dpdk_flowcontrol_callback_t callback)
1203 {
1204   dpdk_main.flowcontrol_callback = callback;
1205 }
1206
1207 #define UP_DOWN_FLAG_EVENT 1
1208
1209
1210 u32 dpdk_get_admin_up_down_in_progress (void)
1211 {
1212   return dpdk_main.admin_up_down_in_progress;
1213 }
1214
1215 uword
1216 admin_up_down_process (vlib_main_t * vm,
1217                        vlib_node_runtime_t * rt,
1218                        vlib_frame_t * f)
1219 {
1220   clib_error_t * error = 0;
1221   uword event_type;
1222   uword *event_data = 0;
1223   u32 sw_if_index;
1224   u32 flags;
1225
1226   while (1)  
1227     { 
1228       vlib_process_wait_for_event (vm);
1229
1230       event_type = vlib_process_get_events (vm, &event_data);
1231
1232       dpdk_main.admin_up_down_in_progress = 1;
1233
1234       switch (event_type) {
1235         case UP_DOWN_FLAG_EVENT:
1236         {
1237             if (vec_len(event_data) == 2) {
1238               sw_if_index = event_data[0];
1239               flags = event_data[1];
1240               error = vnet_sw_interface_set_flags (vnet_get_main(), sw_if_index, flags);
1241               clib_error_report(error);
1242             }
1243         }
1244         break;
1245       }
1246
1247       vec_reset_length (event_data);
1248
1249       dpdk_main.admin_up_down_in_progress = 0;
1250
1251     }
1252   return 0; /* or not */
1253 }
1254
1255 VLIB_REGISTER_NODE (admin_up_down_process_node,static) = {
1256     .function = admin_up_down_process,
1257     .type = VLIB_NODE_TYPE_PROCESS,
1258     .name = "admin-up-down-process",
1259     .process_log2_n_stack_bytes = 17,  // 256KB
1260 };
1261
1262 /*
1263  * Asynchronously invoke vnet_sw_interface_set_flags via the admin_up_down 
1264  * process. Useful for avoiding long blocking delays (>150ms) in the dpdk 
1265  * drivers.
1266  * WARNING: when posting this event, no other interface-related calls should
1267  * be made (e.g. vnet_create_sw_interface()) while the event is being
1268  * processed (admin_up_down_in_progress). This is required in order to avoid 
1269  * race conditions in manipulating interface data structures.
1270  */
1271 void post_sw_interface_set_flags (vlib_main_t *vm, u32 sw_if_index, u32 flags)
1272 {
1273   uword * d = vlib_process_signal_event_data
1274       (vm, admin_up_down_process_node.index,
1275        UP_DOWN_FLAG_EVENT, 2, sizeof(u32));
1276   d[0] = sw_if_index;
1277   d[1] = flags;
1278 }
1279
1280 /*
1281  * Return a copy of the DPDK port stats in dest.
1282  */
1283 clib_error_t*
1284 dpdk_get_hw_interface_stats (u32 hw_if_index, struct rte_eth_stats* dest)
1285 {
1286   dpdk_main_t * dm = &dpdk_main;
1287   vnet_main_t * vnm = vnet_get_main();
1288   vnet_hw_interface_t * hi = vnet_get_hw_interface (vnm, hw_if_index);
1289   dpdk_device_t * xd = vec_elt_at_index (dm->devices, hi->dev_instance);
1290
1291   if (!dest) {
1292      return clib_error_return (0, "Missing or NULL argument");
1293   }
1294   if (!xd) {
1295      return clib_error_return (0, "Unable to get DPDK device from HW interface");
1296   }
1297
1298   dpdk_update_counters (xd, vlib_time_now (dm->vlib_main));
1299
1300   clib_memcpy(dest, &xd->stats, sizeof(xd->stats));
1301   return (0);
1302 }
1303
1304 /*
1305  * Return the number of dpdk mbufs
1306  */
1307 u32 dpdk_num_mbufs (void)
1308 {
1309   dpdk_main_t * dm = &dpdk_main;
1310
1311   return dm->conf->num_mbufs;
1312 }
1313
1314 /*
1315  * Return the pmd type for a given hardware interface
1316  */
1317 dpdk_pmd_t dpdk_get_pmd_type (vnet_hw_interface_t *hi)
1318 {
1319   dpdk_main_t   * dm = &dpdk_main;
1320   dpdk_device_t * xd;
1321
1322   assert (hi);
1323
1324   xd = vec_elt_at_index (dm->devices, hi->dev_instance);
1325
1326   assert (xd);
1327
1328   return xd->pmd;
1329 }
1330
1331 /*
1332  * Return the cpu socket for a given hardware interface
1333  */
1334 i8 dpdk_get_cpu_socket (vnet_hw_interface_t *hi)
1335 {
1336   dpdk_main_t   * dm = &dpdk_main;
1337   dpdk_device_t * xd;
1338
1339   assert (hi);
1340
1341   xd = vec_elt_at_index(dm->devices, hi->dev_instance);
1342
1343   assert (xd);
1344
1345   return xd->cpu_socket;
1346 }