5 # Provides automated testing of the udev binary.
6 # The whole test is self contained in this file, except the matching sysfs tree.
7 # Simply extend the @tests array, to add a new test variant.
9 # Every test is driven by its own temporary config file.
10 # This program prepares the environment, creates the config and calls udev.
12 # udev reads the config, looks at the provided sysfs and
13 # first creates and then removes the device node.
14 # After creation and removal the result is checked against the
15 # expected value and the result is printed.
18 # Kay Sievers <kay.sievers@vrfy.org>, 2003
26 my $udev_bin = "../udev";
27 my $udev_root = "udev-root/"; # !!! directory will be removed !!!
28 my $udev_db = ".udev.tdb";
29 my $perm = "udev.permissions";
30 my $conf_tmp = "udev-test.config";
35 desc => "label test of scsi disc",
37 devpath => "block/sda",
38 expected => "boot_disk" ,
40 LABEL, BUS="scsi", vendor="IBM-ESXS", NAME="boot_disk%n"
41 REPLACE, KERNEL="ttyUSB0", NAME="visor""
45 desc => "label test of scsi partition",
47 devpath => "block/sda/sda1",
48 expected => "boot_disk1" ,
50 LABEL, BUS="scsi", vendor="IBM-ESXS", NAME="boot_disk%n"
54 desc => "catch device by wildcard",
56 devpath => "class/tty/ttyUSB0",
57 expected => "visor/0" ,
59 REPLACE, KERNEL="ttyUSB*", NAME="visor/%n"
63 desc => "replace kernel name",
65 devpath => "class/tty/ttyUSB0",
68 REPLACE, KERNEL="ttyUSB0", NAME="visor"
72 desc => "subdirectory handling",
74 devpath => "class/tty/ttyUSB0",
75 expected => "sub/direct/ory/visor" ,
77 REPLACE, KERNEL="ttyUSB0", NAME="sub/direct/ory/visor"
81 desc => "place on bus of scsi partition",
83 devpath => "block/sda/sda3",
84 expected => "first_disk3" ,
86 TOPOLOGY, BUS="scsi", PLACE="0:0:0:0", NAME="first_disk%n"
90 desc => "test NAME substitution chars",
92 devpath => "block/sda/sda3",
93 expected => "Major:8:minor:3:kernelnumber:3:bus:0:0:0:0" ,
95 TOPOLOGY, BUS="scsi", PLACE="0:0:0:0", NAME="Major:%M:minor:%m:kernelnumber:%n:bus:%b"
99 desc => "callout result substitution, only last should match",
101 devpath => "block/sda/sda3",
102 expected => "special-device-3" ,
104 CALLOUT, BUS="scsi", PROGRAM="/bin/echo -n special-device", ID="-special-*", NAME="%c-1-%n"
105 CALLOUT, BUS="scsi", PROGRAM="/bin/echo -n special-device", ID="special--*", NAME="%c-2-%n"
106 CALLOUT, BUS="scsi", PROGRAM="/bin/echo -n special-device", ID="special-device-", NAME="%c-3-%n"
107 CALLOUT, BUS="scsi", PROGRAM="/bin/echo -n special-device", ID="special-devic", NAME="%c-4-%n"
108 CALLOUT, BUS="scsi", PROGRAM="/bin/echo -n special-device", ID="special-*", NAME="%c-%n"
112 desc => "callout program substitution",
114 devpath => "block/sda/sda3",
115 expected => "test-0:0:0:0" ,
117 CALLOUT, BUS="scsi", PROGRAM="/bin/echo -n test-%b", ID="test-*", NAME="%c"
121 desc => "devfs disk naming substitution",
123 devpath => "block/sda",
124 expected => "lun0/disk" ,
126 LABEL, BUS="scsi", vendor="IBM-ESXS", NAME="lun0/%D"
130 desc => "devfs disk naming substitution",
132 devpath => "block/sda/sda2",
133 expected => "lun0/part2" ,
135 LABEL, BUS="scsi", vendor="IBM-ESXS", NAME="lun0/%D"
139 desc => "callout bus type",
141 devpath => "block/sda",
142 expected => "scsi-0:0:0:0" ,
144 CALLOUT, BUS="usb", PROGRAM="/bin/echo -n usb-%b", ID="*", NAME="%c"
145 CALLOUT, BUS="scsi", PROGRAM="/bin/echo -n scsi-%b", ID="*", NAME="%c"
146 CALLOUT, BUS="foo", PROGRAM="/bin/echo -n foo-%b", ID="*", NAME="%c"
152 $ENV{UDEV_TEST} = "yes";
153 $ENV{SYSFS_PATH} = $sysfs;
154 $ENV{UDEV_CONFIG_DIR} = "./";
155 $ENV{UDEV_ROOT} = $udev_root;
156 $ENV{UDEV_DB} = $udev_db;
157 $ENV{UDEV_PERMISSION_FILE} = $perm;
161 my ($action, $subsys, $devpath, $config) = @_;
163 $ENV{DEVPATH} = $devpath;
164 $ENV{UDEV_CONFIG_FILE} = $conf_tmp;
166 # create temporary config
167 open CONF, ">$conf_tmp" || die "unable to create config file: $conf_tmp";
171 $ENV{ACTION} = $action;
172 system("$udev_bin $subsys");
177 system("rm -rf $udev_root");
178 mkdir($udev_root) || die "unable to create udev_root: $udev_root\n";
182 print "\nudev-test will run ".($#tests + 1)." tests:\n\n";
184 foreach my $config (@tests) {
185 $config->{conf} =~ m/^([A-Z]*).*/;
188 print "TEST: $config->{desc}\n";
189 print "method \'$method\' for \'$config->{devpath}\' expecting node \'$config->{expected}\'\n";
191 udev("add", $config->{subsys}, $config->{devpath}, \$config->{conf});
192 if (-e "$PWD/$udev_root$config->{expected}") {
195 print "add: error\n";
196 system("tree $udev_root");
201 udev("remove", $config->{subsys}, $config->{devpath}, \$config->{conf});
202 if (-e "$PWD/$udev_root$config->{expected}") {
203 print "remove: error\n\n";
204 system("tree $udev_root");
207 print "remove: ok\n\n";
211 print "$error errors occured\n\n";
215 system("rm -rf $udev_root");