/[soft]/ldetect-lst/trunk/convert/usb-removables.pl
ViewVC logotype

Contents of /ldetect-lst/trunk/convert/usb-removables.pl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1357 - (show annotations) (download)
Tue May 17 09:21:22 2011 UTC (10 years, 1 month ago) by dmorgan
File MIME type: text/plain
File size: 495 byte(s)
Import  ldetect
1 #!/usr/bin/perl
2
3 use lib qw(/usr/lib/libDrakX);
4 use detect_devices;
5
6 require './merge2pcitable.pl';
7 my $usbtable = read_pcitable($ARGV[0]);
8
9 foreach (values %$usbtable) {
10 my $s = detect_devices::usb_description2removable($_->[1]) or next;
11 if ($_->[0] =~ /Removable:(.*)/) {
12 print STDERR "Conflicting $1 and $s for $_->[1]\n" if $1 ne $s;
13 } else {
14 print STDERR "Suggesting $s for $_->[1]\n";
15 $_->[0] = "Removable:$s" if $_->[0] eq 'usb-storage';
16 }
17 }
18 write_pcitable($usbtable);

Properties

Name Value
svn:executable *

  ViewVC Help
Powered by ViewVC 1.1.28