pci: move NUMA node check from scan to probe
[dpdk.git] / lib / librte_eal / linuxapp / eal / eal_pci.c
1 /*-
2  *   BSD LICENSE
3  *
4  *   Copyright(c) 2010-2014 Intel Corporation. All rights reserved.
5  *   All rights reserved.
6  *
7  *   Redistribution and use in source and binary forms, with or without
8  *   modification, are permitted provided that the following conditions
9  *   are met:
10  *
11  *     * Redistributions of source code must retain the above copyright
12  *       notice, this list of conditions and the following disclaimer.
13  *     * Redistributions in binary form must reproduce the above copyright
14  *       notice, this list of conditions and the following disclaimer in
15  *       the documentation and/or other materials provided with the
16  *       distribution.
17  *     * Neither the name of Intel Corporation nor the names of its
18  *       contributors may be used to endorse or promote products derived
19  *       from this software without specific prior written permission.
20  *
21  *   THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22  *   "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
23  *   LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
24  *   A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
25  *   OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
26  *   SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
27  *   LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
28  *   DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29  *   THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30  *   (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
31  *   OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32  */
33
34 #include <string.h>
35 #include <dirent.h>
36
37 #include <rte_log.h>
38 #include <rte_bus.h>
39 #include <rte_pci.h>
40 #include <rte_eal_memconfig.h>
41 #include <rte_malloc.h>
42 #include <rte_devargs.h>
43 #include <rte_memcpy.h>
44
45 #include "eal_filesystem.h"
46 #include "eal_private.h"
47 #include "eal_pci_init.h"
48
49 /**
50  * @file
51  * PCI probing under linux
52  *
53  * This code is used to simulate a PCI probe by parsing information in sysfs.
54  * When a registered device matches a driver, it is then initialized with
55  * IGB_UIO driver (or doesn't initialize, if the device wasn't bound to it).
56  */
57
58 extern struct rte_pci_bus rte_pci_bus;
59
60 static int
61 pci_get_kernel_driver_by_path(const char *filename, char *dri_name)
62 {
63         int count;
64         char path[PATH_MAX];
65         char *name;
66
67         if (!filename || !dri_name)
68                 return -1;
69
70         count = readlink(filename, path, PATH_MAX);
71         if (count >= PATH_MAX)
72                 return -1;
73
74         /* For device does not have a driver */
75         if (count < 0)
76                 return 1;
77
78         path[count] = '\0';
79
80         name = strrchr(path, '/');
81         if (name) {
82                 strncpy(dri_name, name + 1, strlen(name + 1) + 1);
83                 return 0;
84         }
85
86         return -1;
87 }
88
89 /* Map pci device */
90 int
91 rte_pci_map_device(struct rte_pci_device *dev)
92 {
93         int ret = -1;
94
95         /* try mapping the NIC resources using VFIO if it exists */
96         switch (dev->kdrv) {
97         case RTE_KDRV_VFIO:
98 #ifdef VFIO_PRESENT
99                 if (pci_vfio_is_enabled())
100                         ret = pci_vfio_map_resource(dev);
101 #endif
102                 break;
103         case RTE_KDRV_IGB_UIO:
104         case RTE_KDRV_UIO_GENERIC:
105                 if (rte_eal_using_phys_addrs()) {
106                         /* map resources for devices that use uio */
107                         ret = pci_uio_map_resource(dev);
108                 }
109                 break;
110         default:
111                 RTE_LOG(DEBUG, EAL,
112                         "  Not managed by a supported kernel driver, skipped\n");
113                 ret = 1;
114                 break;
115         }
116
117         return ret;
118 }
119
120 /* Unmap pci device */
121 void
122 rte_pci_unmap_device(struct rte_pci_device *dev)
123 {
124         /* try unmapping the NIC resources using VFIO if it exists */
125         switch (dev->kdrv) {
126         case RTE_KDRV_VFIO:
127 #ifdef VFIO_PRESENT
128                 if (pci_vfio_is_enabled())
129                         pci_vfio_unmap_resource(dev);
130 #endif
131                 break;
132         case RTE_KDRV_IGB_UIO:
133         case RTE_KDRV_UIO_GENERIC:
134                 /* unmap resources for devices that use uio */
135                 pci_uio_unmap_resource(dev);
136                 break;
137         default:
138                 RTE_LOG(DEBUG, EAL,
139                         "  Not managed by a supported kernel driver, skipped\n");
140                 break;
141         }
142 }
143
144 void *
145 pci_find_max_end_va(void)
146 {
147         const struct rte_memseg *seg = rte_eal_get_physmem_layout();
148         const struct rte_memseg *last = seg;
149         unsigned i = 0;
150
151         for (i = 0; i < RTE_MAX_MEMSEG; i++, seg++) {
152                 if (seg->addr == NULL)
153                         break;
154
155                 if (seg->addr > last->addr)
156                         last = seg;
157
158         }
159         return RTE_PTR_ADD(last->addr, last->len);
160 }
161
162 /* parse one line of the "resource" sysfs file (note that the 'line'
163  * string is modified)
164  */
165 int
166 pci_parse_one_sysfs_resource(char *line, size_t len, uint64_t *phys_addr,
167         uint64_t *end_addr, uint64_t *flags)
168 {
169         union pci_resource_info {
170                 struct {
171                         char *phys_addr;
172                         char *end_addr;
173                         char *flags;
174                 };
175                 char *ptrs[PCI_RESOURCE_FMT_NVAL];
176         } res_info;
177
178         if (rte_strsplit(line, len, res_info.ptrs, 3, ' ') != 3) {
179                 RTE_LOG(ERR, EAL,
180                         "%s(): bad resource format\n", __func__);
181                 return -1;
182         }
183         errno = 0;
184         *phys_addr = strtoull(res_info.phys_addr, NULL, 16);
185         *end_addr = strtoull(res_info.end_addr, NULL, 16);
186         *flags = strtoull(res_info.flags, NULL, 16);
187         if (errno != 0) {
188                 RTE_LOG(ERR, EAL,
189                         "%s(): bad resource format\n", __func__);
190                 return -1;
191         }
192
193         return 0;
194 }
195
196 /* parse the "resource" sysfs file */
197 static int
198 pci_parse_sysfs_resource(const char *filename, struct rte_pci_device *dev)
199 {
200         FILE *f;
201         char buf[BUFSIZ];
202         int i;
203         uint64_t phys_addr, end_addr, flags;
204
205         f = fopen(filename, "r");
206         if (f == NULL) {
207                 RTE_LOG(ERR, EAL, "Cannot open sysfs resource\n");
208                 return -1;
209         }
210
211         for (i = 0; i<PCI_MAX_RESOURCE; i++) {
212
213                 if (fgets(buf, sizeof(buf), f) == NULL) {
214                         RTE_LOG(ERR, EAL,
215                                 "%s(): cannot read resource\n", __func__);
216                         goto error;
217                 }
218                 if (pci_parse_one_sysfs_resource(buf, sizeof(buf), &phys_addr,
219                                 &end_addr, &flags) < 0)
220                         goto error;
221
222                 if (flags & IORESOURCE_MEM) {
223                         dev->mem_resource[i].phys_addr = phys_addr;
224                         dev->mem_resource[i].len = end_addr - phys_addr + 1;
225                         /* not mapped for now */
226                         dev->mem_resource[i].addr = NULL;
227                 }
228         }
229         fclose(f);
230         return 0;
231
232 error:
233         fclose(f);
234         return -1;
235 }
236
237 /* Scan one pci sysfs entry, and fill the devices list from it. */
238 static int
239 pci_scan_one(const char *dirname, const struct rte_pci_addr *addr)
240 {
241         char filename[PATH_MAX];
242         unsigned long tmp;
243         struct rte_pci_device *dev;
244         char driver[PATH_MAX];
245         int ret;
246
247         dev = malloc(sizeof(*dev));
248         if (dev == NULL)
249                 return -1;
250
251         memset(dev, 0, sizeof(*dev));
252         dev->addr = *addr;
253
254         /* get vendor id */
255         snprintf(filename, sizeof(filename), "%s/vendor", dirname);
256         if (eal_parse_sysfs_value(filename, &tmp) < 0) {
257                 free(dev);
258                 return -1;
259         }
260         dev->id.vendor_id = (uint16_t)tmp;
261
262         /* get device id */
263         snprintf(filename, sizeof(filename), "%s/device", dirname);
264         if (eal_parse_sysfs_value(filename, &tmp) < 0) {
265                 free(dev);
266                 return -1;
267         }
268         dev->id.device_id = (uint16_t)tmp;
269
270         /* get subsystem_vendor id */
271         snprintf(filename, sizeof(filename), "%s/subsystem_vendor",
272                  dirname);
273         if (eal_parse_sysfs_value(filename, &tmp) < 0) {
274                 free(dev);
275                 return -1;
276         }
277         dev->id.subsystem_vendor_id = (uint16_t)tmp;
278
279         /* get subsystem_device id */
280         snprintf(filename, sizeof(filename), "%s/subsystem_device",
281                  dirname);
282         if (eal_parse_sysfs_value(filename, &tmp) < 0) {
283                 free(dev);
284                 return -1;
285         }
286         dev->id.subsystem_device_id = (uint16_t)tmp;
287
288         /* get class_id */
289         snprintf(filename, sizeof(filename), "%s/class",
290                  dirname);
291         if (eal_parse_sysfs_value(filename, &tmp) < 0) {
292                 free(dev);
293                 return -1;
294         }
295         /* the least 24 bits are valid: class, subclass, program interface */
296         dev->id.class_id = (uint32_t)tmp & RTE_CLASS_ANY_ID;
297
298         /* get max_vfs */
299         dev->max_vfs = 0;
300         snprintf(filename, sizeof(filename), "%s/max_vfs", dirname);
301         if (!access(filename, F_OK) &&
302             eal_parse_sysfs_value(filename, &tmp) == 0)
303                 dev->max_vfs = (uint16_t)tmp;
304         else {
305                 /* for non igb_uio driver, need kernel version >= 3.8 */
306                 snprintf(filename, sizeof(filename),
307                          "%s/sriov_numvfs", dirname);
308                 if (!access(filename, F_OK) &&
309                     eal_parse_sysfs_value(filename, &tmp) == 0)
310                         dev->max_vfs = (uint16_t)tmp;
311         }
312
313         /* get numa node, default to 0 if not present */
314         snprintf(filename, sizeof(filename), "%s/numa_node",
315                  dirname);
316
317         if (eal_parse_sysfs_value(filename, &tmp) == 0)
318                 dev->device.numa_node = tmp;
319         else
320                 dev->device.numa_node = -1;
321
322         pci_name_set(dev);
323
324         /* parse resources */
325         snprintf(filename, sizeof(filename), "%s/resource", dirname);
326         if (pci_parse_sysfs_resource(filename, dev) < 0) {
327                 RTE_LOG(ERR, EAL, "%s(): cannot parse resource\n", __func__);
328                 free(dev);
329                 return -1;
330         }
331
332         /* parse driver */
333         snprintf(filename, sizeof(filename), "%s/driver", dirname);
334         ret = pci_get_kernel_driver_by_path(filename, driver);
335         if (ret < 0) {
336                 RTE_LOG(ERR, EAL, "Fail to get kernel driver\n");
337                 free(dev);
338                 return -1;
339         }
340
341         if (!ret) {
342                 if (!strcmp(driver, "vfio-pci"))
343                         dev->kdrv = RTE_KDRV_VFIO;
344                 else if (!strcmp(driver, "igb_uio"))
345                         dev->kdrv = RTE_KDRV_IGB_UIO;
346                 else if (!strcmp(driver, "uio_pci_generic"))
347                         dev->kdrv = RTE_KDRV_UIO_GENERIC;
348                 else
349                         dev->kdrv = RTE_KDRV_UNKNOWN;
350         } else
351                 dev->kdrv = RTE_KDRV_NONE;
352
353         /* device is valid, add in list (sorted) */
354         if (TAILQ_EMPTY(&rte_pci_bus.device_list)) {
355                 rte_pci_add_device(dev);
356         } else {
357                 struct rte_pci_device *dev2;
358                 int ret;
359
360                 TAILQ_FOREACH(dev2, &rte_pci_bus.device_list, next) {
361                         ret = rte_eal_compare_pci_addr(&dev->addr, &dev2->addr);
362                         if (ret > 0)
363                                 continue;
364
365                         if (ret < 0) {
366                                 rte_pci_insert_device(dev2, dev);
367                         } else { /* already registered */
368                                 dev2->kdrv = dev->kdrv;
369                                 dev2->max_vfs = dev->max_vfs;
370                                 pci_name_set(dev2);
371                                 memmove(dev2->mem_resource, dev->mem_resource,
372                                         sizeof(dev->mem_resource));
373                                 free(dev);
374                         }
375                         return 0;
376                 }
377
378                 rte_pci_add_device(dev);
379         }
380
381         return 0;
382 }
383
384 int
385 pci_update_device(const struct rte_pci_addr *addr)
386 {
387         char filename[PATH_MAX];
388
389         snprintf(filename, sizeof(filename), "%s/" PCI_PRI_FMT,
390                  pci_get_sysfs_path(), addr->domain, addr->bus, addr->devid,
391                  addr->function);
392
393         return pci_scan_one(filename, addr);
394 }
395
396 /*
397  * split up a pci address into its constituent parts.
398  */
399 static int
400 parse_pci_addr_format(const char *buf, int bufsize, struct rte_pci_addr *addr)
401 {
402         /* first split on ':' */
403         union splitaddr {
404                 struct {
405                         char *domain;
406                         char *bus;
407                         char *devid;
408                         char *function;
409                 };
410                 char *str[PCI_FMT_NVAL]; /* last element-separator is "." not ":" */
411         } splitaddr;
412
413         char *buf_copy = strndup(buf, bufsize);
414         if (buf_copy == NULL)
415                 return -1;
416
417         if (rte_strsplit(buf_copy, bufsize, splitaddr.str, PCI_FMT_NVAL, ':')
418                         != PCI_FMT_NVAL - 1)
419                 goto error;
420         /* final split is on '.' between devid and function */
421         splitaddr.function = strchr(splitaddr.devid,'.');
422         if (splitaddr.function == NULL)
423                 goto error;
424         *splitaddr.function++ = '\0';
425
426         /* now convert to int values */
427         errno = 0;
428         addr->domain = strtoul(splitaddr.domain, NULL, 16);
429         addr->bus = strtoul(splitaddr.bus, NULL, 16);
430         addr->devid = strtoul(splitaddr.devid, NULL, 16);
431         addr->function = strtoul(splitaddr.function, NULL, 10);
432         if (errno != 0)
433                 goto error;
434
435         free(buf_copy); /* free the copy made with strdup */
436         return 0;
437 error:
438         free(buf_copy);
439         return -1;
440 }
441
442 /*
443  * Scan the content of the PCI bus, and the devices in the devices
444  * list
445  */
446 int
447 rte_pci_scan(void)
448 {
449         struct dirent *e;
450         DIR *dir;
451         char dirname[PATH_MAX];
452         struct rte_pci_addr addr;
453
454         /* for debug purposes, PCI can be disabled */
455         if (internal_config.no_pci)
456                 return 0;
457
458         dir = opendir(pci_get_sysfs_path());
459         if (dir == NULL) {
460                 RTE_LOG(ERR, EAL, "%s(): opendir failed: %s\n",
461                         __func__, strerror(errno));
462                 return -1;
463         }
464
465         while ((e = readdir(dir)) != NULL) {
466                 if (e->d_name[0] == '.')
467                         continue;
468
469                 if (parse_pci_addr_format(e->d_name, sizeof(e->d_name), &addr) != 0)
470                         continue;
471
472                 snprintf(dirname, sizeof(dirname), "%s/%s",
473                                 pci_get_sysfs_path(), e->d_name);
474
475                 if (pci_scan_one(dirname, &addr) < 0)
476                         goto error;
477         }
478         closedir(dir);
479         return 0;
480
481 error:
482         closedir(dir);
483         return -1;
484 }
485
486 /* Read PCI config space. */
487 int rte_pci_read_config(const struct rte_pci_device *device,
488                 void *buf, size_t len, off_t offset)
489 {
490         const struct rte_intr_handle *intr_handle = &device->intr_handle;
491
492         switch (intr_handle->type) {
493         case RTE_INTR_HANDLE_UIO:
494         case RTE_INTR_HANDLE_UIO_INTX:
495                 return pci_uio_read_config(intr_handle, buf, len, offset);
496
497 #ifdef VFIO_PRESENT
498         case RTE_INTR_HANDLE_VFIO_MSIX:
499         case RTE_INTR_HANDLE_VFIO_MSI:
500         case RTE_INTR_HANDLE_VFIO_LEGACY:
501                 return pci_vfio_read_config(intr_handle, buf, len, offset);
502 #endif
503         default:
504                 RTE_LOG(ERR, EAL,
505                         "Unknown handle type of fd %d\n",
506                                         intr_handle->fd);
507                 return -1;
508         }
509 }
510
511 /* Write PCI config space. */
512 int rte_pci_write_config(const struct rte_pci_device *device,
513                 const void *buf, size_t len, off_t offset)
514 {
515         const struct rte_intr_handle *intr_handle = &device->intr_handle;
516
517         switch (intr_handle->type) {
518         case RTE_INTR_HANDLE_UIO:
519         case RTE_INTR_HANDLE_UIO_INTX:
520                 return pci_uio_write_config(intr_handle, buf, len, offset);
521
522 #ifdef VFIO_PRESENT
523         case RTE_INTR_HANDLE_VFIO_MSIX:
524         case RTE_INTR_HANDLE_VFIO_MSI:
525         case RTE_INTR_HANDLE_VFIO_LEGACY:
526                 return pci_vfio_write_config(intr_handle, buf, len, offset);
527 #endif
528         default:
529                 RTE_LOG(ERR, EAL,
530                         "Unknown handle type of fd %d\n",
531                                         intr_handle->fd);
532                 return -1;
533         }
534 }
535
536 #if defined(RTE_ARCH_X86)
537 static int
538 pci_ioport_map(struct rte_pci_device *dev, int bar __rte_unused,
539                 struct rte_pci_ioport *p)
540 {
541         uint16_t start, end;
542         FILE *fp;
543         char *line = NULL;
544         char pci_id[16];
545         int found = 0;
546         size_t linesz;
547
548         snprintf(pci_id, sizeof(pci_id), PCI_PRI_FMT,
549                  dev->addr.domain, dev->addr.bus,
550                  dev->addr.devid, dev->addr.function);
551
552         fp = fopen("/proc/ioports", "r");
553         if (fp == NULL) {
554                 RTE_LOG(ERR, EAL, "%s(): can't open ioports\n", __func__);
555                 return -1;
556         }
557
558         while (getdelim(&line, &linesz, '\n', fp) > 0) {
559                 char *ptr = line;
560                 char *left;
561                 int n;
562
563                 n = strcspn(ptr, ":");
564                 ptr[n] = 0;
565                 left = &ptr[n + 1];
566
567                 while (*left && isspace(*left))
568                         left++;
569
570                 if (!strncmp(left, pci_id, strlen(pci_id))) {
571                         found = 1;
572
573                         while (*ptr && isspace(*ptr))
574                                 ptr++;
575
576                         sscanf(ptr, "%04hx-%04hx", &start, &end);
577
578                         break;
579                 }
580         }
581
582         free(line);
583         fclose(fp);
584
585         if (!found)
586                 return -1;
587
588         dev->intr_handle.type = RTE_INTR_HANDLE_UNKNOWN;
589         p->base = start;
590         RTE_LOG(DEBUG, EAL, "PCI Port IO found start=0x%x\n", start);
591
592         return 0;
593 }
594 #endif
595
596 int
597 rte_pci_ioport_map(struct rte_pci_device *dev, int bar,
598                 struct rte_pci_ioport *p)
599 {
600         int ret = -1;
601
602         switch (dev->kdrv) {
603 #ifdef VFIO_PRESENT
604         case RTE_KDRV_VFIO:
605                 if (pci_vfio_is_enabled())
606                         ret = pci_vfio_ioport_map(dev, bar, p);
607                 break;
608 #endif
609         case RTE_KDRV_IGB_UIO:
610                 ret = pci_uio_ioport_map(dev, bar, p);
611                 break;
612         case RTE_KDRV_UIO_GENERIC:
613 #if defined(RTE_ARCH_X86)
614                 ret = pci_ioport_map(dev, bar, p);
615 #else
616                 ret = pci_uio_ioport_map(dev, bar, p);
617 #endif
618                 break;
619         case RTE_KDRV_NONE:
620 #if defined(RTE_ARCH_X86)
621                 ret = pci_ioport_map(dev, bar, p);
622 #endif
623                 break;
624         default:
625                 break;
626         }
627
628         if (!ret)
629                 p->dev = dev;
630
631         return ret;
632 }
633
634 void
635 rte_pci_ioport_read(struct rte_pci_ioport *p,
636                 void *data, size_t len, off_t offset)
637 {
638         switch (p->dev->kdrv) {
639 #ifdef VFIO_PRESENT
640         case RTE_KDRV_VFIO:
641                 pci_vfio_ioport_read(p, data, len, offset);
642                 break;
643 #endif
644         case RTE_KDRV_IGB_UIO:
645                 pci_uio_ioport_read(p, data, len, offset);
646                 break;
647         case RTE_KDRV_UIO_GENERIC:
648                 pci_uio_ioport_read(p, data, len, offset);
649                 break;
650         case RTE_KDRV_NONE:
651 #if defined(RTE_ARCH_X86)
652                 pci_uio_ioport_read(p, data, len, offset);
653 #endif
654                 break;
655         default:
656                 break;
657         }
658 }
659
660 void
661 rte_pci_ioport_write(struct rte_pci_ioport *p,
662                 const void *data, size_t len, off_t offset)
663 {
664         switch (p->dev->kdrv) {
665 #ifdef VFIO_PRESENT
666         case RTE_KDRV_VFIO:
667                 pci_vfio_ioport_write(p, data, len, offset);
668                 break;
669 #endif
670         case RTE_KDRV_IGB_UIO:
671                 pci_uio_ioport_write(p, data, len, offset);
672                 break;
673         case RTE_KDRV_UIO_GENERIC:
674                 pci_uio_ioport_write(p, data, len, offset);
675                 break;
676         case RTE_KDRV_NONE:
677 #if defined(RTE_ARCH_X86)
678                 pci_uio_ioport_write(p, data, len, offset);
679 #endif
680                 break;
681         default:
682                 break;
683         }
684 }
685
686 int
687 rte_pci_ioport_unmap(struct rte_pci_ioport *p)
688 {
689         int ret = -1;
690
691         switch (p->dev->kdrv) {
692 #ifdef VFIO_PRESENT
693         case RTE_KDRV_VFIO:
694                 if (pci_vfio_is_enabled())
695                         ret = pci_vfio_ioport_unmap(p);
696                 break;
697 #endif
698         case RTE_KDRV_IGB_UIO:
699                 ret = pci_uio_ioport_unmap(p);
700                 break;
701         case RTE_KDRV_UIO_GENERIC:
702 #if defined(RTE_ARCH_X86)
703                 ret = 0;
704 #else
705                 ret = pci_uio_ioport_unmap(p);
706 #endif
707                 break;
708         case RTE_KDRV_NONE:
709 #if defined(RTE_ARCH_X86)
710                 ret = 0;
711 #endif
712                 break;
713         default:
714                 break;
715         }
716
717         return ret;
718 }