]> mj.ucw.cz Git - pciutils.git/blobdiff - lib/sysfs.c
Sylixos: Bits of Makefile and configure
[pciutils.git] / lib / sysfs.c
index 1062ccc564fe38d2fe4fde2b5a0156501710b600..577982480fbc87f3c2d51f76307e7fe8123c58e2 100644 (file)
@@ -50,16 +50,29 @@ static void
 sysfs_init(struct pci_access *a)
 {
   a->fd = -1;
+  a->fd_vpd = -1;
 }
 
 static void
-sysfs_cleanup(struct pci_access *a)
+sysfs_flush_cache(struct pci_access *a)
 {
   if (a->fd >= 0)
     {
       close(a->fd);
       a->fd = -1;
     }
+  if (a->fd_vpd >= 0)
+    {
+      close(a->fd_vpd);
+      a->fd_vpd = -1;
+    }
+  a->cached_dev = NULL;
+}
+
+static void
+sysfs_cleanup(struct pci_access *a)
+{
+  sysfs_flush_cache(a);
 }
 
 #define OBJNAMELEN 1024
@@ -72,25 +85,49 @@ sysfs_obj_name(struct pci_dev *d, char *object, char *buf)
     d->access->error("File name too long");
 }
 
+#define OBJBUFSIZE 1024
+
 static int
-sysfs_get_value(struct pci_dev *d, char *object)
+sysfs_get_string(struct pci_dev *d, char *object, char *buf, int mandatory)
 {
   struct pci_access *a = d->access;
   int fd, n;
-  char namebuf[OBJNAMELEN], buf[256];
+  char namebuf[OBJNAMELEN];
+  void (*warn)(char *msg, ...) = (mandatory ? a->error : a->warning);
 
   sysfs_obj_name(d, object, namebuf);
   fd = open(namebuf, O_RDONLY);
   if (fd < 0)
-    a->error("Cannot open %s: %s", namebuf, strerror(errno));
-  n = read(fd, buf, sizeof(buf));
+    {
+      if (mandatory || errno != ENOENT)
+       warn("Cannot open %s: %s", namebuf, strerror(errno));
+      return 0;
+    }
+  n = read(fd, buf, OBJBUFSIZE);
   close(fd);
   if (n < 0)
-    a->error("Error reading %s: %s", namebuf, strerror(errno));
-  if (n >= (int) sizeof(buf))
-    a->error("Value in %s too long", namebuf);
+    {
+      warn("Error reading %s: %s", namebuf, strerror(errno));
+      return 0;
+     }
+  if (n >= OBJBUFSIZE)
+    {
+      warn("Value in %s too long", namebuf);
+      return 0;
+    }
   buf[n] = 0;
-  return strtol(buf, NULL, 0);
+  return 1;
+}
+
+static int
+sysfs_get_value(struct pci_dev *d, char *object, int mandatory)
+{
+  char buf[OBJBUFSIZE];
+
+  if (sysfs_get_string(d, object, buf, mandatory))
+    return strtol(buf, NULL, 0);
+  else
+    return -1;
 }
 
 static void
@@ -107,23 +144,27 @@ sysfs_get_resources(struct pci_dev *d)
     a->error("Cannot open %s: %s", namebuf, strerror(errno));
   for (i = 0; i < 7; i++)
     {
-      unsigned long long start, end, size;
+      unsigned long long start, end, size, flags;
       if (!fgets(buf, sizeof(buf), file))
        break;
-      if (sscanf(buf, "%llx %llx", &start, &end) != 2)
+      if (sscanf(buf, "%llx %llx %llx", &start, &end, &flags) != 3)
        a->error("Syntax error in %s", namebuf);
-      if (start)
+      if (end > start)
        size = end - start + 1;
       else
        size = 0;
       if (i < 6)
        {
-         d->base_addr[i] = start;
+         d->flags[i] = flags;
+         flags &= PCI_ADDR_FLAG_MASK;
+         d->base_addr[i] = start | flags;
          d->size[i] = size;
        }
       else
        {
-         d->rom_base_addr = start;
+         d->rom_flags = flags;
+         flags &= PCI_ADDR_FLAG_MASK;
+         d->rom_base_addr = start | flags;
          d->rom_size = size;
        }
     }
