]> mj.ucw.cz Git - pciutils.git/blobdiff - lspci.c
Introduced API for selection of access methods.
[pciutils.git] / lspci.c
diff --git a/lspci.c b/lspci.c
index a154527b96b0b897e327d9c883819bd64736a897..7879f9b88c51fa3ff0a897a395ada2cba56dcc4a 100644 (file)
--- a/lspci.c
+++ b/lspci.c
@@ -1,7 +1,7 @@
 /*
  *     The PCI Utilities -- List All PCI Devices
  *
- *     Copyright (c) 1997--2007 Martin Mares <mj@ucw.cz>
+ *     Copyright (c) 1997--2008 Martin Mares <mj@ucw.cz>
  *
  *     Can be freely distributed and used under the terms of the GNU GPL.
  */
 /* Options */
 
 static int verbose;                    /* Show detailed information */
-static int buscentric_view;            /* Show bus addresses/IRQ's instead of CPU-visible ones */
-static int show_hex;                   /* Show contents of config space as hexadecimal numbers */
+static int opt_buscentric;             /* Show bus addresses/IRQ's instead of CPU-visible ones */
+static int opt_hex;                    /* Show contents of config space as hexadecimal numbers */
 static struct pci_filter filter;       /* Device filter */
-static int show_tree;                  /* Show bus tree */
-static int machine_readable;           /* Generate machine-readable output */
-static int map_mode;                   /* Bus mapping mode enabled */
-static int show_domains;               /* Show domain numbers (0=disabled, 1=auto-detected, 2=requested) */
+static int opt_tree;                   /* Show bus tree */
+static int opt_machine;                        /* Generate machine-readable output */
+static int opt_map_mode;               /* Bus mapping mode enabled */
+static int opt_domains;                        /* Show domain numbers (0=disabled, 1=auto-detected, 2=requested) */
+static int opt_kernel;                 /* Show kernel drivers */
+static int opt_query_dns;              /* Query the DNS (0=disabled, 1=enabled, 2=refresh cache) */
+static int opt_query_all;              /* Query the DNS for all entries */
+static char *opt_pcimap;               /* Override path to Linux modules.pcimap */
 
 const char program_name[] = "lspci";
 
-static char options[] = "nvbxs:d:ti:mgMD" GENERIC_OPTIONS ;
-
-static char help_msg[] = "\
-Usage: lspci [<switches>]\n\
-\n\
--v\t\tBe verbose\n\
--n\t\tShow numeric ID's\n\
--nn\t\tShow both textual and numeric ID's (names & numbers)\n\
--b\t\tBus-centric view (PCI addresses and IRQ's instead of those seen by the CPU)\n\
--x\t\tShow hex-dump of the standard portion of config space\n\
--xxx\t\tShow hex-dump of the whole config space (dangerous; root only)\n\
--xxxx\t\tShow hex-dump of the 4096-byte extended config space (root only)\n\
--s [[[[<domain>]:]<bus>]:][<slot>][.[<func>]]\tShow only devices in selected slots\n\
--d [<vendor>]:[<device>]\tShow only selected devices\n\
--t\t\tShow bus tree\n\
--m\t\tProduce machine-readable output\n\
--i <file>\tUse specified ID database instead of %s\n\
--D\t\tAlways show domain numbers\n\
--M\t\tEnable `bus mapping' mode (dangerous; root only)\n"
+static char options[] = "nvbxs:d:ti:mgp:qkMDQ" GENERIC_OPTIONS ;
+
+static char help_msg[] =
+"Usage: lspci [<switches>]\n"
+"\n"
+"-v\t\tBe verbose\n"
+"-n\t\tShow numeric ID's\n"
+"-nn\t\tShow both textual and numeric ID's (names & numbers)\n"
+#ifdef PCI_USE_DNS
+"-q\t\tQuery the PCI ID database for unknown ID's via DNS\n"
+"-qq\t\tAs above, but re-query locally cached entries\n"
+"-Q\t\tQuery the PCI ID database for all ID's via DNS\n"
+#endif
+"-b\t\tBus-centric view (PCI addresses and IRQ's instead of those seen by the CPU)\n"
+"-x\t\tShow hex-dump of the standard portion of config space\n"
+"-xxx\t\tShow hex-dump of the whole config space (dangerous; root only)\n"
+"-xxxx\t\tShow hex-dump of the 4096-byte extended config space (root only)\n"
+"-s [[[[<domain>]:]<bus>]:][<slot>][.[<func>]]\tShow only devices in selected slots\n"
+"-d [<vendor>]:[<device>]\tShow only selected devices\n"
+"-t\t\tShow bus tree\n"
+"-m\t\tProduce machine-readable output\n"
+"-i <file>\tUse specified ID database instead of %s\n"
+#ifdef PCI_OS_LINUX
+"-k\t\tShow kernel drivers handling each device\n"
+"-p <file>\tLook up kernel modules in a given file instead of default modules.pcimap\n"
+#endif
+"-D\t\tAlways show domain numbers\n"
+"-M\t\tEnable `bus mapping' mode (dangerous; root only)\n"
 GENERIC_HELP
 ;
 
