From 7bafa9736ad97c9911da511ff17efd8214232c5b Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 30 Sep 2004 06:41:47 +0000 Subject: (getUPS) provide more data on UPS (arnaud quette) --- perl-install/detect_devices.pm | 19 +++++++++++++++++-- 1 file changed, 17 insertions(+), 2 deletions(-) diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index c56fd32a1..11b3b3306 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -569,8 +569,23 @@ sub getNet() { #} sub getUPS() { - (map { $_->{driver} = "mge-shut"; $_->{media_type} = 'UPS'; $_ } grep { $_->{DESCRIPTION} =~ /MGE UPS/ } values %serialprobe), - (map { ($_->{name} = $_->{description}) =~ s/.*\|//; $_->{port} = "/dev/"; $_->{media_type} = 'UPS'; $_ } grep { $_->{driver} =~ /ups$/ } usb_probe()); + # MGE serial PnP devices: + (map { + $_->{port} = $_->{DEVICE}; + $_->{bus} = "Serial"; + $_->{driver} = "UPS:mge-utalk" if $_->{MODEL} =~ /0001/; + $_->{driver} = "UPS:mge-shut" if $_->{MODEL} =~ /0002/; + $_->{media_type} = 'UPS'; + $_->{description} = "MGE UPS SYSTEMS|UPS - Uninterruptible Power Supply" if $_->{MODEL} =~ /000[12]/; + $_;1 + } grep { $_->{DESCRIPTION} =~ /MGE UPS/ } values %serialprobe), + # USB UPSs; + (map { + ($_->{name} = $_->{description}) =~ s/.*\|//; + $_->{port} = "/dev/"; # FIXME + $_->{media_type} = 'UPS'; + $_; + } grep { $_->{driver} =~ /ups$/ } usb_probe()); } $pcitable_addons = <<'EOF'; -- cgit v1.2.1