lspci.c

   1 /*
   2  *      The PCI Utilities -- List All PCI Devices
   3  *
   4  *      Copyright (c) 1997--2018 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 for very verbose)\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   if (base > limit)
 380     {
 381       if (!verbose)
 382         return;
 383       else if (verbose < 3)
 384         {
 385           printf("%s: None\n", prefix);
 386           return;
 387         }
 388     }
 389
 390   printf("%s: ", prefix);
 391   if (is_64bit)
 392     printf("%016" PCI_U64_FMT_X "-%016" PCI_U64_FMT_X, base, limit);
 393   else
 394     printf("%08x-%08x", (unsigned) base, (unsigned) limit);
 395   if (base <= limit)
 396     show_size(limit - base + 1);
 397   else
 398     printf(" [empty]");
 399   putchar('\n');
 400 }
 401
 402 static void
 403 show_bases(struct device *d, int cnt)
 404 {
 405   struct pci_dev *p = d->dev;
 406   word cmd = get_conf_word(d, PCI_COMMAND);
 407   int i;
 408   int virtual = 0;
 409
 410   for (i=0; i<cnt; i++)
 411     {
 412       pciaddr_t pos = p->base_addr[i];
 413       pciaddr_t len = (p->known_fields & PCI_FILL_SIZES) ? p->size[i] : 0;
 414       pciaddr_t ioflg = (p->known_fields & PCI_FILL_IO_FLAGS) ? p->flags[i] : 0;
 415       u32 flg = get_conf_long(d, PCI_BASE_ADDRESS_0 + 4*i);
 416       if (flg == 0xffffffff)
 417         flg = 0;
 418       if (!pos && !flg && !len)
 419         continue;
 420       if (verbose > 1)
 421         printf("\tRegion %d: ", i);
 422       else
 423         putchar('\t');
 424       if (ioflg & PCI_IORESOURCE_PCI_EA_BEI)
 425           printf("[enhanced] ");
 426       else if (pos && !(flg & ((flg & PCI_BASE_ADDRESS_SPACE_IO) ? PCI_BASE_ADDRESS_IO_MASK : PCI_BASE_ADDRESS_MEM_MASK)))
 427         {
 428           /* Reported by the OS, but not by the device */
 429           printf("[virtual] ");
 430           flg = pos;
 431           virtual = 1;
 432         }
 433       if (flg & PCI_BASE_ADDRESS_SPACE_IO)
 434         {
 435           pciaddr_t a = pos & PCI_BASE_ADDRESS_IO_MASK;
 436           printf("I/O ports at ");
 437           if (a || (cmd & PCI_COMMAND_IO))
 438             printf(PCIADDR_PORT_FMT, a);
 439           else if (flg & PCI_BASE_ADDRESS_IO_MASK)
 440             printf("<ignored>");
 441           else
 442             printf("<unassigned>");
 443           if (!virtual && !(cmd & PCI_COMMAND_IO))
 444             printf(" [disabled]");
 445         }
 446       else
 447         {
 448           int t = flg & PCI_BASE_ADDRESS_MEM_TYPE_MASK;
 449           pciaddr_t a = pos & PCI_ADDR_MEM_MASK;
 450           int done = 0;
 451           u32 z = 0;
 452
 453           printf("Memory at ");
 454           if (t == PCI_BASE_ADDRESS_MEM_TYPE_64)
 455             {
 456               if (i >= cnt - 1)
 457                 {
 458                   printf("<invalid-64bit-slot>");
 459                   done = 1;
 460                 }
 461               else
 462                 {
 463                   i++;
 464                   z = get_conf_long(d, PCI_BASE_ADDRESS_0 + 4*i);
 465                 }
 466             }
 467           if (!done)
 468             {
 469               if (a)
 470                 printf(PCIADDR_T_FMT, a);
 471               else
 472                 printf(((flg & PCI_BASE_ADDRESS_MEM_MASK) || z) ? "<ignored>" : "<unassigned>");
 473             }
 474           printf(" (%s, %sprefetchable)",
 475                  (t == PCI_BASE_ADDRESS_MEM_TYPE_32) ? "32-bit" :
 476                  (t == PCI_BASE_ADDRESS_MEM_TYPE_64) ? "64-bit" :
 477                  (t == PCI_BASE_ADDRESS_MEM_TYPE_1M) ? "low-1M" : "type 3",
 478                  (flg & PCI_BASE_ADDRESS_MEM_PREFETCH) ? "" : "non-");
 479           if (!virtual && !(cmd & PCI_COMMAND_MEMORY))
 480             printf(" [disabled]");
 481         }
 482       show_size(len);
 483       putchar('\n');
 484     }
 485 }
 486
 487 static void
 488 show_rom(struct device *d, int reg)
 489 {
 490   struct pci_dev *p = d->dev;
 491   pciaddr_t rom = p->rom_base_addr;
 492   pciaddr_t len = (p->known_fields & PCI_FILL_SIZES) ? p->rom_size : 0;
 493   pciaddr_t ioflg = (p->known_fields & PCI_FILL_IO_FLAGS) ? p->rom_flags : 0;
 494   u32 flg = get_conf_long(d, reg);
 495   word cmd = get_conf_word(d, PCI_COMMAND);
 496   int virtual = 0;
 497
 498   if (!rom && !flg && !len)
 499     return;
 500   putchar('\t');
 501   if (ioflg & PCI_IORESOURCE_PCI_EA_BEI)
 502       printf("[enhanced] ");
 503   else if ((rom & PCI_ROM_ADDRESS_MASK) && !(flg & PCI_ROM_ADDRESS_MASK))
 504     {
 505       printf("[virtual] ");
 506       flg = rom;
 507       virtual = 1;
 508     }
 509   printf("Expansion ROM at ");
 510   if (rom & PCI_ROM_ADDRESS_MASK)
 511     printf(PCIADDR_T_FMT, rom & PCI_ROM_ADDRESS_MASK);
 512   else if (flg & PCI_ROM_ADDRESS_MASK)
 513     printf("<ignored>");
 514   else
 515     printf("<unassigned>");
 516   if (!(flg & PCI_ROM_ADDRESS_ENABLE))
 517     printf(" [disabled]");
 518   else if (!virtual && !(cmd & PCI_COMMAND_MEMORY))
 519     printf(" [disabled by cmd]");
 520   show_size(len);
 521   putchar('\n');
 522 }
 523
 524 static void
 525 show_htype0(struct device *d)
 526 {
 527   show_bases(d, 6);
 528   show_rom(d, PCI_ROM_ADDRESS);
 529   show_caps(d, PCI_CAPABILITY_LIST);
 530 }
 531
 532 static void
 533 show_htype1(struct device *d)
 534 {
 535   u32 io_base = get_conf_byte(d, PCI_IO_BASE);
 536   u32 io_limit = get_conf_byte(d, PCI_IO_LIMIT);
 537   u32 io_type = io_base & PCI_IO_RANGE_TYPE_MASK;
 538   u32 mem_base = get_conf_word(d, PCI_MEMORY_BASE);
 539   u32 mem_limit = get_conf_word(d, PCI_MEMORY_LIMIT);
 540   u32 mem_type = mem_base & PCI_MEMORY_RANGE_TYPE_MASK;
 541   u32 pref_base = get_conf_word(d, PCI_PREF_MEMORY_BASE);
 542   u32 pref_limit = get_conf_word(d, PCI_PREF_MEMORY_LIMIT);
 543   u32 pref_type = pref_base & PCI_PREF_RANGE_TYPE_MASK;
 544   word sec_stat = get_conf_word(d, PCI_SEC_STATUS);
 545   word brc = get_conf_word(d, PCI_BRIDGE_CONTROL);
 546
 547   show_bases(d, 2);
 548   printf("\tBus: primary=%02x, secondary=%02x, subordinate=%02x, sec-latency=%d\n",
 549          get_conf_byte(d, PCI_PRIMARY_BUS),
 550          get_conf_byte(d, PCI_SECONDARY_BUS),
 551          get_conf_byte(d, PCI_SUBORDINATE_BUS),
 552          get_conf_byte(d, PCI_SEC_LATENCY_TIMER));
 553
 554   if (io_type != (io_limit & PCI_IO_RANGE_TYPE_MASK) ||
 555       (io_type != PCI_IO_RANGE_TYPE_16 && io_type != PCI_IO_RANGE_TYPE_32))
 556     printf("\t!!! Unknown I/O range types %x/%x\n", io_base, io_limit);
 557   else
 558     {
 559       io_base = (io_base & PCI_IO_RANGE_MASK) << 8;
 560       io_limit = (io_limit & PCI_IO_RANGE_MASK) << 8;
 561       if (io_type == PCI_IO_RANGE_TYPE_32)
 562         {
 563           io_base |= (get_conf_word(d, PCI_IO_BASE_UPPER16) << 16);
 564           io_limit |= (get_conf_word(d, PCI_IO_LIMIT_UPPER16) << 16);
 565         }
 566       show_range("\tI/O behind bridge", io_base, io_limit+0xfff, 0);
 567     }
 568
 569   if (mem_type != (mem_limit & PCI_MEMORY_RANGE_TYPE_MASK) ||
 570       mem_type)
 571     printf("\t!!! Unknown memory range types %x/%x\n", mem_base, mem_limit);
 572   else
 573     {
 574       mem_base = (mem_base & PCI_MEMORY_RANGE_MASK) << 16;
 575       mem_limit = (mem_limit & PCI_MEMORY_RANGE_MASK) << 16;
 576       show_range("\tMemory behind bridge", mem_base, mem_limit + 0xfffff, 0);
 577     }
 578
 579   if (pref_type != (pref_limit & PCI_PREF_RANGE_TYPE_MASK) ||
 580       (pref_type != PCI_PREF_RANGE_TYPE_32 && pref_type != PCI_PREF_RANGE_TYPE_64))
 581     printf("\t!!! Unknown prefetchable memory range types %x/%x\n", pref_base, pref_limit);
 582   else
 583     {
 584       u64 pref_base_64 = (pref_base & PCI_PREF_RANGE_MASK) << 16;
 585       u64 pref_limit_64 = (pref_limit & PCI_PREF_RANGE_MASK) << 16;
 586       if (pref_type == PCI_PREF_RANGE_TYPE_64)
 587         {
 588           pref_base_64 |= (u64) get_conf_long(d, PCI_PREF_BASE_UPPER32) << 32;
 589           pref_limit_64 |= (u64) get_conf_long(d, PCI_PREF_LIMIT_UPPER32) << 32;
 590         }
 591       show_range("\tPrefetchable memory behind bridge", pref_base_64, pref_limit_64 + 0xfffff, (pref_type == PCI_PREF_RANGE_TYPE_64));
 592     }
 593
 594   if (verbose > 1)
 595     printf("\tSecondary status: 66MHz%c FastB2B%c ParErr%c DEVSEL=%s >TAbort%c <TAbort%c <MAbort%c <SERR%c <PERR%c\n",
 596              FLAG(sec_stat, PCI_STATUS_66MHZ),
 597              FLAG(sec_stat, PCI_STATUS_FAST_BACK),
 598              FLAG(sec_stat, PCI_STATUS_PARITY),
 599              ((sec_stat & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_SLOW) ? "slow" :
 600              ((sec_stat & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_MEDIUM) ? "medium" :
 601              ((sec_stat & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_FAST) ? "fast" : "??",
 602              FLAG(sec_stat, PCI_STATUS_SIG_TARGET_ABORT),
 603              FLAG(sec_stat, PCI_STATUS_REC_TARGET_ABORT),
 604              FLAG(sec_stat, PCI_STATUS_REC_MASTER_ABORT),
 605              FLAG(sec_stat, PCI_STATUS_SIG_SYSTEM_ERROR),
 606              FLAG(sec_stat, PCI_STATUS_DETECTED_PARITY));
 607
 608   show_rom(d, PCI_ROM_ADDRESS1);
 609
 610   if (verbose > 1)
 611     {
 612       printf("\tBridgeCtl: Parity%c SERR%c NoISA%c VGA%c VGA16%c MAbort%c >Reset%c FastB2B%c\n",
 613         FLAG(brc, PCI_BRIDGE_CTL_PARITY),
 614         FLAG(brc, PCI_BRIDGE_CTL_SERR),
 615         FLAG(brc, PCI_BRIDGE_CTL_NO_ISA),
 616         FLAG(brc, PCI_BRIDGE_CTL_VGA),
 617         FLAG(brc, PCI_BRIDGE_CTL_VGA_16BIT),
 618         FLAG(brc, PCI_BRIDGE_CTL_MASTER_ABORT),
 619         FLAG(brc, PCI_BRIDGE_CTL_BUS_RESET),
 620         FLAG(brc, PCI_BRIDGE_CTL_FAST_BACK));
 621       printf("\t\tPriDiscTmr%c SecDiscTmr%c DiscTmrStat%c DiscTmrSERREn%c\n",
 622         FLAG(brc, PCI_BRIDGE_CTL_PRI_DISCARD_TIMER),
 623         FLAG(brc, PCI_BRIDGE_CTL_SEC_DISCARD_TIMER),
 624         FLAG(brc, PCI_BRIDGE_CTL_DISCARD_TIMER_STATUS),
 625         FLAG(brc, PCI_BRIDGE_CTL_DISCARD_TIMER_SERR_EN));
 626     }
 627
 628   show_caps(d, PCI_CAPABILITY_LIST);
 629 }
 630
 631 static void
 632 show_htype2(struct device *d)
 633 {
 634   int i;
 635   word cmd = get_conf_word(d, PCI_COMMAND);
 636   word brc = get_conf_word(d, PCI_CB_BRIDGE_CONTROL);
 637   word exca;
 638   int verb = verbose > 2;
 639
 640   show_bases(d, 1);
 641   printf("\tBus: primary=%02x, secondary=%02x, subordinate=%02x, sec-latency=%d\n",
 642          get_conf_byte(d, PCI_CB_PRIMARY_BUS),
 643          get_conf_byte(d, PCI_CB_CARD_BUS),
 644          get_conf_byte(d, PCI_CB_SUBORDINATE_BUS),
 645          get_conf_byte(d, PCI_CB_LATENCY_TIMER));
 646   for (i=0; i<2; i++)
 647     {
 648       int p = 8*i;
 649       u32 base = get_conf_long(d, PCI_CB_MEMORY_BASE_0 + p);
 650       u32 limit = get_conf_long(d, PCI_CB_MEMORY_LIMIT_0 + p);
 651       limit = limit + 0xfff;
 652       if (base <= limit || verb)
 653         printf("\tMemory window %d: %08x-%08x%s%s\n", i, base, limit,
 654                (cmd & PCI_COMMAND_MEMORY) ? "" : " [disabled]",
 655                (brc & (PCI_CB_BRIDGE_CTL_PREFETCH_MEM0 << i)) ? " (prefetchable)" : "");
 656     }
 657   for (i=0; i<2; i++)
 658     {
 659       int p = 8*i;
 660       u32 base = get_conf_long(d, PCI_CB_IO_BASE_0 + p);
 661       u32 limit = get_conf_long(d, PCI_CB_IO_LIMIT_0 + p);
 662       if (!(base & PCI_IO_RANGE_TYPE_32))
 663         {
 664           base &= 0xffff;
 665           limit &= 0xffff;
 666         }
 667       base &= PCI_CB_IO_RANGE_MASK;
 668       limit = (limit & PCI_CB_IO_RANGE_MASK) + 3;
 669       if (base <= limit || verb)
 670         printf("\tI/O window %d: %08x-%08x%s\n", i, base, limit,
 671                (cmd & PCI_COMMAND_IO) ? "" : " [disabled]");
 672     }
 673
 674   if (get_conf_word(d, PCI_CB_SEC_STATUS) & PCI_STATUS_SIG_SYSTEM_ERROR)
 675     printf("\tSecondary status: SERR\n");
 676   if (verbose > 1)
 677     printf("\tBridgeCtl: Parity%c SERR%c ISA%c VGA%c MAbort%c >Reset%c 16bInt%c PostWrite%c\n",
 678            FLAG(brc, PCI_CB_BRIDGE_CTL_PARITY),
 679            FLAG(brc, PCI_CB_BRIDGE_CTL_SERR),
 680            FLAG(brc, PCI_CB_BRIDGE_CTL_ISA),
 681            FLAG(brc, PCI_CB_BRIDGE_CTL_VGA),
 682            FLAG(brc, PCI_CB_BRIDGE_CTL_MASTER_ABORT),
 683            FLAG(brc, PCI_CB_BRIDGE_CTL_CB_RESET),
 684            FLAG(brc, PCI_CB_BRIDGE_CTL_16BIT_INT),
 685            FLAG(brc, PCI_CB_BRIDGE_CTL_POST_WRITES));
 686
 687   if (d->config_cached < 128)
 688     {
 689       printf("\t<access denied to the rest>\n");
 690       return;
 691     }
 692
 693   exca = get_conf_word(d, PCI_CB_LEGACY_MODE_BASE);
 694   if (exca)
 695     printf("\t16-bit legacy interface ports at %04x\n", exca);
 696   show_caps(d, PCI_CB_CAPABILITY_LIST);
 697 }
 698
 699 static void
 700 show_verbose(struct device *d)
 701 {
 702   struct pci_dev *p = d->dev;
 703   word status = get_conf_word(d, PCI_STATUS);
 704   word cmd = get_conf_word(d, PCI_COMMAND);
 705   word class = p->device_class;
 706   byte bist = get_conf_byte(d, PCI_BIST);
 707   byte htype = get_conf_byte(d, PCI_HEADER_TYPE) & 0x7f;
 708   byte latency = get_conf_byte(d, PCI_LATENCY_TIMER);
 709   byte cache_line = get_conf_byte(d, PCI_CACHE_LINE_SIZE);
 710   byte max_lat, min_gnt;
 711   byte int_pin = get_conf_byte(d, PCI_INTERRUPT_PIN);
 712   unsigned int irq;
 713   char *dt_node;
 714
 715   show_terse(d);
 716
 717   pci_fill_info(p, PCI_FILL_IRQ | PCI_FILL_BASES | PCI_FILL_ROM_BASE | PCI_FILL_SIZES |
 718     PCI_FILL_PHYS_SLOT | PCI_FILL_NUMA_NODE | PCI_FILL_DT_NODE);
 719   irq = p->irq;
 720
 721   switch (htype)
 722     {
 723     case PCI_HEADER_TYPE_NORMAL:
 724       if (class == PCI_CLASS_BRIDGE_PCI)
 725         printf("\t!!! Invalid class %04x for header type %02x\n", class, htype);
 726       max_lat = get_conf_byte(d, PCI_MAX_LAT);
 727       min_gnt = get_conf_byte(d, PCI_MIN_GNT);
 728       break;
 729     case PCI_HEADER_TYPE_BRIDGE:
 730       if ((class >> 8) != PCI_BASE_CLASS_BRIDGE)
 731         printf("\t!!! Invalid class %04x for header type %02x\n", class, htype);
 732       min_gnt = max_lat = 0;
 733       break;
 734     case PCI_HEADER_TYPE_CARDBUS:
 735       if ((class >> 8) != PCI_BASE_CLASS_BRIDGE)
 736         printf("\t!!! Invalid class %04x for header type %02x\n", class, htype);
 737       min_gnt = max_lat = 0;
 738       break;
 739     default:
 740       printf("\t!!! Unknown header type %02x\n", htype);
 741       return;
 742     }
 743
 744   if (p->phy_slot)
 745     printf("\tPhysical Slot: %s\n", p->phy_slot);
 746
 747   if (dt_node = pci_get_string_property(p, PCI_FILL_DT_NODE))
 748     printf("\tDevice tree node: %s\n", dt_node);
 749
 750   if (verbose > 1)
 751     {
 752       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",
 753              FLAG(cmd, PCI_COMMAND_IO),
 754              FLAG(cmd, PCI_COMMAND_MEMORY),
 755              FLAG(cmd, PCI_COMMAND_MASTER),
 756              FLAG(cmd, PCI_COMMAND_SPECIAL),
 757              FLAG(cmd, PCI_COMMAND_INVALIDATE),
 758              FLAG(cmd, PCI_COMMAND_VGA_PALETTE),
 759              FLAG(cmd, PCI_COMMAND_PARITY),
 760              FLAG(cmd, PCI_COMMAND_WAIT),
 761              FLAG(cmd, PCI_COMMAND_SERR),
 762              FLAG(cmd, PCI_COMMAND_FAST_BACK),
 763              FLAG(cmd, PCI_COMMAND_DISABLE_INTx));
 764       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",
 765              FLAG(status, PCI_STATUS_CAP_LIST),
 766              FLAG(status, PCI_STATUS_66MHZ),
 767              FLAG(status, PCI_STATUS_UDF),
 768              FLAG(status, PCI_STATUS_FAST_BACK),
 769              FLAG(status, PCI_STATUS_PARITY),
 770              ((status & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_SLOW) ? "slow" :
 771              ((status & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_MEDIUM) ? "medium" :
 772              ((status & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_FAST) ? "fast" : "??",
 773              FLAG(status, PCI_STATUS_SIG_TARGET_ABORT),
 774              FLAG(status, PCI_STATUS_REC_TARGET_ABORT),
 775              FLAG(status, PCI_STATUS_REC_MASTER_ABORT),
 776              FLAG(status, PCI_STATUS_SIG_SYSTEM_ERROR),
 777              FLAG(status, PCI_STATUS_DETECTED_PARITY),
 778              FLAG(status, PCI_STATUS_INTx));
 779       if (cmd & PCI_COMMAND_MASTER)
 780         {
 781           printf("\tLatency: %d", latency);
 782           if (min_gnt || max_lat)
 783             {
 784               printf(" (");
 785               if (min_gnt)
 786                 printf("%dns min", min_gnt*250);
 787               if (min_gnt && max_lat)
 788                 printf(", ");
 789               if (max_lat)
 790                 printf("%dns max", max_lat*250);
 791               putchar(')');
 792             }
 793           if (cache_line)
 794             printf(", Cache Line Size: %d bytes", cache_line * 4);
 795           putchar('\n');
 796         }
 797       if (int_pin || irq)
 798         printf("\tInterrupt: pin %c routed to IRQ " PCIIRQ_FMT "\n",
 799                (int_pin ? 'A' + int_pin - 1 : '?'), irq);
 800       if (p->numa_node != -1)
 801         printf("\tNUMA node: %d\n", p->numa_node);
 802     }
 803   else
 804     {
 805       printf("\tFlags: ");
 806       if (cmd & PCI_COMMAND_MASTER)
 807         printf("bus master, ");
 808       if (cmd & PCI_COMMAND_VGA_PALETTE)
 809         printf("VGA palette snoop, ");
 810       if (cmd & PCI_COMMAND_WAIT)
 811         printf("stepping, ");
 812       if (cmd & PCI_COMMAND_FAST_BACK)
 813         printf("fast Back2Back, ");
 814       if (status & PCI_STATUS_66MHZ)
 815         printf("66MHz, ");
 816       if (status & PCI_STATUS_UDF)
 817         printf("user-definable features, ");
 818       printf("%s devsel",
 819              ((status & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_SLOW) ? "slow" :
 820              ((status & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_MEDIUM) ? "medium" :
 821              ((status & PCI_STATUS_DEVSEL_MASK) == PCI_STATUS_DEVSEL_FAST) ? "fast" : "??");
 822       if (cmd & PCI_COMMAND_MASTER)
 823         printf(", latency %d", latency);
 824       if (irq)
 825         printf(", IRQ " PCIIRQ_FMT, irq);
 826       if (p->numa_node != -1)
 827         printf(", NUMA node %d", p->numa_node);
 828       putchar('\n');
 829     }
 830
 831   if (bist & PCI_BIST_CAPABLE)
 832     {
 833       if (bist & PCI_BIST_START)
 834         printf("\tBIST is running\n");
 835       else
 836         printf("\tBIST result: %02x\n", bist & PCI_BIST_CODE_MASK);
 837     }
 838
 839   switch (htype)
 840     {
 841     case PCI_HEADER_TYPE_NORMAL:
 842       show_htype0(d);
 843       break;
 844     case PCI_HEADER_TYPE_BRIDGE:
 845       show_htype1(d);
 846       break;
 847     case PCI_HEADER_TYPE_CARDBUS:
 848       show_htype2(d);
 849       break;
 850     }
 851 }
 852
 853 /*** Machine-readable dumps ***/
 854
 855 static void
 856 show_hex_dump(struct device *d)
 857 {
 858   unsigned int i, cnt;
 859
 860   cnt = d->config_cached;
 861   if (opt_hex >= 3 && config_fetch(d, cnt, 256-cnt))
 862     {
 863       cnt = 256;
 864       if (opt_hex >= 4 && config_fetch(d, 256, 4096-256))
 865         cnt = 4096;
 866     }
 867
 868   for (i=0; i<cnt; i++)
 869     {
 870       if (! (i & 15))
 871         printf("%02x:", i);
 872       printf(" %02x", get_conf_byte(d, i));
 873       if ((i & 15) == 15)
 874         putchar('\n');
 875     }
 876 }
 877
 878 static void
 879 print_shell_escaped(char *c)
 880 {
 881   printf(" \"");
 882   while (*c)
 883     {
 884       if (*c == '"' || *c == '\\')
 885         putchar('\\');
 886       putchar(*c++);
 887     }
 888   putchar('"');
 889 }
 890
 891 static void
 892 show_machine(struct device *d)
 893 {
 894   struct pci_dev *p = d->dev;
 895   int c;
 896   word sv_id, sd_id;
 897   char classbuf[128], vendbuf[128], devbuf[128], svbuf[128], sdbuf[128];
 898   char *dt_node;
 899
 900   get_subid(d, &sv_id, &sd_id);
 901
 902   if (verbose)
 903     {
 904       pci_fill_info(p, PCI_FILL_PHYS_SLOT | PCI_FILL_NUMA_NODE | PCI_FILL_DT_NODE);
 905       printf((opt_machine >= 2) ? "Slot:\t" : "Device:\t");
 906       show_slot_name(d);
 907       putchar('\n');
 908       printf("Class:\t%s\n",
 909              pci_lookup_name(pacc, classbuf, sizeof(classbuf), PCI_LOOKUP_CLASS, p->device_class));
 910       printf("Vendor:\t%s\n",
 911              pci_lookup_name(pacc, vendbuf, sizeof(vendbuf), PCI_LOOKUP_VENDOR, p->vendor_id, p->device_id));
 912       printf("Device:\t%s\n",
 913              pci_lookup_name(pacc, devbuf, sizeof(devbuf), PCI_LOOKUP_DEVICE, p->vendor_id, p->device_id));
 914       if (sv_id && sv_id != 0xffff)
 915         {
 916           printf("SVendor:\t%s\n",
 917                  pci_lookup_name(pacc, svbuf, sizeof(svbuf), PCI_LOOKUP_SUBSYSTEM | PCI_LOOKUP_VENDOR, sv_id));
 918           printf("SDevice:\t%s\n",
 919                  pci_lookup_name(pacc, sdbuf, sizeof(sdbuf), PCI_LOOKUP_SUBSYSTEM | PCI_LOOKUP_DEVICE, p->vendor_id, p->device_id, sv_id, sd_id));
 920         }
 921       if (p->phy_slot)
 922         printf("PhySlot:\t%s\n", p->phy_slot);
 923       if (c = get_conf_byte(d, PCI_REVISION_ID))
 924         printf("Rev:\t%02x\n", c);
 925       if (c = get_conf_byte(d, PCI_CLASS_PROG))
 926         printf("ProgIf:\t%02x\n", c);
 927       if (opt_kernel)
 928         show_kernel_machine(d);
 929       if (p->numa_node != -1)
 930         printf("NUMANode:\t%d\n", p->numa_node);
 931       if (dt_node = pci_get_string_property(p, PCI_FILL_DT_NODE))
 932         printf("DTNode:\t%s\n", dt_node);
 933     }
 934   else
 935     {
 936       show_slot_name(d);
 937       print_shell_escaped(pci_lookup_name(pacc, classbuf, sizeof(classbuf), PCI_LOOKUP_CLASS, p->device_class));
 938       print_shell_escaped(pci_lookup_name(pacc, vendbuf, sizeof(vendbuf), PCI_LOOKUP_VENDOR, p->vendor_id, p->device_id));
 939       print_shell_escaped(pci_lookup_name(pacc, devbuf, sizeof(devbuf), PCI_LOOKUP_DEVICE, p->vendor_id, p->device_id));
 940       if (c = get_conf_byte(d, PCI_REVISION_ID))
 941         printf(" -r%02x", c);
 942       if (c = get_conf_byte(d, PCI_CLASS_PROG))
 943         printf(" -p%02x", c);
 944       if (sv_id && sv_id != 0xffff)
 945         {
 946           print_shell_escaped(pci_lookup_name(pacc, svbuf, sizeof(svbuf), PCI_LOOKUP_SUBSYSTEM | PCI_LOOKUP_VENDOR, sv_id));
 947           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));
 948         }
 949       else
 950         printf(" \"\" \"\"");
 951       putchar('\n');
 952     }
 953 }
 954
 955 /*** Main show function ***/
 956
 957 void
 958 show_device(struct device *d)
 959 {
 960   if (opt_machine)
 961     show_machine(d);
 962   else
 963     {
 964       if (verbose)
 965         show_verbose(d);
 966       else
 967         show_terse(d);
 968       if (opt_kernel || verbose)
 969         show_kernel(d);
 970     }
 971   if (opt_hex)
 972     show_hex_dump(d);
 973   if (verbose || opt_hex)
 974     putchar('\n');
 975 }
 976
 977 static void
 978 show(void)
 979 {
 980   struct device *d;
 981
 982   for (d=first_dev; d; d=d->next)
 983     if (pci_filter_match(&filter, d->dev))
 984       show_device(d);
 985 }
 986
 987 /* Main */
 988
 989 int
 990 main(int argc, char **argv)
 991 {
 992   int i;
 993   char *msg;
 994
 995   if (argc == 2 && !strcmp(argv[1], "--version"))
 996     {
 997       puts("lspci version " PCIUTILS_VERSION);
 998       return 0;
 999     }
1000
1001   pacc = pci_alloc();
1002   pacc->error = die;
1003   pci_filter_init(pacc, &filter);
1004
1005   while ((i = getopt(argc, argv, options)) != -1)
1006     switch (i)
1007       {
1008       case 'n':
1009         pacc->numeric_ids++;
1010         break;
1011       case 'v':
1012         verbose++;
1013         break;
1014       case 'b':
1015         pacc->buscentric = 1;
1016         break;
1017       case 's':
1018         if (msg = pci_filter_parse_slot(&filter, optarg))
1019           die("-s: %s", msg);
1020         opt_filter = 1;
1021         break;
1022       case 'd':
1023         if (msg = pci_filter_parse_id(&filter, optarg))
1024           die("-d: %s", msg);
1025         opt_filter = 1;
1026         break;
1027       case 'x':
1028         opt_hex++;
1029         break;
1030       case 'P':
1031         opt_path++;
1032         need_topology = 1;
1033         break;
1034       case 't':
1035         opt_tree++;
1036         need_topology = 1;
1037         break;
1038       case 'i':
1039         pci_set_name_list_path(pacc, optarg, 0);
1040         break;
1041       case 'm':
1042         opt_machine++;
1043         break;
1044       case 'p':
1045         opt_pcimap = optarg;
1046         break;
1047 #ifdef PCI_OS_LINUX
1048       case 'k':
1049         opt_kernel++;
1050         break;
1051 #endif
1052       case 'M':
1053         opt_map_mode++;
1054         break;
1055       case 'D':
1056         opt_domains = 2;
1057         break;
1058 #ifdef PCI_USE_DNS
1059       case 'q':
1060         opt_query_dns++;
1061         break;
1062       case 'Q':
1063         opt_query_all = 1;
1064         break;
1065 #else
1066       case 'q':
1067       case 'Q':
1068         die("DNS queries are not available in this version");
1069 #endif
1070       default:
1071         if (parse_generic_option(i, pacc, optarg))
1072           break;
1073       bad:
1074         fprintf(stderr, help_msg, pacc->id_file_name);
1075         return 1;
1076       }
1077   if (optind < argc)
1078     goto bad;
1079
1080   if (opt_tree && opt_filter)
1081     die("Tree mode does not support filtering");
1082
1083   if (opt_query_dns)
1084     {
1085       pacc->id_lookup_mode |= PCI_LOOKUP_NETWORK;
1086       if (opt_query_dns > 1)
1087         pacc->id_lookup_mode |= PCI_LOOKUP_REFRESH_CACHE;
1088     }
1089   if (opt_query_all)
1090     pacc->id_lookup_mode |= PCI_LOOKUP_NETWORK | PCI_LOOKUP_SKIP_LOCAL;
1091
1092   pci_init(pacc);
1093   if (opt_map_mode)
1094     {
1095       if (need_topology)
1096         die("Bus mapping mode does not recognize bus topology");
1097       map_the_bus();
1098     }
1099   else
1100     {
1101       scan_devices();
1102       sort_them();
1103       if (need_topology)
1104         grow_tree();
1105       if (opt_tree)
1106         show_forest();
1107       else
1108         show();
1109     }
1110   show_kernel_cleanup();
1111   pci_cleanup(pacc);
1112
1113   return (seen_errors ? 2 : 0);
1114 }