summaryrefslogtreecommitdiffstats
path: root/perl-install/detect_devices.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-06-10 14:57:17 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-06-10 14:57:17 +0000
commit807a80de36216fa890531f1dfa61f79432096238 (patch)
tree73ca51b407ed7420bf9ed75c5f1691713a0f1da7 /perl-install/detect_devices.pm
parent56360cd49387e8f626ff512ea7987d7530f422dd (diff)
downloaddrakx-backup-do-not-use-807a80de36216fa890531f1dfa61f79432096238.tar
drakx-backup-do-not-use-807a80de36216fa890531f1dfa61f79432096238.tar.gz
drakx-backup-do-not-use-807a80de36216fa890531f1dfa61f79432096238.tar.bz2
drakx-backup-do-not-use-807a80de36216fa890531f1dfa61f79432096238.tar.xz
drakx-backup-do-not-use-807a80de36216fa890531f1dfa61f79432096238.zip
- hde is ide/host1/bus0/target0/lun0, and not ide/host0/bus2/target0/lun0
- add host in hd struct for bus ide
Diffstat (limited to 'perl-install/detect_devices.pm')
-rw-r--r--perl-install/detect_devices.pm8
1 files changed, 5 insertions, 3 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 97ae9eb66..034b60f23 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -329,12 +329,14 @@ sub getIDE() {
if_($info =~ /^$_(-|\s)*(.*)/, $eide_hds{$_}, $2);
} keys %eide_hds;
- my ($channel, $id) = ($num / 2, $num % 2);
- my $devfs_prefix = sprintf('ide/host0/bus%d/target%d/lun0', $channel, $id);
+ my $host = $num;
+ ($host, my $id) = divide($host, 2);
+ ($host, my $channel) = divide($host, 2);
+ my $devfs_prefix = sprintf('ide/host%d/bus%d/target%d/lun0', $host, $channel, $id);
push @idi, { media_type => $type, device => basename($d),
devfs_prefix => $devfs_prefix,
- info => $info, channel => $channel, id => $id, bus => 'ide',
+ info => $info, host => $host, channel => $channel, id => $id, bus => 'ide',
if_($vendor, Vendor => $vendor), if_($model, Model => $model) };
}
get_devfs_devices(@idi);