Index: src/topology-libpci.c
===================================================================
--- src/topology-libpci.c	(révision 4414)
+++ src/topology-libpci.c	(copie de travail)
@@ -136,6 +136,22 @@
     }
     fclose(fd);
   }
+  snprintf(path, sizeof(path), "%s/dev_id", osdevpath);
+  fd = fopen(path, "r");
+  if (fd) {
+    char hexid[16];
+    if (fgets(hexid, sizeof(hexid), fd)) {
+      char *eoid;
+      unsigned long port;
+      port = strtoul(hexid, &eoid, 0);
+      if (eoid != hexid) {
+	char portstr[16];
+	snprintf(portstr, sizeof(portstr), "%ld", port+1);
+	hwloc_obj_add_info(obj, "Port", portstr);
+      }
+    }
+    fclose(fd);
+  }
 }
 static void
 hwloc_linux_lookup_net_class(struct hwloc_topology *topology, struct hwloc_obj *pcidev, const char *pcidevpath)