From ff576c1833b7705dedd7e32c93700b30f2957853 Mon Sep 17 00:00:00 2001 From: Herton Ronaldo Krzesinski Date: Wed, 25 Nov 2009 12:02:56 +0000 Subject: update drakx to get proper sysfs device path from usb devices --- perl-install/NEWS | 1 + perl-install/c/stuff.xs.pl | 4 ++-- perl-install/detect_devices.pm | 4 ++-- 3 files changed, 5 insertions(+), 4 deletions(-) (limited to 'perl-install') diff --git a/perl-install/NEWS b/perl-install/NEWS index bf8fd80cc..8cf35630b 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,6 +1,7 @@ - devices detection: o fix reading USB details (#55690) o fix SCSI driver module name + o fix sysfs device path from usb devices - partitioning wizard: o unmount swap too when unmounting all partitions o do not suggest Windows mountpoint for mounted partitions diff --git a/perl-install/c/stuff.xs.pl b/perl-install/c/stuff.xs.pl index 0f4908d9b..dda429f8b 100644 --- a/perl-install/c/stuff.xs.pl +++ b/perl-install/c/stuff.xs.pl @@ -281,8 +281,8 @@ usb_probe() for (i = 0; i < entries.nb; i++) { struct pciusb_entry *e = &entries.entries[i]; struct usb_class_text class_text = usb_class2text(e->class_id); - snprintf(buf, sizeof(buf), "%04x\t%04x\t%s|%s|%s\t%s\t%s\t%d\t%d", - e->vendor, e->device, class_text.usb_class_text, class_text.usb_sub_text, class_text.usb_prot_text, e->module ? e->module : "unknown", e->text, e->pci_bus, e->pci_device); + snprintf(buf, sizeof(buf), "%04x\t%04x\t%s|%s|%s\t%s\t%s\t%d\t%d\t%d", + e->vendor, e->device, class_text.usb_class_text, class_text.usb_sub_text, class_text.usb_prot_text, e->module ? e->module : "unknown", e->text, e->pci_bus, e->pci_device, e->usb_port); PUSHs(sv_2mortal(newSVpv(buf, 0))); } pciusb_free(&entries); diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 0057ec937..62151b65a 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -835,10 +835,10 @@ sub usb_probe__real() { add_addons($usbtable_addons, map { my %l; - @l{qw(vendor id media_type driver description pci_bus pci_device)} = split "\t"; + @l{qw(vendor id media_type driver description pci_bus pci_device usb_port)} = split "\t"; $l{media_type} = join('|', grep { $_ ne '(null)' } split('\|', $l{media_type})); $l{$_} = hex $l{$_} foreach qw(vendor id); - $l{sysfs_device} = "/sys/class/usb_device/usbdev$l{pci_bus}.$l{pci_device}/device"; + $l{sysfs_device} = "/sys/bus/usb/devices/$l{pci_bus}-" . ($l{usb_port} + 1); $l{bus} = 'USB'; \%l; } c::usb_probe()); -- cgit v1.2.1