test/udev-test.pl

   1 #!/usr/bin/perl
   2
   3 # udev test
   4 #
   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.
   8 #
   9 # Every test is driven by its own temporary config file.
  10 # This program prepares the environment, creates the config and calls udev.
  11 #
  12 # udev parses the rules, 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.
  16 #
  17 # Copyright (C) 2004-2008 Kay Sievers <kay.sievers@vrfy.org>
  18 # Copyright (C) 2004 Leann Ogasawara <ogasawara@osdl.org>
  19
  20 use warnings;
  21 use strict;
  22
  23 my $PWD                 = $ENV{PWD};
  24 my $sysfs               = "sys/";
  25 my $udev_bin            = "../udev/test-udev";
  26 my $valgrind            = 0;
  27 my $udev_bin_valgrind   = "valgrind --tool=memcheck --leak-check=yes --quiet $udev_bin";
  28 my $udev_root           = "udev-root/";
  29 my $udev_conf           = "udev-test.conf";
  30 my $udev_rules          = "udev-test.rules";
  31
  32 my @tests = (
  33         {
  34                 desc            => "no rules",
  35                 subsys          => "block",
  36                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
  37                 exp_name        => "sda" ,
  38                 rules           => <<EOF
  39 EOF
  40         },
  41         {
  42                 desc            => "label test of scsi disc (old key names)",
  43                 subsys          => "block",
  44                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
  45                 exp_name        => "boot_disk" ,
  46                 rules           => <<EOF
  47 SUBSYSTEMS=="scsi", ATTRS{vendor}=="ATA", NAME="boot_disk%n", RUN+="socket:@/org/kernel/udev/monitor"
  48 KERNEL=="ttyACM0", NAME="modem"
  49 EOF
  50         },
  51         {
  52                 desc            => "label test of scsi disc (old key names)",
  53                 subsys          => "block",
  54                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
  55                 exp_name        => "boot_disk" ,
  56                 rules           => <<EOF
  57 SUBSYSTEMS=="scsi", ATTRS{vendor}=="ATA", NAME="boot_disk%n"
  58 KERNEL=="ttyACM0", NAME="modem"
  59 EOF
  60         },
  61         {
  62                 desc            => "label test of scsi disc",
  63                 subsys          => "block",
  64                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
  65                 exp_name        => "boot_disk" ,
  66                 rules           => <<EOF
  67 SUBSYSTEMS=="scsi", ATTRS{vendor}=="ATA", NAME="boot_disk%n"
  68 KERNEL=="ttyACM0", NAME="modem"
  69 EOF
  70         },
  71         {
  72                 desc            => "label test of scsi partition",
  73                 subsys          => "block",
  74                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
  75                 exp_name        => "boot_disk1" ,
  76                 rules           => <<EOF
  77 SUBSYSTEMS=="scsi", ATTRS{vendor}=="ATA", NAME="boot_disk%n"
  78 EOF
  79         },
  80         {
  81                 desc            => "label test of pattern match",
  82                 subsys          => "block",
  83                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
  84                 exp_name        => "boot_disk1" ,
  85                 rules           => <<EOF
  86 SUBSYSTEMS=="scsi", ATTRS{vendor}=="?ATA", NAME="boot_disk%n-1"
  87 SUBSYSTEMS=="scsi", ATTRS{vendor}=="ATA?", NAME="boot_disk%n-2"
  88 SUBSYSTEMS=="scsi", ATTRS{vendor}=="A??", NAME="boot_disk%n"
  89 SUBSYSTEMS=="scsi", ATTRS{vendor}=="ATAS", NAME="boot_disk%n-3"
  90 EOF
  91         },
  92         {
  93                 desc            => "label test of multiple sysfs files",
  94                 subsys          => "block",
  95                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
  96                 exp_name        => "boot_disk1" ,
  97                 rules           => <<EOF
  98 SUBSYSTEMS=="scsi", ATTRS{vendor}=="ATA", ATTRS{model}=="ST910021AS X ", NAME="boot_diskX%n"
  99 SUBSYSTEMS=="scsi", ATTRS{vendor}=="ATA", ATTRS{model}=="ST910021AS", NAME="boot_disk%n"
 100 EOF
 101         },
 102         {
 103                 desc            => "label test of max sysfs files (skip invalid rule)",
 104                 subsys          => "block",
 105                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
 106                 exp_name        => "boot_disk1" ,
 107                 rules           => <<EOF
 108 SUBSYSTEMS=="scsi", ATTRS{vendor}=="ATA", ATTRS{model}=="ST910021AS", ATTRS{scsi_level}=="6", ATTRS{rev}=="4.06", ATTRS{type}=="0", ATTRS{queue_depth}=="32", NAME="boot_diskXX%n"
 109 SUBSYSTEMS=="scsi", ATTRS{vendor}=="ATA", ATTRS{model}=="ST910021AS", ATTRS{scsi_level}=="6", ATTRS{rev}=="4.06", ATTRS{type}=="0", NAME="boot_disk%n"
 110 EOF
 111         },
 112         {
 113                 desc            => "catch device by *",
 114                 subsys          => "tty",
 115                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 116                 exp_name        => "modem/0" ,
 117                 rules           => <<EOF
 118 KERNEL=="ttyACM*", NAME="modem/%n"
 119 EOF
 120         },
 121         {
 122                 desc            => "catch device by * - take 2",
 123                 subsys          => "tty",
 124                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 125                 exp_name        => "modem/0" ,
 126                 rules           => <<EOF
 127 KERNEL=="*ACM1", NAME="bad"
 128 KERNEL=="*ACM0", NAME="modem/%n"
 129 EOF
 130         },
 131         {
 132                 desc            => "catch device by ?",
 133                 subsys          => "tty",
 134                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 135                 exp_name        => "modem/0" ,
 136                 rules           => <<EOF
 137 KERNEL=="ttyACM??*", NAME="modem/%n-1"
 138 KERNEL=="ttyACM??", NAME="modem/%n-2"
 139 KERNEL=="ttyACM?", NAME="modem/%n"
 140 EOF
 141         },
 142         {
 143                 desc            => "catch device by character class",
 144                 subsys          => "tty",
 145                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 146                 exp_name        => "modem/0" ,
 147                 rules           => <<EOF
 148 KERNEL=="ttyACM[A-Z]*", NAME="modem/%n-1"
 149 KERNEL=="ttyACM?[0-9]", NAME="modem/%n-2"
 150 KERNEL=="ttyACM[0-9]*", NAME="modem/%n"
 151 EOF
 152         },
 153         {
 154                 desc            => "replace kernel name",
 155                 subsys          => "tty",
 156                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 157                 exp_name        => "modem" ,
 158                 rules           => <<EOF
 159 KERNEL=="ttyACM0", NAME="modem"
 160 EOF
 161         },
 162         {
 163                 desc            => "Handle comment lines in config file (and replace kernel name)",
 164                 subsys          => "tty",
 165                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 166                 exp_name        => "modem" ,
 167                 rules           => <<EOF
 168 # this is a comment
 169 KERNEL=="ttyACM0", NAME="modem"
 170
 171 EOF
 172         },
 173         {
 174                 desc            => "Handle comment lines in config file with whitespace (and replace kernel name)",
 175                 subsys          => "tty",
 176                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 177                 exp_name        => "modem" ,
 178                 rules           => <<EOF
 179  # this is a comment with whitespace before the comment
 180 KERNEL=="ttyACM0", NAME="modem"
 181
 182 EOF
 183         },
 184         {
 185                 desc            => "Handle whitespace only lines (and replace kernel name)",
 186                 subsys          => "tty",
 187                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 188                 exp_name        => "whitespace" ,
 189                 rules           => <<EOF
 190
 191
 192
 193  # this is a comment with whitespace before the comment
 194 KERNEL=="ttyACM0", NAME="whitespace"
 195
 196
 197
 198 EOF
 199         },
 200         {
 201                 desc            => "Handle empty lines in config file (and replace kernel name)",
 202                 subsys          => "tty",
 203                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 204                 exp_name        => "modem" ,
 205                 rules           => <<EOF
 206
 207 KERNEL=="ttyACM0", NAME="modem"
 208
 209 EOF
 210         },
 211         {
 212                 desc            => "Handle backslashed multi lines in config file (and replace kernel name)",
 213                 subsys          => "tty",
 214                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 215                 exp_name        => "modem" ,
 216                 rules           => <<EOF
 217 KERNEL=="ttyACM0", \\
 218 NAME="modem"
 219
 220 EOF
 221         },
 222         {
 223                 desc            => "preserve backslashes, if they are not for a newline",
 224                 subsys          => "tty",
 225                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 226                 exp_name        => "aaa",
 227                 rules           => <<EOF
 228 KERNEL=="ttyACM0", PROGRAM=="/bin/echo -e \\101", RESULT=="A", NAME="aaa"
 229 EOF
 230         },
 231         {
 232                 desc            => "Handle stupid backslashed multi lines in config file (and replace kernel name)",
 233                 subsys          => "tty",
 234                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 235                 exp_name        => "modem" ,
 236                 rules           => <<EOF
 237
 238 #
 239 \\
 240
 241 \\
 242
 243 #\\
 244
 245 KERNEL=="ttyACM0", \\
 246         NAME="modem"
 247
 248 EOF
 249         },
 250         {
 251                 desc            => "subdirectory handling",
 252                 subsys          => "tty",
 253                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 254                 exp_name        => "sub/direct/ory/modem" ,
 255                 rules           => <<EOF
 256 KERNEL=="ttyACM0", NAME="sub/direct/ory/modem"
 257 EOF
 258         },
 259         {
 260                 desc            => "parent device name match of scsi partition",
 261                 subsys          => "block",
 262                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 263                 exp_name        => "first_disk5" ,
 264                 rules           => <<EOF
 265 SUBSYSTEMS=="scsi", KERNELS=="0:0:0:0", NAME="first_disk%n"
 266 EOF
 267         },
 268         {
 269                 desc            => "test substitution chars (old key names)",
 270                 subsys          => "block",
 271                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 272                 exp_name        => "Major:8:minor:5:kernelnumber:5:id:0:0:0:0" ,
 273                 rules           => <<EOF
 274 BUS=="scsi", ID=="0:0:0:0", NAME="Major:%M:minor:%m:kernelnumber:%n:id:%b"
 275 EOF
 276         },
 277         {
 278                 desc            => "test substitution chars",
 279                 subsys          => "block",
 280                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 281                 exp_name        => "Major:8:minor:5:kernelnumber:5:id:0:0:0:0" ,
 282                 rules           => <<EOF
 283 SUBSYSTEMS=="scsi", KERNELS=="0:0:0:0", NAME="Major:%M:minor:%m:kernelnumber:%n:id:%b"
 284 EOF
 285         },
 286         {
 287                 desc            => "import of shell-value file",
 288                 subsys          => "block",
 289                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 290                 exp_name        => "subdir/err/node" ,
 291                 rules           => <<EOF
 292 SUBSYSTEMS=="scsi", IMPORT{file}="udev-test.conf", NAME="subdir/%E{udev_log}/node"
 293 KERNEL=="ttyACM0", NAME="modem"
 294 EOF
 295         },
 296         {
 297                 desc            => "import of shell-value returned from program",
 298                 subsys          => "block",
 299                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 300                 exp_name        => "node12345678",
 301                 rules           => <<EOF
 302 SUBSYSTEMS=="scsi", IMPORT="/bin/echo -e \' TEST_KEY=12345678\\n  TEST_key2=98765\'", NAME="node\$env{TEST_KEY}"
 303 KERNEL=="ttyACM0", NAME="modem"
 304 EOF
 305         },
 306         {
 307                 desc            => "sustitution of sysfs value (%s{file})",
 308                 subsys          => "block",
 309                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 310                 exp_name        => "disk-ATA-sda" ,
 311                 rules           => <<EOF
 312 SUBSYSTEMS=="scsi", ATTRS{vendor}=="ATA", NAME="disk-%s{vendor}-%k"
 313 KERNEL=="ttyACM0", NAME="modem"
 314 EOF
 315         },
 316         {
 317                 desc            => "program result substitution",
 318                 subsys          => "block",
 319                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 320                 exp_name        => "special-device-5" ,
 321                 rules           => <<EOF
 322 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo -n special-device", RESULT=="-special-*", NAME="%c-1-%n"
 323 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo -n special-device", RESULT=="special--*", NAME="%c-2-%n"
 324 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo -n special-device", RESULT=="special-device-", NAME="%c-3-%n"
 325 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo -n special-device", RESULT=="special-devic", NAME="%c-4-%n"
 326 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo -n special-device", RESULT=="special-*", NAME="%c-%n"
 327 EOF
 328         },
 329         {
 330                 desc            => "program result substitution (newline removal)",
 331                 subsys          => "block",
 332                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 333                 exp_name        => "newline_removed" ,
 334                 rules           => <<EOF
 335 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo test", RESULT=="test", NAME="newline_removed"
 336 EOF
 337         },
 338         {
 339                 desc            => "program result substitution",
 340                 subsys          => "block",
 341                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 342                 exp_name        => "test-0:0:0:0" ,
 343                 rules           => <<EOF
 344 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo -n test-%b", RESULT=="test-0:0*", NAME="%c"
 345 EOF
 346         },
 347         {
 348                 desc            => "program with escaped format char (callout returns format char!)",
 349                 subsys          => "block",
 350                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 351                 exp_name        => "escape-5" ,
 352                 rules           => <<EOF
 353 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo -n escape-%%n", KERNEL=="sda5", NAME="%c"
 354 EOF
 355         },
 356         {
 357                 desc            => "program with lots of arguments",
 358                 subsys          => "block",
 359                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 360                 exp_name        => "foo9" ,
 361                 rules           => <<EOF
 362 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo -n foo3 foo4 foo5 foo6 foo7 foo8 foo9", KERNEL=="sda5", NAME="%c{7}"
 363 EOF
 364         },
 365         {
 366                 desc            => "program with subshell",
 367                 subsys          => "block",
 368                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 369                 exp_name        => "bar9" ,
 370                 rules           => <<EOF
 371 SUBSYSTEMS=="scsi", PROGRAM=="/bin/sh -c 'echo foo3 foo4 foo5 foo6 foo7 foo8 foo9 | sed  s/foo9/bar9/'", KERNEL=="sda5", NAME="%c{7}"
 372 EOF
 373         },
 374         {
 375                 desc            => "program arguments combined with apostrophes",
 376                 subsys          => "block",
 377                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 378                 exp_name        => "foo7" ,
 379                 rules           => <<EOF
 380 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo -n 'foo3 foo4'   'foo5   foo6   foo7 foo8'", KERNEL=="sda5", NAME="%c{5}"
 381 EOF
 382         },
 383         {
 384                 desc            => "characters before the %c{N} substitution",
 385                 subsys          => "block",
 386                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 387                 exp_name        => "my-foo9" ,
 388                 rules           => <<EOF
 389 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo -n foo3 foo4 foo5 foo6 foo7 foo8 foo9", KERNEL=="sda5", NAME="my-%c{7}"
 390 EOF
 391         },
 392         {
 393                 desc            => "substitute the second to last argument",
 394                 subsys          => "block",
 395                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 396                 exp_name        => "my-foo8" ,
 397                 rules           => <<EOF
 398 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo -n foo3 foo4 foo5 foo6 foo7 foo8 foo9", KERNEL=="sda5", NAME="my-%c{6}"
 399 EOF
 400         },
 401         {
 402                 desc            => "test substitution by variable name",
 403                 subsys          => "block",
 404                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 405                 exp_name        => "Major:8-minor:5-kernelnumber:5-id:0:0:0:0",
 406                 rules           => <<EOF
 407 SUBSYSTEMS=="scsi", KERNELS=="0:0:0:0", NAME="Major:\$major-minor:\$minor-kernelnumber:\$number-id:\$id"
 408 EOF
 409         },
 410         {
 411                 desc            => "test substitution by variable name 2",
 412                 subsys          => "block",
 413                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 414                 exp_name        => "Major:8-minor:5-kernelnumber:5-id:0:0:0:0",
 415                 rules           => <<EOF
 416 SUBSYSTEMS=="scsi", KERNELS=="0:0:0:0", DEVPATH=="*/sda/*", NAME="Major:\$major-minor:%m-kernelnumber:\$number-id:\$id"
 417 EOF
 418         },
 419         {
 420                 desc            => "test substitution by variable name 3",
 421                 subsys          => "block",
 422                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 423                 exp_name        => "850:0:0:05" ,
 424                 rules           => <<EOF
 425 SUBSYSTEMS=="scsi", KERNELS=="0:0:0:0", DEVPATH=="*/sda/*", NAME="%M%m%b%n"
 426 EOF
 427         },
 428         {
 429                 desc            => "test substitution by variable name 4",
 430                 subsys          => "block",
 431                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 432                 exp_name        => "855" ,
 433                 rules           => <<EOF
 434 SUBSYSTEMS=="scsi", KERNELS=="0:0:0:0", DEVPATH=="*/sda/*", NAME="\$major\$minor\$number"
 435 EOF
 436         },
 437         {
 438                 desc            => "test substitution by variable name 5",
 439                 subsys          => "block",
 440                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
 441                 exp_name        => "8550:0:0:0" ,
 442                 rules           => <<EOF
 443 SUBSYSTEMS=="scsi", KERNELS=="0:0:0:0", DEVPATH=="*/sda/*", NAME="\$major%m%n\$id"
 444 EOF
 445         },
 446         {
 447                 desc            => "non matching SUBSYSTEMS for device with no parent",
 448                 subsys          => "tty",
 449                 devpath         => "/devices/virtual/tty/console",
 450                 exp_name        => "TTY",
 451                 rules           => <<EOF
 452 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo -n foo", RESULT=="foo", NAME="foo"
 453 KERNEL=="console", NAME="TTY"
 454 EOF
 455         },
 456         {
 457                 desc            => "non matching SUBSYSTEMS",
 458                 subsys          => "tty",
 459                 devpath         => "/devices/virtual/tty/console",
 460                 exp_name        => "TTY" ,
 461                 rules           => <<EOF
 462 SUBSYSTEMS=="foo", ATTRS{dev}=="5:1", NAME="foo"
 463 KERNEL=="console", NAME="TTY"
 464 EOF
 465         },
 466         {
 467                 desc            => "ATTRS match",
 468                 subsys          => "tty",
 469                 devpath         => "/devices/virtual/tty/console",
 470                 exp_name        => "foo" ,
 471                 rules           => <<EOF
 472 KERNEL=="console", NAME="TTY"
 473 ATTRS{dev}=="5:1", NAME="foo"
 474 EOF
 475         },
 476         {
 477                 desc            => "ATTR (empty file)",
 478                 subsys          => "tty",
 479                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 480                 exp_name        => "empty" ,
 481                 rules           => <<EOF
 482 KERNEL=="sda", ATTR{test_empty_file}=="?*", NAME:="something"
 483 KERNEL=="sda", ATTR{test_empty_file}!="", NAME:="not-empty"
 484 KERNEL=="sda", ATTR{test_empty_file}=="", NAME:="empty"
 485 KERNEL=="sda", ATTR{test_empty_file}!="?*", NAME:="not-something"
 486 KERNEL=="sda", NAME="wrong"
 487 EOF
 488         },
 489         {
 490                 desc            => "ATTR (non-existent file)",
 491                 subsys          => "tty",
 492                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 493                 exp_name        => "non-existent" ,
 494                 rules           => <<EOF
 495 KERNEL=="sda", ATTR{nofile}=="?*", NAME:="something"
 496 KERNEL=="sda", ATTR{nofile}!="", NAME:="not-empty"
 497 KERNEL=="sda", ATTR{nofile}=="", NAME:="empty"
 498 KERNEL=="sda", ATTR{nofile}!="?*", NAME:="not-something"
 499 KERNEL=="sda", TEST!="nofile", NAME:="non-existent"
 500 KERNEL=="sda", NAME="wrong"
 501 EOF
 502         },
 503         {
 504                 desc            => "program and bus type match",
 505                 subsys          => "block",
 506                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 507                 exp_name        => "scsi-0:0:0:0" ,
 508                 rules           => <<EOF
 509 SUBSYSTEMS=="usb", PROGRAM=="/bin/echo -n usb-%b", NAME="%c"
 510 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo -n scsi-%b", NAME="%c"
 511 SUBSYSTEMS=="foo", PROGRAM=="/bin/echo -n foo-%b", NAME="%c"
 512 EOF
 513         },
 514         {
 515                 desc            => "create all possible partitions",
 516                 subsys          => "block",
 517                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 518                 exp_name        => "boot_disk15" ,
 519                 exp_majorminor  => "8:15",
 520                 rules           => <<EOF
 521 SUBSYSTEMS=="scsi", ATTRS{vendor}=="ATA", NAME{all_partitions}="boot_disk"
 522 EOF
 523         },
 524         {
 525                 desc            => "sysfs parent hierarchy",
 526                 subsys          => "tty",
 527                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 528                 exp_name        => "modem" ,
 529                 rules           => <<EOF
 530 ATTRS{idProduct}=="007b", NAME="modem"
 531 EOF
 532         },
 533         {
 534                 desc            => "name test with ! in the name",
 535                 subsys          => "block",
 536                 devpath         => "/devices/virtual/block/fake!blockdev0",
 537                 exp_name        => "is/a/fake/blockdev0" ,
 538                 rules           => <<EOF
 539 SUBSYSTEMS=="scsi", NAME="is/not/a/%k"
 540 SUBSYSTEM=="block", NAME="is/a/%k"
 541 KERNEL=="ttyACM0", NAME="modem"
 542 EOF
 543         },
 544         {
 545                 desc            => "name test with ! in the name, but no matching rule",
 546                 subsys          => "block",
 547                 devpath         => "/devices/virtual/block/fake!blockdev0",
 548                 exp_name        => "fake/blockdev0" ,
 549                 rules           => <<EOF
 550 KERNEL=="ttyACM0", NAME="modem"
 551 EOF
 552         },
 553         {
 554                 desc            => "KERNELS rule",
 555                 subsys          => "block",
 556                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 557                 exp_name        => "scsi-0:0:0:0",
 558                 rules           => <<EOF
 559 SUBSYSTEMS=="usb", KERNELS=="0:0:0:0", NAME="not-scsi"
 560 SUBSYSTEMS=="scsi", KERNELS=="0:0:0:1", NAME="no-match"
 561 SUBSYSTEMS=="scsi", KERNELS==":0", NAME="short-id"
 562 SUBSYSTEMS=="scsi", KERNELS=="/0:0:0:0", NAME="no-match"
 563 SUBSYSTEMS=="scsi", KERNELS=="0:0:0:0", NAME="scsi-0:0:0:0"
 564 EOF
 565         },
 566         {
 567                 desc            => "KERNELS wildcard all",
 568                 subsys          => "block",
 569                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 570                 exp_name        => "scsi-0:0:0:0",
 571                 rules           => <<EOF
 572 SUBSYSTEMS=="scsi", KERNELS=="*:1", NAME="no-match"
 573 SUBSYSTEMS=="scsi", KERNELS=="*:0:1", NAME="no-match"
 574 SUBSYSTEMS=="scsi", KERNELS=="*:0:0:1", NAME="no-match"
 575 SUBSYSTEMS=="scsi", KERNEL=="0:0:0:0", NAME="before"
 576 SUBSYSTEMS=="scsi", KERNELS=="*", NAME="scsi-0:0:0:0"
 577 EOF
 578         },
 579         {
 580                 desc            => "KERNELS wildcard partial",
 581                 subsys          => "block",
 582                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 583                 exp_name        => "scsi-0:0:0:0",
 584                 rules           => <<EOF
 585 SUBSYSTEMS=="scsi", KERNELS=="0:0:0:0", NAME="before"
 586 SUBSYSTEMS=="scsi", KERNELS=="*:0", NAME="scsi-0:0:0:0"
 587 EOF
 588         },
 589         {
 590                 desc            => "KERNELS wildcard partial 2",
 591                 subsys          => "block",
 592                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 593                 exp_name        => "scsi-0:0:0:0",
 594                 rules           => <<EOF
 595 SUBSYSTEMS=="scsi", KERNELS=="0:0:0:0", NAME="before"
 596 SUBSYSTEMS=="scsi", KERNELS=="*:0:0:0", NAME="scsi-0:0:0:0"
 597 EOF
 598         },
 599         {
 600                 desc            => "substitute attr with link target value (first match)",
 601                 subsys          => "block",
 602                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 603                 exp_name        => "driver-is-sd",
 604                 rules           => <<EOF
 605 SUBSYSTEMS=="scsi", NAME="driver-is-\$attr{driver}"
 606 EOF
 607         },
 608         {
 609                 desc            => "substitute attr with link target value (currently selected device)",
 610                 subsys          => "block",
 611                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 612                 exp_name        => "driver-is-ahci",
 613                 rules           => <<EOF
 614 SUBSYSTEMS=="pci", NAME="driver-is-\$attr{driver}"
 615 EOF
 616         },
 617         {
 618                 desc            => "ignore ATTRS attribute whitespace",
 619                 subsys          => "block",
 620                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 621                 exp_name        => "ignored",
 622                 rules           => <<EOF
 623 SUBSYSTEMS=="scsi", ATTRS{whitespace_test}=="WHITE  SPACE", NAME="ignored"
 624 EOF
 625         },
 626         {
 627                 desc            => "do not ignore ATTRS attribute whitespace",
 628                 subsys          => "block",
 629                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 630                 exp_name        => "matched-with-space",
 631                 rules           => <<EOF
 632 SUBSYSTEMS=="scsi", ATTRS{whitespace_test}=="WHITE  SPACE ", NAME="wrong-to-ignore"
 633 SUBSYSTEMS=="scsi", ATTRS{whitespace_test}=="WHITE  SPACE   ", NAME="matched-with-space"
 634 EOF
 635         },
 636         {
 637                 desc            => "permissions USER=bad GROUP=name",
 638                 subsys          => "tty",
 639                 devpath         => "/devices/virtual/tty/tty33",
 640                 exp_name        => "tty33",
 641                 exp_perms       => "0:0:0660",
 642                 rules           => <<EOF
 643 KERNEL=="tty33", NAME="tty33", OWNER="bad", GROUP="name"
 644 EOF
 645         },
 646         {
 647                 desc            => "permissions OWNER=5000",
 648                 subsys          => "block",
 649                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 650                 exp_name        => "node",
 651                 exp_perms       => "5000::0660",
 652                 rules           => <<EOF
 653 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node", OWNER="5000"
 654 EOF
 655         },
 656         {
 657                 desc            => "permissions GROUP=100",
 658                 subsys          => "block",
 659                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 660                 exp_name        => "node",
 661                 exp_perms       => ":100:0660",
 662                 rules           => <<EOF
 663 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node", GROUP="100"
 664 EOF
 665         },
 666         {
 667                 desc            => "textual user id",
 668                 subsys          => "block",
 669                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 670                 exp_name        => "node",
 671                 exp_perms       => "nobody::0660",
 672                 rules           => <<EOF
 673 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node", OWNER="nobody"
 674 EOF
 675         },
 676         {
 677                 desc            => "textual group id",
 678                 subsys          => "block",
 679                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 680                 exp_name        => "node",
 681                 exp_perms       => ":daemon:0660",
 682                 rules           => <<EOF
 683 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node", GROUP="daemon"
 684 EOF
 685         },
 686         {
 687                 desc            => "textual user/group id",
 688                 subsys          => "block",
 689                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 690                 exp_name        => "node",
 691                 exp_perms       => "root:mail:0660",
 692                 rules           => <<EOF
 693 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node", OWNER="root", GROUP="mail"
 694 EOF
 695         },
 696         {
 697                 desc            => "permissions MODE=0777",
 698                 subsys          => "block",
 699                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 700                 exp_name        => "node",
 701                 exp_perms       => "::0777",
 702                 rules           => <<EOF
 703 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node", MODE="0777"
 704 EOF
 705         },
 706         {
 707                 desc            => "permissions OWNER=5000 GROUP=100 MODE=0777",
 708                 subsys          => "block",
 709                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 710                 exp_name        => "node",
 711                 exp_perms       => "5000:100:0777",
 712                 rules           => <<EOF
 713 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node", OWNER="5000", GROUP="100", MODE="0777"
 714 EOF
 715         },
 716         {
 717                 desc            => "permissions OWNER to 5000",
 718                 subsys          => "tty",
 719                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 720                 exp_name        => "ttyACM0",
 721                 exp_perms       => "5000::",
 722                 rules           => <<EOF
 723 KERNEL=="ttyACM[0-9]*", NAME="ttyACM%n", OWNER="5000"
 724 EOF
 725         },
 726         {
 727                 desc            => "permissions GROUP to 100",
 728                 subsys          => "tty",
 729                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 730                 exp_name        => "ttyACM0",
 731                 exp_perms       => ":100:0660",
 732                 rules           => <<EOF
 733 KERNEL=="ttyACM[0-9]*", NAME="ttyACM%n", GROUP="100"
 734 EOF
 735         },
 736         {
 737                 desc            => "permissions MODE to 0060",
 738                 subsys          => "tty",
 739                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 740                 exp_name        => "ttyACM0",
 741                 exp_perms       => "::0060",
 742                 rules           => <<EOF
 743 KERNEL=="ttyACM[0-9]*", NAME="ttyACM%n", MODE="0060"
 744 EOF
 745         },
 746         {
 747                 desc            => "permissions OWNER, GROUP, MODE",
 748                 subsys          => "tty",
 749                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 750                 exp_name        => "ttyACM0",
 751                 exp_perms       => "5000:100:0777",
 752                 rules           => <<EOF
 753 KERNEL=="ttyACM[0-9]*", NAME="ttyACM%n", OWNER="5000", GROUP="100", MODE="0777"
 754 EOF
 755         },
 756         {
 757                 desc            => "permissions only rule",
 758                 subsys          => "tty",
 759                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 760                 exp_name        => "ttyACM0",
 761                 exp_perms       => "5000:100:0777",
 762                 rules           => <<EOF
 763 KERNEL=="ttyACM[0-9]*", OWNER="5000", GROUP="100", MODE="0777"
 764 KERNEL=="ttyUSX[0-9]*", OWNER="5001", GROUP="101", MODE="0444"
 765 KERNEL=="ttyACM[0-9]*", NAME="ttyACM%n"
 766 EOF
 767         },
 768         {
 769                 desc            => "multiple permissions only rule",
 770                 subsys          => "tty",
 771                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 772                 exp_name        => "ttyACM0",
 773                 exp_perms       => "3000:4000:0777",
 774                 rules           => <<EOF
 775 SUBSYSTEM=="tty", OWNER="3000"
 776 SUBSYSTEM=="tty", GROUP="4000"
 777 SUBSYSTEM=="tty", MODE="0777"
 778 KERNEL=="ttyUSX[0-9]*", OWNER="5001", GROUP="101", MODE="0444"
 779 KERNEL=="ttyACM[0-9]*", NAME="ttyACM%n"
 780 EOF
 781         },
 782         {
 783                 desc            => "permissions only rule with override at NAME rule",
 784                 subsys          => "tty",
 785                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 786                 exp_name        => "ttyACM0",
 787                 exp_perms       => "3000:8000:0777",
 788                 rules           => <<EOF
 789 SUBSYSTEM=="tty", OWNER="3000"
 790 SUBSYSTEM=="tty", GROUP="4000"
 791 SUBSYSTEM=="tty", MODE="0777"
 792 KERNEL=="ttyUSX[0-9]*", OWNER="5001", GROUP="101", MODE="0444"
 793 KERNEL=="ttyACM[0-9]*", NAME="ttyACM%n", GROUP="8000"
 794 EOF
 795         },
 796         {
 797                 desc            => "major/minor number test",
 798                 subsys          => "block",
 799                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 800                 exp_name        => "node",
 801                 exp_majorminor  => "8:0",
 802                 rules           => <<EOF
 803 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node"
 804 EOF
 805         },
 806         {
 807                 desc            => "big major number test",
 808                 subsys          => "misc",
 809                 devpath         => "/devices/virtual/misc/misc-fake1",
 810                 exp_name        => "node",
 811                 exp_majorminor  => "4095:1",
 812                 rules           => <<EOF
 813 KERNEL=="misc-fake1", NAME="node"
 814 EOF
 815         },
 816         {
 817                 desc            => "big major and big minor number test",
 818                 subsys          => "misc",
 819                 devpath         => "/devices/virtual/misc/misc-fake89999",
 820                 exp_name        => "node",
 821                 exp_majorminor  => "4095:89999",
 822                 rules           => <<EOF
 823 KERNEL=="misc-fake89999", NAME="node"
 824 EOF
 825         },
 826         {
 827                 desc            => "multiple symlinks with format char",
 828                 subsys          => "tty",
 829                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 830                 exp_name        => "symlink2-ttyACM0",
 831                 exp_target      => "ttyACM0",
 832                 rules           => <<EOF
 833 KERNEL=="ttyACM[0-9]*", NAME="ttyACM%n", SYMLINK="symlink1-%n symlink2-%k symlink3-%b"
 834 EOF
 835         },
 836         {
 837                 desc            => "multiple symlinks with a lot of s p a c e s",
 838                 subsys          => "tty",
 839                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 840                 exp_name        => "one",
 841                 not_exp_name    => " ",
 842                 exp_target      => "ttyACM0",
 843                 rules           => <<EOF
 844 KERNEL=="ttyACM[0-9]*", NAME="ttyACM%n", SYMLINK="  one     two        "
 845 EOF
 846         },
 847         {
 848                 desc            => "symlink creation (same directory)",
 849                 subsys          => "tty",
 850                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 851                 exp_name        => "modem0",
 852                 exp_target      => "ttyACM0",
 853                 rules           => <<EOF
 854 KERNEL=="ttyACM[0-9]*", NAME="ttyACM%n", SYMLINK="modem%n"
 855 EOF
 856         },
 857         {
 858                 desc            => "symlink creation (relative link forward)",
 859                 subsys          => "block",
 860                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda6",
 861                 exp_name        => "1/2/symlink" ,
 862                 exp_target      => "a/b/node",
 863                 rules           => <<EOF
 864 SUBSYSTEMS=="scsi", ATTRS{vendor}=="ATA", NAME="1/2/a/b/node", SYMLINK="1/2/symlink"
 865 EOF
 866         },
 867         {
 868                 desc            => "symlink creation (relative link back and forward)",
 869                 subsys          => "block",
 870                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda6",
 871                 exp_name        => "1/2/c/d/symlink" ,
 872                 exp_target      => "../../a/b/node",
 873                 rules           => <<EOF
 874 SUBSYSTEMS=="scsi", ATTRS{vendor}=="ATA", NAME="1/2/a/b/node", SYMLINK="1/2/c/d/symlink"
 875 EOF
 876         },
 877         {
 878                 desc            => "multiple symlinks",
 879                 subsys          => "tty",
 880                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 881                 exp_name        => "second-0" ,
 882                 exp_target      => "modem" ,
 883                 rules           => <<EOF
 884 KERNEL=="ttyACM0", NAME="modem", SYMLINK="first-%n second-%n third-%n"
 885 EOF
 886         },
 887         {
 888                 desc            => "symlink only rule",
 889                 subsys          => "block",
 890                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 891                 exp_name        => "symlink-only2",
 892                 exp_target      => "link",
 893                 rules           => <<EOF
 894 SUBSYSTEMS=="scsi", KERNEL=="sda", SYMLINK+="symlink-only1"
 895 SUBSYSTEMS=="scsi", KERNEL=="sda", SYMLINK+="symlink-only2"
 896 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="link", SYMLINK+="symlink0"
 897 EOF
 898         },
 899         {
 900                 desc            => "symlink name '.'",
 901                 subsys          => "block",
 902                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 903                 exp_name        => ".",
 904                 exp_target      => "link",
 905                 exp_add_error   => "yes",
 906                 exp_rem_error   => "yes",
 907                 rules           => <<EOF
 908 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="link", SYMLINK+="."
 909 EOF
 910         },
 911         {
 912                 desc            => "symlink node to itself",
 913                 subsys          => "tty",
 914                 devpath         => "/devices/virtual/tty/tty0",
 915                 exp_name        => "link",
 916                 exp_target      => "link",
 917                 exp_add_error   => "yes",
 918                 exp_rem_error   => "yes",
 919                 option          => "clean",
 920                 rules           => <<EOF
 921 KERNEL=="tty0", NAME="link", SYMLINK+="link"
 922 EOF
 923         },
 924         {
 925                 desc            => "symlink %n substitution",
 926                 subsys          => "tty",
 927                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 928                 exp_name        => "symlink0",
 929                 exp_target      => "ttyACM0",
 930                 rules           => <<EOF
 931 KERNEL=="ttyACM[0-9]*", NAME="ttyACM%n", SYMLINK+="symlink%n"
 932 EOF
 933         },
 934         {
 935                 desc            => "symlink %k substitution",
 936                 subsys          => "tty",
 937                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 938                 exp_name        => "symlink-ttyACM0",
 939                 exp_target      => "ttyACM0",
 940                 rules           => <<EOF
 941 KERNEL=="ttyACM[0-9]*", NAME="ttyACM%n", SYMLINK+="symlink-%k"
 942 EOF
 943         },
 944         {
 945                 desc            => "symlink %M:%m substitution",
 946                 subsys          => "tty",
 947                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 948                 exp_name        => "major-166:0",
 949                 exp_target      => "ttyACM0",
 950                 rules           => <<EOF
 951 KERNEL=="ttyACM[0-9]*", NAME="ttyACM%n", SYMLINK+="major-%M:%m"
 952 EOF
 953         },
 954         {
 955                 desc            => "symlink %b substitution",
 956                 subsys          => "block",
 957                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 958                 exp_name        => "symlink-0:0:0:0",
 959                 exp_target      => "node",
 960                 rules           => <<EOF
 961 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node", SYMLINK+="symlink-%b"
 962 EOF
 963         },
 964         {
 965                 desc            => "symlink %c substitution",
 966                 subsys          => "tty",
 967                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 968                 exp_name        => "test",
 969                 exp_target      => "ttyACM0",
 970                 rules           => <<EOF
 971 KERNEL=="ttyACM[0-9]*", PROGRAM=="/bin/echo test" NAME="ttyACM%n", SYMLINK+="%c"
 972 EOF
 973         },
 974         {
 975                 desc            => "symlink %c{N} substitution",
 976                 subsys          => "tty",
 977                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 978                 exp_name        => "test",
 979                 exp_target      => "ttyACM0",
 980                 rules           => <<EOF
 981 KERNEL=="ttyACM[0-9]*", PROGRAM=="/bin/echo symlink test this" NAME="ttyACM%n", SYMLINK+="%c{2}"
 982 EOF
 983         },
 984         {
 985                 desc            => "symlink %c{N+} substitution",
 986                 subsys          => "tty",
 987                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
 988                 exp_name        => "this",
 989                 exp_target      => "ttyACM0",
 990                 rules           => <<EOF
 991 KERNEL=="ttyACM[0-9]*", PROGRAM=="/bin/echo symlink test this" NAME="ttyACM%n", SYMLINK+="%c{2+}"
 992 EOF
 993         },
 994         {
 995                 desc            => "symlink only rule with %c{N+}",
 996                 subsys          => "block",
 997                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
 998                 exp_name        => "test",
 999                 exp_target      => "link",
1000                 rules           => <<EOF
1001 SUBSYSTEMS=="scsi", KERNEL=="sda", PROGRAM=="/bin/echo link test this" SYMLINK+="%c{2+}"
1002 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="link", SYMLINK+="symlink0"
1003 EOF
1004         },
1005         {
1006                 desc            => "symlink %s{filename} substitution",
1007                 subsys          => "tty",
1008                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
1009                 exp_name        => "166:0",
1010                 exp_target      => "ttyACM0",
1011                 rules           => <<EOF
1012 KERNEL=="ttyACM[0-9]*", NAME="ttyACM%n", SYMLINK+="%s{dev}"
1013 EOF
1014         },
1015         {
1016                 desc            => "program result substitution (numbered part of)",
1017                 subsys          => "block",
1018                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
1019                 exp_name        => "link1",
1020                 exp_target      => "node",
1021                 rules           => <<EOF
1022 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo -n node link1 link2", RESULT=="node *", NAME="%c{1}", SYMLINK+="%c{2} %c{3}"
1023 EOF
1024         },
1025         {
1026                 desc            => "program result substitution (numbered part of+)",
1027                 subsys          => "block",
1028                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda5",
1029                 exp_name        => "link4",
1030                 exp_target      => "node",
1031                 rules           => <<EOF
1032 SUBSYSTEMS=="scsi", PROGRAM=="/bin/echo -n node link1 link2 link3 link4", RESULT=="node *", NAME="%c{1}", SYMLINK+="%c{2+}"
1033 EOF
1034         },
1035         {
1036                 desc            => "ignore rule test",
1037                 subsys          => "block",
1038                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1039                 exp_name        => "nothing",
1040                 not_exp_name    => "node",
1041                 exp_add_error   => "yes",
1042                 rules           => <<EOF
1043 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node", OPTIONS="ignore_device"
1044 EOF
1045         },
1046         {
1047                 desc            => "all_partitions, option-only rule",
1048                 subsys          => "block",
1049                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1050                 exp_name        => "node6",
1051                 rules           => <<EOF
1052 SUBSYSTEM=="block", OPTIONS="all_partitions"
1053 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node"
1054 EOF
1055         },
1056         {
1057                 desc            => "all_partitions, option-only rule (fail on partition)",
1058                 subsys          => "block",
1059                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1060                 exp_name        => "node6",
1061                 exp_add_error   => "yes",
1062                 rules           => <<EOF
1063 SUBSYSTEM=="block", OPTIONS="all_partitions"
1064 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node"
1065 EOF
1066         },
1067         {
1068                 desc            => "ignore remove event test",
1069                 subsys          => "block",
1070                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1071                 exp_name        => "node",
1072                 exp_rem_error   => "yes",
1073                 rules           => <<EOF
1074 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node", OPTIONS="ignore_remove"
1075 EOF
1076         },
1077         {
1078                 desc            => "ignore remove event test (with all partitions)",
1079                 subsys          => "block",
1080                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1081                 exp_name        => "node14",
1082                 exp_rem_error   => "yes",
1083                 option          => "clean",
1084                 rules           => <<EOF
1085 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node", OPTIONS="ignore_remove, all_partitions"
1086 EOF
1087         },
1088         {
1089                 desc            => "SUBSYSTEM match test",
1090                 subsys          => "block",
1091                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1092                 exp_name        => "node",
1093                 rules           => <<EOF
1094 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="should_not_match", SUBSYSTEM=="vc"
1095 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node", SUBSYSTEM=="block"
1096 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="should_not_match2", SUBSYSTEM=="vc"
1097 EOF
1098         },
1099         {
1100                 desc            => "DRIVERS match test",
1101                 subsys          => "block",
1102                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1103                 exp_name        => "node",
1104                 rules           => <<EOF
1105 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="should_not_match", DRIVERS=="sd-wrong"
1106 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="node", DRIVERS=="sd"
1107 EOF
1108         },
1109         {
1110                 desc            => "temporary node creation test",
1111                 subsys          => "block",
1112                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1113                 exp_name        => "node",
1114                 rules           => <<EOF
1115 SUBSYSTEMS=="scsi", KERNEL=="sda", PROGRAM=="/usr/bin/test -b %N" NAME="node"
1116 EOF
1117         },
1118         {
1119                 desc            => "devpath substitution test",
1120                 subsys          => "block",
1121                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1122                 exp_name        => "sda",
1123                 rules           => <<EOF
1124 SUBSYSTEMS=="scsi", KERNEL=="sda", PROGRAM=="/bin/echo %p", RESULT=="/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda" NAME="%k"
1125 EOF
1126         },
1127         {
1128                 desc            => "parent node name substitution test sequence 1/2 (keep)",
1129                 subsys          => "block",
1130                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1131                 exp_name        => "main_device",
1132                 option          => "keep",
1133                 rules           => <<EOF
1134 SUBSYSTEMS=="scsi", KERNEL=="sda", NAME="main_device"
1135 EOF
1136         },
1137         {
1138                 desc            => "parent node name substitution test sequence 2/2 (clean)",
1139                 subsys          => "block",
1140                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1141                 exp_name        => "main_device-part-1",
1142                 option          => "clean",
1143                 rules           => <<EOF
1144 SUBSYSTEMS=="scsi", KERNEL=="sda1", NAME="%P-part-1"
1145 EOF
1146         },
1147         {
1148                 desc            => "udev_root substitution",
1149                 subsys          => "block",
1150                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1151                 exp_name        => "start-udev-root-end",
1152                 rules           => <<EOF
1153 SUBSYSTEMS=="scsi", KERNEL=="sda1", NAME="start-%r-end"
1154 EOF
1155         },
1156         {
1157                 desc            => "last_rule option",
1158                 subsys          => "block",
1159                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1160                 exp_name        => "last",
1161                 rules           => <<EOF
1162 SUBSYSTEMS=="scsi", KERNEL=="sda1", SYMLINK+="last", OPTIONS="last_rule"
1163 SUBSYSTEMS=="scsi", KERNEL=="sda1", NAME="very-last"
1164 EOF
1165         },
1166         {
1167                 desc            => "negation KERNEL!=",
1168                 subsys          => "block",
1169                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1170                 exp_name        => "match",
1171                 rules           => <<EOF
1172 SUBSYSTEMS=="scsi", KERNEL!="sda1", NAME="matches-but-is-negated"
1173 SUBSYSTEMS=="scsi", KERNEL=="sda1", NAME="before"
1174 SUBSYSTEMS=="scsi", KERNEL!="xsda1", NAME="match"
1175 EOF
1176         },
1177         {
1178                 desc            => "negation SUBSYSTEM!=",
1179                 subsys          => "block",
1180                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1181                 exp_name        => "not-anything",
1182                 rules           => <<EOF
1183 SUBSYSTEMS=="scsi", SUBSYSTEM=="block", KERNEL!="sda1", NAME="matches-but-is-negated"
1184 SUBSYSTEMS=="scsi", KERNEL=="sda1", NAME="before"
1185 SUBSYSTEMS=="scsi", SUBSYSTEM!="anything", NAME="not-anything"
1186 EOF
1187         },
1188         {
1189                 desc            => "negation PROGRAM!= exit code",
1190                 subsys          => "block",
1191                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1192                 exp_name        => "nonzero-program",
1193                 rules           => <<EOF
1194 SUBSYSTEMS=="scsi", KERNEL=="sda1", NAME="before"
1195 KERNEL=="sda1", PROGRAM!="/bin/false", NAME="nonzero-program"
1196 EOF
1197         },
1198         {
1199                 desc            => "test for whitespace between the operator",
1200                 subsys          => "block",
1201                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1202                 exp_name        => "true",
1203                 rules           => <<EOF
1204 SUBSYSTEMS=="scsi", KERNEL=="sda1", NAME="before"
1205 KERNEL   ==   "sda1"     ,    NAME   =    "true"
1206 EOF
1207         },
1208         {
1209                 desc            => "ENV{} test",
1210                 subsys          => "block",
1211                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1212                 exp_name        => "true",
1213                 rules           => <<EOF
1214 ENV{ENV_KEY_TEST}="test"
1215 SUBSYSTEMS=="scsi", KERNEL=="sda1", ENV{ENV_KEY_TEST}=="go", NAME="wrong"
1216 SUBSYSTEMS=="scsi", KERNEL=="sda1", ENV{ENV_KEY_TEST}=="test", NAME="true"
1217 SUBSYSTEMS=="scsi", KERNEL=="sda1", ENV{ENV_KEY_TEST}=="bad", NAME="bad"
1218 EOF
1219         },
1220         {
1221                 desc            => "ENV{} test",
1222                 subsys          => "block",
1223                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1224                 exp_name        => "true",
1225                 rules           => <<EOF
1226 ENV{ENV_KEY_TEST}="test"
1227 SUBSYSTEMS=="scsi", KERNEL=="sda1", ENV{ENV_KEY_TEST}=="go", NAME="wrong"
1228 SUBSYSTEMS=="scsi", KERNEL=="sda1", ENV{ENV_KEY_TEST}=="yes", ENV{ACTION}=="add", ENV{DEVPATH}=="*/block/sda/sdax1", NAME="no"
1229 SUBSYSTEMS=="scsi", KERNEL=="sda1", ENV{ENV_KEY_TEST}=="test", ENV{ACTION}=="add", ENV{DEVPATH}=="*/block/sda/sda1", NAME="true"
1230 SUBSYSTEMS=="scsi", KERNEL=="sda1", ENV{ENV_KEY_TEST}=="bad", NAME="bad"
1231 EOF
1232         },
1233         {
1234                 desc            => "ENV{} test (assign)",
1235                 subsys          => "block",
1236                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1237                 exp_name        => "true",
1238                 rules           => <<EOF
1239 SUBSYSTEMS=="scsi", KERNEL=="sda1", ENV{ASSIGN}="true"
1240 SUBSYSTEMS=="scsi", KERNEL=="sda1", ENV{ASSIGN}=="yes", NAME="no"
1241 SUBSYSTEMS=="scsi", KERNEL=="sda1", NAME="before"
1242 SUBSYSTEMS=="scsi", KERNEL=="sda1", ENV{ASSIGN}=="true", NAME="true"
1243 EOF
1244         },
1245         {
1246                 desc            => "ENV{} test (assign 2 times)",
1247                 subsys          => "block",
1248                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1249                 exp_name        => "true",
1250                 rules           => <<EOF
1251 SUBSYSTEMS=="scsi", KERNEL=="sda1", ENV{ASSIGN}="true"
1252 SUBSYSTEMS=="scsi", KERNEL=="sda1", ENV{ASSIGN}="absolutely-\$env{ASSIGN}"
1253 SUBSYSTEMS=="scsi", KERNEL=="sda1", NAME="before"
1254 SUBSYSTEMS=="scsi", KERNEL=="sda1", ENV{ASSIGN}=="yes", NAME="no"
1255 SUBSYSTEMS=="scsi", KERNEL=="sda1", ENV{ASSIGN}=="absolutely-true", NAME="true"
1256 EOF
1257         },
1258         {
1259                 desc            => "ENV{} test (assign2)",
1260                 subsys          => "block",
1261                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1262                 exp_name        => "part",
1263                 rules           => <<EOF
1264 SUBSYSTEM=="block", KERNEL=="*[0-9]", ENV{PARTITION}="true", ENV{MAINDEVICE}="false"
1265 SUBSYSTEM=="block", KERNEL=="*[!0-9]", ENV{PARTITION}="false", ENV{MAINDEVICE}="true"
1266 ENV{MAINDEVICE}=="true", NAME="disk"
1267 SUBSYSTEM=="block", NAME="before"
1268 ENV{PARTITION}=="true", NAME="part"
1269 EOF
1270         },
1271         {
1272                 desc            => "untrusted string sanitize",
1273                 subsys          => "block",
1274                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1275                 exp_name        => "sane",
1276                 rules           => <<EOF
1277 SUBSYSTEMS=="scsi", KERNEL=="sda1", PROGRAM=="/bin/echo -e name; (/sbin/badprogram)", RESULT=="name_ _/sbin/badprogram_", NAME="sane"
1278 EOF
1279         },
1280         {
1281                 desc            => "untrusted string sanitize (don't replace utf8)",
1282                 subsys          => "block",
1283                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1284                 exp_name        => "uber",
1285                 rules           => <<EOF
1286 SUBSYSTEMS=="scsi", KERNEL=="sda1", PROGRAM=="/bin/echo -e \\xc3\\xbcber" RESULT=="\xc3\xbcber", NAME="uber"
1287 EOF
1288         },
1289         {
1290                 desc            => "untrusted string sanitize (replace invalid utf8)",
1291                 subsys          => "block",
1292                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1293                 exp_name        => "replaced",
1294                 rules           => <<EOF
1295 SUBSYSTEMS=="scsi", KERNEL=="sda1", PROGRAM=="/bin/echo -e \\xef\\xe8garbage", RESULT=="__garbage", NAME="replaced"
1296 EOF
1297         },
1298         {
1299                 desc            => "read sysfs value from parent device",
1300                 subsys          => "block",
1301                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
1302                 exp_name        => "serial-354172020305000",
1303                 rules           => <<EOF
1304 KERNEL=="ttyACM*", ATTRS{serial}=="?*", NAME="serial-%s{serial}"
1305 EOF
1306         },
1307         {
1308                 desc            => "match against empty key string",
1309                 subsys          => "block",
1310                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1311                 exp_name        => "ok",
1312                 rules           => <<EOF
1313 KERNEL=="sda", ATTRS{nothing}!="", NAME="not-1-ok"
1314 KERNEL=="sda", ATTRS{nothing}=="", NAME="not-2-ok"
1315 KERNEL=="sda", ATTRS{vendor}!="", NAME="ok"
1316 KERNEL=="sda", ATTRS{vendor}=="", NAME="not-3-ok"
1317 EOF
1318         },
1319         {
1320                 desc            => "check ACTION value",
1321                 subsys          => "block",
1322                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1323                 exp_name        => "ok",
1324                 rules           => <<EOF
1325 ACTION=="unknown", KERNEL=="sda", NAME="unknown-not-ok"
1326 ACTION=="add", KERNEL=="sda", NAME="ok"
1327 EOF
1328         },
1329         {
1330                 desc            => "apply NAME final",
1331                 subsys          => "block",
1332                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1333                 exp_name        => "link",
1334                 exp_target      => "ok",
1335                 rules           => <<EOF
1336 KERNEL=="sda", NAME:="ok"
1337 KERNEL=="sda", NAME="not-ok"
1338 KERNEL=="sda", SYMLINK+="link"
1339 EOF
1340         },
1341         {
1342                 desc            => "test RUN key",
1343                 subsys          => "block",
1344                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1345                 exp_name        => "testsymlink",
1346                 exp_target      => "ok",
1347                 exp_rem_error   => "yes",
1348                 option          => "clean",
1349                 rules           => <<EOF
1350 KERNEL=="sda", NAME="ok", RUN+="/bin/ln -s ok %r/testsymlink"
1351 KERNEL=="sda", NAME="not-ok"
1352 EOF
1353         },
1354         {
1355                 desc            => "test RUN key and DEVNAME",
1356                 subsys          => "block",
1357                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1358                 exp_name        => "testsymlink",
1359                 exp_target      => "ok",
1360                 exp_rem_error   => "yes",
1361                 option          => "clean",
1362                 rules           => <<EOF
1363 KERNEL=="sda", NAME="not-ok"
1364 KERNEL=="sda", NAME="ok", RUN+="/bin/sh -c 'ln -s `basename \$\$DEVNAME` %r/testsymlink'"
1365 EOF
1366         },
1367         {
1368                 desc            => "test RUN key remove",
1369                 subsys          => "block",
1370                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1371                 exp_name        => "testsymlink2",
1372                 exp_target      => "ok2",
1373                 rules           => <<EOF
1374 KERNEL=="sda", NAME="ok2", RUN+="/bin/ln -s ok2 %r/testsymlink2"
1375 KERNEL=="sda", ACTION=="remove", RUN+="/bin/rm -f %r/testsymlink2"
1376 KERNEL=="sda", NAME="not-ok2"
1377 EOF
1378         },
1379         {
1380                 desc            => "final assignment",
1381                 subsys          => "block",
1382                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1383                 exp_name        => "ok",
1384                 exp_perms       => "root:tty:0640",
1385                 rules           => <<EOF
1386 KERNEL=="sda", GROUP:="tty"
1387 KERNEL=="sda", GROUP="not-ok", MODE="0640", NAME="ok"
1388 EOF
1389         },
1390         {
1391                 desc            => "final assignment 2",
1392                 subsys          => "block",
1393                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1394                 exp_name        => "ok",
1395                 exp_perms       => "root:tty:0640",
1396                 rules           => <<EOF
1397 KERNEL=="sda", GROUP:="tty"
1398 SUBSYSTEM=="block", MODE:="640"
1399 KERNEL=="sda", GROUP="not-ok", MODE="0666", NAME="ok"
1400 EOF
1401         },
1402         {
1403                 desc            => "env substitution",
1404                 subsys          => "block",
1405                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1406                 exp_name        => "node-add-me",
1407                 rules           => <<EOF
1408 KERNEL=="sda", MODE="0666", NAME="node-\$env{ACTION}-me"
1409 EOF
1410         },
1411         {
1412                 desc            => "reset list to current value",
1413                 subsys          => "tty",
1414                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
1415                 exp_name        => "three",
1416                 not_exp_name    => "two",
1417                 exp_target      => "node",
1418                 rules           => <<EOF
1419 KERNEL=="ttyACM[0-9]*", SYMLINK+="one"
1420 KERNEL=="ttyACM[0-9]*", SYMLINK+="two"
1421 KERNEL=="ttyACM[0-9]*", SYMLINK="three"
1422 KERNEL=="ttyACM[0-9]*", NAME="node"
1423 EOF
1424         },
1425         {
1426                 desc            => "test empty NAME",
1427                 subsys          => "tty",
1428                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
1429                 exp_name        => "<none>",
1430                 not_exp_name    => "ttyACM0",
1431                 exp_add_error   => "yes",
1432                 rules           => <<EOF
1433 KERNEL=="ttyACM[0-9]*", NAME=""
1434 EOF
1435         },
1436         {
1437                 desc            => "test empty NAME (empty override)",
1438                 subsys          => "tty",
1439                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
1440                 exp_name        => "<none>",
1441                 not_exp_name    => "wrong",
1442                 exp_add_error   => "yes",
1443                 rules           => <<EOF
1444 KERNEL=="ttyACM[0-9]*", NAME="wrong"
1445 KERNEL=="ttyACM[0-9]*", NAME=""
1446 EOF
1447         },
1448         {
1449                 desc            => "test empty NAME (non-empty override)",
1450                 subsys          => "tty",
1451                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
1452                 exp_name        => "right",
1453                 rules           => <<EOF
1454 KERNEL=="ttyACM[0-9]*", NAME=""
1455 KERNEL=="ttyACM[0-9]*", NAME="wrong"
1456 KERNEL=="ttyACM[0-9]*", NAME="right"
1457 EOF
1458         },
1459         {
1460                 desc            => "test multi matches",
1461                 subsys          => "tty",
1462                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
1463                 exp_name        => "right",
1464                 rules           => <<EOF
1465 KERNEL=="ttyACM*", NAME="before"
1466 KERNEL=="ttyACM*|nothing", NAME="right"
1467 EOF
1468         },
1469         {
1470                 desc            => "test multi matches 2",
1471                 subsys          => "tty",
1472                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
1473                 exp_name        => "right",
1474                 rules           => <<EOF
1475 KERNEL=="dontknow*|*nothing", NAME="nomatch"
1476 KERNEL=="ttyACM*", NAME="before"
1477 KERNEL=="dontknow*|ttyACM*|nothing*", NAME="right"
1478 EOF
1479         },
1480         {
1481                 desc            => "test multi matches 3",
1482                 subsys          => "tty",
1483                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
1484                 exp_name        => "right",
1485                 rules           => <<EOF
1486 KERNEL=="dontknow|nothing", NAME="nomatch"
1487 KERNEL=="dontknow|ttyACM0a|nothing|attyACM0", NAME="wrong1"
1488 KERNEL=="X|attyACM0|dontknow|ttyACM0a|nothing|attyACM0", NAME="wrong2"
1489 KERNEL=="dontknow|ttyACM0|nothing", NAME="right"
1490 EOF
1491         },
1492         {
1493                 desc            => "test multi matches 4",
1494                 subsys          => "tty",
1495                 devpath         => "/devices/pci0000:00/0000:00:1d.7/usb5/5-2/5-2:1.0/tty/ttyACM0",
1496                 exp_name        => "right",
1497                 rules           => <<EOF
1498 KERNEL=="dontknow|nothing", NAME="nomatch"
1499 KERNEL=="dontknow|ttyACM0a|nothing|attyACM0", NAME="wrong1"
1500 KERNEL=="X|attyACM0|dontknow|ttyACM0a|nothing|attyACM0", NAME="wrong2"
1501 KERNEL=="all|dontknow|ttyACM0", NAME="right"
1502 KERNEL=="ttyACM0a|nothing", NAME="wrong3"
1503 EOF
1504         },
1505         {
1506                 desc            => "IMPORT parent test sequence 1/2 (keep)",
1507                 subsys          => "block",
1508                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1509                 exp_name        => "parent",
1510                 option          => "keep",
1511                 rules           => <<EOF
1512 KERNEL=="sda", IMPORT="/bin/echo -e \'PARENT_KEY=parent_right\\nWRONG_PARENT_KEY=parent_wrong'"
1513 KERNEL=="sda", NAME="parent"
1514 EOF
1515         },
1516         {
1517                 desc            => "IMPORT parent test sequence 2/2 (keep)",
1518                 subsys          => "block",
1519                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1520                 exp_name        => "parentenv-parent_right",
1521                 option          => "clean",
1522                 rules           => <<EOF
1523 KERNEL=="sda1", IMPORT{parent}="PARENT*", NAME="parentenv-\$env{PARENT_KEY}\$env{WRONG_PARENT_KEY}"
1524 EOF
1525         },
1526         {
1527                 desc            => "GOTO test",
1528                 subsys          => "block",
1529                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1530                 exp_name        => "right",
1531                 rules           => <<EOF
1532 KERNEL=="sda1", GOTO="TEST"
1533 KERNEL=="sda1", NAME="wrong"
1534 KERNEL=="sda1", GOTO="BAD"
1535 KERNEL=="sda1", NAME="", LABEL="NO"
1536 KERNEL=="sda1", NAME="right", LABEL="TEST"
1537 KERNEL=="sda1", LABEL="BAD"
1538 EOF
1539         },
1540         {
1541                 desc            => "GOTO label does not exist",
1542                 subsys          => "block",
1543                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1544                 exp_name        => "right",
1545                 rules           => <<EOF
1546 KERNEL=="sda1", GOTO="does-not-exist"
1547 KERNEL=="sda1", NAME="right",
1548 LABEL="exists"
1549 EOF
1550         },
1551         {
1552                 desc            => "NAME compare test",
1553                 subsys          => "block",
1554                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1555                 exp_name        => "link",
1556                 exp_target      => "node",
1557                 not_exp_name    => "wronglink",
1558                 rules           => <<EOF
1559 KERNEL=="sda1", NAME="node"
1560 KERNEL=="sda2", NAME="wrong"
1561 KERNEL=="sda1", NAME=="wrong*", SYMLINK+="wronglink"
1562 KERNEL=="sda1", NAME=="?*", SYMLINK+="link"
1563 KERNEL=="sda1", NAME=="node*", SYMLINK+="link2"
1564 EOF
1565         },
1566         {
1567                 desc            => "NAME compare test 2",
1568                 subsys          => "block",
1569                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1570                 exp_name        => "link2",
1571                 exp_target      => "sda1",
1572                 not_exp_name    => "link",
1573                 rules           => <<EOF
1574 KERNEL=="sda1", NAME=="?*", SYMLINK+="link"
1575 KERNEL=="sda1", NAME!="?*", SYMLINK+="link2"
1576 EOF
1577         },
1578         {
1579                 desc            => "invalid key operation",
1580                 subsys          => "block",
1581                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1582                 exp_name        => "yes",
1583                 rules           => <<EOF
1584 KERNEL="sda1", NAME="no"
1585 KERNEL=="sda1", NAME="yes"
1586 EOF
1587         },
1588         {
1589                 desc            => "operator chars in attribute",
1590                 subsys          => "block",
1591                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1592                 exp_name        => "yes",
1593                 rules           => <<EOF
1594 KERNEL=="sda", ATTR{test:colon+plus}=="?*", NAME="yes"
1595 EOF
1596         },
1597         {
1598                 desc            => "overlong comment line",
1599                 subsys          => "block",
1600                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda/sda1",
1601                 exp_name        => "yes",
1602                 rules           => <<EOF
1603 # 012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789
1604    # 012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789
1605 KERNEL=="sda1", NAME=="no"
1606 KERNEL=="sda1", NAME="yes"
1607 EOF
1608         },
1609         {
1610                 desc            => "magic subsys/kernel lookup",
1611                 subsys          => "block",
1612                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1613                 exp_name        => "00:16:41:e2:8d:ff",
1614                 rules           => <<EOF
1615 KERNEL=="sda", NAME="\$attr{[net/eth0]address}"
1616 EOF
1617         },
1618         {
1619                 desc            => "TEST absolute path",
1620                 subsys          => "block",
1621                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1622                 exp_name        => "there",
1623                 rules           => <<EOF
1624 TEST=="/etc/hosts", NAME="there"
1625 TEST!="/etc/hosts", NAME="notthere"
1626 EOF
1627         },
1628         {
1629                 desc            => "TEST subsys/kernel lookup",
1630                 subsys          => "block",
1631                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1632                 exp_name        => "yes",
1633                 rules           => <<EOF
1634 KERNEL=="sda", TEST=="[net/eth0]", NAME="yes"
1635 EOF
1636         },
1637         {
1638                 desc            => "TEST relative path",
1639                 subsys          => "block",
1640                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1641                 exp_name        => "relative",
1642                 rules           => <<EOF
1643 KERNEL=="sda", TEST=="size", NAME="relative"
1644 EOF
1645         },
1646         {
1647                 desc            => "TEST wildcard substitution (find queue/nr_requests)",
1648                 subsys          => "block",
1649                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1650                 exp_name        => "found-subdir",
1651                 rules           => <<EOF
1652 KERNEL=="sda", TEST=="*/nr_requests", NAME="found-subdir"
1653 EOF
1654         },
1655         {
1656                 desc            => "TEST MODE=0000",
1657                 subsys          => "block",
1658                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1659                 exp_name        => "sda",
1660                 exp_perms       => "0:0:0000",
1661                 rules           => <<EOF
1662 KERNEL=="sda", MODE="0000"
1663 EOF
1664         },
1665         {
1666                 desc            => "TEST PROGRAM feeds MODE",
1667                 subsys          => "block",
1668                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1669                 exp_name        => "sda",
1670                 exp_perms       => "0:0:0400",
1671                 rules           => <<EOF
1672 KERNEL=="sda", MODE="666"
1673 KERNEL=="sda", PROGRAM=="/bin/echo 0 0 0400", OWNER="%c{1}", GROUP="%c{2}", MODE="%c{3}"
1674 EOF
1675         },
1676         {
1677                 desc            => "TEST PROGRAM feeds MODE with overflow",
1678                 subsys          => "block",
1679                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1680                 exp_name        => "sda",
1681                 exp_perms       => "0:0:0660",
1682                 rules           => <<EOF
1683 KERNEL=="sda", MODE="440"
1684 KERNEL=="sda", PROGRAM=="/bin/echo 0 0 0400letsdoabuffferoverflow0123456789012345789012345678901234567890", OWNER="%c{1}", GROUP="%c{2}", MODE="%c{3}"
1685 EOF
1686         },
1687         {
1688                 desc            => "magic [subsys/sysname] attribute substitution",
1689                 subsys          => "block",
1690                 devpath         => "/devices/pci0000:00/0000:00:1f.2/host0/target0:0:0/0:0:0:0/block/sda",
1691                 exp_name        => "sda-8741C4G-end",
1692                 exp_perms       => "0:0:0660",
1693                 rules           => <<EOF
1694 KERNEL=="sda", PROGRAM="/bin/true create-envp"
1695 KERNEL=="sda", ENV{TESTENV}="change-envp"
1696 KERNEL=="sda", NAME="%k-%s{[dmi/id]product_name}-end", RUN+="socket:@/org/kernel/udev/monitor"
1697 EOF
1698         },
1699 );
1700
1701 # set env
1702 $ENV{SYSFS_PATH} = $sysfs;
1703 $ENV{UDEV_CONFIG_FILE} = $udev_conf;
1704
1705 sub udev {
1706         my ($action, $subsys, $devpath, $rules) = @_;
1707
1708         $ENV{DEVPATH} = $devpath;
1709
1710         # create temporary rules
1711         open CONF, ">$udev_rules" || die "unable to create rules file: $udev_rules";
1712         print CONF $$rules;
1713         close CONF;
1714
1715         $ENV{ACTION} = $action;
1716         $ENV{SUBSYSTEM} = $subsys;
1717         if ($valgrind > 0) {
1718                 system("$udev_bin_valgrind");
1719         } else {
1720                 system("$udev_bin");
1721         }
1722 }
1723
1724 my $error = 0;
1725
1726 sub permissions_test {
1727         my($rules, $uid, $gid, $mode) = @_;
1728
1729         my $wrong = 0;
1730         my $userid;
1731         my $groupid;
1732
1733         $rules->{exp_perms} =~ m/^(.*):(.*):(.*)$/;
1734         if ($1 ne "") {
1735                 if (defined(getpwnam($1))) {
1736                         $userid = int(getpwnam($1));
1737                 } else {
1738                         $userid = $1;
1739                 }
1740                 if ($uid != $userid) { $wrong = 1; }
1741         }
1742         if ($2 ne "") {
1743                 if (defined(getgrnam($2))) {
1744                         $groupid = int(getgrnam($2));
1745                 } else {
1746                         $groupid = $2;
1747                 }
1748                 if ($gid != $groupid) { $wrong = 1; }
1749         }
1750         if ($3 ne "") {
1751                 if (($mode & 07777) != oct($3)) { $wrong = 1; };
1752         }
1753         if ($wrong == 0) {
1754                 print "permissions: ok\n";
1755         } else {
1756                 printf "  expected permissions are: %s:%s:%#o\n", $1, $2, oct($3);
1757                 printf "  created permissions are : %i:%i:%#o\n", $uid, $gid, $mode & 07777;
1758                 print "permissions: error\n";
1759                 $error++;
1760         }
1761 }
1762
1763 sub major_minor_test {
1764         my($rules, $rdev) = @_;
1765
1766         my $major = ($rdev >> 8) & 0xfff;
1767         my $minor = ($rdev & 0xff) | (($rdev >> 12) & 0xfff00);
1768         my $wrong = 0;
1769
1770         $rules->{exp_majorminor} =~ m/^(.*):(.*)$/;
1771         if ($1 ne "") {
1772                 if ($major != $1) { $wrong = 1; };
1773         }
1774         if ($2 ne "") {
1775                 if ($minor != $2) { $wrong = 1; };
1776         }
1777         if ($wrong == 0) {
1778                 print "major:minor: ok\n";
1779         } else {
1780                 printf "  expected major:minor is: %i:%i\n", $1, $2;
1781                 printf "  created major:minor is : %i:%i\n", $major, $minor;
1782                 print "major:minor: error\n";
1783                 $error++;
1784         }
1785 }
1786
1787 sub symlink_test {
1788         my ($rules) = @_;
1789
1790         my $output = `ls -l $PWD/$udev_root$rules->{exp_name}`;
1791
1792         if ($output =~ m/(.*)-> (.*)/) {
1793                 if ($2 eq $rules->{exp_target}) {
1794                         print "symlink:     ok\n";
1795                 } else {
1796                         print "  expected symlink from: \'$rules->{exp_name}\' to \'$rules->{exp_target}\'\n";
1797                         print "  created symlink from: \'$rules->{exp_name}\' to \'$2\'\n";
1798                         print "symlink: error";
1799                         if ($rules->{exp_add_error}) {
1800                                 print " as expected\n";
1801                         } else {
1802                                 print "\n";
1803                                 $error++;
1804                         }
1805                 }
1806         } else {
1807                 print "  expected symlink from: \'$rules->{exp_name}\' to \'$rules->{exp_target}\'\n";
1808                 print "symlink:     not created";
1809                 if ($rules->{exp_add_error}) {
1810                         print " as expected\n";
1811                 } else {
1812                         print "\n";
1813                         $error++;
1814                 }
1815         }
1816 }
1817
1818 sub make_udev_root {
1819         system("rm -rf $udev_root");
1820         mkdir($udev_root) || die "unable to create udev_root: $udev_root\n";
1821         # setting group and mode of udev_root ensures the tests work
1822         # even if the parent directory has setgid bit enabled.
1823         chown (0, 0, $udev_root) || die "unable to chown $udev_root\n";
1824         chmod (0755, $udev_root) || die "unable to chmod $udev_root\n";
1825 }
1826
1827 sub run_test {
1828         my ($rules, $number) = @_;
1829
1830         print "TEST $number: $rules->{desc}\n";
1831
1832         if ($rules->{exp_target}) {
1833                 print "device \'$rules->{devpath}\' expecting symlink '$rules->{exp_name}' to node \'$rules->{exp_target}\'\n";
1834         } else {
1835                 print "device \'$rules->{devpath}\' expecting node \'$rules->{exp_name}\'\n";
1836         }
1837
1838
1839         udev("add", $rules->{subsys}, $rules->{devpath}, \$rules->{rules});
1840         if (defined($rules->{not_exp_name})) {
1841                 if ((-e "$PWD/$udev_root$rules->{not_exp_name}") ||
1842                     (-l "$PWD/$udev_root$rules->{not_exp_name}")) {
1843                         print "nonexistent: error \'$rules->{not_exp_name}\' not expected to be there\n";
1844                         $error++
1845                 }
1846         }
1847
1848         if ((-e "$PWD/$udev_root$rules->{exp_name}") ||
1849             (-l "$PWD/$udev_root$rules->{exp_name}")) {
1850
1851                 my ($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size,
1852                     $atime, $mtime, $ctime, $blksize, $blocks) = stat("$PWD/$udev_root$rules->{exp_name}");
1853
1854                 if (defined($rules->{exp_perms})) {
1855                         permissions_test($rules, $uid, $gid, $mode);
1856                 }
1857                 if (defined($rules->{exp_majorminor})) {
1858                         major_minor_test($rules, $rdev);
1859                 }
1860                 if (defined($rules->{exp_target})) {
1861                         symlink_test($rules);
1862                 }
1863                 print "add:         ok\n";
1864         } else {
1865                 print "add:         error";
1866                 if ($rules->{exp_add_error}) {
1867                         print " as expected\n";
1868                 } else {
1869                         print "\n";
1870                         system("tree $udev_root");
1871                         print "\n";
1872                         $error++;
1873                 }
1874         }
1875
1876         if (defined($rules->{option}) && $rules->{option} eq "keep") {
1877                 print "\n\n";
1878                 return;
1879         }
1880
1881         udev("remove", $rules->{subsys}, $rules->{devpath}, \$rules->{rules});
1882         if ((-e "$PWD/$udev_root$rules->{exp_name}") ||
1883             (-l "$PWD/$udev_root$rules->{exp_name}")) {
1884                 print "remove:      error";
1885                 if ($rules->{exp_rem_error}) {
1886                         print " as expected\n";
1887                 } else {
1888                         print "\n";
1889                         system("tree $udev_root");
1890                         print "\n";
1891                         $error++;
1892                 }
1893         } else {
1894                 print "remove:      ok\n";
1895         }
1896
1897         print "\n";
1898
1899         if (defined($rules->{option}) && $rules->{option} eq "clean") {
1900                 make_udev_root ();
1901         }
1902
1903 }
1904
1905 # only run if we have root permissions
1906 # due to mknod restrictions
1907 if (!($<==0)) {
1908         print "Must have root permissions to run properly.\n";
1909         exit;
1910 }
1911
1912 # prepare
1913 make_udev_root();
1914
1915 # create config file
1916 open CONF, ">$udev_conf" || die "unable to create config file: $udev_conf";
1917 print CONF "udev_root=\"$udev_root\"\n";
1918 print CONF "udev_rules=\"$PWD\"\n";
1919 print CONF "udev_log=\"err\"\n";
1920 close CONF;
1921
1922 my $test_num = 1;
1923 my @list;
1924
1925 foreach my $arg (@ARGV) {
1926         if ($arg =~ m/--valgrind/) {
1927                 $valgrind = 1;
1928                 printf("using valgrind\n");
1929         } else {
1930                 push(@list, $arg);
1931         }
1932 }
1933
1934 if ($list[0]) {
1935         foreach my $arg (@list) {
1936                 if (defined($tests[$arg-1]->{desc})) {
1937                         print "udev-test will run test number $arg:\n\n";
1938                         run_test($tests[$arg-1], $arg);
1939                 } else {
1940                         print "test does not exist.\n";
1941                 }
1942         }
1943 } else {
1944         # test all
1945         print "\nudev-test will run ".($#tests + 1)." tests:\n\n";
1946
1947         foreach my $rules (@tests) {
1948                 run_test($rules, $test_num);
1949                 $test_num++;
1950         }
1951 }
1952
1953 print "$error errors occured\n\n";
1954
1955 # cleanup
1956 system("rm -rf $udev_root");
1957 unlink($udev_rules);
1958 unlink($udev_conf);
1959
1960 if ($error > 0) {
1961     exit(1);
1962 }
1963 exit(0);