-/* Communication with libpci */
+/*** Communication with libpci ***/
 
 static struct pci_access *pacc;
 
@@ -67,7 +80,7 @@ static struct pci_access *pacc;
 #define alloca xmalloc
 #endif
 
-/* Our view of the PCI bus */
+/*** Our view of the PCI bus ***/
 
 struct device {
   struct device *next;
@@ -113,8 +126,8 @@ scan_device(struct pci_dev *p)
 {
   struct device *d;
 
-  if (p->domain && !show_domains)
-    show_domains = 1;
+  if (p->domain && !opt_domains)
+    opt_domains = 1;
   if (!pci_filter_match(&filter, p))
     return NULL;
   d = xmalloc(sizeof(struct device));
@@ -158,7 +171,7 @@ scan_devices(void)
       }
 }
 
-/* Config space accesses */
+/*** Config space accesses ***/
 
 static void
 check_conf_range(struct device *d, unsigned int pos, unsigned int len)
@@ -194,7 +207,7 @@ get_conf_long(struct device *d, unsigned int pos)
     (d->config[pos+3] << 24);
 }
 
-/* Sorting */
+/*** Sorting ***/
 
 static int
 compare_them(const void *A, const void *B)
@@ -246,7 +259,7 @@ sort_them(void)
   *last_dev = NULL;
 }
 
-/* Normal output */
+/*** Normal output ***/
 
 #define FLAG(x,y) ((x & y) ? '+' : '-')
 
@@ -255,7 +268,7 @@ show_slot_name(struct device *d)
 {
   struct pci_dev *p = d->dev;
 
-  if (!machine_readable ? show_domains : (p->domain || show_domains >= 2))
+  if (!opt_machine ? opt_domains : (p->domain || opt_domains >= 2))
     printf("%04x:", p->domain);
   printf("%02x:%02x.%d", p->bus, p->dev, p->func);
 }
@@ -296,112 +309,28 @@ show_terse(struct device *d)
 }
 
 static void
-show_size(pciaddr_t x)
-{
-  if (!x)
-    return;
-  printf(" [size=");
-  if (x < 1024)
-    printf("%d", (int) x);
-  else if (x < 1048576)
-    printf("%dK", (int)(x / 1024));
-  else if (x < 0x80000000)
-    printf("%dM", (int)(x / 1048576));
-  else
-    printf(PCIADDR_T_FMT, x);
-  putchar(']');
-}
-
-static void
-show_bases(struct device *d, int cnt)
+get_subid(struct device *d, word *subvp, word *subdp)
 {
-  struct pci_dev *p = d->dev;
-  word cmd = get_conf_word(d, PCI_COMMAND);
-  int i;
+  byte htype = get_conf_byte(d, PCI_HEADER_TYPE) & 0x7f;
 
-  for(i=0; i<cnt; i++)
+  if (htype == PCI_HEADER_TYPE_NORMAL)
     {
-      pciaddr_t pos = p->base_addr[i];
-      pciaddr_t len = (p->known_fields & PCI_FILL_SIZES) ? p->size[i] : 0;
-      u32 flg = get_conf_long(d, PCI_BASE_ADDRESS_0 + 4*i);
-      if (flg == 0xffffffff)
-       flg = 0;
-      if (!pos && !flg && !len)
-       continue;
-      if (verbose > 1)
-       printf("\tRegion %d: ", i);
-      else
-       putchar('\t');
-      if (pos && !flg)                 /* Reported by the OS, but not by the device */
-       {
-         printf("[virtual] ");
-         flg = pos;
-       }
-      if (flg & PCI_BASE_ADDRESS_SPACE_IO)
-       {
-         pciaddr_t a = pos & PCI_BASE_ADDRESS_IO_MASK;
-         printf("I/O ports at ");
-         if (a)
-           printf(PCIADDR_PORT_FMT, a);
-         else if (flg & PCI_BASE_ADDRESS_IO_MASK)
-           printf("<ignored>");
-         else
-           printf("<unassigned>");
-         if (!(cmd & PCI_COMMAND_IO))
-           printf(" [disabled]");
-       }
-      else
-       {
-         int t = flg & PCI_BASE_ADDRESS_MEM_TYPE_MASK;
-         pciaddr_t a = pos & PCI_ADDR_MEM_MASK;
-         int done = 0;
-         u32 z = 0;
-
-         printf("Memory at ");
-         if (t == PCI_BASE_ADDRESS_MEM_TYPE_64)
-           {
-             if (i >= cnt - 1)
-               {
-                 printf("<invalid-64bit-slot>");
-                 done = 1;
-               }
-             else
-               {
-                 i++;
-                 z = get_conf_long(d, PCI_BASE_ADDRESS_0 + 4*i);
-                 if (buscentric_view)
-                   {
-                     u32 y = a & 0xffffffff;
-                     if (a || z)
-                       printf("%08x%08x", z, y);
-                     else
-                       printf("<unassigned>");
-                     done = 1;
-                   }
-               }
-           }
-         if (!done)
-           {
-             if (a)
-               printf(PCIADDR_T_FMT, a);
-             else
-               printf(((flg & PCI_BASE_ADDRESS_MEM_MASK) || z) ? "<ignored>" : "<unassigned>");
-           }
-         printf(" (%s, %sprefetchable)",
-                (t == PCI_BASE_ADDRESS_MEM_TYPE_32) ? "32-bit" :
-                (t == PCI_BASE_ADDRESS_MEM_TYPE_64) ? "64-bit" :
-                (t == PCI_BASE_ADDRESS_MEM_TYPE_1M) ? "low-1M" : "type 3",
-                (flg & PCI_BASE_ADDRESS_MEM_PREFETCH) ? "" : "non-");
-         if (!(cmd & PCI_COMMAND_MEMORY))
-           printf(" [disabled]");
-       }
-      show_size(len);
-      putchar('\n');
+      *subvp = get_conf_word(d, PCI_SUBSYSTEM_VENDOR_ID);
+      *subdp = get_conf_word(d, PCI_SUBSYSTEM_ID);
+    }
+  else if (htype == PCI_HEADER_TYPE_CARDBUS && d->config_cached >= 128)
+    {
+      *subvp = get_conf_word(d, PCI_CB_SUBSYSTEM_VENDOR_ID);
+      *subdp = get_conf_word(d, PCI_CB_SUBSYSTEM_ID);
     }
+  else
+    *subvp = *subdp = 0xffff;
 }
 
