]> mj.ucw.cz Git - pciutils.git/blob - lspci.c
HURD backend should compile again
[pciutils.git] / lspci.c
1 /*
2  *      The PCI Utilities -- List All PCI Devices
3  *
4  *      Copyright (c) 1997--2020 Martin Mares <mj@ucw.cz>
5  *
6  *      Can be freely distributed and used under the terms of the GNU GPL.
7  */
8
9 #include <stdio.h>
10 #include <string.h>
11 #include <stdlib.h>
12 #include <stdarg.h>
13
14 #include "lspci.h"
15
16 /* Options */
17
18 int verbose;                            /* Show detailed information */
19 static int opt_hex;                     /* Show contents of config space as hexadecimal numbers */
20 struct pci_filter filter;               /* Device filter */
21 static int opt_filter;                  /* Any filter was given */
22 static int opt_tree;                    /* Show bus tree */
23 static int opt_path;                    /* Show bridge path */
24 static int opt_machine;                 /* Generate machine-readable output */
25 static int opt_map_mode;                /* Bus mapping mode enabled */
26 static int opt_domains;                 /* Show domain numbers (0=disabled, 1=auto-detected, 2=requested) */
27 static int opt_kernel;                  /* Show kernel drivers */
28 static int opt_query_dns;               /* Query the DNS (0=disabled, 1=enabled, 2=refresh cache) */
29 static int opt_query_all;               /* Query the DNS for all entries */
30 char *opt_pcimap;                       /* Override path to Linux modules.pcimap */
31
32 const char program_name[] = "lspci";
33
34 static char options[] = "nvbxs:d:tPi:mgp:qkMDQ" GENERIC_OPTIONS ;
35
36 static char help_msg[] =
37 "Usage: lspci [<switches>]\n"
38 "\n"
39 "Basic display modes:\n"
40 "-mm\t\tProduce machine-readable output (single -m for an obsolete format)\n"
41 "-t\t\tShow bus tree\n"
42 "\n"
43 "Display options:\n"
44 "-v\t\tBe verbose (-vv or -vvv for higher verbosity)\n"
45 #ifdef PCI_OS_LINUX
46 "-k\t\tShow kernel drivers handling each device\n"
47 #endif
48 "-x\t\tShow hex-dump of the standard part of the config space\n"
49 "-xxx\t\tShow hex-dump of the whole config space (dangerous; root only)\n"
50 "-xxxx\t\tShow hex-dump of the 4096-byte extended config space (root only)\n"
51 "-b\t\tBus-centric view (addresses and IRQ's as seen by the bus)\n"
52 "-D\t\tAlways show domain numbers\n"
53 "-P\t\tDisplay bridge path in addition to bus and device number\n"
54 "-PP\t\tDisplay bus path in addition to bus and device number\n"
55 "\n"
56 "Resolving of device ID's to names:\n"
57 "-n\t\tShow numeric ID's\n"
58 "-nn\t\tShow both textual and numeric ID's (names & numbers)\n"
59 #ifdef PCI_USE_DNS
60 "-q\t\tQuery the PCI ID database for unknown ID's via DNS\n"
61 "-qq\t\tAs above, but re-query locally cached entries\n"
62 "-Q\t\tQuery the PCI ID database for all ID's via DNS\n"
63 #endif
64 "\n"
65 "Selection of devices:\n"
66 "-s [[[[<domain>]:]<bus>]:][<slot>][.[<func>]]\tShow only devices in selected slots\n"
67 "-d [<vendor>]:[<device>][:<class>]\t\tShow only devices with specified ID's\n"
68 "\n"
69 "Other options:\n"
70 "-i <file>\tUse specified ID database instead of %s\n"
71 #ifdef PCI_OS_LINUX
72 "-p <file>\tLook up kernel modules in a given file instead of default modules.pcimap\n"
73 #endif
74 "-M\t\tEnable `bus mapping' mode (dangerous; root only)\n"
75 "\n"
76 "PCI access options:\n"
77 GENERIC_HELP
78 ;
79
80 /*** Our view of the PCI bus ***/
81
82 struct pci_access *pacc;
83 struct device *first_dev;
84 static int seen_errors;
85 static int need_topology;
86
87 int
88 config_fetch(struct device *d, unsigned int pos, unsigned int len)
89 {
90   unsigned int end = pos+len;
91   int result;
92
93   while (pos < d->config_bufsize && len && d->present[pos])
94     pos++, len--;
95   while (pos+len <= d->config_bufsize && len && d->present[pos+len-1])
96     len--;
97   if (!len)
98     return 1;
99
100   if (end > d->config_bufsize)
101     {
102       int orig_size = d->config_bufsize;
103       while (end > d->config_bufsize)
104         d->config_bufsize *= 2;
105       d->config = xrealloc(d->config, d->config_bufsize);
106       d->present = xrealloc(d->present, d->config_bufsize);
107       memset(d->present + orig_size, 0, d->config_bufsize - orig_size);
108     }
109   result = pci_read_block(d->dev, pos, d->config + pos, len);
110   if (result)
111     memset(d->present + pos, 1, len);
112   return result;
113 }
114
115 struct device *
116 scan_device(struct pci_dev *p)
117 {
118   struct device *d;
119
120   if (p->domain && !opt_domains)
121     opt_domains = 1;
122   if (!pci_filter_match(&filter, p) && !need_topology)
123     return NULL;
124   d = xmalloc(sizeof(struct device));
125   memset(d, 0, sizeof(*d));
126   d->dev = p;
127   d->config_cached = d->config_bufsize = 64;
128   d->config = xmalloc(64);
129   d->present = xmalloc(64);
130   memset(d->present, 1, 64);
131   if (!pci_read_block(p, 0, d->config, 64))
132     {
133       fprintf(stderr, "lspci: Unable to read the standard configuration space header of device %04x:%02x:%02x.%d\n",
134               p->domain, p->bus, p->dev, p->func);
135       seen_errors++;
136       return NULL;
137     }
138   if ((d->config[PCI_HEADER_TYPE] & 0x7f) == PCI_HEADER_TYPE_CARDBUS)
139     {
140       /* For cardbus bridges, we need to fetch 64 bytes more to get the
141        * full standard header... */
142       if (config_fetch(d, 64, 64))
143         d->config_cached += 64;
144     }
145   pci_setup_cache(p, d->config, d->config_cached);
146   pci_fill_info(p, PCI_FILL_IDENT | PCI_FILL_CLASS);
147   return d;
148 }
149
150 static void
151 scan_devices(void)
152 {
153   struct device *d;
154   struct pci_dev *p;
155
156   pci_scan_bus(pacc);
157   for (p=pacc->devices; p; p=p->next)
158     if (d = scan_device(p))
159       {
160         d->next = first_dev;
161         first_dev = d;
162       }
163 }
164
165 /*** Config space accesses ***/
166
167 static void
168 check_conf_range(struct device *d, unsigned int pos, unsigned int len)
169 {
170   while (len)
171     if (!d->present[pos])
172       die("Internal bug: Accessing non-read configuration byte at position %x", pos);
173     else
174       pos++, len--;
175 }
176
177 byte
178 get_conf_byte(struct device *d, unsigned int pos)
179 {
180   check_conf_range(d, pos, 1);
181   return d->config[pos];
182 }
183
184 word
185 get_conf_word(struct device *d, unsigned int pos)
186 {
187   check_conf_range(d, pos, 2);
188   return d->config[pos] | (d->config[pos+1] << 8);
189 }
190
191 u32
192 get_conf_long(struct device *d, unsigned int pos)
193 {
194   check_conf_range(d, pos, 4);
195   return d->config[pos] |
196     (d->config[pos+1] << 8) |
197     (d->config[pos+2] << 16) |
198     (d->config[pos+3] << 24);
199 }
200
201 /*** Sorting ***/
202
203 static int
204 compare_them(const void *A, const void *B)
205 {
206   const struct pci_dev *a = (*(const struct device **)A)->dev;
207   const struct pci_dev *b = (*(const struct device **)B)->dev;
208
209   if (a->domain < b->domain)
210     return -1;
211   if (a->domain > b->domain)
212     return 1;
213   if (a->bus < b->bus)
214     return -1;
215   if (a->bus > b->bus)
216     return 1;
217   if (a->dev < b->dev)
218     return -1;
219   if (a->dev > b->dev)
220     return 1;
221   if (a->func < b->func)
222     return -1;
223   if (a->func > b->func)
224     return 1;
225   return 0;
226 }
227
228 static void
229 sort_them(void)
230 {
231   struct device **index, **h, **last_dev;
232   int cnt;
233   struct device *d;
234
235   cnt = 0;
236   for (d=first_dev; d; d=d->next)
237     cnt++;
238   h = index = alloca(sizeof(struct device *) * cnt);
239   for (d=first_dev; d; d=d->next)
240     *h++ = d;
241   qsort(index, cnt, sizeof(struct device *), compare_them);
242   last_dev = &first_dev;
243   h = index;
244   while (cnt--)
245     {
246       *last_dev = *h;
247       last_dev = &(*h)->next;
248       h++;
249     }
250   *last_dev = NULL;
251 }
252
253 /*** Normal output ***/
254
255 static void
256 show_slot_path(struct device *d)
257 {
258   struct pci_dev *p = d->dev;
259
260   if (opt_path)
261     {
262       struct bus *bus = d->parent_bus;
263       struct bridge *br = bus->parent_bridge;
264
265       if (br && br->br_dev)
266         {
267           show_slot_path(br->br_dev);
268           if (opt_path > 1)
269             printf("/%02x:%02x.%d", p->bus, p->dev, p->func);
270           else
271             printf("/%02x.%d", p->dev, p->func);
272           return;
273         }
274     }
275   printf("%02x:%02x.%d", p->bus, p->dev, p->func);
276 }
277
278 static void
279 show_slot_name(struct device *d)
280 {
281   struct pci_dev *p = d->dev;
282
283   if (!opt_machine ? opt_domains : (p->domain || opt_domains >= 2))
284     printf("%04x:", p->domain);
285   show_slot_path(d);
286 }
287
288 void
289 get_subid(struct device *d, word *subvp, word *subdp)
290 {
291   byte htype = get_conf_byte(d, PCI_HEADER_TYPE) & 0x7f;
292
293   if (htype == PCI_HEADER_TYPE_NORMAL)
294     {
295       *subvp = get_conf_word(d, PCI_SUBSYSTEM_VENDOR_ID);
296       *subdp = get_conf_word(d, PCI_SUBSYSTEM_ID);
297     }
298   else if (htype == PCI_HEADER_TYPE_CARDBUS && d->config_cached >= 128)
299     {
300       *subvp = get_conf_word(d, PCI_CB_SUBSYSTEM_VENDOR_ID);
301       *subdp = get_conf_word(d, PCI_CB_SUBSYSTEM_ID);
302     }
303   else
304     *subvp = *subdp = 0xffff;
305 }
306
307 static void
308 show_terse(struct device *d)
309 {
310   int c;
311   struct pci_dev *p = d->dev;
312   char classbuf[128], devbuf[128];
313
314   show_slot_name(d);
315   printf(" %s: %s",
316          pci_lookup_name(pacc, classbuf, sizeof(classbuf),
317                          PCI_LOOKUP_CLASS,
318                          p->device_class),
319          pci_lookup_name(pacc, devbuf, sizeof(devbuf),
320                          PCI_LOOKUP_VENDOR | PCI_LOOKUP_DEVICE,
321                          p->vendor_id, p->device_id));
322   if (c = get_conf_byte(d, PCI_REVISION_ID))
323     printf(" (rev %02x)", c);
324   if (verbose)
325     {
326       char *x;
327       c = get_conf_byte(d, PCI_CLASS_PROG);
328       x = pci_lookup_name(pacc, devbuf, sizeof(devbuf),
329                           PCI_LOOKUP_PROGIF | PCI_LOOKUP_NO_NUMBERS,
330                           p->device_class, c);
331       if (c || x)
332         {
333           printf(" (prog-if %02x", c);
334           if (x)
335             printf(" [%s]", x);
336           putchar(')');
337         }
338     }
339   putchar('\n');
340
341   if (verbose || opt_kernel)
342     {
343       word subsys_v, subsys_d;
344       char ssnamebuf[256];
345
346       pci_fill_info(p, PCI_FILL_LABEL);
347
348       if (p->label)
349         printf("\tDeviceName: %s", p->label);
350       get_subid(d, &subsys_v, &subsys_d);
351       if (subsys_v && subsys_v != 0xffff)
352         printf("\tSubsystem: %s\n",
353                 pci_lookup_name(pacc, ssnamebuf, sizeof(ssnamebuf),
354                         PCI_LOOKUP_SUBSYSTEM | PCI_LOOKUP_VENDOR | PCI_LOOKUP_DEVICE,
355                         p->vendor_id, p->device_id, subsys_v, subsys_d));
356     }
357 }
358
359 /*** Verbose output ***/
360
361 static void
362 show_size(u64 x)
363 {
364   static const char suffix[][2] = { "", "K", "M", "G", "T" };
365   unsigned i;
366   if (!x)
367     return;
368   for (i = 0; i < (sizeof(suffix) / sizeof(*suffix) - 1); i++) {
369     if (x % 1024)
370       break;
371     x /= 1024;
372   }
373   printf(" [size=%u%s]", (unsigned)x, suffix[i]);
374 }
375
376 static void
377 show_range(char *prefix, u64 base, u64 limit, int is_64bit)
378 {
379   printf("%s:", prefix);
380   if (base <= limit || verbose > 2)
381     {
382       if (is_64bit)
383         printf(" %016" PCI_U64_FMT_X "-%016" PCI_U64_FMT_X, base, limit);
384       else
385         printf(" %08x-%08x", (unsigned) base, (unsigned) limit);
386     }
387   if (base <= limit)
388     show_size(limit - base + 1);
389   else
390     printf(" [disabled]");
391   putchar('\n');
392 }
393
394 static void
395 show_bases(struct device *d, int cnt)
396 {
397   struct pci_dev *p = d->dev;
398   word cmd = get_conf_word(d, PCI_COMMAND);
399   int i;
400   int virtual = 0;
401
402   for (i=0; i<cnt; i++)
403     {
404       pciaddr_t pos = p->base_addr[i];
405       pciaddr_t len = (p->known_fields & PCI_FILL_SIZES) ? p->size[i] : 0;
406       pciaddr_t ioflg = (p->known_fields & PCI_FILL_IO_FLAGS) ? p->flags[i] : 0;
407       u32 flg = get_conf_long(d, PCI_BASE_ADDRESS_0 + 4*i);
408       u32 hw_lower;
409       u32 hw_upper = 0;
410       int broken = 0;
411
412       if (flg == 0xffffffff)
413         flg = 0;
414       if (!pos && !flg && !len)
415         continue;
416
417       if (verbose > 1)
418         printf("\tRegion %d: ", i);
419       else
420         putchar('\t');
421
422       /* Read address as seen by the hardware */
423       if (flg & PCI_BASE_ADDRESS_SPACE_IO)
424         hw_lower = flg & PCI_BASE_ADDRESS_IO_MASK;
425       else
426         {
427           hw_lower = flg & PCI_BASE_ADDRESS_MEM_MASK;
428           if ((flg & PCI_BASE_ADDRESS_MEM_TYPE_MASK) == PCI_BASE_ADDRESS_MEM_TYPE_64)
429             {
430               if (i >= cnt - 1)
431                 broken = 1;
432               else
433                 {
434                   i++;
435                   hw_upper = get_conf_long(d, PCI_BASE_ADDRESS_0 + 4*i);
436                 }
437             }
438         }
439
440       /* Detect virtual regions, which are reported by the OS, but unassigned in the device */
441       if (pos && !hw_lower && !hw_upper && !(ioflg & PCI_IORESOURCE_PCI_EA_BEI))
442         {
443           flg = pos;
444           virtual = 1;
445         }
446
447       /* Print base address */
448       if (flg & PCI_BASE_ADDRESS_SPACE_IO)
449         {
450           pciaddr_t a = pos & PCI_BASE_ADDRESS_IO_MASK;
451           printf("I/O ports at ");
452           if (a || (cmd & PCI_COMMAND_IO))
453             printf(PCIADDR_PORT_FMT, a);
454           else if (hw_lower)
455             printf("<ignored>");
456           else
457             printf("<unassigned>");
458           if (virtual)
459             printf(" [virtual]");
460           else if (!(cmd & PCI_COMMAND_IO))
461             printf(" [disabled]");
462         }
463       else
464         {
465           int t = flg & PCI_BASE_ADDRESS_MEM_TYPE_MASK;
466           pciaddr_t a = pos & PCI_ADDR_MEM_MASK;
467
468           printf("Memory at ");
469           if (broken)
470             printf("<broken-64-bit-slot>");
471           else if (a)
472             printf(PCIADDR_T_FMT, a);
473           else if (hw_lower || hw_upper)
474             printf("<ignored>");
475           else
476             printf("<unassigned>");
477           printf(" (%s, %sprefetchable)",
478                  (t == PCI_BASE_ADDRESS_MEM_TYPE_32) ? "32-bit" :
479                  (t == PCI_BASE_ADDRESS_MEM_TYPE_64) ? "64-bit" :
480                  (t == PCI_BASE_ADDRESS_MEM_TYPE_1M) ? "low-1M" : "type 3",
481                  (flg & PCI_BASE_ADDRESS_MEM_PREFETCH) ? "" : "non-");
482           if (virtual)
483             printf(" [virtual]");
484           else if (!(cmd & PCI_COMMAND_MEMORY))
485             printf(" [disabled]");
486         }
487
488       if (ioflg & PCI_IORESOURCE_PCI_EA_BEI)
489         printf(" [enhanced]");
490
491       show_size(len);
492       putchar('\n');
493     }
494 }
495
496 static void
497 show_rom(struct device *d, int reg)
498 {
499   struct pci_dev *p = d->dev;
500   pciaddr_t rom = p->rom_base_addr;
501   pciaddr_t len = (p->known_fields & PCI_FILL_SIZES) ? p->rom_size : 0;
502   pciaddr_t ioflg = (p->known_fields & PCI_FILL_IO_FLAGS) ? p->rom_flags : 0;
503   u32 flg = get_conf_long(d, reg);
504   word cmd = get_conf_word(d, PCI_COMMAND);
505   int virtual = 0;
506
507   if (!rom && !flg && !len)
508     return;
509
510   if ((rom & PCI_ROM_ADDRESS_MASK) && !(flg & PCI_ROM_ADDRESS_MASK) && !(ioflg & PCI_IORESOURCE_PCI_EA_BEI))
511     {
512       flg = rom;
513       virtual = 1;
514     }
515
516   printf("\tExpansion ROM at ");
517   if (rom & PCI_ROM_ADDRESS_MASK)
518     printf(PCIADDR_T_FMT, rom & PCI_ROM_ADDRESS_MASK);
519   else if (flg & PCI_ROM_ADDRESS_MASK)
520     printf("<ignored>");
521   else
522     printf("<unassigned>");
523
524   if (virtual)
525     printf(" [virtual]");
526
527   if (!(flg & PCI_ROM_ADDRESS_ENABLE))
528     printf(" [disabled]");
529   else if (!virtual && !(cmd & PCI_COMMAND_MEMORY))
530     printf(" [disabled by cmd]");
531
532   if (ioflg & PCI_IORESOURCE_PCI_EA_BEI)
533       printf(" [enhanced]");
534
535   show_size(len);
536   putchar('\n');
537 }
538
539 static void
540 show_htype0(struct device *d)
541 {
542   show_bases(d, 6);
543   show_rom(d, PCI_ROM_ADDRESS);
544   show_caps(d, PCI_CAPABILITY_LIST);
545 }
546
547 static void
548 show_htype1(struct device *d)
549 {
550   u32 io_base = get_conf_byte(d, PCI_IO_BASE);
551   u32 io_limit = get_conf_byte(d, PCI_IO_LIMIT);
552   u32 io_type = io_base & PCI_IO_RANGE_TYPE_MASK;
553   u32 mem_base = get_conf_word(d, PCI_MEMORY_BASE);
554   u32 mem_limit = get_conf_word(d, PCI_MEMORY_LIMIT);
555   u32 mem_type = mem_base & PCI_MEMORY_RANGE_TYPE_MASK;
556   u32 pref_base = get_conf_word(d, PCI_PREF_MEMORY_BASE);
557   u32 pref_limit = get_conf_word(d, PCI_PREF_MEMORY_LIMIT);
558   u32 pref_type = pref_base & PCI_PREF_RANGE_TYPE_MASK;
559   word sec_stat = get_conf_word(d, PCI_SEC_STATUS);
560   word brc = get_conf_word(d, PCI_BRIDGE_CONTROL);
561
562   show_bases(d, 2);
563   printf("\tBus: primary=%02x, secondary=%02x, subordinate=%02x, sec-latency=%d\n",
564          get_conf_byte(d, PCI_PRIMARY_BUS),
565          get_conf_byte(d, PCI_SECONDARY_BUS),
566          get_conf_byte(d, PCI_SUBORDINATE_BUS),
567          get_conf_byte(d, PCI_SEC_LATENCY_TIMER));
568
569   if (io_type != (io_limit & PCI_IO_RANGE_TYPE_MASK) ||
570       (io_type != PCI_IO_RANGE_TYPE_16 && io_type != PCI_IO_RANGE_TYPE_32))
571     printf("\t!!! Unknown I/O range types %x/%x\n", io_base, io_limit);
572   else
573     {
574       io_base = (io_base & PCI_IO_RANGE_MASK) << 8;
575       io_limit = (io_limit & PCI_IO_RANGE_MASK) << 8;
576       if (io_type == PCI_IO_RANGE_TYPE_32)
577         {
578           io_base |= (get_conf_word(d, PCI_IO_BASE_UPPER16) << 16);
579           io_limit |= (get_conf_word(d, PCI_IO_LIMIT_UPPER16) << 16);
580         }
581       show_range("\tI/O behind bridge", io_base, io_limit+0xfff, 0);
582     }
583
584   if (mem_type != (mem_limit & PCI_MEMORY_RANGE_TYPE_MASK) ||
585       mem_type)
586     printf("\t!!! Unknown memory range types %x/%x\n", mem_base, mem_limit);
587   else
588     {
589       mem_base = (mem_base & PCI_MEMORY_RANGE_MASK) << 16;
590       mem_limit = (mem_limit & PCI_MEMORY_RANGE_MASK) << 16;
591       show_range("\tMemory behind bridge", mem_base, mem_limit + 0xfffff, 0);
592     }
593
594   if (pref_type != (pref_limit & PCI_PREF_RANGE_TYPE_MASK) ||
595       (pref_type != PCI_PREF_RANGE_TYPE_32 && pref_type != PCI_PREF_RANGE_TYPE_64))
596     printf("\t!!! Unknown prefetchable memory range types %x/%x\n", pref_base, pref_limit);
597   else
598     {
599       u64 pref_base_64 = (pref_base & PCI_PREF_RANGE_MASK) << 16;
600       u64 pref_limit_64 = (pref_limit & PCI_PREF_RANGE_MASK) << 16;
601       if (pref_type == PCI_PREF_RANGE_TYPE_64)
602         {
603           pref_base_64 |= (u64) get_conf_long(d, PCI_PREF_BASE_UPPER32) << 32;
604           pref_limit_64 |= (u64) get_conf_long(d, PCI_PREF_LIMIT_UPPER32) << 32;
605         }
606       show_range("\tPrefetchable memory behind bridge", pref_base_64, pref_limit_64 + 0xfffff, (pref_type == PCI_PREF_RANGE_TYPE_64));
607     }
608
609   if (verbose > 1)
610     printf("\tSecondary status: 66MHz%c FastB2B%c ParErr%c DEVSEL=%s >TAbort%c <TAbort%c <MAbort%c <SERR%c <PERR%c\n",
611              FLAG(sec_stat, PCI_STATUS_66MHZ),
612              FLAG(sec_stat, PCI_STATUS_FAST_BACK),
613              FLAG(sec_stat, PCI_STATUS_PARITY),
614              ((sec_stat & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_SLOW) ? "slow" :
615              ((sec_stat & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_MEDIUM) ? "medium" :
616              ((sec_stat & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_FAST) ? "fast" : "??",
617              FLAG(sec_stat, PCI_STATUS_SIG_TARGET_ABORT),
618              FLAG(sec_stat, PCI_STATUS_REC_TARGET_ABORT),
619              FLAG(sec_stat, PCI_STATUS_REC_MASTER_ABORT),
620              FLAG(sec_stat, PCI_STATUS_SIG_SYSTEM_ERROR),
621              FLAG(sec_stat, PCI_STATUS_DETECTED_PARITY));
622
623   show_rom(d, PCI_ROM_ADDRESS1);
624
625   if (verbose > 1)
626     {
627       printf("\tBridgeCtl: Parity%c SERR%c NoISA%c VGA%c VGA16%c MAbort%c >Reset%c FastB2B%c\n",
628         FLAG(brc, PCI_BRIDGE_CTL_PARITY),
629         FLAG(brc, PCI_BRIDGE_CTL_SERR),
630         FLAG(brc, PCI_BRIDGE_CTL_NO_ISA),
631         FLAG(brc, PCI_BRIDGE_CTL_VGA),
632         FLAG(brc, PCI_BRIDGE_CTL_VGA_16BIT),
633         FLAG(brc, PCI_BRIDGE_CTL_MASTER_ABORT),
634         FLAG(brc, PCI_BRIDGE_CTL_BUS_RESET),
635         FLAG(brc, PCI_BRIDGE_CTL_FAST_BACK));
636       printf("\t\tPriDiscTmr%c SecDiscTmr%c DiscTmrStat%c DiscTmrSERREn%c\n",
637         FLAG(brc, PCI_BRIDGE_CTL_PRI_DISCARD_TIMER),
638         FLAG(brc, PCI_BRIDGE_CTL_SEC_DISCARD_TIMER),
639         FLAG(brc, PCI_BRIDGE_CTL_DISCARD_TIMER_STATUS),
640         FLAG(brc, PCI_BRIDGE_CTL_DISCARD_TIMER_SERR_EN));
641     }
642
643   show_caps(d, PCI_CAPABILITY_LIST);
644 }
645
646 static void
647 show_htype2(struct device *d)
648 {
649   int i;
650   word cmd = get_conf_word(d, PCI_COMMAND);
651   word brc = get_conf_word(d, PCI_CB_BRIDGE_CONTROL);
652   word exca;
653   int verb = verbose > 2;
654
655   show_bases(d, 1);
656   printf("\tBus: primary=%02x, secondary=%02x, subordinate=%02x, sec-latency=%d\n",
657          get_conf_byte(d, PCI_CB_PRIMARY_BUS),
658          get_conf_byte(d, PCI_CB_CARD_BUS),
659          get_conf_byte(d, PCI_CB_SUBORDINATE_BUS),
660          get_conf_byte(d, PCI_CB_LATENCY_TIMER));
661   for (i=0; i<2; i++)
662     {
663       int p = 8*i;
664       u32 base = get_conf_long(d, PCI_CB_MEMORY_BASE_0 + p);
665       u32 limit = get_conf_long(d, PCI_CB_MEMORY_LIMIT_0 + p);
666       limit = limit + 0xfff;
667       if (base <= limit || verb)
668         printf("\tMemory window %d: %08x-%08x%s%s\n", i, base, limit,
669                (cmd & PCI_COMMAND_MEMORY) ? "" : " [disabled]",
670                (brc & (PCI_CB_BRIDGE_CTL_PREFETCH_MEM0 << i)) ? " (prefetchable)" : "");
671     }
672   for (i=0; i<2; i++)
673     {
674       int p = 8*i;
675       u32 base = get_conf_long(d, PCI_CB_IO_BASE_0 + p);
676       u32 limit = get_conf_long(d, PCI_CB_IO_LIMIT_0 + p);
677       if (!(base & PCI_IO_RANGE_TYPE_32))
678         {
679           base &= 0xffff;
680           limit &= 0xffff;
681         }
682       base &= PCI_CB_IO_RANGE_MASK;
683       limit = (limit & PCI_CB_IO_RANGE_MASK) + 3;
684       if (base <= limit || verb)
685         printf("\tI/O window %d: %08x-%08x%s\n", i, base, limit,
686                (cmd & PCI_COMMAND_IO) ? "" : " [disabled]");
687     }
688
689   if (get_conf_word(d, PCI_CB_SEC_STATUS) & PCI_STATUS_SIG_SYSTEM_ERROR)
690     printf("\tSecondary status: SERR\n");
691   if (verbose > 1)
692     printf("\tBridgeCtl: Parity%c SERR%c ISA%c VGA%c MAbort%c >Reset%c 16bInt%c PostWrite%c\n",
693            FLAG(brc, PCI_CB_BRIDGE_CTL_PARITY),
694            FLAG(brc, PCI_CB_BRIDGE_CTL_SERR),
695            FLAG(brc, PCI_CB_BRIDGE_CTL_ISA),
696            FLAG(brc, PCI_CB_BRIDGE_CTL_VGA),
697            FLAG(brc, PCI_CB_BRIDGE_CTL_MASTER_ABORT),
698            FLAG(brc, PCI_CB_BRIDGE_CTL_CB_RESET),
699            FLAG(brc, PCI_CB_BRIDGE_CTL_16BIT_INT),
700            FLAG(brc, PCI_CB_BRIDGE_CTL_POST_WRITES));
701
702   if (d->config_cached < 128)
703     {
704       printf("\t<access denied to the rest>\n");
705       return;
706     }
707
708   exca = get_conf_word(d, PCI_CB_LEGACY_MODE_BASE);
709   if (exca)
710     printf("\t16-bit legacy interface ports at %04x\n", exca);
711   show_caps(d, PCI_CB_CAPABILITY_LIST);
712 }
713
714 static void
715 show_verbose(struct device *d)
716 {
717   struct pci_dev *p = d->dev;
718   word status = get_conf_word(d, PCI_STATUS);
719   word cmd = get_conf_word(d, PCI_COMMAND);
720   word class = p->device_class;
721   byte bist = get_conf_byte(d, PCI_BIST);
722   byte htype = get_conf_byte(d, PCI_HEADER_TYPE) & 0x7f;
723   byte latency = get_conf_byte(d, PCI_LATENCY_TIMER);
724   byte cache_line = get_conf_byte(d, PCI_CACHE_LINE_SIZE);
725   byte max_lat, min_gnt;
726   byte int_pin = get_conf_byte(d, PCI_INTERRUPT_PIN);
727   unsigned int irq;
728   char *dt_node, *iommu_group;
729
730   show_terse(d);
731
732   pci_fill_info(p, PCI_FILL_IRQ | PCI_FILL_BASES | PCI_FILL_ROM_BASE | PCI_FILL_SIZES |
733     PCI_FILL_PHYS_SLOT | PCI_FILL_NUMA_NODE | PCI_FILL_DT_NODE | PCI_FILL_IOMMU_GROUP);
734   irq = p->irq;
735
736   switch (htype)
737     {
738     case PCI_HEADER_TYPE_NORMAL:
739       if (class == PCI_CLASS_BRIDGE_PCI)
740         printf("\t!!! Invalid class %04x for header type %02x\n", class, htype);
741       max_lat = get_conf_byte(d, PCI_MAX_LAT);
742       min_gnt = get_conf_byte(d, PCI_MIN_GNT);
743       break;
744     case PCI_HEADER_TYPE_BRIDGE:
745       if ((class >> 8) != PCI_BASE_CLASS_BRIDGE)
746         printf("\t!!! Invalid class %04x for header type %02x\n", class, htype);
747       min_gnt = max_lat = 0;
748       break;
749     case PCI_HEADER_TYPE_CARDBUS:
750       if ((class >> 8) != PCI_BASE_CLASS_BRIDGE)
751         printf("\t!!! Invalid class %04x for header type %02x\n", class, htype);
752       min_gnt = max_lat = 0;
753       break;
754     default:
755       printf("\t!!! Unknown header type %02x\n", htype);
756       return;
757     }
758
759   if (p->phy_slot)
760     printf("\tPhysical Slot: %s\n", p->phy_slot);
761
762   if (dt_node = pci_get_string_property(p, PCI_FILL_DT_NODE))
763     printf("\tDevice tree node: %s\n", dt_node);
764
765   if (verbose > 1)
766     {
767       printf("\tControl: I/O%c Mem%c BusMaster%c SpecCycle%c MemWINV%c VGASnoop%c ParErr%c Stepping%c SERR%c FastB2B%c DisINTx%c\n",
768              FLAG(cmd, PCI_COMMAND_IO),
769              FLAG(cmd, PCI_COMMAND_MEMORY),
770              FLAG(cmd, PCI_COMMAND_MASTER),
771              FLAG(cmd, PCI_COMMAND_SPECIAL),
772              FLAG(cmd, PCI_COMMAND_INVALIDATE),
773              FLAG(cmd, PCI_COMMAND_VGA_PALETTE),
774              FLAG(cmd, PCI_COMMAND_PARITY),
775              FLAG(cmd, PCI_COMMAND_WAIT),
776              FLAG(cmd, PCI_COMMAND_SERR),
777              FLAG(cmd, PCI_COMMAND_FAST_BACK),
778              FLAG(cmd, PCI_COMMAND_DISABLE_INTx));
779       printf("\tStatus: Cap%c 66MHz%c UDF%c FastB2B%c ParErr%c DEVSEL=%s >TAbort%c <TAbort%c <MAbort%c >SERR%c <PERR%c INTx%c\n",
780              FLAG(status, PCI_STATUS_CAP_LIST),
781              FLAG(status, PCI_STATUS_66MHZ),
782              FLAG(status, PCI_STATUS_UDF),
783              FLAG(status, PCI_STATUS_FAST_BACK),
784              FLAG(status, PCI_STATUS_PARITY),
785              ((status & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_SLOW) ? "slow" :
786              ((status & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_MEDIUM) ? "medium" :
787              ((status & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_FAST) ? "fast" : "??",
788              FLAG(status, PCI_STATUS_SIG_TARGET_ABORT),
789              FLAG(status, PCI_STATUS_REC_TARGET_ABORT),
790              FLAG(status, PCI_STATUS_REC_MASTER_ABORT),
791              FLAG(status, PCI_STATUS_SIG_SYSTEM_ERROR),
792              FLAG(status, PCI_STATUS_DETECTED_PARITY),
793              FLAG(status, PCI_STATUS_INTx));
794       if (cmd & PCI_COMMAND_MASTER)
795         {
796           printf("\tLatency: %d", latency);
797           if (min_gnt || max_lat)
798             {
799               printf(" (");
800               if (min_gnt)
801                 printf("%dns min", min_gnt*250);
802               if (min_gnt && max_lat)
803                 printf(", ");
804               if (max_lat)
805                 printf("%dns max", max_lat*250);
806               putchar(')');
807             }
808           if (cache_line)
809             printf(", Cache Line Size: %d bytes", cache_line * 4);
810           putchar('\n');
811         }
812       if (int_pin || irq)
813         printf("\tInterrupt: pin %c routed to IRQ " PCIIRQ_FMT "\n",
814                (int_pin ? 'A' + int_pin - 1 : '?'), irq);
815       if (p->numa_node != -1)
816         printf("\tNUMA node: %d\n", p->numa_node);
817       if (iommu_group = pci_get_string_property(p, PCI_FILL_IOMMU_GROUP))
818         printf("\tIOMMU group: %s\n", iommu_group);
819     }
820   else
821     {
822       printf("\tFlags: ");
823       if (cmd & PCI_COMMAND_MASTER)
824         printf("bus master, ");
825       if (cmd & PCI_COMMAND_VGA_PALETTE)
826         printf("VGA palette snoop, ");
827       if (cmd & PCI_COMMAND_WAIT)
828         printf("stepping, ");
829       if (cmd & PCI_COMMAND_FAST_BACK)
830         printf("fast Back2Back, ");
831       if (status & PCI_STATUS_66MHZ)
832         printf("66MHz, ");
833       if (status & PCI_STATUS_UDF)
834         printf("user-definable features, ");
835       printf("%s devsel",
836              ((status & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_SLOW) ? "slow" :
837              ((status & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_MEDIUM) ? "medium" :
838              ((status & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_FAST) ? "fast" : "??");
839       if (cmd & PCI_COMMAND_MASTER)
840         printf(", latency %d", latency);
841       if (irq)
842         printf(", IRQ " PCIIRQ_FMT, irq);
843       if (p->numa_node != -1)
844         printf(", NUMA node %d", p->numa_node);
845       if (iommu_group = pci_get_string_property(p, PCI_FILL_IOMMU_GROUP))
846         printf(", IOMMU group %s", iommu_group);
847       putchar('\n');
848     }
849
850   if (bist & PCI_BIST_CAPABLE)
851     {
852       if (bist & PCI_BIST_START)
853         printf("\tBIST is running\n");
854       else
855         printf("\tBIST result: %02x\n", bist & PCI_BIST_CODE_MASK);
856     }
857
858   switch (htype)
859     {
860     case PCI_HEADER_TYPE_NORMAL:
861       show_htype0(d);
862       break;
863     case PCI_HEADER_TYPE_BRIDGE:
864       show_htype1(d);
865       break;
866     case PCI_HEADER_TYPE_CARDBUS:
867       show_htype2(d);
868       break;
869     }
870 }
871
872 /*** Machine-readable dumps ***/
873
874 static void
875 show_hex_dump(struct device *d)
876 {
877   unsigned int i, cnt;
878
879   cnt = d->config_cached;
880   if (opt_hex >= 3 && config_fetch(d, cnt, 256-cnt))
881     {
882       cnt = 256;
883       if (opt_hex >= 4 && config_fetch(d, 256, 4096-256))
884         cnt = 4096;
885     }
886
887   for (i=0; i<cnt; i++)
888     {
889       if (! (i & 15))
890         printf("%02x:", i);
891       printf(" %02x", get_conf_byte(d, i));
892       if ((i & 15) == 15)
893         putchar('\n');
894     }
895 }
896
897 static void
898 print_shell_escaped(char *c)
899 {
900   printf(" \"");
901   while (*c)
902     {
903       if (*c == '"' || *c == '\\')
904         putchar('\\');
905       putchar(*c++);
906     }
907   putchar('"');
908 }
909
910 static void
911 show_machine(struct device *d)
912 {
913   struct pci_dev *p = d->dev;
914   int c;
915   word sv_id, sd_id;
916   char classbuf[128], vendbuf[128], devbuf[128], svbuf[128], sdbuf[128];
917   char *dt_node, *iommu_group;
918
919   get_subid(d, &sv_id, &sd_id);
920
921   if (verbose)
922     {
923       pci_fill_info(p, PCI_FILL_PHYS_SLOT | PCI_FILL_NUMA_NODE | PCI_FILL_DT_NODE | PCI_FILL_IOMMU_GROUP);
924       printf((opt_machine >= 2) ? "Slot:\t" : "Device:\t");
925       show_slot_name(d);
926       putchar('\n');
927       printf("Class:\t%s\n",
928              pci_lookup_name(pacc, classbuf, sizeof(classbuf), PCI_LOOKUP_CLASS, p->device_class));
929       printf("Vendor:\t%s\n",
930              pci_lookup_name(pacc, vendbuf, sizeof(vendbuf), PCI_LOOKUP_VENDOR, p->vendor_id, p->device_id));
931       printf("Device:\t%s\n",
932              pci_lookup_name(pacc, devbuf, sizeof(devbuf), PCI_LOOKUP_DEVICE, p->vendor_id, p->device_id));
933       if (sv_id && sv_id != 0xffff)
934         {
935           printf("SVendor:\t%s\n",
936                  pci_lookup_name(pacc, svbuf, sizeof(svbuf), PCI_LOOKUP_SUBSYSTEM | PCI_LOOKUP_VENDOR, sv_id));
937           printf("SDevice:\t%s\n",
938                  pci_lookup_name(pacc, sdbuf, sizeof(sdbuf), PCI_LOOKUP_SUBSYSTEM | PCI_LOOKUP_DEVICE, p->vendor_id, p->device_id, sv_id, sd_id));
939         }
940       if (p->phy_slot)
941         printf("PhySlot:\t%s\n", p->phy_slot);
942       if (c = get_conf_byte(d, PCI_REVISION_ID))
943         printf("Rev:\t%02x\n", c);
944       if (c = get_conf_byte(d, PCI_CLASS_PROG))
945         printf("ProgIf:\t%02x\n", c);
946       if (opt_kernel)
947         show_kernel_machine(d);
948       if (p->numa_node != -1)
949         printf("NUMANode:\t%d\n", p->numa_node);
950       if (dt_node = pci_get_string_property(p, PCI_FILL_DT_NODE))
951         printf("DTNode:\t%s\n", dt_node);
952       if (iommu_group = pci_get_string_property(p, PCI_FILL_IOMMU_GROUP))
953         printf("IOMMUGroup:\t%s\n", iommu_group);
954     }
955   else
956     {
957       show_slot_name(d);
958       print_shell_escaped(pci_lookup_name(pacc, classbuf, sizeof(classbuf), PCI_LOOKUP_CLASS, p->device_class));
959       print_shell_escaped(pci_lookup_name(pacc, vendbuf, sizeof(vendbuf), PCI_LOOKUP_VENDOR, p->vendor_id, p->device_id));
960       print_shell_escaped(pci_lookup_name(pacc, devbuf, sizeof(devbuf), PCI_LOOKUP_DEVICE, p->vendor_id, p->device_id));
961       if (c = get_conf_byte(d, PCI_REVISION_ID))
962         printf(" -r%02x", c);
963       if (c = get_conf_byte(d, PCI_CLASS_PROG))
964         printf(" -p%02x", c);
965       if (sv_id && sv_id != 0xffff)
966         {
967           print_shell_escaped(pci_lookup_name(pacc, svbuf, sizeof(svbuf), PCI_LOOKUP_SUBSYSTEM | PCI_LOOKUP_VENDOR, sv_id));
968           print_shell_escaped(pci_lookup_name(pacc, sdbuf, sizeof(sdbuf), PCI_LOOKUP_SUBSYSTEM | PCI_LOOKUP_DEVICE, p->vendor_id, p->device_id, sv_id, sd_id));
969         }
970       else
971         printf(" \"\" \"\"");
972       putchar('\n');
973     }
974 }
975
976 /*** Main show function ***/
977
978 void
979 show_device(struct device *d)
980 {
981   if (opt_machine)
982     show_machine(d);
983   else
984     {
985       if (verbose)
986         show_verbose(d);
987       else
988         show_terse(d);
989       if (opt_kernel || verbose)
990         show_kernel(d);
991     }
992   if (opt_hex)
993     show_hex_dump(d);
994   if (verbose || opt_hex)
995     putchar('\n');
996 }
997
998 static void
999 show(void)
1000 {
1001   struct device *d;
1002
1003   for (d=first_dev; d; d=d->next)
1004     if (pci_filter_match(&filter, d->dev))
1005       show_device(d);
1006 }
1007
1008 /* Main */
1009
1010 int
1011 main(int argc, char **argv)
1012 {
1013   int i;
1014   char *msg;
1015
1016   if (argc == 2 && !strcmp(argv[1], "--version"))
1017     {
1018       puts("lspci version " PCIUTILS_VERSION);
1019       return 0;
1020     }
1021
1022   pacc = pci_alloc();
1023   pacc->error = die;
1024   pci_filter_init(pacc, &filter);
1025
1026   while ((i = getopt(argc, argv, options)) != -1)
1027     switch (i)
1028       {
1029       case 'n':
1030         pacc->numeric_ids++;
1031         break;
1032       case 'v':
1033         verbose++;
1034         break;
1035       case 'b':
1036         pacc->buscentric = 1;
1037         break;
1038       case 's':
1039         if (msg = pci_filter_parse_slot(&filter, optarg))
1040           die("-s: %s", msg);
1041         opt_filter = 1;
1042         break;
1043       case 'd':
1044         if (msg = pci_filter_parse_id(&filter, optarg))
1045           die("-d: %s", msg);
1046         opt_filter = 1;
1047         break;
1048       case 'x':
1049         opt_hex++;
1050         break;
1051       case 'P':
1052         opt_path++;
1053         need_topology = 1;
1054         break;
1055       case 't':
1056         opt_tree++;
1057         need_topology = 1;
1058         break;
1059       case 'i':
1060         pci_set_name_list_path(pacc, optarg, 0);
1061         break;
1062       case 'm':
1063         opt_machine++;
1064         break;
1065       case 'p':
1066         opt_pcimap = optarg;
1067         break;
1068 #ifdef PCI_OS_LINUX
1069       case 'k':
1070         opt_kernel++;
1071         break;
1072 #endif
1073       case 'M':
1074         opt_map_mode++;
1075         break;
1076       case 'D':
1077         opt_domains = 2;
1078         break;
1079 #ifdef PCI_USE_DNS
1080       case 'q':
1081         opt_query_dns++;
1082         break;
1083       case 'Q':
1084         opt_query_all = 1;
1085         break;
1086 #else
1087       case 'q':
1088       case 'Q':
1089         die("DNS queries are not available in this version");
1090 #endif
1091       default:
1092         if (parse_generic_option(i, pacc, optarg))
1093           break;
1094       bad:
1095         fprintf(stderr, help_msg, pacc->id_file_name);
1096         return 1;
1097       }
1098   if (optind < argc)
1099     goto bad;
1100
1101   if (opt_query_dns)
1102     {
1103       pacc->id_lookup_mode |= PCI_LOOKUP_NETWORK;
1104       if (opt_query_dns > 1)
1105         pacc->id_lookup_mode |= PCI_LOOKUP_REFRESH_CACHE;
1106     }
1107   if (opt_query_all)
1108     pacc->id_lookup_mode |= PCI_LOOKUP_NETWORK | PCI_LOOKUP_SKIP_LOCAL;
1109
1110   pci_init(pacc);
1111   if (opt_map_mode)
1112     {
1113       if (need_topology)
1114         die("Bus mapping mode does not recognize bus topology");
1115       map_the_bus();
1116     }
1117   else
1118     {
1119       scan_devices();
1120       sort_them();
1121       if (need_topology)
1122         grow_tree();
1123       if (opt_tree)
1124         show_forest(opt_filter ? &filter : NULL);
1125       else
1126         show();
1127     }
1128   show_kernel_cleanup();
1129   pci_cleanup(pacc);
1130
1131   return (seen_errors ? 2 : 0);
1132 }