@@ -155,6 +196,11 @@ static void sysfs_scan(struct pci_access *a)
       d = pci_alloc_dev(a);
       if (sscanf(entry->d_name, "%x:%x:%x.%d", &dom, &bus, &dev, &func) < 4)
        a->error("sysfs_scan: Couldn't parse entry name %s", entry->d_name);
+
+      /* Ensure kernel provided domain that fits in a signed integer */
+      if (dom > 0x7fffffff)
+       a->error("sysfs_scan: Invalid domain %x", dom);
+
       d->domain = dom;
       d->bus = bus;
       d->dev = dev;
@@ -162,15 +208,15 @@ static void sysfs_scan(struct pci_access *a)
       if (!a->buscentric)
        {
          sysfs_get_resources(d);
-         d->irq = sysfs_get_value(d, "irq");
+         d->irq = sysfs_get_value(d, "irq", 1);
          /*
           *  We could read these faster from the config registers, but we want to give
           *  the kernel a chance to fix up ID's and especially classes of broken devices.
           */
-         d->vendor_id = sysfs_get_value(d, "vendor");
-         d->device_id = sysfs_get_value(d, "device");
-         d->device_class = sysfs_get_value(d, "class") >> 8;
-         d->known_fields = PCI_FILL_IDENT | PCI_FILL_CLASS | PCI_FILL_IRQ | PCI_FILL_BASES | PCI_FILL_ROM_BASE | PCI_FILL_SIZES;
+         d->vendor_id = sysfs_get_value(d, "vendor", 1);
+         d->device_id = sysfs_get_value(d, "device", 1);
+         d->device_class = sysfs_get_value(d, "class", 1) >> 8;
+         d->known_fields = PCI_FILL_IDENT | PCI_FILL_CLASS | PCI_FILL_IRQ | PCI_FILL_BASES | PCI_FILL_ROM_BASE | PCI_FILL_SIZES | PCI_FILL_IO_FLAGS;
        }
       pci_link_dev(a, d);
     }
@@ -197,6 +243,7 @@ sysfs_fill_slots(struct pci_access *a)
       char namebuf[OBJNAMELEN], buf[16];
       FILE *file;
       unsigned int dom, bus, dev;
+      int res = 0;
       struct pci_dev *d;
 
       /* ".", ".." or a special non-device perhaps */
@@ -207,23 +254,29 @@ sysfs_fill_slots(struct pci_access *a)
       if (n < 0 || n >= OBJNAMELEN)
        a->error("File name too long");
       file = fopen(namebuf, "r");
+      /*
+       * Old versions of Linux had a fakephp which didn't have an 'address'
+       * file.  There's no useful information to be gleaned from these
+       * devices, pretend they're not there.
+       */
       if (!file)
+       continue;
+
+      if (!fgets(buf, sizeof(buf), file) || (res = sscanf(buf, "%x:%x:%x", &dom, &bus, &dev)) < 3)
        {
-         a->warning("sysfs_fill_slots: Cannot open %s: %s", namebuf, strerror(errno));
-         continue;
+         /*
+          * In some cases, the slot is not tied to a specific device before
+          * a card gets inserted. This happens for example on IBM pSeries
+          * and we need not warn about it.
+          */
+         if (res != 2)
+           a->warning("sysfs_fill_slots: Couldn't parse entry address %s", buf);
        }