+/*** Capabilities ***/
+
 static void
-show_pm(struct device *d, int where, int cap)
+cap_pm(struct device *d, int where, int cap)
 {
   int t, b;
   static int pm_aux_current[8] = { 0, 55, 100, 160, 220, 270, 320, 375 };
@@ -456,7 +385,7 @@ format_agp_rate(int rate, char *buf, int agp3)
 }
 
 static void
-show_agp(struct device *d, int where, int cap)
+cap_agp(struct device *d, int where, int cap)
 {
   u32 t;
   char rate[16];
@@ -502,7 +431,7 @@ show_agp(struct device *d, int where, int cap)
 }
 
 static void
-show_pcix_nobridge(struct device *d, int where)
+cap_pcix_nobridge(struct device *d, int where)
 {
   u16 command;
   u32 status;
@@ -541,7 +470,7 @@ show_pcix_nobridge(struct device *d, int where)
 }
 
 static void
-show_pcix_bridge(struct device *d, int where)
+cap_pcix_bridge(struct device *d, int where)
 {
   static const char * const sec_clock_freq[8] = { "conv", "66MHz", "100MHz", "133MHz", "?4", "?5", "?6", "?7" };
   u16 secstatus;
@@ -586,15 +515,15 @@ show_pcix_bridge(struct device *d, int where)
 }
 
 static void
-show_pcix(struct device *d, int where)
+cap_pcix(struct device *d, int where)
 {
   switch (get_conf_byte(d, PCI_HEADER_TYPE) & 0x7f)
     {
     case PCI_HEADER_TYPE_NORMAL:
-      show_pcix_nobridge(d, where);
+      cap_pcix_nobridge(d, where);
       break;
     case PCI_HEADER_TYPE_BRIDGE:
-      show_pcix_bridge(d, where);
+      cap_pcix_bridge(d, where);
       break;
     }
 }
@@ -615,7 +544,7 @@ ht_link_freq(unsigned freq)
 }
 
 static void
-show_ht_pri(struct device *d, int where, int cmd)
+cap_ht_pri(struct device *d, int where, int cmd)
 {
   u16 lctr0, lcnf0, lctr1, lcnf1, eh;
   u8 rid, lfrer0, lfcap0, ftr, lfrer1, lfcap1, mbu, mlu, bn;
@@ -783,7 +712,7 @@ show_ht_pri(struct device *d, int where, int cmd)
 }
 
 static void
-show_ht_sec(struct device *d, int where, int cmd)
+cap_ht_sec(struct device *d, int where, int cmd)
 {
   u16 lctr, lcnf, ftr, eh;
   u8 rid, lfrer, lfcap, mbu, mlu;
@@ -905,17 +834,17 @@ show_ht_sec(struct device *d, int where, int cmd)
 }
 
 static void
-show_ht(struct device *d, int where, int cmd)
+cap_ht(struct device *d, int where, int cmd)
 {
   int type;
 
   switch (cmd & PCI_HT_CMD_TYP_HI)
     {
     case PCI_HT_CMD_TYP_HI_PRI:
-      show_ht_pri(d, where, cmd);
+      cap_ht_pri(d, where, cmd);
       return;
     case PCI_HT_CMD_TYP_HI_SEC:
-      show_ht_sec(d, where, cmd);
+      cap_ht_sec(d, where, cmd);
       return;
     }
 
@@ -973,39 +902,7 @@ show_ht(struct device *d, int where, int cmd)
 }
 
 static void
