[PATCH] first cut at standalone udev_dbus program.

[elogind.git] / test / udev-test.pl

diff --git a/test/udev-test.pl b/test/udev-test.pl
index fc682b528a1795b2c7a6c8b780dae887c94dfcbc..d93ebb9cc3d661391f930a9fe920e5884fdcd253 100644 (file)
--- a/test/udev-test.pl
+++ b/test/udev-test.pl
@@ -36,7 +36,7 @@ my @tests = (
                desc            => "label test of scsi disc",
                subsys          => "block",
                devpath         => "block/sda",
-               exp_name=> "boot_disk" ,
+               exp_name        => "boot_disk" ,
                conf            => <<EOF
 BUS="scsi", SYSFS{vendor}="IBM-ESXS", NAME="boot_disk%n"
 KERNEL="ttyUSB0", NAME="visor"
@@ -46,7 +46,7 @@ EOF
                desc            => "label test of scsi partition",
                subsys          => "block",
                devpath         => "block/sda/sda1",
-               exp_name=> "boot_disk1" ,
+               exp_name        => "boot_disk1" ,
                conf            => <<EOF
 BUS="scsi", SYSFS{vendor}="IBM-ESXS", NAME="boot_disk%n"
 EOF
@@ -55,7 +55,7 @@ EOF
                desc            => "label test of pattern match",
                subsys          => "block",
                devpath         => "block/sda/sda1",
-               exp_name=> "boot_disk1" ,
+               exp_name        => "boot_disk1" ,
                conf            => <<EOF
 BUS="scsi", SYSFS{vendor}="?IBM-ESXS", NAME="boot_disk%n-1"
 BUS="scsi", SYSFS{vendor}="IBM-ESXS?", NAME="boot_disk%n-2"
@@ -529,7 +529,7 @@ EOF
                subsys          => "block",
                devpath         => "block/sda",
                exp_name        => "node",
-               perms           => "5000::0444",
+               exp_perms       => "5000::0444",
                conf            => <<EOF
 BUS="scsi", KERNEL="sda", NAME="node", OWNER="5000", MODE="0444"
 EOF
@@ -539,10 +539,39 @@ EOF
                subsys          => "block",
                devpath         => "block/sda",
                exp_name        => "node",
-               perms           => "5000::0444",
                exp_majorminor  => "8:0",
                conf            => <<EOF
-BUS="scsi", KERNEL="sda", NAME="node", OWNER="5000", MODE="0444"
+BUS="scsi", KERNEL="sda", NAME="node"
+EOF
+       },
+       {
+               desc            => "big minor number test",
+               subsys          => "i2c-dev",
+               devpath         => "class/i2c-dev/i2c-300",
+               exp_name        => "node",
+               exp_majorminor  => "89:300",
+               conf            => <<EOF
+KERNEL="i2c-300", NAME="node"
+EOF
+       },
+       {
+               desc            => "big major number test",
+               subsys          => "i2c-dev",
+               devpath         => "class/i2c-dev/i2c-fake1",
+               exp_name        => "node",
+               exp_majorminor  => "4095:1",
+               conf            => <<EOF
+KERNEL="i2c-fake1", NAME="node"
+EOF
+       },
+       {
+               desc            => "big major and big minor number test",
+               subsys          => "i2c-dev",
+               devpath         => "class/i2c-dev/i2c-fake2",
+               exp_name        => "node",
+               exp_majorminor  => "4094:89999",
+               conf            => <<EOF
+KERNEL="i2c-fake2", NAME="node"
 EOF
        },
 );
@@ -581,9 +610,9 @@ sub run_test {
                my ($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size,
                    $atime, $mtime, $ctime, $blksize, $blocks) = stat("$PWD/$udev_root$config->{exp_name}");
 
-               if (defined($config->{perms})) {
+               if (defined($config->{exp_perms})) {
                        my $wrong = 0;
-                       $config->{perms} =~ m/^(.*):(.*):(.*)$/;
+                       $config->{exp_perms} =~ m/^(.*):(.*):(.*)$/;
                        if ($1 ne "") {
                                if ($uid != $1) { $wrong = 1; };
                        }
@@ -593,9 +622,12 @@ sub run_test {
                        if ($3 ne "") {
                                if (($mode & 07777) != oct($3)) { $wrong = 1; };
                        }
-                       if ($wrong == 1) {
+                       if ($wrong == 0) {
+                               print "permissions: ok    ";
+                       } else {
                                printf "expected permissions are: %i:%i:%#o\n", $1, $2, oct($3);
                                printf "created permissions are : %i:%i:%#o\n", $uid, $gid, $mode & 07777;
+                               $error++;
                        }
                }
 
@@ -611,9 +643,12 @@ sub run_test {
                        if ($2 ne "") {
                                if ($minor != $2) { $wrong = 1; };
                        }
-                       if ($wrong == 1) {
+                       if ($wrong == 0) {
+                               print "major:minor: ok    ";
+                       } else {
                                printf "expected major:minor is: %i:%i\n", $1, $2;
                                printf "created major:minor is : %i:%i\n", $major, $minor;
+                               $error++;
                        }
                }