summaryrefslogtreecommitdiffstats
path: root/rescue/drvinst
diff options
context:
space:
mode:
Diffstat (limited to 'rescue/drvinst')
-rwxr-xr-xrescue/drvinst47
1 files changed, 0 insertions, 47 deletions
diff --git a/rescue/drvinst b/rescue/drvinst
deleted file mode 100755
index 78c6f5c74..000000000
--- a/rescue/drvinst
+++ /dev/null
@@ -1,47 +0,0 @@
-#!/usr/bin/perl
-#
-# Guillaume Cottenceau
-#
-# Copyright 2000-2005 Mandriva
-#
-# This software may be freely redistributed under the terms of the GNU
-# public license.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software
-# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
-#
-
-use lib qw(../perl-install /usr/lib/libDrakX);
-use common;
-use detect_devices;
-
-$ARGV[0] =~ /^--?h/ and die "usage: drivers_install [drivertype1 [drivertype2 ...]]\n";
-my @types = @ARGV;
-
-sub install_module_raw {
- my ($driver, $o_descr) = @_;
- print STDERR "Installing driver $driver", $o_descr ? " (for \"$o_descr\")" : '', "\n";
- system("/sbin/modprobe", $driver) and print "\tfailed\n";
-}
-
-my $already_usb;
-sub install_module {
- my ($driver, $descr) = @_;
- install_module_raw($driver, $descr);
- if (!$already_usb && $driver =~ /usb/) {
- $already_usb = 1;
- install_module_raw('usbkbd');
- install_module_raw('keybdev');
- }
-}
-
-#- start
-foreach my $card (detect_devices::pci_probe()) {
- $card->{driver} eq 'unknown' || $card->{driver} =~ /:/ and next;
- $card->{media_type} eq "DISPLAY_VGA" and next;
-
- if (!@ARGV || find { $card->{media_type} =~ /$_/i } @types) {
- install_module($card->{driver}, $card->{description});
- }
-}