-show_rom(struct device *d, int reg)
-{
-  struct pci_dev *p = d->dev;
-  pciaddr_t rom = p->rom_base_addr;
-  pciaddr_t len = (p->known_fields & PCI_FILL_SIZES) ? p->rom_size : 0;
-  u32 flg = get_conf_long(d, reg);
-  word cmd = get_conf_word(d, PCI_COMMAND);
-
-  if (!rom && !flg && !len)
-    return;
-  putchar('\t');
-  if ((rom & PCI_ROM_ADDRESS_MASK) && !(flg & PCI_ROM_ADDRESS_MASK))
-    {
-      printf("[virtual] ");
-      flg = rom;
-    }
-  printf("Expansion ROM at ");
-  if (rom & PCI_ROM_ADDRESS_MASK)
-    printf(PCIADDR_T_FMT, rom & PCI_ROM_ADDRESS_MASK);
-  else if (flg & PCI_ROM_ADDRESS_MASK)
-    printf("<ignored>");
-  else
-    printf("<unassigned>");
-  if (!(flg & PCI_ROM_ADDRESS_ENABLE))
-    printf(" [disabled]");
-  else if (!(cmd & PCI_COMMAND_MEMORY))
-    printf(" [disabled by cmd]");
-  show_size(len);
-  putchar('\n');
-}
-
-static void
-show_msi(struct device *d, int where, int cap)
+cap_msi(struct device *d, int where, int cap)
 {
   int is64;
   u32 t;
@@ -1073,7 +970,7 @@ static const char *latency_l1(int value)
   return latencies[value];
 }
 
-static void show_express_dev(struct device *d, int where, int type)
+static void cap_express_dev(struct device *d, int where, int type)
 {
   u32 t;
   u16 w;
@@ -1163,7 +1060,7 @@ static const char *aspm_enabled(int code)
   return desc[code];
 }
 
-static void show_express_link(struct device *d, int where, int type)
+static void cap_express_link(struct device *d, int where, int type)
 {
   u32 t;
   u16 w;
@@ -1214,7 +1111,7 @@ static const char *indicator(int code)
   return names[code];
 }
 
-static void show_express_slot(struct device *d, int where)
+static void cap_express_slot(struct device *d, int where)
 {
   u32 t;
   u16 w;
@@ -1263,7 +1160,7 @@ static void show_express_slot(struct device *d, int where)
        FLAG(w, PCI_EXP_SLTSTA_LLCHG));
 }
 
