8fe95ae5f09f162cd5f2d8efd995569ac74f268b
[vpp.git] / vnet / vnet / devices / dpdk / init.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/error.h>
18 #include <vppinfra/format.h>
19
20 #include <vnet/ethernet/ethernet.h>
21 #include <vnet/devices/dpdk/dpdk.h>
22 #include <vlib/unix/physmem.h>
23
24 #include <stdio.h>
25 #include <stdlib.h>
26 #include <unistd.h>
27 #include <sys/stat.h>
28 #include <sys/mount.h>
29 #include <string.h>
30 #include <fcntl.h>
31
32 #include "dpdk_priv.h"
33
34 dpdk_main_t dpdk_main;
35
36 /* force linker to link functions used by vlib and declared weak */
37 void *vlib_weakly_linked_functions[] = {
38   &rte_pktmbuf_init,
39   &rte_pktmbuf_pool_init,
40 };
41
42 #define LINK_STATE_ELOGS        0
43
44 #define DEFAULT_HUGE_DIR "/run/vpp/hugepages"
45 #define VPP_RUN_DIR "/run/vpp"
46
47 /* Port configuration, mildly modified Intel app values */
48
49 static struct rte_eth_conf port_conf_template = {
50   .rxmode = {
51     .split_hdr_size = 0,
52     .header_split   = 0, /**< Header Split disabled */
53     .hw_ip_checksum = 0, /**< IP checksum offload disabled */
54     .hw_vlan_filter = 0, /**< VLAN filtering disabled */
55     .hw_strip_crc   = 1, /**< CRC stripped by hardware */
56   },
57   .txmode = {
58     .mq_mode = ETH_MQ_TX_NONE,
59   },
60 };
61
62 clib_error_t *
63 dpdk_port_setup (dpdk_main_t * dm, dpdk_device_t * xd)
64 {
65   vlib_main_t * vm = vlib_get_main();
66   vlib_buffer_main_t * bm = vm->buffer_main;
67   int rv;
68   int j;
69
70   ASSERT(os_get_cpu_number() == 0);
71
72   if (xd->admin_up) {
73     vnet_hw_interface_set_flags (dm->vnet_main, xd->vlib_hw_if_index, 0);
74     rte_eth_dev_stop (xd->device_index);
75   }
76
77   rv = rte_eth_dev_configure (xd->device_index, xd->rx_q_used,
78                               xd->tx_q_used, &xd->port_conf);
79
80   if (rv < 0)
81     return clib_error_return (0, "rte_eth_dev_configure[%d]: err %d",
82                               xd->device_index, rv);
83
84   /* Set up one TX-queue per worker thread */
85   for (j = 0; j < xd->tx_q_used; j++)
86     {
87       rv = rte_eth_tx_queue_setup(xd->device_index, j, xd->nb_tx_desc,
88                                  xd->cpu_socket, &xd->tx_conf);
89       if (rv < 0)
90         break;
91     }
92
93     if (rv < 0)
94       return clib_error_return (0, "rte_eth_tx_queue_setup[%d]: err %d",
95                                 xd->device_index, rv);
96
97   for (j = 0; j < xd->rx_q_used; j++)
98     {
99
100       rv = rte_eth_rx_queue_setup(xd->device_index, j, xd->nb_rx_desc,
101                                   xd->cpu_socket, 0,
102                                   bm->pktmbuf_pools[xd->cpu_socket_id_by_queue[j]]);
103       if (rv < 0)
104         return clib_error_return (0, "rte_eth_rx_queue_setup[%d]: err %d",
105                                   xd->device_index, rv);
106     }
107
108   if (xd->admin_up) {
109     rte_eth_dev_start (xd->device_index);
110   }
111   return 0;
112 }
113
114 static u32 dpdk_flag_change (vnet_main_t * vnm, 
115                              vnet_hw_interface_t * hi,
116                              u32 flags)
117 {
118   dpdk_main_t * dm = &dpdk_main;
119   dpdk_device_t * xd = vec_elt_at_index (dm->devices, hi->dev_instance);
120   u32 old = 0;
121
122   if (ETHERNET_INTERFACE_FLAG_CONFIG_PROMISC(flags))
123     {
124       old = xd->promisc;
125       xd->promisc = flags & ETHERNET_INTERFACE_FLAG_ACCEPT_ALL;
126       
127       if (xd->admin_up)
128         {
129           if (xd->promisc)
130             rte_eth_promiscuous_enable(xd->device_index);
131           else
132             rte_eth_promiscuous_disable(xd->device_index);
133         }
134     }
135   else if (ETHERNET_INTERFACE_FLAG_CONFIG_MTU(flags))
136     {
137       /*
138        * DAW-FIXME: The Cisco VIC firmware does not provide an api for a
139        *            driver to dynamically change the mtu.  If/when the 
140        *            VIC firmware gets fixed, then this should be removed.
141        */
142       if (xd->pmd == VNET_DPDK_PMD_VICE ||
143           xd->pmd == VNET_DPDK_PMD_ENIC)
144         {
145           struct rte_eth_dev_info dev_info;
146
147           /*
148            * Restore mtu to what has been set by CIMC in the firmware cfg.
149            */
150           rte_eth_dev_info_get(xd->device_index, &dev_info);
151           hi->max_packet_bytes = dev_info.max_rx_pktlen;
152
153           vlib_cli_output (vlib_get_main(), 
154                            "Cisco VIC mtu can only be changed "
155                            "using CIMC then rebooting the server!");
156         }
157       else
158         {
159           int rv;
160       
161           xd->port_conf.rxmode.max_rx_pkt_len = hi->max_packet_bytes;
162
163           if (xd->admin_up)
164             rte_eth_dev_stop (xd->device_index);
165
166     rv = rte_eth_dev_configure
167       (xd->device_index,
168        xd->rx_q_used,
169        xd->tx_q_used,
170        &xd->port_conf);
171
172           if (rv < 0)
173             vlib_cli_output (vlib_get_main(), 
174                              "rte_eth_dev_configure[%d]: err %d",
175                              xd->device_index, rv);
176
177           rte_eth_dev_set_mtu(xd->device_index, hi->max_packet_bytes);
178
179           if (xd->admin_up)
180             rte_eth_dev_start (xd->device_index);
181         }
182     }
183   return old;
184 }
185
186 #ifdef NETMAP
187 extern int rte_netmap_probe(void);
188 #endif
189
190 void
191 dpdk_device_lock_init(dpdk_device_t * xd)
192 {
193   int q;
194   vec_validate(xd->lockp, xd->tx_q_used - 1);
195   for (q = 0; q < xd->tx_q_used; q++)
196     {
197       xd->lockp[q] = clib_mem_alloc_aligned (CLIB_CACHE_LINE_BYTES,
198                                              CLIB_CACHE_LINE_BYTES);
199       memset ((void *) xd->lockp[q], 0, CLIB_CACHE_LINE_BYTES);
200   }
201   xd->need_txlock = 1;
202 }
203
204 void
205 dpdk_device_lock_free(dpdk_device_t * xd)
206 {
207   int q;
208
209   for (q = 0; q < vec_len(xd->lockp); q++)
210     clib_mem_free((void *) xd->lockp[q]);
211   vec_free(xd->lockp);
212   xd->lockp = 0;
213   xd->need_txlock = 0;
214 }
215
216 static clib_error_t *
217 dpdk_lib_init (dpdk_main_t * dm)
218 {
219   u32 nports;
220   u32 nb_desc = 0;
221   int i;
222   clib_error_t * error;
223   vlib_main_t * vm = vlib_get_main();
224   vlib_thread_main_t * tm = vlib_get_thread_main();
225   vnet_sw_interface_t * sw;
226   vnet_hw_interface_t * hi;
227   dpdk_device_t * xd;
228   vlib_thread_registration_t * tr;
229   uword * p;
230
231   u32 next_cpu = 0;
232   u8 af_packet_port_id = 0;
233
234   dm->input_cpu_first_index = 0;
235   dm->input_cpu_count = 1;
236
237   /* find out which cpus will be used for input */
238   p = hash_get_mem (tm->thread_registrations_by_name, "io");
239   tr = p ? (vlib_thread_registration_t *) p[0] : 0;
240
241   if (!tr || tr->count == 0)
242     {
243       /* no io threads, workers doing input */
244       p = hash_get_mem (tm->thread_registrations_by_name, "workers");
245       tr = p ? (vlib_thread_registration_t *) p[0] : 0;
246     }
247   else
248     {
249       dm->have_io_threads = 1;
250     }
251
252   if (tr && tr->count > 0)
253     {
254       dm->input_cpu_first_index = tr->first_index;
255       dm->input_cpu_count = tr->count;
256     }
257
258   vec_validate_aligned (dm->devices_by_cpu, tm->n_vlib_mains - 1,
259                         CLIB_CACHE_LINE_BYTES);
260
261   vec_validate_aligned (dm->workers, tm->n_vlib_mains - 1,
262                         CLIB_CACHE_LINE_BYTES);
263
264 #ifdef NETMAP
265   if(rte_netmap_probe() < 0)
266     return clib_error_return (0, "rte netmap probe failed");
267 #endif
268
269   nports = rte_eth_dev_count();
270   if (nports < 1) 
271     {
272       clib_warning ("DPDK drivers found no ports...");
273     }
274
275   if (CLIB_DEBUG > 0)
276     clib_warning ("DPDK drivers found %d ports...", nports);
277
278   /* 
279    * All buffers are all allocated from the same rte_mempool.
280    * Thus they all have the same number of data bytes.
281    */
282   dm->vlib_buffer_free_list_index = 
283       vlib_buffer_get_or_create_free_list (
284           vm, VLIB_BUFFER_DEFAULT_FREE_LIST_BYTES, "dpdk rx");
285
286   for (i = 0; i < nports; i++)
287     {
288       u8 addr[6];
289       int j;
290       struct rte_eth_dev_info dev_info;
291       clib_error_t * rv;
292       struct rte_eth_link l;
293
294       /* Create vnet interface */
295       vec_add2_aligned (dm->devices, xd, 1, CLIB_CACHE_LINE_BYTES);
296       xd->nb_rx_desc = DPDK_NB_RX_DESC_DEFAULT;
297       xd->nb_tx_desc = DPDK_NB_TX_DESC_DEFAULT;
298       xd->cpu_socket = (i8) rte_eth_dev_socket_id(i);
299       rte_eth_dev_info_get(i, &dev_info);
300
301       memcpy(&xd->tx_conf, &dev_info.default_txconf,
302              sizeof(struct rte_eth_txconf));
303       if (dm->no_multi_seg)
304         {
305           xd->tx_conf.txq_flags |= ETH_TXQ_FLAGS_NOMULTSEGS;
306           port_conf_template.rxmode.jumbo_frame = 0;
307         }
308       else
309         {
310           xd->tx_conf.txq_flags &= ~ETH_TXQ_FLAGS_NOMULTSEGS;
311           port_conf_template.rxmode.jumbo_frame = 1;
312         }
313
314       memcpy(&xd->port_conf, &port_conf_template, sizeof(struct rte_eth_conf));
315
316       xd->tx_q_used = clib_min(dev_info.max_tx_queues, tm->n_vlib_mains);
317
318       if (dm->max_tx_queues)
319         xd->tx_q_used = clib_min(xd->tx_q_used, dm->max_tx_queues);
320
321       if (dm->use_rss > 1 && dev_info.max_rx_queues >= dm->use_rss)
322         {
323           xd->rx_q_used = dm->use_rss;
324           xd->port_conf.rxmode.mq_mode = ETH_MQ_RX_RSS;
325           xd->port_conf.rx_adv_conf.rss_conf.rss_hf = ETH_RSS_IP | ETH_RSS_UDP | ETH_RSS_TCP;
326         }
327       else
328         xd->rx_q_used = 1;
329
330       xd->dev_type = VNET_DPDK_DEV_ETH;
331
332       /* workaround for drivers not setting driver_name */
333       if (!dev_info.driver_name)
334         dev_info.driver_name = dev_info.pci_dev->driver->name;
335       ASSERT(dev_info.driver_name);
336
337       if (!xd->pmd) {
338
339
340 #define _(s,f) else if (!strcmp(dev_info.driver_name, s)) \
341                  xd->pmd = VNET_DPDK_PMD_##f;
342         if (0)
343           ;
344         foreach_dpdk_pmd
345 #undef _
346         else
347           xd->pmd = VNET_DPDK_PMD_UNKNOWN;
348
349
350         switch (xd->pmd) {
351           /* 1G adapters */
352           case VNET_DPDK_PMD_E1000EM:
353           case VNET_DPDK_PMD_IGB:
354           case VNET_DPDK_PMD_IGBVF:
355             xd->port_type = VNET_DPDK_PORT_TYPE_ETH_1G;
356             break;
357
358           /* 10G adapters */
359           case VNET_DPDK_PMD_IXGBE:
360           case VNET_DPDK_PMD_IXGBEVF:
361           case VNET_DPDK_PMD_THUNDERX:
362             xd->port_type = VNET_DPDK_PORT_TYPE_ETH_10G;
363             xd->nb_rx_desc = DPDK_NB_RX_DESC_10GE;
364             xd->nb_tx_desc = DPDK_NB_TX_DESC_10GE;
365             break;
366
367           /* Cisco VIC */
368           case VNET_DPDK_PMD_VICE:
369           case VNET_DPDK_PMD_ENIC:
370             rte_eth_link_get_nowait(i, &l);
371             if (l.link_speed == 40000)
372               {
373                 xd->port_type = VNET_DPDK_PORT_TYPE_ETH_40G;
374                 xd->nb_rx_desc = DPDK_NB_RX_DESC_40GE;
375                 xd->nb_tx_desc = DPDK_NB_TX_DESC_40GE;
376               }
377             else
378               {
379                 xd->port_type = VNET_DPDK_PORT_TYPE_ETH_10G;
380                 xd->nb_rx_desc = DPDK_NB_RX_DESC_10GE;
381                 xd->nb_tx_desc = DPDK_NB_TX_DESC_10GE;
382               }
383             break;
384
385           /* Intel Fortville */
386           case VNET_DPDK_PMD_I40E:
387           case VNET_DPDK_PMD_I40EVF:
388             xd->port_type = VNET_DPDK_PORT_TYPE_ETH_40G;
389             xd->nb_rx_desc = DPDK_NB_RX_DESC_40GE;
390             xd->nb_tx_desc = DPDK_NB_TX_DESC_40GE;
391
392             switch (dev_info.pci_dev->id.device_id) {
393               case I40E_DEV_ID_10G_BASE_T:
394               case I40E_DEV_ID_SFP_XL710:
395                 xd->port_type = VNET_DPDK_PORT_TYPE_ETH_10G;
396                 break;
397               case I40E_DEV_ID_QSFP_A:
398               case I40E_DEV_ID_QSFP_B:
399               case I40E_DEV_ID_QSFP_C:
400                 xd->port_type = VNET_DPDK_PORT_TYPE_ETH_40G;
401                 break;
402               case I40E_DEV_ID_VF:
403                 rte_eth_link_get_nowait(i, &l);
404                 xd->port_type = l.link_speed == 10000 ?
405                   VNET_DPDK_PORT_TYPE_ETH_10G : VNET_DPDK_PORT_TYPE_ETH_40G;
406                 break;
407               default:
408                 xd->port_type = VNET_DPDK_PORT_TYPE_UNKNOWN;
409             }
410             break;
411
412           case VNET_DPDK_PMD_CXGBE:
413             switch (dev_info.pci_dev->id.device_id) {
414               case 0x5410: /* T580-LP-cr */
415                 xd->nb_rx_desc = DPDK_NB_RX_DESC_40GE;
416                 xd->nb_tx_desc = DPDK_NB_TX_DESC_40GE;
417                 xd->port_type = VNET_DPDK_PORT_TYPE_ETH_40G;
418                 break;
419               default:
420                 xd->nb_rx_desc = DPDK_NB_RX_DESC_10GE;
421                 xd->nb_tx_desc = DPDK_NB_TX_DESC_10GE;
422                 xd->port_type = VNET_DPDK_PORT_TYPE_UNKNOWN;
423             }
424             break;
425
426           /* Intel Red Rock Canyon */
427           case VNET_DPDK_PMD_FM10K:
428             xd->port_type = VNET_DPDK_PORT_TYPE_ETH_SWITCH;
429             xd->nb_rx_desc = DPDK_NB_RX_DESC_40GE;
430             xd->nb_tx_desc = DPDK_NB_TX_DESC_40GE;
431             break;
432
433           /* virtio */
434           case VNET_DPDK_PMD_VIRTIO:
435             xd->port_type = VNET_DPDK_PORT_TYPE_ETH_1G;
436             xd->nb_rx_desc = DPDK_NB_RX_DESC_VIRTIO;
437             xd->nb_tx_desc = DPDK_NB_TX_DESC_VIRTIO;
438             break;
439
440           /* vmxnet3 */
441           case VNET_DPDK_PMD_VMXNET3:
442             xd->port_type = VNET_DPDK_PORT_TYPE_ETH_1G;
443             xd->tx_conf.txq_flags |= ETH_TXQ_FLAGS_NOMULTSEGS;
444             break;
445
446           case VNET_DPDK_PMD_AF_PACKET:
447             xd->port_type = VNET_DPDK_PORT_TYPE_AF_PACKET;
448             xd->af_packet_port_id = af_packet_port_id++;
449             break;
450
451           case VNET_DPDK_PMD_BOND:
452             xd->port_type = VNET_DPDK_PORT_TYPE_ETH_BOND;
453             break;
454
455           default:
456             xd->port_type = VNET_DPDK_PORT_TYPE_UNKNOWN;
457         }
458
459   #ifdef NETMAP
460         if(strncmp(dev_info.driver_name, "vale", 4) == 0
461              || strncmp(dev_info.driver_name, "netmap", 6) == 0)
462           {
463             xd->pmd = VNET_DPDK_PMD_NETMAP;
464             xd->port_type = VNET_DPDK_PORT_TYPE_NETMAP;
465           }
466   #endif
467
468       }
469
470       /*
471        * Ensure default mtu is not > the mtu read from the hardware.
472        * Otherwise rte_eth_dev_configure() will fail and the port will
473        * not be available.
474        */
475       xd->port_conf.rxmode.max_rx_pkt_len = 
476               (ETHERNET_MAX_PACKET_BYTES > dev_info.max_rx_pktlen) ? 
477               dev_info.max_rx_pktlen : ETHERNET_MAX_PACKET_BYTES;
478
479       /*
480        * DAW-FIXME: VMXNET3 driver doesn't support jumbo / multi-buffer pkts
481        */
482       if (xd->pmd == VNET_DPDK_PMD_VMXNET3)
483         {
484           xd->port_conf.rxmode.max_rx_pkt_len = 1518;
485           xd->port_conf.rxmode.jumbo_frame = 0;
486         }
487
488       if (xd->pmd == VNET_DPDK_PMD_AF_PACKET)
489         {
490           f64 now = vlib_time_now(vm);
491           u32 rnd;
492           rnd = (u32) (now * 1e6);
493           rnd = random_u32 (&rnd);
494           memcpy (addr+2, &rnd, sizeof(rnd));
495           addr[0] = 2;
496           addr[1] = 0xfe;
497         }
498       else
499         rte_eth_macaddr_get(i,(struct ether_addr *)addr);
500
501       if (xd->tx_q_used < tm->n_vlib_mains)
502         dpdk_device_lock_init(xd);
503
504       xd->device_index = xd - dm->devices;
505       ASSERT(i == xd->device_index);
506       xd->per_interface_next_index = ~0;
507
508       /* assign interface to input thread */
509       dpdk_device_and_queue_t * dq;
510       int q;
511
512       for (q = 0; q < xd->rx_q_used; q++)
513         {
514           int cpu = dm->input_cpu_first_index + next_cpu;
515           unsigned lcore = vlib_worker_threads[cpu].dpdk_lcore_id;
516
517           /*
518            * numa node for worker thread handling this queue
519            * needed for taking buffers from the right mempool
520            */
521           vec_validate(xd->cpu_socket_id_by_queue, q);
522           xd->cpu_socket_id_by_queue[q] = rte_lcore_to_socket_id(lcore);
523
524           /*
525            * construct vector of (device,queue) pairs for each worker thread
526            */
527           vec_add2(dm->devices_by_cpu[cpu], dq, 1);
528           dq->device = xd->device_index;
529           dq->queue_id = q;
530
531           next_cpu++;
532           if (next_cpu == dm->input_cpu_count)
533             next_cpu = 0;
534         }
535
536       vec_validate_aligned (xd->tx_vectors, tm->n_vlib_mains,
537                             CLIB_CACHE_LINE_BYTES);
538       for (j = 0; j < tm->n_vlib_mains; j++)
539         {
540           vec_validate_ha (xd->tx_vectors[j], DPDK_TX_RING_SIZE, 
541                            sizeof(tx_ring_hdr_t), CLIB_CACHE_LINE_BYTES);
542           vec_reset_length (xd->tx_vectors[j]);
543         }
544
545       vec_validate_aligned (xd->rx_vectors, xd->rx_q_used,
546                             CLIB_CACHE_LINE_BYTES);
547       for (j = 0; j< xd->rx_q_used; j++)
548         {
549           vec_validate_aligned (xd->rx_vectors[j], VLIB_FRAME_SIZE-1,
550                                 CLIB_CACHE_LINE_BYTES);
551           vec_reset_length (xd->rx_vectors[j]);
552         }
553
554       vec_validate_aligned (xd->frames, tm->n_vlib_mains,
555                             CLIB_CACHE_LINE_BYTES);
556
557       rv = dpdk_port_setup(dm, xd);
558
559       if (rv < 0)
560         return rv;
561
562       /* count the number of descriptors used for this device */
563       nb_desc += xd->nb_rx_desc + xd->nb_tx_desc * xd->tx_q_used;
564
565       error = ethernet_register_interface
566         (dm->vnet_main,
567          dpdk_device_class.index,
568          xd->device_index,
569          /* ethernet address */ addr,
570          &xd->vlib_hw_if_index, 
571          dpdk_flag_change);
572       if (error)
573         return error;
574       
575       sw = vnet_get_hw_sw_interface (dm->vnet_main, xd->vlib_hw_if_index);
576       xd->vlib_sw_if_index = sw->sw_if_index;
577       hi = vnet_get_hw_interface (dm->vnet_main, xd->vlib_hw_if_index);
578
579       /*
580        * DAW-FIXME: The Cisco VIC firmware does not provide an api for a
581        *            driver to dynamically change the mtu.  If/when the 
582        *            VIC firmware gets fixed, then this should be removed.
583        */
584       if (xd->pmd == VNET_DPDK_PMD_VICE ||
585           xd->pmd == VNET_DPDK_PMD_ENIC)
586         {
587           /*
588            * Initialize mtu to what has been set by CIMC in the firmware cfg.
589            */
590           hi->max_packet_bytes = dev_info.max_rx_pktlen;
591           /*
592            * remove vlan tag from VIC port to fix VLAN0 issue.
593            * TODO Handle VLAN tagged traffic
594            */
595           int vlan_off;
596           vlan_off = rte_eth_dev_get_vlan_offload(xd->device_index);
597           vlan_off |= ETH_VLAN_STRIP_OFFLOAD;
598           rte_eth_dev_set_vlan_offload(xd->device_index, vlan_off);
599         }
600       /*
601        * DAW-FIXME: VMXNET3 driver doesn't support jumbo / multi-buffer pkts
602        */
603       else if (xd->pmd == VNET_DPDK_PMD_VMXNET3)
604           hi->max_packet_bytes = 1518;
605
606       hi->max_l3_packet_bytes[VLIB_RX] = hi->max_l3_packet_bytes[VLIB_TX] = 
607               xd->port_conf.rxmode.max_rx_pkt_len - sizeof(ethernet_header_t);
608
609      rte_eth_dev_set_mtu(xd->device_index, hi->max_packet_bytes);
610     }
611
612 #ifdef RTE_LIBRTE_KNI
613   if (dm->num_kni) {
614     clib_warning("Initializing KNI interfaces...");
615     rte_kni_init(dm->num_kni);
616     for (i = 0; i < dm->num_kni; i++)
617     {
618       u8 addr[6];
619       int j;
620
621       /* Create vnet interface */
622       vec_add2_aligned (dm->devices, xd, 1, CLIB_CACHE_LINE_BYTES);
623       xd->dev_type = VNET_DPDK_DEV_KNI;
624
625       xd->device_index = xd - dm->devices;
626       ASSERT(nports + i == xd->device_index);
627       xd->per_interface_next_index = ~0;
628       xd->kni_port_id = i;
629       xd->cpu_socket = -1;
630       hash_set (dm->dpdk_device_by_kni_port_id, i, xd - dm->devices);
631       xd->rx_q_used = 1;
632
633       /* assign interface to input thread */
634       dpdk_device_and_queue_t * dq;
635       vec_add2(dm->devices_by_cpu[dm->input_cpu_first_index], dq, 1);
636       dq->device = xd->device_index;
637       dq->queue_id = 0;
638
639       vec_validate_aligned (xd->tx_vectors, tm->n_vlib_mains,
640                             CLIB_CACHE_LINE_BYTES);
641       for (j = 0; j < tm->n_vlib_mains; j++)
642         {
643           vec_validate_ha (xd->tx_vectors[j], DPDK_TX_RING_SIZE, 
644                            sizeof(tx_ring_hdr_t), CLIB_CACHE_LINE_BYTES);
645           vec_reset_length (xd->tx_vectors[j]);
646         }
647
648       vec_validate_aligned (xd->rx_vectors, xd->rx_q_used,
649                             CLIB_CACHE_LINE_BYTES);
650       for (j = 0; j< xd->rx_q_used; j++)
651         {
652           vec_validate_aligned (xd->rx_vectors[j], VLIB_FRAME_SIZE-1,
653                                 CLIB_CACHE_LINE_BYTES);
654           vec_reset_length (xd->rx_vectors[j]);
655         }
656
657       vec_validate_aligned (xd->frames, tm->n_vlib_mains,
658                             CLIB_CACHE_LINE_BYTES);
659
660       /* FIXME Set up one TX-queue per worker thread */
661
662       {
663         f64 now = vlib_time_now(vm);
664         u32 rnd;
665         rnd = (u32) (now * 1e6);
666         rnd = random_u32 (&rnd);
667
668         memcpy (addr+2, &rnd, sizeof(rnd));
669         addr[0] = 2;
670         addr[1] = 0xfe;
671       }
672
673       error = ethernet_register_interface
674         (dm->vnet_main,
675          dpdk_device_class.index,
676          xd->device_index,
677          /* ethernet address */ addr,
678          &xd->vlib_hw_if_index, 
679          dpdk_flag_change);
680
681       if (error)
682         return error;
683
684       sw = vnet_get_hw_sw_interface (dm->vnet_main, xd->vlib_hw_if_index);
685       xd->vlib_sw_if_index = sw->sw_if_index;
686       hi = vnet_get_hw_interface (dm->vnet_main, xd->vlib_hw_if_index);
687     }
688   }
689 #endif
690
691   if (nb_desc > dm->num_mbufs) 
692     clib_warning ("%d mbufs allocated but total rx/tx ring size is %d\n",
693                   dm->num_mbufs, nb_desc);
694
695   /* init next vhost-user if index */
696   dm->next_vu_if_id = 0;
697
698   return 0;
699 }
700
701 static clib_error_t *
702 write_sys_fs (char * file_name, char * fmt, ...)
703 {
704   u8 * s;
705   int fd;
706
707   fd = open (file_name, O_WRONLY);
708   if (fd < 0)
709     return clib_error_return_unix (0, "open `%s'", file_name);
710
711   va_list va;
712   va_start (va, fmt);
713   s = va_format (0, fmt, &va);
714   va_end (va);
715   vec_add1 (s, 0); // terminate c string
716
717   if (write (fd, s, vec_len (s)) < 0)
718       return clib_error_return_unix (0, "write '%s' to '%s'", s, file_name);
719
720   vec_free (s);
721   close (fd);
722   return 0;
723 }
724
725 #define VIRTIO_PCI_NAME  "virtio-pci"
726
727 static clib_error_t * dpdk_bind_eth_kernel_drivers (vlib_main_t * vm,
728                                                     char * pci_dev_id,
729                                                     char * kernel_driver)
730 {
731   dpdk_main_t * dm = &dpdk_main;
732   unformat_input_t _in;
733   unformat_input_t * in = &_in;
734   clib_error_t * error = 0;
735   u8 * line = 0, * modcmd = 0, * path = 0;
736   u8 * pci_vid = 0, *pci_did = 0, * devname = 0;
737   char *driver_name = kernel_driver;
738   FILE * fp;
739
740   /* 
741    * Bail out now if we're not running as root.
742    * This allows non-privileged use of the packet generator, etc.
743    */
744   if (geteuid() != 0)
745     return 0;
746
747   /*
748    * Get all ethernet pci device numbers for the device type specified.
749    */
750   modcmd = format (0, "lspci -nDd %s | grep 0200 | "
751                    "awk '{ print $1, $3 }'%c", pci_dev_id, 0);
752   if ((fp = popen ((const char *)modcmd, "r")) == NULL)
753     {
754       error = clib_error_return_unix (0, 
755                                       "Unable to get %s ethernet pci devices.",
756                                       pci_dev_id);
757       goto done;
758     }
759
760   vec_validate (line, BUFSIZ);
761   vec_validate (path, BUFSIZ);
762   while (fgets ((char *)line, BUFSIZ, fp) != NULL)
763     {
764       struct stat st;
765       u8 bind_uio = 1;
766       line[strlen ((char *)line) - 1] = 0; // chomp trailing newline.
767
768       unformat_init_string (in, (char *)line, strlen((char *)line) + 1);
769       unformat(in, "%s %s:%s", &devname, &pci_vid, &pci_did);
770       unformat_free (in);
771
772       /*
773        * Blacklist all ethernet interfaces in the 
774        * linux IP routing tables (route --inet --inet6)
775        */
776       if (strstr ((char *)dm->eth_if_blacklist, (char *)devname))
777         continue;
778
779       /*
780        * If there are any devices whitelisted, then blacklist all devices
781        * which are not explicitly whitelisted.
782        */
783       if (dm->eth_if_whitelist && 
784           !strstr ((char *)dm->eth_if_whitelist, (char *)devname))
785         continue;
786
787 #ifdef NETMAP
788       /*
789        * Optimistically open the device as a netmap device.
790        */
791       if (eth_nm_open((char *)devname))
792         continue;
793 #endif
794
795       _vec_len (path) = 0;
796       path = format (path, "/sys/bus/pci/devices/%s/driver/unbind%c",
797                      devname, 0);
798
799       /*
800        * If the device is bound to a driver...
801        */
802       if (stat ((const char *)path, &st) == 0)
803         {
804           u8 * device_path;
805
806           /*
807            * If the interface is not a virtio...
808            */
809          if (!driver_name || strcmp(driver_name, VIRTIO_PCI_NAME))
810            {
811               /*
812                * If it is already bound to driver, don't unbind/bind it.
813                */
814               device_path = format (0, "/sys/bus/pci/drivers/%s/%s/device%c",
815                                     driver_name, devname, 0);
816               if (stat ((const char *)device_path, &st) == 0)
817                 bind_uio = 0;
818
819               vec_free (device_path);
820            }
821           
822           /*
823            * unbind it from the current driver
824            */
825           if (bind_uio)
826             {
827               _vec_len (path) -= 1;
828               path = format (path, "%c", 0);
829               error = write_sys_fs ((char *)path, "%s", devname);
830               if (error)
831                 goto done;
832             }
833         }
834
835       /*
836        * DAW-FIXME: The following bind/unbind dance is necessary for the dpdk
837        *            virtio poll-mode driver to work.  
838        */
839  
840       if (driver_name && !strcmp(driver_name, VIRTIO_PCI_NAME))
841         {
842           /*
843            * bind interface to the native kernel module
844            */
845           _vec_len (path) = 0;
846           path = format (path, "/sys/bus/pci/drivers/%s/bind%c",
847                          driver_name, 0);
848           error = write_sys_fs ((char *)path, "%s", devname);
849           if (error)
850             goto done;
851
852           /*
853            * unbind interface from the native kernel module
854            */
855           _vec_len (path) -= 5;
856           path = format (path, "unbind%c", 0);
857           error = write_sys_fs ((char *)path, "%s", devname);
858           if (error)
859             goto done;
860         }
861
862       /*
863        * bind the interface to igb_uio
864        */
865       if (bind_uio)
866         {
867           _vec_len (path) = 0;
868           path = format (path, "/sys/bus/pci/drivers/%s/new_id%c", driver_name, 0);
869           error = write_sys_fs ((char *) path, "%s %s", pci_vid, pci_did);
870
871           _vec_len (path) = 0;
872           path = format (path, "/sys/bus/pci/drivers/%s/bind%c", driver_name, 0);
873           error = write_sys_fs ((char *) path, "%s", devname);
874           if (error)
875             {
876               error = 0;
877               continue;
878             }
879         }
880     }
881   
882  done:
883   vec_free (line);
884   vec_free (path);
885   vec_free (devname);
886   vec_free (pci_vid);
887   vec_free (pci_did);
888   vec_free (modcmd);
889   pclose (fp);
890   return error;
891 }
892
893 static u32
894 get_node_free_hugepages_num (u32 node, u32 page_size)
895 {
896   FILE * fp;
897   u8 * tmp;
898
899   tmp = format (0, "/sys/devices/system/node/node%u/hugepages/hugepages-%ukB/"
900                 "free_hugepages%c", node, page_size, 0);
901   fp = fopen ((char *) tmp, "r");
902   vec_free(tmp);
903
904   if (fp != NULL)
905     {
906       u8 * buffer = 0;
907       u32 pages_avail = 0;
908
909       vec_validate (buffer, 256-1);
910       if (fgets ((char *)buffer, 256, fp))
911         {
912           unformat_input_t in;
913           unformat_init_string (&in, (char *) buffer, strlen ((char *) buffer));
914           unformat(&in, "%u", &pages_avail);
915           unformat_free (&in);
916         }
917       vec_free(buffer);
918       fclose(fp);
919       return pages_avail;
920     }
921
922   return 0;
923 }
924
925 static clib_error_t *
926 dpdk_config (vlib_main_t * vm, unformat_input_t * input)
927 {
928   clib_error_t * error = 0;
929   dpdk_main_t * dm = &dpdk_main;
930   vlib_thread_main_t * tm = vlib_get_thread_main();
931   u8 * s, * tmp = 0;
932   u8 * pci_dev_id = 0;
933   u8 * rte_cmd = 0, * ethname = 0;
934   FILE * rte_fp;
935   u32 log_level;
936   int ret, i;
937   char * fmt;
938 #ifdef NETMAP
939   int rxrings, txrings, rxslots, txslots, txburst;
940   char * nmnam;
941 #endif
942   unformat_input_t _in;
943   unformat_input_t * in = &_in;
944   u8 no_pci = 0;
945   u8 no_huge = 0;
946   u8 huge_dir = 0;
947   u8 file_prefix = 0;
948   u8 * socket_mem = 0;
949
950   // MATT-FIXME: inverted virtio-vhost logic to use virtio by default
951   dm->use_virtio_vhost = 1;
952
953   while (unformat_check_input(input) != UNFORMAT_END_OF_INPUT)
954     {
955       /* Prime the pump */
956       if (unformat (input, "no-hugetlb"))
957         {
958           vec_add1 (dm->eal_init_args, (u8 *) "no-huge");
959           no_huge = 1;
960         }
961
962       else if (unformat (input, "enable-tcp-udp-checksum"))
963         {
964           dm->buffer_flags_template &= 
965             ~(IP_BUFFER_L4_CHECKSUM_CORRECT | IP_BUFFER_L4_CHECKSUM_COMPUTED);
966         }
967
968       else if (unformat (input, "decimal-interface-names"))
969         dm->interface_name_format_decimal = 1;
970
971       else if (unformat (input, "no-multi-seg"))
972         dm->no_multi_seg = 1;
973
974       else if (unformat (input, "dev %s", &pci_dev_id))
975         {
976           if (dm->eth_if_whitelist)
977             {
978               /*
979                * Don't add duplicate device id's.
980                */
981               if (strstr ((char *)dm->eth_if_whitelist, (char *)pci_dev_id))
982                 continue;
983
984               _vec_len (dm->eth_if_whitelist) -= 1; // chomp trailing NULL.
985               dm->eth_if_whitelist = format (dm->eth_if_whitelist, " %s%c",
986                                              pci_dev_id, 0);
987             }
988           else
989             dm->eth_if_whitelist = format (0, "%s%c", pci_dev_id, 0);
990         }
991
992 #ifdef NETMAP
993      else if (unformat(input, "netmap %s/%d:%d/%d:%d/%d",
994                   &nmname, &rxrings, &rxslots, &txrings, &txslots, &txburst)) {
995         char * rv;
996         rv = (char *)
997           eth_nm_args(nmname, rxrings, rxslots, txrings, txslots, txburst);
998         if (rv) {
999           error = clib_error_return (0, "%s", rv);
1000           goto done;
1001         }
1002       }else if (unformat(input, "netmap %s", &nmname)) {
1003         char * rv;
1004         rv = (char *)
1005           eth_nm_args(nmname, 0, 0, 0, 0, 0);
1006         if (rv) {
1007           error = clib_error_return (0, "%s", rv);
1008           goto done;
1009         }
1010       }
1011 #endif
1012
1013       else if (unformat (input, "num-mbufs %d", &dm->num_mbufs))
1014         ;
1015       else if (unformat (input, "max-tx-queues %d", &dm->max_tx_queues))
1016         ;
1017       else if (unformat (input, "kni %d", &dm->num_kni))
1018         ;
1019       else if (unformat (input, "uio-driver %s", &dm->uio_driver_name))
1020         ;
1021       else if (unformat (input, "vhost-user-coalesce-frames %d", &dm->vhost_coalesce_frames))
1022         ;
1023       else if (unformat (input, "vhost-user-coalesce-time %f", &dm->vhost_coalesce_time))
1024         ;
1025       else if (unformat (input, "enable-vhost-user"))
1026         dm->use_virtio_vhost = 0;
1027       else if (unformat (input, "rss %d", &dm->use_rss))
1028         ;
1029
1030 #define _(a)                                    \
1031       else if (unformat(input, #a))             \
1032         {                                       \
1033           if (!strncmp(#a, "no-pci", 6))        \
1034             no_pci = 1;                         \
1035           tmp = format (0, "--%s%c", #a, 0);    \
1036           vec_add1 (dm->eal_init_args, tmp);    \
1037         }
1038       foreach_eal_double_hyphen_predicate_arg
1039 #undef _
1040
1041 #define _(a)                                          \
1042         else if (unformat(input, #a " %s", &s))       \
1043           {                                           \
1044             if (!strncmp(#a, "huge-dir", 8))          \
1045               huge_dir = 1;                           \
1046             else if (!strncmp(#a, "file-prefix", 11)) \
1047               file_prefix = 1;                        \
1048             else if (!strncmp(#a, "socket-mem", 10))  \
1049               socket_mem = vec_dup (s);               \
1050             tmp = format (0, "--%s%c", #a, 0);        \
1051             vec_add1 (dm->eal_init_args, tmp);        \
1052             vec_add1 (s, 0);                          \
1053             vec_add1 (dm->eal_init_args, s);          \
1054           }
1055         foreach_eal_double_hyphen_arg
1056 #undef _
1057
1058 #define _(a,b)                                          \
1059           else if (unformat(input, #a " %s", &s))       \
1060             {                                           \
1061               tmp = format (0, "-%s%c", #b, 0);         \
1062               vec_add1 (dm->eal_init_args, tmp);        \
1063               vec_add1 (s, 0);                          \
1064               vec_add1 (dm->eal_init_args, s);          \
1065             }
1066           foreach_eal_single_hyphen_arg
1067 #undef _
1068
1069 #define _(a,b)                                          \
1070             else if (unformat(input, #a " %s", &s))     \
1071               {                                         \
1072                 tmp = format (0, "-%s%c", #b, 0);       \
1073                 vec_add1 (dm->eal_init_args, tmp);      \
1074                 vec_add1 (s, 0);                        \
1075                 vec_add1 (dm->eal_init_args, s);        \
1076                 dm->a##_set_manually = 1;               \
1077               }
1078             foreach_eal_single_hyphen_mandatory_arg
1079 #undef _
1080
1081           else if (unformat(input, "default"))
1082             ;
1083
1084           else
1085             {
1086               error = clib_error_return (0, "unknown input `%U'",
1087                                          format_unformat_error, input);
1088               goto done;
1089             }
1090     }
1091
1092   if (!dm->uio_driver_name)
1093     dm->uio_driver_name = format (0, "igb_uio");
1094
1095   /*
1096    * Use 1G huge pages if available.
1097    */
1098   if (!no_huge && !huge_dir)
1099     {
1100       uword * mem_by_socket = hash_create (0, sizeof (uword));
1101       uword c;
1102       u8 use_1g = 1;
1103       u8 use_2m = 1;
1104       int rv;
1105
1106       umount(DEFAULT_HUGE_DIR);
1107
1108       /* Process "socket-mem" parameter value */
1109       if (vec_len (socket_mem))
1110         {
1111           unformat_input_t in;
1112           unformat_init_vector(&in, socket_mem);
1113           unformat(&in, "%U", unformat_socket_mem, &mem_by_socket);
1114           unformat_free(&in);
1115         }
1116       else
1117         use_1g = 0;
1118
1119       /* check if available enough 1GB pages for each socket */
1120       clib_bitmap_foreach (c, tm->cpu_socket_bitmap, ({
1121          uword * p = hash_get (mem_by_socket, c);
1122          if (p)
1123            {
1124              u32 mem = p[0];
1125              if (mem)
1126                {
1127                  u32 pages_num_1g = mem / 1024;
1128                  u32 pages_num_2m = mem / 2;
1129                  u32 pages_avail;
1130
1131                  pages_avail = get_node_free_hugepages_num(c, 1048576);
1132                  if (!pages_avail || !(pages_avail >= pages_num_1g))
1133                    use_1g = 0;
1134
1135                  pages_avail = get_node_free_hugepages_num(c, 2048);
1136                  if (!pages_avail || !(pages_avail >= pages_num_2m))
1137                    use_2m = 0;
1138               }
1139            }
1140       }));
1141
1142       hash_free (mem_by_socket);
1143
1144       rv = mkdir(VPP_RUN_DIR, 0755);
1145       if (rv && errno != EEXIST)
1146         {
1147           error = clib_error_return (0, "mkdir '%s' failed errno %d",
1148                                      VPP_RUN_DIR, errno);
1149           goto done;
1150         }
1151
1152       rv = mkdir(DEFAULT_HUGE_DIR, 0755);
1153       if (rv && errno != EEXIST)
1154         {
1155           error = clib_error_return (0, "mkdir '%s' failed errno %d",
1156                                      DEFAULT_HUGE_DIR, errno);
1157           goto done;
1158         }
1159
1160       if (use_1g)
1161         {
1162           rv = mount("none", DEFAULT_HUGE_DIR, "hugetlbfs", 0, "pagesize=1G");
1163         }
1164       else if (use_2m)
1165         {
1166           rv = mount("none", DEFAULT_HUGE_DIR, "hugetlbfs", 0, NULL);
1167         }
1168       else
1169         {
1170           return clib_error_return (0, "not enough free huge pages");
1171         }
1172
1173       if (rv)
1174         {
1175           error = clib_error_return (0, "mount failed %d", errno);
1176           goto done;
1177         }
1178
1179       tmp = format (0, "--huge-dir%c", 0);
1180       vec_add1 (dm->eal_init_args, tmp);
1181       tmp = format (0, "%s%c", DEFAULT_HUGE_DIR, 0);
1182       vec_add1 (dm->eal_init_args, tmp);
1183       if (!file_prefix)
1184         {
1185           tmp = format (0, "--file-prefix%c", 0);
1186           vec_add1 (dm->eal_init_args, tmp);
1187           tmp = format (0, "vpp%c", 0);
1188           vec_add1 (dm->eal_init_args, tmp);
1189         }
1190     }
1191
1192   /*
1193    * Blacklist all ethernet interfaces in the linux IP routing tables.
1194    */
1195   dm->eth_if_blacklist = format (0, "%c", 0);
1196   rte_cmd = format (0, "route --inet --inet6 -n|awk '{print $7}'|sort -u|"
1197                     "egrep $(echo $(ls -1d /sys/class/net/*/device|"
1198                     "cut -d/ -f5)|sed -s 's/ /|/g')%c", 0);
1199   if ((rte_fp = popen ((const char *)rte_cmd, "r")) == NULL)
1200     {
1201       error = clib_error_return_unix (0, "Unable to find blacklist ethernet"
1202                                       " interface(s) in linux routing tables.");
1203       goto rte_cmd_err;
1204
1205     }
1206
1207   vec_validate (ethname, BUFSIZ);
1208   while (fgets ((char *)ethname, BUFSIZ, rte_fp) != NULL)
1209     {
1210       FILE *rlnk_fp;
1211       u8 * rlnk_cmd = 0, * devname = 0;
1212
1213       ethname[strlen ((char *)ethname) - 1] = 0; // chomp trailing newline.
1214
1215       rlnk_cmd = format (0, "readlink /sys/class/net/%s%c",
1216                          ethname, 0);
1217
1218       if ((rlnk_fp = popen ((const char *)rlnk_cmd, "r")) == NULL)
1219         {
1220           error = clib_error_return_unix (0, "Unable to read %s link.",
1221                                           ethname);
1222           goto rlnk_cmd_err;
1223         }
1224
1225       vec_validate (devname, BUFSIZ);
1226       while (fgets ((char *)devname, BUFSIZ, rlnk_fp) != NULL)
1227         {
1228           char * pci_id = 0;
1229           
1230           /*
1231            * Extract the device PCI ID name from the link. It is the first
1232            * PCI ID searching backwards from the end of the link pathname.
1233            * For example:
1234            *     readlink /sys/class/net/eth0
1235            *     ../../devices/pci0000:00/0000:00:0a.0/virtio4/net/eth0
1236            */
1237           for (pci_id = (char *)((devname + strlen((char *)devname)));
1238                ((u8 *)pci_id > devname) && *pci_id != '.'; pci_id--)
1239             ;
1240
1241           /*
1242            * Verify that the field found is a valid PCI ID.
1243            */
1244           if ((*(pci_id - 1) == '.') || ((u8 *)(pci_id - 11) < devname) || 
1245               (*(pci_id - 11) != '/') || (*(pci_id - 3) != ':') ||
1246               (*(pci_id - 6) != ':'))
1247             {
1248               devname[strlen ((char *)devname) - 1] = 0; // chomp trailing newline.
1249               clib_warning ("Unable to extract %s PCI ID (0x%llx \"%s\") "
1250                             "from 0x%llx \"%s\"", ethname, pci_id, pci_id,
1251                             devname, devname);
1252               continue;
1253             }
1254
1255           pci_id[2] = 0;
1256           pci_id -= 10;
1257
1258           /* Don't blacklist any interfaces which have been whitelisted.
1259            */
1260           if (dm->eth_if_whitelist &&
1261               strstr ((char *)dm->eth_if_whitelist, (char *)pci_id))
1262               continue;
1263
1264           _vec_len (dm->eth_if_blacklist) -= 1; // chomp trailing NULL.
1265           dm->eth_if_blacklist = format (dm->eth_if_blacklist, " %s%c",
1266                                          pci_id, 0);
1267         }
1268   
1269     rlnk_cmd_err:
1270       pclose (rlnk_fp);
1271       vec_free (rlnk_cmd);
1272       vec_free (devname);
1273     }
1274
1275  rte_cmd_err:
1276   pclose (rte_fp);
1277   vec_free (rte_cmd);
1278   vec_free (ethname);
1279
1280   if (error)
1281     return error;
1282
1283   /* I'll bet that -c and -n must be the first and second args... */
1284   if (!dm->coremask_set_manually)
1285     {
1286       vlib_thread_registration_t * tr;
1287       uword * coremask = 0;
1288       int i;
1289
1290       /* main thread core */
1291       coremask = clib_bitmap_set(coremask, tm->main_lcore, 1);
1292
1293       for (i = 0; i < vec_len (tm->registrations); i++)
1294         {
1295           tr = tm->registrations[i];
1296           coremask = clib_bitmap_or(coremask, tr->coremask);
1297         }
1298
1299       vec_insert (dm->eal_init_args, 2, 1);
1300       dm->eal_init_args[1] = (u8 *) "-c";
1301       tmp = format (0, "%U%c", format_bitmap_hex, coremask, 0);
1302       dm->eal_init_args[2] = tmp;
1303       clib_bitmap_free(coremask);
1304     }
1305
1306   if (!dm->nchannels_set_manually)
1307     {
1308       vec_insert (dm->eal_init_args, 2, 3);
1309       dm->eal_init_args[3] = (u8 *) "-n";
1310       tmp = format (0, "%d", dm->nchannels);
1311       dm->eal_init_args[4] = tmp;
1312     }
1313
1314   /*
1315    * If there are whitelisted devices,
1316    * add the whitelist option & device list to the dpdk arg list...
1317    */
1318   if (dm->eth_if_whitelist)
1319     {
1320       unformat_init_string (in, (char *)dm->eth_if_whitelist,
1321                             vec_len(dm->eth_if_whitelist) - 1);
1322       fmt = "-w%c";
1323     }
1324
1325   /*
1326    * Otherwise add the blacklisted devices to the dpdk arg list.
1327    */
1328   else
1329     {
1330       unformat_init_string (in, (char *)dm->eth_if_blacklist,
1331                             vec_len(dm->eth_if_blacklist) - 1);
1332       fmt = "-b%c";
1333     }
1334
1335   while (unformat_check_input (in) != UNFORMAT_END_OF_INPUT)
1336     {
1337       tmp = format (0, fmt, 0);
1338       vec_add1 (dm->eal_init_args, tmp);
1339       unformat (in, "%s", &pci_dev_id);
1340       vec_add1 (dm->eal_init_args, pci_dev_id);
1341     }
1342
1343   if (no_pci == 0)
1344     {
1345       /*
1346        * Bind Virtio pci devices to the igb_uio kernel driver.
1347        */
1348       error = dpdk_bind_eth_kernel_drivers (vm, "1af4:1000", VIRTIO_PCI_NAME);
1349       if (error)
1350         return error;
1351
1352       /*
1353        * Bind vmxnet3 pci devices to the igb_uio kernel driver.
1354        */
1355       error = dpdk_bind_eth_kernel_drivers (vm, "15ad:07b0",
1356                                             (char *) dm->uio_driver_name);
1357       if (error)
1358         return error;
1359
1360       /*
1361        * Bind Intel ethernet pci devices to igb_uio kernel driver.
1362        */
1363       error = dpdk_bind_eth_kernel_drivers (vm, "8086:",
1364                                             (char *) dm->uio_driver_name);
1365       /*
1366        * Bind Cisco VIC ethernet pci devices to igb_uio kernel driver.
1367        */
1368       error = dpdk_bind_eth_kernel_drivers (vm, "1137:0043",
1369                                             (char *) dm->uio_driver_name);
1370     }
1371
1372   /* set master-lcore */
1373   tmp = format (0, "--master-lcore%c", 0);
1374   vec_add1 (dm->eal_init_args, tmp);
1375   tmp = format (0, "%u%c", tm->main_lcore, 0);
1376   vec_add1 (dm->eal_init_args, tmp);
1377
1378   /* NULL terminate the "argv" vector, in case of stupidity */
1379   vec_add1 (dm->eal_init_args, 0);
1380   _vec_len(dm->eal_init_args) -= 1;
1381
1382   /* Set up DPDK eal and packet mbuf pool early. */
1383
1384   log_level = (CLIB_DEBUG > 0) ? RTE_LOG_DEBUG : RTE_LOG_NOTICE;
1385
1386   rte_set_log_level (log_level);
1387
1388   vm = dm->vlib_main;
1389
1390   /* make copy of args as rte_eal_init tends to mess up with arg array */
1391   for (i = 1; i < vec_len(dm->eal_init_args); i++)
1392     dm->eal_init_args_str = format(dm->eal_init_args_str, "%s ",
1393                                    dm->eal_init_args[i]);
1394
1395   ret = rte_eal_init(vec_len(dm->eal_init_args), (char **) dm->eal_init_args);
1396
1397   /* lazy umount hugepages */
1398   umount2(DEFAULT_HUGE_DIR, MNT_DETACH);
1399
1400   if (ret < 0)
1401     return clib_error_return (0, "rte_eal_init returned %d", ret);
1402
1403   /* Dump the physical memory layout prior to creating the mbuf_pool */
1404   fprintf(stdout, "DPDK physical memory layout:\n");
1405   rte_dump_physmem_layout(stdout);
1406
1407   /* main thread 1st */
1408   error = vlib_buffer_pool_create(vm, dm->num_mbufs, MBUF_SIZE, rte_socket_id());
1409   if (error)
1410     return error;
1411
1412   for (i = 0; i < RTE_MAX_LCORE; i++)
1413     {
1414       error = vlib_buffer_pool_create(vm, dm->num_mbufs, MBUF_SIZE,
1415                                       rte_lcore_to_socket_id(i));
1416       if (error)
1417         return error;
1418     }
1419
1420   if (dm->use_rss)
1421     {
1422       vlib_node_runtime_t * rt = vlib_node_get_runtime (vm, dpdk_input_node.index);
1423       rt->function = dpdk_input_rss;
1424     }
1425  done:
1426   return error;
1427 }
1428
1429 VLIB_CONFIG_FUNCTION (dpdk_config, "dpdk");
1430
1431 void dpdk_update_link_state (dpdk_device_t * xd, f64 now)
1432 {
1433     vnet_main_t * vnm = vnet_get_main();
1434     struct rte_eth_link prev_link = xd->link;
1435     u32 hw_flags =  0;
1436     u8 hw_flags_chg = 0;
1437
1438     /* only update link state for PMD interfaces */
1439     if (xd->dev_type != VNET_DPDK_DEV_ETH)
1440       return;
1441
1442     xd->time_last_link_update = now ? now : xd->time_last_link_update;
1443     memset(&xd->link, 0, sizeof(xd->link));
1444     rte_eth_link_get_nowait (xd->device_index, &xd->link);
1445
1446     if (LINK_STATE_ELOGS)
1447       {
1448         vlib_main_t * vm = vlib_get_main();
1449         ELOG_TYPE_DECLARE(e) = {
1450           .format = 
1451           "update-link-state: sw_if_index %d, admin_up %d,"
1452           "old link_state %d new link_state %d",
1453           .format_args = "i4i1i1i1",
1454         };
1455
1456         struct { u32 sw_if_index; u8 admin_up; 
1457           u8 old_link_state; u8 new_link_state;} *ed;
1458         ed = ELOG_DATA (&vm->elog_main, e);
1459         ed->sw_if_index = xd->vlib_sw_if_index;
1460         ed->admin_up = xd->admin_up;
1461         ed->old_link_state = (u8)
1462           vnet_hw_interface_is_link_up (vnm, xd->vlib_hw_if_index);
1463         ed->new_link_state = (u8) xd->link.link_status;
1464       }
1465
1466     if ((xd->admin_up == 1) && 
1467         ((xd->link.link_status != 0) ^ 
1468          vnet_hw_interface_is_link_up (vnm, xd->vlib_hw_if_index)))
1469       {
1470         hw_flags_chg = 1;
1471         hw_flags |= (xd->link.link_status ? 
1472                      VNET_HW_INTERFACE_FLAG_LINK_UP: 0);
1473       }
1474
1475     if (hw_flags_chg || (xd->link.link_duplex != prev_link.link_duplex))
1476       {
1477         hw_flags_chg = 1;
1478         switch (xd->link.link_duplex)
1479           {
1480           case ETH_LINK_HALF_DUPLEX:
1481             hw_flags |= VNET_HW_INTERFACE_FLAG_HALF_DUPLEX;
1482             break;
1483           case ETH_LINK_FULL_DUPLEX:
1484             hw_flags |= VNET_HW_INTERFACE_FLAG_FULL_DUPLEX;
1485             break;
1486           default:
1487             break;
1488           }
1489       }
1490     if (hw_flags_chg || (xd->link.link_speed != prev_link.link_speed))
1491       {
1492         hw_flags_chg = 1;
1493         switch (xd->link.link_speed)
1494           {
1495           case ETH_LINK_SPEED_10:
1496             hw_flags |= VNET_HW_INTERFACE_FLAG_SPEED_10M;
1497             break;
1498           case ETH_LINK_SPEED_100:
1499             hw_flags |= VNET_HW_INTERFACE_FLAG_SPEED_100M;
1500             break;
1501           case ETH_LINK_SPEED_1000:
1502             hw_flags |= VNET_HW_INTERFACE_FLAG_SPEED_1G;
1503             break;
1504           case ETH_LINK_SPEED_10000:
1505             hw_flags |= VNET_HW_INTERFACE_FLAG_SPEED_10G;
1506             break;
1507           case ETH_LINK_SPEED_40G:
1508             hw_flags |= VNET_HW_INTERFACE_FLAG_SPEED_40G;
1509             break;
1510     case 0:
1511       break;
1512     default:
1513       clib_warning("unknown link speed %d", xd->link.link_speed);
1514             break;
1515           }
1516       }
1517     if (hw_flags_chg)
1518       {
1519         if (LINK_STATE_ELOGS)
1520           {
1521             vlib_main_t * vm = vlib_get_main();
1522
1523             ELOG_TYPE_DECLARE(e) = {
1524               .format = "update-link-state: sw_if_index %d, new flags %d",
1525               .format_args = "i4i4",
1526             };
1527
1528             struct { u32 sw_if_index; u32 flags; } *ed;
1529             ed = ELOG_DATA (&vm->elog_main, e);
1530             ed->sw_if_index = xd->vlib_sw_if_index;
1531             ed->flags = hw_flags;
1532           }
1533         vnet_hw_interface_set_flags (vnm, xd->vlib_hw_if_index, hw_flags);
1534       }
1535 }
1536
1537 static uword
1538 dpdk_process (vlib_main_t * vm,
1539               vlib_node_runtime_t * rt,
1540               vlib_frame_t * f)
1541 {
1542   clib_error_t * error;
1543   vnet_main_t * vnm = vnet_get_main();
1544   dpdk_main_t * dm = &dpdk_main;
1545   ethernet_main_t * em = &ethernet_main;
1546   dpdk_device_t * xd;
1547   vlib_thread_main_t * tm = vlib_get_thread_main();
1548   void *vu_state;
1549   int i;
1550
1551   error = dpdk_lib_init (dm);
1552
1553   /* 
1554    * Turn on the input node if we found some devices to drive
1555    * and we're not running worker threads or i/o threads
1556    */
1557
1558   if (error == 0 && vec_len(dm->devices) > 0)
1559     {
1560         if (tm->n_vlib_mains == 1)
1561           vlib_node_set_state (vm, dpdk_input_node.index,
1562                                VLIB_NODE_STATE_POLLING);
1563         else if (tm->main_thread_is_io_node)
1564           vlib_node_set_state (vm, dpdk_io_input_node.index,
1565                                VLIB_NODE_STATE_POLLING);
1566         else if (!dm->have_io_threads)
1567           for (i=0; i < tm->n_vlib_mains; i++)
1568             if (vec_len(dm->devices_by_cpu[i]) > 0)
1569               vlib_node_set_state (vlib_mains[i], dpdk_input_node.index,
1570                                    VLIB_NODE_STATE_POLLING);
1571     }
1572
1573   if (error)
1574     clib_error_report (error);
1575
1576   dpdk_vhost_user_process_init(&vu_state);
1577
1578   dm->io_thread_release = 1;
1579
1580   f64 now = vlib_time_now (vm);
1581   vec_foreach (xd, dm->devices)
1582     {
1583       dpdk_update_link_state (xd, now);
1584     }
1585
1586 { // Setup MACs for bond interfaces and their links which was initialized in
1587   // dpdk_port_setup() but needs to be done again here to take effect.
1588   int nports = rte_eth_dev_count();
1589   if (nports > 0) {
1590       for (i = 0; i < nports; i++) {
1591           struct rte_eth_dev_info dev_info;
1592           rte_eth_dev_info_get(i, &dev_info);
1593           if (!dev_info.driver_name)
1594               dev_info.driver_name = dev_info.pci_dev->driver->name;
1595           ASSERT(dev_info.driver_name);
1596           if (strncmp(dev_info.driver_name, "rte_bond_pmd", 12) == 0) {
1597               u8  addr[6]; 
1598               u8  slink[16];
1599               int nlink = rte_eth_bond_slaves_get(i, slink, 16);
1600               if (nlink > 0) {
1601                   vnet_hw_interface_t * hi;
1602                   ethernet_interface_t * ei;
1603                   /* Get MAC of 1st slave link */
1604                   rte_eth_macaddr_get(slink[0], (struct ether_addr *)addr);
1605                   /* Set MAC of bounded interface to that of 1st slave link */
1606                   rte_eth_bond_mac_address_set(i, (struct ether_addr *)addr);
1607                   /* Populate MAC of bonded interface in VPP hw tables */
1608                   hi = vnet_get_hw_interface (
1609                       vnm, dm->devices[i].vlib_hw_if_index);
1610                   ei = pool_elt_at_index (em->interfaces, hi->hw_instance);
1611                   memcpy (hi->hw_address, addr, 6);
1612                   memcpy (ei->address, addr, 6);
1613                   /* Add MAC to other slave links */
1614                   while (nlink > 1) {
1615                       nlink--;
1616                       rte_eth_dev_mac_addr_add(
1617                           slink[nlink], (struct ether_addr *)addr, 0);
1618                   }
1619               }
1620           }
1621       }
1622   }
1623 }
1624
1625   while (1)
1626     {
1627       /*
1628        * check each time through the loop in case intervals are changed
1629        */
1630       f64 min_wait = dm->link_state_poll_interval < dm->stat_poll_interval ?
1631                      dm->link_state_poll_interval : dm->stat_poll_interval;
1632
1633       vlib_process_wait_for_event_or_clock (vm, min_wait);
1634
1635       if (dpdk_get_admin_up_down_in_progress())
1636           /* skip the poll if an admin up down is in progress (on any interface) */
1637           continue;
1638
1639       vec_foreach (xd, dm->devices)
1640         {
1641           f64 now = vlib_time_now (vm);
1642           if ((now - xd->time_last_stats_update) >= dm->stat_poll_interval)
1643             dpdk_update_counters (xd, now);
1644           if ((now - xd->time_last_link_update) >= dm->link_state_poll_interval)
1645             dpdk_update_link_state (xd, now);
1646
1647       if (xd->dev_type == VNET_DPDK_DEV_VHOST_USER)
1648           if (dpdk_vhost_user_process_if(vm, xd, vu_state) != 0)
1649               continue;
1650         }
1651     }
1652
1653   dpdk_vhost_user_process_cleanup(vu_state);
1654
1655   return 0; 
1656 }
1657
1658 VLIB_REGISTER_NODE (dpdk_process_node,static) = {
1659     .function = dpdk_process,
1660     .type = VLIB_NODE_TYPE_PROCESS,
1661     .name = "dpdk-process",
1662     .process_log2_n_stack_bytes = 17,
1663 };
1664
1665 int dpdk_set_stat_poll_interval (f64 interval)
1666 {
1667   if (interval < DPDK_MIN_STATS_POLL_INTERVAL)
1668       return (VNET_API_ERROR_INVALID_VALUE);
1669
1670   dpdk_main.stat_poll_interval = interval;
1671
1672   return 0;
1673 }
1674
1675 int dpdk_set_link_state_poll_interval (f64 interval)
1676 {
1677   if (interval < DPDK_MIN_LINK_POLL_INTERVAL)
1678       return (VNET_API_ERROR_INVALID_VALUE);
1679
1680   dpdk_main.link_state_poll_interval = interval;
1681
1682   return 0;
1683 }
1684
1685 clib_error_t *
1686 dpdk_init (vlib_main_t * vm)
1687 {
1688   dpdk_main_t * dm = &dpdk_main;
1689   vlib_node_t * ei;
1690   clib_error_t * error = 0;
1691   vlib_thread_main_t * tm = vlib_get_thread_main();
1692
1693   /* verify that structs are cacheline aligned */
1694   ASSERT(offsetof(dpdk_device_t, cacheline0) == 0);
1695   ASSERT(offsetof(dpdk_device_t, cacheline1) == CLIB_CACHE_LINE_BYTES);
1696   ASSERT(offsetof(dpdk_worker_t, cacheline0) == 0);
1697   ASSERT(offsetof(frame_queue_trace_t, cacheline0) == 0);
1698
1699   /* Add references to DPDK Driver Constructor functions to get the dynamic
1700    * loader to pull in the driver library & run the constructors.
1701    */
1702 #define _(d)                                          \
1703 do {                                                  \
1704   void devinitfn_ ##d(void);                          \
1705   __attribute__((unused)) void (* volatile pf)(void); \
1706   pf = devinitfn_ ##d;                                \
1707 } while(0);
1708
1709 #ifdef RTE_LIBRTE_EM_PMD
1710   _(em_pmd_drv)
1711 #endif
1712
1713 #ifdef RTE_LIBRTE_IGB_PMD
1714   _(pmd_igb_drv)
1715 #endif
1716
1717 #ifdef RTE_LIBRTE_IXGBE_PMD
1718   _(rte_ixgbe_driver)
1719 #endif
1720
1721 #ifdef RTE_LIBRTE_I40E_PMD
1722   _(rte_i40e_driver)
1723   _(rte_i40evf_driver)
1724 #endif
1725
1726 #ifdef RTE_LIBRTE_FM10K_PMD
1727   _(rte_fm10k_driver)
1728 #endif
1729
1730 #ifdef RTE_LIBRTE_VIRTIO_PMD
1731   _(rte_virtio_driver)
1732 #endif
1733
1734 #ifdef RTE_LIBRTE_VMXNET3_PMD
1735   _(rte_vmxnet3_driver)
1736 #endif
1737
1738 #ifdef RTE_LIBRTE_VICE_PMD
1739   _(rte_vice_driver)
1740 #endif
1741
1742 #ifdef RTE_LIBRTE_ENIC_PMD
1743   _(rte_enic_driver)
1744 #endif
1745
1746 #ifdef RTE_LIBRTE_PMD_AF_PACKET
1747   _(pmd_af_packet_drv)
1748 #endif
1749
1750 #ifdef RTE_LIBRTE_CXGBE_PMD
1751   _(rte_cxgbe_driver)
1752 #endif
1753
1754 #ifdef RTE_LIBRTE_PMD_BOND
1755   _(bond_drv)
1756 #endif
1757
1758 #undef _
1759
1760 /* 
1761  * At the moment, the ThunderX NIC driver doesn't have
1762  * an entry point named "devinitfn_rte_xxx_driver"
1763  */
1764 #define _(d)                                          \
1765 do {                                                  \
1766   void d(void);                                       \
1767   __attribute__((unused)) void (* volatile pf)(void); \
1768   pf = d;                                             \
1769 } while(0);
1770
1771 #ifdef RTE_LIBRTE_THUNDERVNIC_PMD
1772 _(rte_nicvf_pmd_init)
1773 #endif
1774 #undef _
1775
1776   dm->vlib_main = vm;
1777   dm->vnet_main = vnet_get_main();
1778
1779   ei = vlib_get_node_by_name (vm, (u8 *) "ethernet-input");
1780   if (ei == 0)
1781       return clib_error_return (0, "ethernet-input node AWOL");
1782
1783   dm->ethernet_input_node_index = ei->index;
1784
1785   dm->nchannels = 4;
1786   dm->num_mbufs = dm->num_mbufs ? dm->num_mbufs : NB_MBUF;
1787   vec_add1 (dm->eal_init_args, (u8 *) "vnet");
1788
1789   dm->dpdk_device_by_kni_port_id = hash_create (0, sizeof (uword));
1790   dm->vu_sw_if_index_by_listener_fd = hash_create (0, sizeof (uword));
1791   dm->vu_sw_if_index_by_sock_fd = hash_create (0, sizeof (uword));
1792
1793   /* $$$ use n_thread_stacks since it's known-good at this point */
1794   vec_validate (dm->recycle, tm->n_thread_stacks - 1);
1795
1796   /* initialize EFD (early fast discard) default settings */
1797   dm->efd.enabled = DPDK_EFD_DISABLED;
1798   dm->efd.queue_hi_thresh = ((DPDK_EFD_DEFAULT_DEVICE_QUEUE_HI_THRESH_PCT *
1799                               DPDK_NB_RX_DESC_10GE)/100);
1800   dm->efd.consec_full_frames_hi_thresh =
1801       DPDK_EFD_DEFAULT_CONSEC_FULL_FRAMES_HI_THRESH;
1802
1803   /* vhost-user coalescence frames defaults */
1804   dm->vhost_coalesce_frames = 32;
1805   dm->vhost_coalesce_time = 1e-3;
1806
1807   /* Default vlib_buffer_t flags, DISABLES tcp/udp checksumming... */
1808   dm->buffer_flags_template = 
1809     (VLIB_BUFFER_TOTAL_LENGTH_VALID 
1810      | IP_BUFFER_L4_CHECKSUM_COMPUTED
1811      | IP_BUFFER_L4_CHECKSUM_CORRECT);
1812
1813   dm->stat_poll_interval = DPDK_STATS_POLL_INTERVAL;
1814   dm->link_state_poll_interval = DPDK_LINK_POLL_INTERVAL;
1815
1816   /* init CLI */
1817   if ((error = vlib_call_init_function (vm, dpdk_cli_init)))
1818     return error;
1819
1820   return error;
1821 }
1822
1823 VLIB_INIT_FUNCTION (dpdk_init);
1824