summaryrefslogtreecommitdiff
path: root/test/udevstart-test.pl
diff options
context:
space:
mode:
Diffstat (limited to 'test/udevstart-test.pl')
-rwxr-xr-xtest/udevstart-test.pl61
1 files changed, 0 insertions, 61 deletions
diff --git a/test/udevstart-test.pl b/test/udevstart-test.pl
deleted file mode 100755
index 6829bc05cf..0000000000
--- a/test/udevstart-test.pl
+++ /dev/null
@@ -1,61 +0,0 @@
-#!/usr/bin/perl
-
-# udevstart-test
-#
-# runs udevstart in a temporary directory with our test sysfs-tree
-# and counts the created nodes to compare it with the expected numbers.
-#
-# Kay Sievers <kay.sievers@vrfy.org>, 2005
-#
-
-use warnings;
-use strict;
-
-my $PWD = $ENV{PWD};
-my $sysfs = "sys/";
-my $udevstart_bin = "../udevstart";
-my $udev_root = "udev-root/"; # !!! directory will be removed !!!
-my $udev_db = ".udevdb";
-my $udev_conf = "udev-test.conf";
-my $udev_rules = "udev-test.rules";
-
-# set env
-$ENV{SYSFS_PATH} = $sysfs;
-$ENV{UDEV_CONFIG_FILE} = $udev_conf;
-
-# due to mknod restrictions
-if (!($<==0)) {
- print "Must have root permissions to run properly.\n";
- exit;
-}
-
-# prepare
-system("rm -rf $udev_root");
-mkdir($udev_root) || die "unable to create udev_root: $udev_root\n";
-
-# create config file
-open CONF, ">$udev_conf" || die "unable to create config file: $udev_conf";
-print CONF "udev_root=\"$udev_root\"\n";
-print CONF "udev_db=\"$udev_db\"\n";
-print CONF "udev_rules=\"$udev_rules\"\n";
-close CONF;
-
-# create rules file
-open RULES, ">$udev_rules" || die "unable to create rules file: $udev_rules";
-print RULES "\n";
-close RULES;
-
-system("$udevstart_bin");
-my $block = int(`find $udev_root -type b -print | wc -l`);
-my $char = int(`find $udev_root -type c -print | wc -l`);
-
-print "block devices: $block/10\n";
-print "char devices: $char/91\n";
-print "\n";
-
-# cleanup
-system("rm -rf $udev_db");
-system("rm -rf $udev_root");
-unlink($udev_rules);
-unlink($udev_conf);
-