-static void show_express_root(struct device *d, int where)
+static void cap_express_root(struct device *d, int where)
 {
   u32 w = get_conf_word(d, where + PCI_EXP_RTCTL);
   printf("\t\tRootCtl: ErrCorrectable%c ErrNon-Fatal%c ErrFatal%c PMEIntEna%c CRSVisible%c\n",
@@ -1285,7 +1182,7 @@ static void show_express_root(struct device *d, int where)
 }
 
 static void
-show_express(struct device *d, int where, int cap)
+cap_express(struct device *d, int where, int cap)
 {
   int type = (cap & PCI_EXP_FLAGS_TYPE) >> 4;
   int size;
@@ -1340,16 +1237,16 @@ show_express(struct device *d, int where, int cap)
   if (!config_fetch(d, where + PCI_EXP_DEVCAP, size))
     return;
 
-  show_express_dev(d, where, type);
-  show_express_link(d, where, type);
+  cap_express_dev(d, where, type);
+  cap_express_link(d, where, type);
   if (slot)
-    show_express_slot(d, where);
+    cap_express_slot(d, where);
   if (type == PCI_EXP_TYPE_ROOT_PORT)
-    show_express_root(d, where);
+    cap_express_root(d, where);
 }
 
 static void
-show_msix(struct device *d, int where, int cap)
+cap_msix(struct device *d, int where, int cap)
 {
   u32 off;
 
@@ -1369,7 +1266,7 @@ show_msix(struct device *d, int where, int cap)
 }
 
 static void
-show_slotid(int cap)
+cap_slotid(int cap)
 {
   int esr = cap & 0xff;
   int chs = cap >> 8;
@@ -1381,7 +1278,7 @@ show_slotid(int cap)
 }
 
 static void
-show_ssvid(struct device *d, int where)
+cap_ssvid(struct device *d, int where)
 {
   u16 subsys_v, subsys_d;
   char ssnamebuf[256];
@@ -1397,7 +1294,7 @@ show_ssvid(struct device *d, int where)
 }
 
 static void
-show_dsn(struct device *d, int where)
+cap_dsn(struct device *d, int where)
 {
   u32 t1, t2;
   if (!config_fetch(d, where + 4, 8))
@@ -1410,7 +1307,7 @@ show_dsn(struct device *d, int where)
 }
 
 static void
-show_debug_port(int cap)
+cap_debug_port(int cap)
 {
   int bar = cap >> 13;
   int pos = cap & 0x1fff;
@@ -1449,7 +1346,7 @@ show_ext_caps(struct device *d)
            printf("Virtual Channel <?>\n");
            break;
          case PCI_EXT_CAP_ID_DSN:
-           show_dsn(d, where);
+           cap_dsn(d, where);
            break;
          case PCI_EXT_CAP_ID_PB:
            printf("Power Budgeting <?>\n");
@@ -1519,35 +1416,35 @@ show_caps(struct device *d)
          switch (id)
            {
            case PCI_CAP_ID_PM:
-             show_pm(d, where, cap);
+             cap_pm(d, where, cap);
              break;
            case PCI_CAP_ID_AGP:
-             show_agp(d, where, cap);
+             cap_agp(d, where, cap);
              break;
            case PCI_CAP_ID_VPD:
              printf("Vital Product Data <?>\n");
              break;
            case PCI_CAP_ID_SLOTID:
-             show_slotid(cap);
+             cap_slotid(cap);
              break;
            case PCI_CAP_ID_MSI:
-             show_msi(d, where, cap);
+             cap_msi(d, where, cap);
              break;
            case PCI_CAP_ID_CHSWP:
              printf("CompactPCI hot-swap <?>\n");
              break;
            case PCI_CAP_ID_PCIX:
-             show_pcix(d, where);
+             cap_pcix(d, where);
              can_have_ext_caps = 1;
              break;
            case PCI_CAP_ID_HT:
-             show_ht(d, where, cap);
+             cap_ht(d, where, cap);
              break;
            case PCI_CAP_ID_VNDR:
              printf("Vendor Specific Information <?>\n");
              break;
            case PCI_CAP_ID_DBG:
-             show_debug_port(cap);
+             cap_debug_port(cap);
              break;
            case PCI_CAP_ID_CCRC:
              printf("CompactPCI central resource control <?>\n");
@@ -1556,7 +1453,7 @@ show_caps(struct device *d)
              printf("Hot-plug capable\n");
              break;
            case PCI_CAP_ID_SSVID:
-             show_ssvid(d, where);
+             cap_ssvid(d, where);
              break;
            case PCI_CAP_ID_AGP3:
              printf("AGP3 <?>\n");
@@ -1565,11 +1462,17 @@ show_caps(struct device *d)
              printf("Secure device <?>\n");
              break;
            case PCI_CAP_ID_EXP:
-             show_express(d, where, cap);
+             cap_express(d, where, cap);
              can_have_ext_caps = 1;
              break;
            case PCI_CAP_ID_MSIX:
-             show_msix(d, where, cap);
+             cap_msix(d, where, cap);
+             break;
+           case PCI_CAP_ID_SATA:
+             printf("SATA HBA <?>\n");
+             break;
+           case PCI_CAP_ID_AF:
+             printf("PCIe advanced features <?>\n");
              break;
            default:
              printf("#%02x [%04x]\n", id, cap);
@@ -1581,6 +1484,327 @@ show_caps(struct device *d)
     show_ext_caps(d);
 }
 
+/*** Kernel drivers ***/
+
+#ifdef PCI_OS_LINUX
+
+#include <sys/utsname.h>
+
+struct pcimap_entry {
+  struct pcimap_entry *next;
+  unsigned int vendor, device;
+  unsigned int subvendor, subdevice;
+  unsigned int class, class_mask;
+  char module[1];
+};
+
+static struct pcimap_entry *pcimap_head;
+
+static void
+load_pcimap(void)
+{
+  static int tried_pcimap;
+  struct utsname uts;
+  char *name, line[1024];
+  FILE *f;
+
+  if (tried_pcimap)
+    return;
+  tried_pcimap = 1;
+
+  if (name = opt_pcimap)
+    {
+      f = fopen(name, "r");
+      if (!f)
+       die("Cannot open pcimap file %s: %m", name);
+    }
+  else
+    {
+      if (uname(&uts) < 0)
+       die("uname() failed: %m");
+      name = alloca(64 + strlen(uts.release));
+      sprintf(name, "/lib/modules/%s/modules.pcimap", uts.release);
+      f = fopen(name, "r");
+      if (!f)
+       return;
+    }
+
+  while (fgets(line, sizeof(line), f))
+    {
+      char *c = strchr(line, '\n');
+      struct pcimap_entry *e;
+
+      if (!c)
+       die("Unterminated or too long line in %s", name);
+      *c = 0;
+      if (!line[0] || line[0] == '#')
+       continue;
+
+      c = line;
+      while (*c && *c != ' ' && *c != '\t')
+       c++;
+      if (!*c)
+       continue;       /* FIXME: Emit warnings! */
+      *c++ = 0;
+
+      e = xmalloc(sizeof(*e) + strlen(line));
+      if (sscanf(c, "%i%i%i%i%i%i",
+                &e->vendor, &e->device,
+                &e->subvendor, &e->subdevice,
+                &e->class, &e->class_mask) != 6)
+       continue;
+      e->next = pcimap_head;
+      pcimap_head = e;
+      strcpy(e->module, line);
+    }
+  fclose(f);
+}
+
+static int
+match_pcimap(struct device *d, struct pcimap_entry *e)
+{
+  struct pci_dev *dev = d->dev;
+  unsigned int class = get_conf_long(d, PCI_REVISION_ID) >> 8;
+  word subv, subd;
+
+#define MATCH(x, y) ((y) > 0xffff || (x) == (y))
+  get_subid(d, &subv, &subd);
+  return
+    MATCH(dev->vendor_id, e->vendor) &&
+    MATCH(dev->device_id, e->device) &&
+    MATCH(subv, e->subvendor) &&
+    MATCH(subd, e->subdevice) &&
+    (class & e->class_mask) == e->class;
+#undef MATCH
+}
+
+#define DRIVER_BUF_SIZE 1024
+
+static char *
+find_driver(struct device *d, char *buf)
+{
+  struct pci_dev *dev = d->dev;
+  char name[1024], *drv, *base;
+  int n;
+
+  if (dev->access->method != PCI_ACCESS_SYS_BUS_PCI)
+    return NULL;
+
+  base = pci_get_param(dev->access, "sysfs.path");
+  if (!base || !base[0])
+    return NULL;
+
+  n = snprintf(name, sizeof(name), "%s/devices/%04x:%02x:%02x.%d/driver",
+              base, dev->domain, dev->bus, dev->dev, dev->func);
+  if (n < 0 || n >= (int)sizeof(name))
+    die("show_driver: sysfs device name too long, why?");
+
+  n = readlink(name, buf, DRIVER_BUF_SIZE);
+  if (n < 0)
+    return NULL;
+  if (n >= DRIVER_BUF_SIZE)
+    return "<name-too-long>";
+  buf[n] = 0;
+
+  if (drv = strrchr(buf, '/'))
+    return drv+1;
+  else
+    return buf;
+}
+
+static void
+show_kernel(struct device *d)
+{
+  char buf[DRIVER_BUF_SIZE];
+  char *driver;
+  struct pcimap_entry *e, *last = NULL;
+
+  if (driver = find_driver(d, buf))
+    printf("\tKernel driver in use: %s\n", driver);
+
+  load_pcimap();
+  for (e=pcimap_head; e; e=e->next)
+    if (match_pcimap(d, e) && (!last || strcmp(last->module, e->module)))
+      {
+       printf("%s %s", (last ? "," : "\tKernel modules:"), e->module);
+       last = e;
+      }
+  if (last)
+    putchar('\n');
+}
+
+static void
+show_kernel_machine(struct device *d)
+{
+  char buf[DRIVER_BUF_SIZE];
+  char *driver;
+  struct pcimap_entry *e, *last = NULL;
+
+  if (driver = find_driver(d, buf))
+    printf("Driver:\t%s\n", driver);
+
+  load_pcimap();
+  for (e=pcimap_head; e; e=e->next)
+    if (match_pcimap(d, e) && (!last || strcmp(last->module, e->module)))
+      {
+       printf("Module:\t%s\n", e->module);
+       last = e;
+      }
+}
+
+#else
+
+static void
+show_kernel(struct device *d UNUSED)
+{
+}
+
+static void
+show_kernel_machine(struct device *d UNUSED)
+{
+}
+
+#endif
+
+/*** Verbose output ***/
+
+static void
+show_size(pciaddr_t x)
+{
+  if (!x)
+    return;
+  printf(" [size=");
+  if (x < 1024)
+    printf("%d", (int) x);
+  else if (x < 1048576)
+    printf("%dK", (int)(x / 1024));
+  else if (x < 0x80000000)
+    printf("%dM", (int)(x / 1048576));
+  else
+    printf(PCIADDR_T_FMT, x);
+  putchar(']');
+}
+
+static void
+show_bases(struct device *d, int cnt)
+{
+  struct pci_dev *p = d->dev;
+  word cmd = get_conf_word(d, PCI_COMMAND);
+  int i;
+
+  for(i=0; i<cnt; i++)
+    {
+      pciaddr_t pos = p->base_addr[i];
+      pciaddr_t len = (p->known_fields & PCI_FILL_SIZES) ? p->size[i] : 0;
+      u32 flg = get_conf_long(d, PCI_BASE_ADDRESS_0 + 4*i);
+      if (flg == 0xffffffff)
+       flg = 0;
+      if (!pos && !flg && !len)
+       continue;
+      if (verbose > 1)
+       printf("\tRegion %d: ", i);
+      else
+       putchar('\t');
+      if (pos && !flg)                 /* Reported by the OS, but not by the device */
+       {
+         printf("[virtual] ");
+         flg = pos;
+       }
+      if (flg & PCI_BASE_ADDRESS_SPACE_IO)
+       {
+         pciaddr_t a = pos & PCI_BASE_ADDRESS_IO_MASK;
+         printf("I/O ports at ");
+         if (a)
+           printf(PCIADDR_PORT_FMT, a);
+         else if (flg & PCI_BASE_ADDRESS_IO_MASK)
+           printf("<ignored>");
+         else
+           printf("<unassigned>");
+         if (!(cmd & PCI_COMMAND_IO))
+           printf(" [disabled]");
+       }
+      else
+       {
+         int t = flg & PCI_BASE_ADDRESS_MEM_TYPE_MASK;
+         pciaddr_t a = pos & PCI_ADDR_MEM_MASK;
+         int done = 0;
+         u32 z = 0;
+
+         printf("Memory at ");
+         if (t == PCI_BASE_ADDRESS_MEM_TYPE_64)
+           {
+             if (i >= cnt - 1)
+               {
+                 printf("<invalid-64bit-slot>");
+                 done = 1;
+               }
+             else
+               {
+                 i++;
+                 z = get_conf_long(d, PCI_BASE_ADDRESS_0 + 4*i);
+                 if (opt_buscentric)
+                   {
+                     u32 y = a & 0xffffffff;
+                     if (a || z)
+                       printf("%08x%08x", z, y);
+                     else
+                       printf("<unassigned>");
+                     done = 1;
+                   }
+               }
+           }
+         if (!done)
+           {
+             if (a)
+               printf(PCIADDR_T_FMT, a);
+             else
+               printf(((flg & PCI_BASE_ADDRESS_MEM_MASK) || z) ? "<ignored>" : "<unassigned>");
+           }
+         printf(" (%s, %sprefetchable)",
+                (t == PCI_BASE_ADDRESS_MEM_TYPE_32) ? "32-bit" :
+                (t == PCI_BASE_ADDRESS_MEM_TYPE_64) ? "64-bit" :
+                (t == PCI_BASE_ADDRESS_MEM_TYPE_1M) ? "low-1M" : "type 3",
+                (flg & PCI_BASE_ADDRESS_MEM_PREFETCH) ? "" : "non-");
+         if (!(cmd & PCI_COMMAND_MEMORY))
+           printf(" [disabled]");
+       }
+      show_size(len);
+      putchar('\n');
+    }
+}
+
+static void
+show_rom(struct device *d, int reg)
+{
+  struct pci_dev *p = d->dev;
+  pciaddr_t rom = p->rom_base_addr;
+  pciaddr_t len = (p->known_fields & PCI_FILL_SIZES) ? p->rom_size : 0;
+  u32 flg = get_conf_long(d, reg);
+  word cmd = get_conf_word(d, PCI_COMMAND);
+
+  if (!rom && !flg && !len)
+    return;
+  putchar('\t');
+  if ((rom & PCI_ROM_ADDRESS_MASK) && !(flg & PCI_ROM_ADDRESS_MASK))
+    {
+      printf("[virtual] ");
+      flg = rom;
+    }
+  printf("Expansion ROM at ");
+  if (rom & PCI_ROM_ADDRESS_MASK)
+    printf(PCIADDR_T_FMT, rom & PCI_ROM_ADDRESS_MASK);
+  else if (flg & PCI_ROM_ADDRESS_MASK)
+    printf("<ignored>");
+  else
+    printf("<unassigned>");
+  if (!(flg & PCI_ROM_ADDRESS_ENABLE))
+    printf(" [disabled]");
+  else if (!(cmd & PCI_COMMAND_MEMORY))
+    printf(" [disabled by cmd]");
+  show_size(len);
+  putchar('\n');
+}
+
 static void
 show_htype0(struct device *d)
 {
@@ -1775,7 +1999,7 @@ show_verbose(struct device *d)
   byte max_lat, min_gnt;
   byte int_pin = get_conf_byte(d, PCI_INTERRUPT_PIN);
   unsigned int irq = p->irq;
-  word subsys_v = 0, subsys_d = 0;
+  word subsys_v, subsys_d;
   char ssnamebuf[256];
 
   show_terse(d);
@@ -1787,8 +2011,6 @@ show_verbose(struct device *d)
        printf("\t!!! Invalid class %04x for header type %02x\n", class, htype);
       max_lat = get_conf_byte(d, PCI_MAX_LAT);
       min_gnt = get_conf_byte(d, PCI_MIN_GNT);
-      subsys_v = get_conf_word(d, PCI_SUBSYSTEM_VENDOR_ID);
-      subsys_d = get_conf_word(d, PCI_SUBSYSTEM_ID);
       break;
     case PCI_HEADER_TYPE_BRIDGE:
       if ((class >> 8) != PCI_BASE_CLASS_BRIDGE)
@@ -1799,17 +2021,13 @@ show_verbose(struct device *d)
       if ((class >> 8) != PCI_BASE_CLASS_BRIDGE)
        printf("\t!!! Invalid class %04x for header type %02x\n", class, htype);
       min_gnt = max_lat = 0;
-      if (d->config_cached >= 128)
-       {
-         subsys_v = get_conf_word(d, PCI_CB_SUBSYSTEM_VENDOR_ID);
-         subsys_d = get_conf_word(d, PCI_CB_SUBSYSTEM_ID);
-       }
       break;
     default:
       printf("\t!!! Unknown header type %02x\n", htype);
       return;
     }
 
+  get_subid(d, &subsys_v, &subsys_d);
   if (subsys_v && subsys_v != 0xffff)
     printf("\tSubsystem: %s\n",
           pci_lookup_name(pacc, ssnamebuf, sizeof(ssnamebuf),
@@ -1915,16 +2133,18 @@ show_verbose(struct device *d)
     }
 }
 
+/*** Machine-readable dumps ***/
+
 static void
 show_hex_dump(struct device *d)
 {
   unsigned int i, cnt;
 
   cnt = d->config_cached;
-  if (show_hex >= 3 && config_fetch(d, cnt, 256-cnt))
+  if (opt_hex >= 3 && config_fetch(d, cnt, 256-cnt))
     {
       cnt = 256;
-      if (show_hex >= 4 && config_fetch(d, 256, 4096-256))
+      if (opt_hex >= 4 && config_fetch(d, 256, 4096-256))
        cnt = 4096;
     }
 
@@ -1956,27 +2176,14 @@ show_machine(struct device *d)
 {
   struct pci_dev *p = d->dev;
   int c;
-  word sv_id=0, sd_id=0;
+  word sv_id, sd_id;
   char classbuf[128], vendbuf[128], devbuf[128], svbuf[128], sdbuf[128];
 
-  switch (get_conf_byte(d, PCI_HEADER_TYPE) & 0x7f)
-    {
-    case PCI_HEADER_TYPE_NORMAL:
-      sv_id = get_conf_word(d, PCI_SUBSYSTEM_VENDOR_ID);
-      sd_id = get_conf_word(d, PCI_SUBSYSTEM_ID);
-      break;
-    case PCI_HEADER_TYPE_CARDBUS:
-      if (d->config_cached >= 128)
-       {
-         sv_id = get_conf_word(d, PCI_CB_SUBSYSTEM_VENDOR_ID);
-         sd_id = get_conf_word(d, PCI_CB_SUBSYSTEM_ID);
-       }
-      break;
-    }
+  get_subid(d, &sv_id, &sd_id);
 
   if (verbose)
     {
-      printf((machine_readable >= 2) ? "Slot:\t" : "Device:\t");
+      printf((opt_machine >= 2) ? "Slot:\t" : "Device:\t");
       show_slot_name(d);
       putchar('\n');
       printf("Class:\t%s\n",
@@ -1996,6 +2203,8 @@ show_machine(struct device *d)
        printf("Rev:\t%02x\n", c);
       if (c = get_conf_byte(d, PCI_CLASS_PROG))
        printf("ProgIf:\t%02x\n", c);
+      if (opt_kernel)
+       show_kernel_machine(d);
     }
   else
     {
@@ -2018,18 +2227,25 @@ show_machine(struct device *d)
     }
 }
 
+/*** Main show function ***/
+
 static void
 show_device(struct device *d)
 {
-  if (machine_readable)
+  if (opt_machine)
     show_machine(d);
-  else if (verbose)
-    show_verbose(d);
   else
-    show_terse(d);
-  if (show_hex)
+    {
+      if (verbose)
+       show_verbose(d);
+      else
+       show_terse(d);
+      if (opt_kernel || verbose)
+       show_kernel(d);
+    }
+  if (opt_hex)
     show_hex_dump(d);
-  if (verbose || show_hex)
+  if (verbose || opt_hex)
     putchar('\n');
 }
 
@@ -2042,7 +2258,7 @@ show(void)
     show_device(d);
 }
 
-/* Tree output */
+/*** Tree output ***/
 
 struct bridge {
   struct bridge *chain;                        /* Single-linked list of bridges */
@@ -2288,7 +2504,7 @@ show_forest(void)
   show_tree_bridge(&host_bridge, line, line);
 }
 
-/* Bus mapping mode */
+/*** Bus mapping mode ***/
 
 struct bus_bridge {
   struct bus_bridge *next;
@@ -2486,7 +2702,7 @@ main(int argc, char **argv)
        break;
       case 'b':
        pacc->buscentric = 1;
-       buscentric_view = 1;
+       opt_buscentric = 1;
        break;
       case 's':
        if (msg = pci_filter_parse_slot(&filter, optarg))
@@ -2497,23 +2713,41 @@ main(int argc, char **argv)
          die("-d: %s", msg);
        break;
       case 'x':
-       show_hex++;
+       opt_hex++;
        break;
       case 't':
-       show_tree++;
+       opt_tree++;
        break;
       case 'i':
         pci_set_name_list_path(pacc, optarg, 0);
        break;
       case 'm':
-       machine_readable++;
+       opt_machine++;
+       break;
+      case 'p':
+       opt_pcimap = optarg;
+       break;
+      case 'k':
+       opt_kernel++;
        break;
       case 'M':
-       map_mode++;
+       opt_map_mode++;
        break;
       case 'D':
-       show_domains = 2;
+       opt_domains = 2;
+       break;
+#ifdef PCI_USE_DNS
+      case 'q':
+       opt_query_dns++;
+       break;
+      case 'Q':
+       opt_query_all = 1;
        break;
+#else
+      case 'q':
+      case 'Q':
+       die("DNS queries are not available in this version");
+#endif
       default:
        if (parse_generic_option(i, pacc, optarg))
          break;
@@ -2524,14 +2758,23 @@ main(int argc, char **argv)
   if (optind < argc)
     goto bad;
 
+  if (opt_query_dns)
+    {
+      pacc->id_lookup_mode |= PCI_LOOKUP_NETWORK;
+      if (opt_query_dns > 1)
+       pacc->id_lookup_mode |= PCI_LOOKUP_REFRESH_CACHE;
+    }
+  if (opt_query_all)
+    pacc->id_lookup_mode |= PCI_LOOKUP_NETWORK | PCI_LOOKUP_SKIP_LOCAL;
+
   pci_init(pacc);
-  if (map_mode)
+  if (opt_map_mode)
     map_the_bus();
   else
     {
       scan_devices();
       sort_them();
-      if (show_tree)
+      if (opt_tree)
        show_forest();
       else
        show();