-
-      if (!fgets(buf, sizeof(buf), file) || sscanf(buf, "%x:%x:%x", &dom, &bus, &dev) < 3)
-       a->warning("sysfs_fill_slots: Couldn't parse entry address %s", buf);
       else
        {
          for (d = a->devices; d; d = d->next)
-           if (dom == d->domain && bus == d->bus && dev == d->dev && !d->phy_slot)
-             {
-               d->phy_slot = pci_malloc(a, strlen(entry->d_name) + 1);
-               strcpy(d->phy_slot, entry->d_name);
-               break;
-             }
+           if (dom == (unsigned)d->domain && bus == d->bus && dev == d->dev && !d->phy_slot)
+             d->phy_slot = pci_strdup(a, entry->d_name);
        }
       fclose(file);
     }
@@ -240,6 +293,24 @@ sysfs_fill_info(struct pci_dev *d, int flags)
       for (pd = d->access->devices; pd; pd = pd->next)
        pd->known_fields |= PCI_FILL_PHYS_SLOT;
     }
+
+  if ((flags & PCI_FILL_MODULE_ALIAS) && !(d->known_fields & PCI_FILL_MODULE_ALIAS))
+    {
+      char buf[OBJBUFSIZE];
+      if (sysfs_get_string(d, "modalias", buf, 0))
+       d->module_alias = pci_strdup(d->access, buf);
+    }
+
+  if ((flags & PCI_FILL_LABEL) && !(d->known_fields & PCI_FILL_LABEL))
+    {
+      char buf[OBJBUFSIZE];
+      if (sysfs_get_string(d, "label", buf, 0))
+       d->label = pci_strdup(d->access, buf);
+    }
+
+  if ((flags & PCI_FILL_NUMA_NODE) && !(d->known_fields & PCI_FILL_NUMA_NODE))
+    d->numa_node = sysfs_get_value(d, "numa_node", 0);
+
   return pci_generic_fill_info(d, flags);
 }
 
@@ -257,10 +328,25 @@ sysfs_setup(struct pci_dev *d, int intent)
   struct pci_access *a = d->access;
   char namebuf[OBJNAMELEN];
 
-  if (a->cached_dev != d || intent == SETUP_WRITE_CONFIG && !a->fd_rw)
+  if (a->cached_dev != d || (intent == SETUP_WRITE_CONFIG && !a->fd_rw))
+    {
+      sysfs_flush_cache(a);
+      a->cached_dev = d;
+    }
+
+  if (intent == SETUP_READ_VPD)
+    {
+      if (a->fd_vpd < 0)
+       {
+         sysfs_obj_name(d, "vpd", namebuf);
+         a->fd_vpd = open(namebuf, O_RDONLY);
+         /* No warning on error; vpd may be absent or accessible only to root */
+       }
+      return a->fd_vpd;
+    }
+
+  if (a->fd < 0)
     {
-      if (a->fd >= 0)
-       close(a->fd);
       sysfs_obj_name(d, "config", namebuf);
       a->fd_rw = a->writeable || intent == SETUP_WRITE_CONFIG;
       a->fd = open(namebuf, a->fd_rw ? O_RDWR : O_RDONLY);
@@ -268,18 +354,7 @@ sysfs_setup(struct pci_dev *d, int intent)
        a->warning("Cannot open %s", namebuf);
       a->fd_pos = 0;
     }
-
-  if (a->cached_dev != d)
-    {
-      if (a->fd_vpd >= 0)
-       close(a->fd_vpd);
-      sysfs_obj_name(d, "vpd", namebuf);
-      a->fd_vpd = open(namebuf, O_RDONLY);
-      /* No warning on error; vpd may be absent or accessible only to root */
-    }
-
-  a->cached_dev = d;
-  return intent == SETUP_READ_VPD ? a->fd_vpd : a->fd;
+  return a->fd;
 }
 
 static int sysfs_read(struct pci_dev *d, int pos, byte *buf, int len)
@@ -357,11 +432,7 @@ static void sysfs_cleanup_dev(struct pci_dev *d)
   struct pci_access *a = d->access;
 
   if (a->cached_dev == d)
-    {
-      a->cached_dev = NULL;
-      close(a->fd);
-      a->fd = -1;
-    }
+    sysfs_flush_cache(a);
 }
 
 struct pci_methods pm_linux_sysfs = {