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 # Kay Sievers <kay.sievers@vrfy.org>, 2003
  18 # Leann Ogasawara <ogasawara@osdl.org>, 2004
  19
  20 use warnings;
  21 use strict;
  22
  23 my $PWD         = $ENV{PWD};
  24 my $sysfs       = "sys/";
  25 my $udev_bin    = "../udev";
  26 my $udev_root   = "udev-root/"; # !!! directory will be removed !!!
  27 my $udev_db     = ".udevdb";
  28 my $udev_conf   = "udev-test.conf";
  29 my $udev_rules  = "udev-test.rules";
  30
  31 # uncomment following line to run udev with valgrind.
  32 # Should make this a runtime option to the script someday...
  33 #my $udev_bin  = "valgrind --tool=memcheck --leak-check=yes   ../udev";
  34
  35 my @tests = (
  36         {
  37                 desc            => "label test of scsi disc",
  38                 subsys          => "block",
  39                 devpath         => "/block/sda",
  40                 exp_name        => "boot_disk" ,
  41                 rules           => <<EOF
  42 BUS=="scsi", SYSFS{vendor}=="IBM-ESXS", NAME="boot_disk%n"
  43 KERNEL=="ttyUSB0", NAME="visor"
  44 EOF
  45         },
  46         {
  47                 desc            => "label test of scsi partition",
  48                 subsys          => "block",
  49                 devpath         => "/block/sda/sda1",
  50                 exp_name        => "boot_disk1" ,
  51                 rules           => <<EOF
  52 BUS=="scsi", SYSFS{vendor}=="IBM-ESXS", NAME="boot_disk%n"
  53 EOF
  54         },
  55         {
  56                 desc            => "label test of pattern match",
  57                 subsys          => "block",
  58                 devpath         => "/block/sda/sda1",
  59                 exp_name        => "boot_disk1" ,
  60                 rules           => <<EOF
  61 BUS=="scsi", SYSFS{vendor}=="?IBM-ESXS", NAME="boot_disk%n-1"
  62 BUS=="scsi", SYSFS{vendor}=="IBM-ESXS?", NAME="boot_disk%n-2"
  63 BUS=="scsi", SYSFS{vendor}=="IBM-ES??", NAME="boot_disk%n"
  64 BUS=="scsi", SYSFS{vendor}=="IBM-ESXSS", NAME="boot_disk%n-3"
  65 EOF
  66         },
  67         {
  68                 desc            => "label test of multiple sysfs files",
  69                 subsys          => "block",
  70                 devpath         => "/block/sda/sda1",
  71                 exp_name        => "boot_disk1" ,
  72                 rules           => <<EOF
  73 BUS=="scsi", SYSFS{vendor}=="IBM-ESXS", SYSFS{model}=="ST336605LW   !#", NAME="boot_diskX%n"
  74 BUS=="scsi", SYSFS{vendor}=="IBM-ESXS", SYSFS{model}=="ST336605LW    !#", NAME="boot_disk%n"
  75 EOF
  76         },
  77         {
  78                 desc            => "label test of max sysfs files",
  79                 subsys          => "block",
  80                 devpath         => "/block/sda/sda1",
  81                 exp_name        => "boot_disk1" ,
  82                 rules           => <<EOF
  83 BUS=="scsi", SYSFS{vendor}=="IBM-ESXS", SYSFS{model}=="ST336605LW    !#", SYSFS{scsi_level}=="4", SYSFS{rev}=="B245", SYSFS{type}=="2", SYSFS{queue_depth}=="32", NAME="boot_diskXX%n"
  84 BUS=="scsi", SYSFS{vendor}=="IBM-ESXS", SYSFS{model}=="ST336605LW    !#", SYSFS{scsi_level}=="4", SYSFS{rev}=="B245", SYSFS{type}=="0", NAME="boot_disk%n"
  85 EOF
  86         },
  87         {
  88                 desc            => "catch device by *",
  89                 subsys          => "tty",
  90                 devpath         => "/class/tty/ttyUSB0",
  91                 exp_name        => "visor/0" ,
  92                 rules           => <<EOF
  93 KERNEL=="ttyUSB*", NAME="visor/%n"
  94 EOF
  95         },
  96         {
  97                 desc            => "catch device by * - take 2",
  98                 subsys          => "tty",
  99                 devpath         => "/class/tty/ttyUSB0",
 100                 exp_name        => "visor/0" ,
 101                 rules           => <<EOF
 102 KERNEL=="*USB1", NAME="bad"
 103 KERNEL=="*USB0", NAME="visor/%n"
 104 EOF
 105         },
 106         {
 107                 desc            => "catch device by ?",
 108                 subsys          => "tty",
 109                 devpath         => "/class/tty/ttyUSB0",
 110                 exp_name        => "visor/0" ,
 111                 rules           => <<EOF
 112 KERNEL=="ttyUSB??*", NAME="visor/%n-1"
 113 KERNEL=="ttyUSB??", NAME="visor/%n-2"
 114 KERNEL=="ttyUSB?", NAME="visor/%n"
 115 EOF
 116         },
 117         {
 118                 desc            => "catch device by character class",
 119                 subsys          => "tty",
 120                 devpath         => "/class/tty/ttyUSB0",
 121                 exp_name        => "visor/0" ,
 122                 rules           => <<EOF
 123 KERNEL=="ttyUSB[A-Z]*", NAME="visor/%n-1"
 124 KERNEL=="ttyUSB?[0-9]", NAME="visor/%n-2"
 125 KERNEL=="ttyUSB[0-9]*", NAME="visor/%n"
 126 EOF
 127         },
 128         {
 129                 desc            => "replace kernel name",
 130                 subsys          => "tty",
 131                 devpath         => "/class/tty/ttyUSB0",
 132                 exp_name        => "visor" ,
 133                 rules           => <<EOF
 134 KERNEL=="ttyUSB0", NAME="visor"
 135 EOF
 136         },
 137         {
 138                 desc            => "Handle comment lines in config file (and replace kernel name)",
 139                 subsys          => "tty",
 140                 devpath         => "/class/tty/ttyUSB0",
 141                 exp_name        => "visor" ,
 142                 rules           => <<EOF
 143 # this is a comment
 144 KERNEL=="ttyUSB0", NAME="visor"
 145
 146 EOF
 147         },
 148         {
 149                 desc            => "Handle comment lines in config file with whitespace (and replace kernel name)",
 150                 subsys          => "tty",
 151                 devpath         => "/class/tty/ttyUSB0",
 152                 exp_name        => "visor" ,
 153                 rules           => <<EOF
 154  # this is a comment with whitespace before the comment
 155 KERNEL=="ttyUSB0", NAME="visor"
 156
 157 EOF
 158         },
 159         {
 160                 desc            => "Handle whitespace only lines (and replace kernel name)",
 161                 subsys          => "tty",
 162                 devpath         => "/class/tty/ttyUSB0",
 163                 exp_name        => "whitespace" ,
 164                 rules           => <<EOF
 165
 166
 167
 168  # this is a comment with whitespace before the comment
 169 KERNEL=="ttyUSB0", NAME="whitespace"
 170
 171
 172
 173 EOF
 174         },
 175         {
 176                 desc            => "Handle empty lines in config file (and replace kernel name)",
 177                 subsys          => "tty",
 178                 devpath         => "/class/tty/ttyUSB0",
 179                 exp_name        => "visor" ,
 180                 rules           => <<EOF
 181
 182 KERNEL=="ttyUSB0", NAME="visor"
 183
 184 EOF
 185         },
 186         {
 187                 desc            => "Handle backslashed multi lines in config file (and replace kernel name)",
 188                 subsys          => "tty",
 189                 devpath         => "/class/tty/ttyUSB0",
 190                 exp_name        => "visor" ,
 191                 rules           => <<EOF
 192 KERNEL=="ttyUSB0", \\
 193 NAME="visor"
 194
 195 EOF
 196         },
 197         {
 198                 desc            => "preserve backslashes, if they are not for a newline",
 199                 subsys          => "tty",
 200                 devpath         => "/class/tty/ttyUSB0",
 201                 exp_name        => "aaa",
 202                 rules           => <<EOF
 203 KERNEL=="ttyUSB0", PROGRAM=="/bin/echo -e \\101", RESULT=="A", NAME="aaa"
 204 EOF
 205         },
 206         {
 207                 desc            => "Handle stupid backslashed multi lines in config file (and replace kernel name)",
 208                 subsys          => "tty",
 209                 devpath         => "/class/tty/ttyUSB0",
 210                 exp_name        => "visor" ,
 211                 rules           => <<EOF
 212
 213 #
 214 \\
 215
 216 \\\\
 217
 218 #\\
 219
 220 KERNEL=="ttyUSB0", \\
 221         NAME="visor"
 222
 223 EOF
 224         },
 225         {
 226                 desc            => "subdirectory handling",
 227                 subsys          => "tty",
 228                 devpath         => "/class/tty/ttyUSB0",
 229                 exp_name        => "sub/direct/ory/visor" ,
 230                 rules           => <<EOF
 231 KERNEL=="ttyUSB0", NAME="sub/direct/ory/visor"
 232 EOF
 233         },
 234         {
 235                 desc            => "place on bus of scsi partition",
 236                 subsys          => "block",
 237                 devpath         => "/block/sda/sda3",
 238                 exp_name        => "first_disk3" ,
 239                 rules           => <<EOF
 240 BUS=="scsi", ID=="0:0:0:0", NAME="first_disk%n"
 241 EOF
 242         },
 243         {
 244                 desc            => "test NAME substitution chars",
 245                 subsys          => "block",
 246                 devpath         => "/block/sda/sda3",
 247                 exp_name        => "Major:8:minor:3:kernelnumber:3:bus:0:0:0:0" ,
 248                 rules           => <<EOF
 249 BUS=="scsi", ID=="0:0:0:0", NAME="Major:%M:minor:%m:kernelnumber:%n:bus:%b"
 250 EOF
 251         },
 252         {
 253                 desc            => "test NAME substitution chars (with length limit)",
 254                 subsys          => "block",
 255                 devpath         => "/block/sda/sda3",
 256                 exp_name        => "M8-m3-n3-b0:0-sIBM" ,
 257                 rules           => <<EOF
 258 BUS=="scsi", ID=="0:0:0:0", NAME="M%M-m%m-n%n-b%3b-s%3s{vendor}"
 259 EOF
 260         },
 261         {
 262                 desc            => "sustitution of sysfs value (%s{file})",
 263                 subsys          => "block",
 264                 devpath         => "/block/sda",
 265                 exp_name        => "disk-IBM-ESXS-sda" ,
 266                 rules           => <<EOF
 267 BUS=="scsi", SYSFS{vendor}=="IBM-ESXS", NAME="disk-%s{vendor}-%k"
 268 KERNEL=="ttyUSB0", NAME="visor"
 269 EOF
 270         },
 271         {
 272                 desc            => "program result substitution",
 273                 subsys          => "block",
 274                 devpath         => "/block/sda/sda3",
 275                 exp_name        => "special-device-3" ,
 276                 rules           => <<EOF
 277 BUS=="scsi", PROGRAM=="/bin/echo -n special-device", RESULT=="-special-*", NAME="%c-1-%n"
 278 BUS=="scsi", PROGRAM=="/bin/echo -n special-device", RESULT=="special--*", NAME="%c-2-%n"
 279 BUS=="scsi", PROGRAM=="/bin/echo -n special-device", RESULT=="special-device-", NAME="%c-3-%n"
 280 BUS=="scsi", PROGRAM=="/bin/echo -n special-device", RESULT=="special-devic", NAME="%c-4-%n"
 281 BUS=="scsi", PROGRAM=="/bin/echo -n special-device", RESULT=="special-*", NAME="%c-%n"
 282 EOF
 283         },
 284         {
 285                 desc            => "program result substitution (no argument should be subsystem)",
 286                 subsys          => "block",
 287                 devpath         => "/block/sda/sda3",
 288                 exp_name        => "subsys_block" ,
 289                 rules           => <<EOF
 290 BUS=="scsi", PROGRAM=="/bin/echo", RESULT=="block", NAME="subsys_block"
 291 EOF
 292         },
 293         {
 294                 desc            => "program result substitution (newline removal)",
 295                 subsys          => "block",
 296                 devpath         => "/block/sda/sda3",
 297                 exp_name        => "newline_removed" ,
 298                 rules           => <<EOF
 299 BUS=="scsi", PROGRAM=="/bin/echo test", RESULT=="test", NAME="newline_removed"
 300 EOF
 301         },
 302         {
 303                 desc            => "program result substitution",
 304                 subsys          => "block",
 305                 devpath         => "/block/sda/sda3",
 306                 exp_name        => "test-0:0:0:0" ,
 307                 rules           => <<EOF
 308 BUS=="scsi", PROGRAM=="/bin/echo -n test-%b", RESULT=="test-0:0*", NAME="%c"
 309 EOF
 310         },
 311         {
 312                 desc            => "program with escaped format char (tricky: callout returns format char!)",
 313                 subsys          => "block",
 314                 devpath         => "/block/sda/sda3",
 315                 exp_name        => "escape-3" ,
 316                 rules           => <<EOF
 317 BUS=="scsi", PROGRAM=="/bin/echo -n escape-%%n", KERNEL=="sda3", NAME="%c"
 318 EOF
 319         },
 320         {
 321                 desc            => "program with lots of arguments",
 322                 subsys          => "block",
 323                 devpath         => "/block/sda/sda3",
 324                 exp_name        => "foo9" ,
 325                 rules           => <<EOF
 326 BUS=="scsi", PROGRAM=="/bin/echo -n foo3 foo4 foo5 foo6 foo7 foo8 foo9", KERNEL=="sda3", NAME="%c{7}"
 327 EOF
 328         },
 329         {
 330                 desc            => "program with subshell",
 331                 subsys          => "block",
 332                 devpath         => "/block/sda/sda3",
 333                 exp_name        => "bar9" ,
 334                 rules           => <<EOF
 335 BUS=="scsi", PROGRAM=="/bin/sh -c 'echo foo3 foo4 foo5 foo6 foo7 foo8 foo9 | sed  s/foo9/bar9/'", KERNEL=="sda3", NAME="%c{7}"
 336 EOF
 337         },
 338         {
 339                 desc            => "program arguments combined with apostrophes",
 340                 subsys          => "block",
 341                 devpath         => "/block/sda/sda3",
 342                 exp_name        => "foo7" ,
 343                 rules           => <<EOF
 344 BUS=="scsi", PROGRAM=="/bin/echo -n 'foo3 foo4'   'foo5   foo6   foo7 foo8'", KERNEL=="sda3", NAME="%c{5}"
 345 EOF
 346         },
 347         {
 348                 desc            => "characters before the %c{N} substitution",
 349                 subsys          => "block",
 350                 devpath         => "/block/sda/sda3",
 351                 exp_name        => "my-foo9" ,
 352                 rules           => <<EOF
 353 BUS=="scsi", PROGRAM=="/bin/echo -n foo3 foo4 foo5 foo6 foo7 foo8 foo9", KERNEL=="sda3", NAME="my-%c{7}"
 354 EOF
 355         },
 356         {
 357                 desc            => "substitute the second to last argument",
 358                 subsys          => "block",
 359                 devpath         => "/block/sda/sda3",
 360                 exp_name        => "my-foo8" ,
 361                 rules           => <<EOF
 362 BUS=="scsi", PROGRAM=="/bin/echo -n foo3 foo4 foo5 foo6 foo7 foo8 foo9", KERNEL=="sda3", NAME="my-%c{6}"
 363 EOF
 364         },
 365         {
 366                 desc            => "invalid program for device with no bus",
 367                 subsys          => "tty",
 368                 devpath         => "/class/tty/console",
 369                 exp_name        => "TTY" ,
 370                 rules           => <<EOF
 371 BUS=="scsi", PROGRAM=="/bin/echo -n foo", RESULT=="foo", NAME="foo"
 372 KERNEL=="console", NAME="TTY"
 373 EOF
 374         },
 375         {
 376                 desc            => "valid program for device with no bus",
 377                 subsys          => "tty",
 378                 devpath         => "/class/tty/console",
 379                 exp_name        => "foo" ,
 380                 rules           => <<EOF
 381 PROGRAM=="/bin/echo -n foo", RESULT=="foo", NAME="foo"
 382 KERNEL=="console", NAME="TTY"
 383 EOF
 384         },
 385         {
 386                 desc            => "invalid label for device with no bus",
 387                 subsys          => "tty",
 388                 devpath         => "/class/tty/console",
 389                 exp_name        => "TTY" ,
 390                 rules           => <<EOF
 391 BUS=="foo", SYSFS{dev}=="5:1", NAME="foo"
 392 KERNEL=="console", NAME="TTY"
 393 EOF
 394         },
 395         {
 396                 desc            => "valid label for device with no bus",
 397                 subsys          => "tty",
 398                 devpath         => "/class/tty/console",
 399                 exp_name        => "foo" ,
 400                 rules           => <<EOF
 401 SYSFS{dev}=="5:1", NAME="foo"
 402 KERNEL=="console", NAME="TTY"
 403 EOF
 404         },
 405         {
 406                 desc            => "program and bus type match",
 407                 subsys          => "block",
 408                 devpath         => "/block/sda",
 409                 exp_name        => "scsi-0:0:0:0" ,
 410                 rules           => <<EOF
 411 BUS=="usb", PROGRAM=="/bin/echo -n usb-%b", NAME="%c"
 412 BUS=="scsi", PROGRAM=="/bin/echo -n scsi-%b", NAME="%c"
 413 BUS=="foo", PROGRAM=="/bin/echo -n foo-%b", NAME="%c"
 414 EOF
 415         },
 416         {
 417                 desc            => "create all possible partitions",
 418                 subsys          => "block",
 419                 devpath         => "/block/sda",
 420                 exp_name        => "boot_disk15" ,
 421                 rules           => <<EOF
 422 BUS=="scsi", SYSFS{vendor}=="IBM-ESXS", NAME{all_partitions}="boot_disk"
 423 EOF
 424         },
 425         {
 426                 desc            => "sysfs parent hierarchy",
 427                 subsys          => "tty",
 428                 devpath         => "/class/tty/ttyUSB0",
 429                 exp_name        => "visor" ,
 430                 rules           => <<EOF
 431 SYSFS{idProduct}=="2008", NAME="visor"
 432 EOF
 433         },
 434         {
 435                 desc            => "name test with ! in the name",
 436                 subsys          => "block",
 437                 devpath         => "/block/rd!c0d0",
 438                 exp_name        => "rd/c0d0" ,
 439                 rules           => <<EOF
 440 BUS=="scsi", NAME="%k"
 441 KERNEL=="ttyUSB0", NAME="visor"
 442 EOF
 443         },
 444         {
 445                 desc            => "name test with ! in the name, but no matching rule",
 446                 subsys          => "block",
 447                 devpath         => "/block/rd!c0d0",
 448                 exp_name        => "rd/c0d0" ,
 449                 rules           => <<EOF
 450 KERNEL=="ttyUSB0", NAME="visor"
 451 EOF
 452         },
 453         {
 454                 desc            => "name test with ! in the name for a partition",
 455                 subsys          => "block",
 456                 devpath         => "/block/cciss!c0d0/cciss!c0d0p1",
 457                 exp_name        => "cciss/c0d0p1" ,
 458                 rules           => <<EOF
 459 BUS=="scsi", NAME="%k"
 460 KERNEL=="ttyUSB0", NAME="visor"
 461 EOF
 462         },
 463         {
 464                 desc            => "ID rule",
 465                 subsys          => "block",
 466                 devpath         => "/block/sda",
 467                 exp_name        => "scsi-0:0:0:0",
 468                 rules           => <<EOF
 469 BUS=="usb", ID=="0:0:0:0", NAME="not-scsi"
 470 BUS=="scsi", ID=="0:0:0:1", NAME="no-match"
 471 BUS=="scsi", ID==":0", NAME="short-id"
 472 BUS=="scsi", ID=="/0:0:0:0", NAME="no-match"
 473 BUS=="scsi", ID=="0:0:0:0", NAME="scsi-0:0:0:0"
 474 EOF
 475         },
 476         {
 477                 desc            => "ID wildcard all",
 478                 subsys          => "block",
 479                 devpath         => "/block/sda",
 480                 exp_name        => "scsi-0:0:0:0",
 481                 rules           => <<EOF
 482 BUS=="scsi", ID=="*:1", NAME="no-match"
 483 BUS=="scsi", ID=="*:0:1", NAME="no-match"
 484 BUS=="scsi", ID=="*:0:0:1", NAME="no-match"
 485 BUS=="scsi", ID=="*", NAME="scsi-0:0:0:0"
 486 BUS=="scsi", ID=="0:0:0:0", NAME="bad"
 487 EOF
 488         },
 489         {
 490                 desc            => "ID wildcard partial",
 491                 subsys          => "block",
 492                 devpath         => "/block/sda",
 493                 exp_name        => "scsi-0:0:0:0",
 494                 rules           => <<EOF
 495 BUS=="scsi", ID=="*:0", NAME="scsi-0:0:0:0"
 496 BUS=="scsi", ID=="0:0:0:0", NAME="bad"
 497 EOF
 498         },
 499         {
 500                 desc            => "ID wildcard partial 2",
 501                 subsys          => "block",
 502                 devpath         => "/block/sda",
 503                 exp_name        => "scsi-0:0:0:0",
 504                 rules           => <<EOF
 505 BUS=="scsi", ID=="*:0:0:0", NAME="scsi-0:0:0:0"
 506 BUS=="scsi", ID=="0:0:0:0", NAME="bad"
 507 EOF
 508         },
 509         {
 510                 desc            => "ignore SYSFS attribute whitespace",
 511                 subsys          => "block",
 512                 devpath         => "/block/sda",
 513                 exp_name        => "ignored",
 514                 rules           => <<EOF
 515 BUS=="scsi", SYSFS{whitespace_test}=="WHITE  SPACE", NAME="ignored"
 516 EOF
 517         },
 518         {
 519                 desc            => "do not ignore SYSFS attribute whitespace",
 520                 subsys          => "block",
 521                 devpath         => "/block/sda",
 522                 exp_name        => "matched-with-space",
 523                 rules           => <<EOF
 524 BUS=="scsi", SYSFS{whitespace_test}=="WHITE  SPACE ", NAME="wrong-to-ignore"
 525 BUS=="scsi", SYSFS{whitespace_test}=="WHITE  SPACE   ", NAME="matched-with-space"
 526 EOF
 527         },
 528         {
 529                 desc            => "permissions USER=bad GROUP=name",
 530                 subsys          => "tty",
 531                 devpath         => "/class/tty/tty33",
 532                 exp_name        => "tty33",
 533                 exp_perms       => "0:0:0660",
 534                 rules           => <<EOF
 535 KERNEL=="tty33", NAME="tty33", OWNER="bad", GROUP="name"
 536 EOF
 537         },
 538         {
 539                 desc            => "permissions OWNER=5000",
 540                 subsys          => "block",
 541                 devpath         => "/block/sda",
 542                 exp_name        => "node",
 543                 exp_perms       => "5000::0660",
 544                 rules           => <<EOF
 545 BUS=="scsi", KERNEL=="sda", NAME="node", OWNER="5000"
 546 EOF
 547         },
 548         {
 549                 desc            => "permissions GROUP=100",
 550                 subsys          => "block",
 551                 devpath         => "/block/sda",
 552                 exp_name        => "node",
 553                 exp_perms       => ":100:0660",
 554                 rules           => <<EOF
 555 BUS=="scsi", KERNEL=="sda", NAME="node", GROUP="100"
 556 EOF
 557         },
 558         {
 559                 desc            => "textual user id",
 560                 subsys          => "block",
 561                 devpath         => "/block/sda",
 562                 exp_name        => "node",
 563                 exp_perms       => "nobody::0660",
 564                 rules           => <<EOF
 565 BUS=="scsi", KERNEL=="sda", NAME="node", OWNER="nobody"
 566 EOF
 567         },
 568         {
 569                 desc            => "textual group id",
 570                 subsys          => "block",
 571                 devpath         => "/block/sda",
 572                 exp_name        => "node",
 573                 exp_perms       => ":daemon:0660",
 574                 rules           => <<EOF
 575 BUS=="scsi", KERNEL=="sda", NAME="node", GROUP="daemon"
 576 EOF
 577         },
 578         {
 579                 desc            => "textual user/group id",
 580                 subsys          => "block",
 581                 devpath         => "/block/sda",
 582                 exp_name        => "node",
 583                 exp_perms       => "root:mail:0660",
 584                 rules           => <<EOF
 585 BUS=="scsi", KERNEL=="sda", NAME="node", OWNER="root", GROUP="mail"
 586 EOF
 587         },
 588         {
 589                 desc            => "permissions MODE=0777",
 590                 subsys          => "block",
 591                 devpath         => "/block/sda",
 592                 exp_name        => "node",
 593                 exp_perms       => "::0777",
 594                 rules           => <<EOF
 595 BUS=="scsi", KERNEL=="sda", NAME="node", MODE="0777"
 596 EOF
 597         },
 598         {
 599                 desc            => "permissions OWNER=5000 GROUP=100 MODE=0777",
 600                 subsys          => "block",
 601                 devpath         => "/block/sda",
 602                 exp_name        => "node",
 603                 exp_perms       => "5000:100:0777",
 604                 rules           => <<EOF
 605 BUS=="scsi", KERNEL=="sda", NAME="node", OWNER="5000", GROUP="100", MODE="0777"
 606 EOF
 607         },
 608         {
 609                 desc            => "permissions OWNER to 5000",
 610                 subsys          => "tty",
 611                 devpath         => "/class/tty/ttyUSB0",
 612                 exp_name        => "ttyUSB0",
 613                 exp_perms       => "5000::",
 614                 rules           => <<EOF
 615 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n", OWNER="5000"
 616 EOF
 617         },
 618         {
 619                 desc            => "permissions GROUP to 100",
 620                 subsys          => "tty",
 621                 devpath         => "/class/tty/ttyUSB0",
 622                 exp_name        => "ttyUSB0",
 623                 exp_perms       => ":100:0660",
 624                 rules           => <<EOF
 625 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n", GROUP="100"
 626 EOF
 627         },
 628         {
 629                 desc            => "permissions MODE to 0060",
 630                 subsys          => "tty",
 631                 devpath         => "/class/tty/ttyUSB0",
 632                 exp_name        => "ttyUSB0",
 633                 exp_perms       => "::0060",
 634                 rules           => <<EOF
 635 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n", MODE="0060"
 636 EOF
 637         },
 638         {
 639                 desc            => "permissions OWNER, GROUP, MODE",
 640                 subsys          => "tty",
 641                 devpath         => "/class/tty/ttyUSB0",
 642                 exp_name        => "ttyUSB0",
 643                 exp_perms       => "5000:100:0777",
 644                 rules           => <<EOF
 645 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n", OWNER="5000", GROUP="100", MODE="0777"
 646 EOF
 647         },
 648         {
 649                 desc            => "permissions only rule",
 650                 subsys          => "tty",
 651                 devpath         => "/class/tty/ttyUSB0",
 652                 exp_name        => "ttyUSB0",
 653                 exp_perms       => "5000:100:0777",
 654                 rules           => <<EOF
 655 KERNEL=="ttyUSB[0-9]*", OWNER="5000", GROUP="100", MODE="0777"
 656 KERNEL=="ttyUSX[0-9]*", OWNER="5001", GROUP="101", MODE="0444"
 657 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n"
 658 EOF
 659         },
 660         {
 661                 desc            => "multiple permissions only rule",
 662                 subsys          => "tty",
 663                 devpath         => "/class/tty/ttyUSB0",
 664                 exp_name        => "ttyUSB0",
 665                 exp_perms       => "3000:4000:0777",
 666                 rules           => <<EOF
 667 SUBSYSTEM=="tty", OWNER="3000"
 668 SUBSYSTEM=="tty", GROUP="4000"
 669 SUBSYSTEM=="tty", MODE="0777"
 670 KERNEL=="ttyUSX[0-9]*", OWNER="5001", GROUP="101", MODE="0444"
 671 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n"
 672 EOF
 673         },
 674         {
 675                 desc            => "permissions only rule with override at NAME rule",
 676                 subsys          => "tty",
 677                 devpath         => "/class/tty/ttyUSB0",
 678                 exp_name        => "ttyUSB0",
 679                 exp_perms       => "3000:8000:0777",
 680                 rules           => <<EOF
 681 SUBSYSTEM=="tty", OWNER="3000"
 682 SUBSYSTEM=="tty", GROUP="4000"
 683 SUBSYSTEM=="tty", MODE="0777"
 684 KERNEL=="ttyUSX[0-9]*", OWNER="5001", GROUP="101", MODE="0444"
 685 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n", GROUP="8000"
 686 EOF
 687         },
 688         {
 689                 desc            => "major/minor number test",
 690                 subsys          => "block",
 691                 devpath         => "/block/sda",
 692                 exp_name        => "node",
 693                 exp_majorminor  => "8:0",
 694                 rules           => <<EOF
 695 BUS=="scsi", KERNEL=="sda", NAME="node"
 696 EOF
 697         },
 698         {
 699                 desc            => "big minor number test",
 700                 subsys          => "i2c-dev",
 701                 devpath         => "/class/i2c-dev/i2c-300",
 702                 exp_name        => "node",
 703                 exp_majorminor  => "89:300",
 704                 rules           => <<EOF
 705 KERNEL=="i2c-300", NAME="node"
 706 EOF
 707         },
 708         {
 709                 desc            => "big major number test",
 710                 subsys          => "i2c-dev",
 711                 devpath         => "/class/i2c-dev/i2c-fake1",
 712                 exp_name        => "node",
 713                 exp_majorminor  => "4095:1",
 714                 rules           => <<EOF
 715 KERNEL=="i2c-fake1", NAME="node"
 716 EOF
 717         },
 718         {
 719                 desc            => "big major and big minor number test",
 720                 subsys          => "i2c-dev",
 721                 devpath         => "/class/i2c-dev/i2c-fake2",
 722                 exp_name        => "node",
 723                 exp_majorminor  => "4094:89999",
 724                 rules           => <<EOF
 725 KERNEL=="i2c-fake2", NAME="node"
 726 EOF
 727         },
 728         {
 729                 desc            => "multiple symlinks with format char",
 730                 subsys          => "tty",
 731                 devpath         => "/class/tty/ttyUSB0",
 732                 exp_name        => "symlink2-ttyUSB0",
 733                 exp_target      => "ttyUSB0",
 734                 rules           => <<EOF
 735 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="symlink1-%n symlink2-%k symlink3-%b"
 736 EOF
 737         },
 738         {
 739                 desc            => "symlink creation (same directory)",
 740                 subsys          => "tty",
 741                 devpath         => "/class/tty/ttyUSB0",
 742                 exp_name        => "visor0",
 743                 exp_target      => "ttyUSB0",
 744                 rules           => <<EOF
 745 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="visor%n"
 746 EOF
 747         },
 748         {
 749                 desc            => "symlink creation (relative link forward)",
 750                 subsys          => "block",
 751                 devpath         => "/block/sda/sda2",
 752                 exp_name        => "1/2/symlink" ,
 753                 exp_target      => "a/b/node",
 754                 rules           => <<EOF
 755 BUS=="scsi", SYSFS{vendor}=="IBM-ESXS", NAME="1/2/a/b/node", SYMLINK="1/2/symlink"
 756 EOF
 757         },
 758         {
 759                 desc            => "symlink creation (relative link back and forward)",
 760                 subsys          => "block",
 761                 devpath         => "/block/sda/sda2",
 762                 exp_name        => "1/2/c/d/symlink" ,
 763                 exp_target      => "../../a/b/node",
 764                 rules           => <<EOF
 765 BUS=="scsi", SYSFS{vendor}=="IBM-ESXS", NAME="1/2/a/b/node", SYMLINK="1/2/c/d/symlink"
 766 EOF
 767         },
 768         {
 769                 desc            => "multiple symlinks",
 770                 subsys          => "tty",
 771                 devpath         => "/class/tty/ttyUSB0",
 772                 exp_name        => "second-0" ,
 773                 exp_target      => "visor" ,
 774                 rules           => <<EOF
 775 KERNEL=="ttyUSB0", NAME="visor", SYMLINK="first-%n second-%n third-%n"
 776 EOF
 777         },
 778         {
 779                 desc            => "symlink only rule",
 780                 subsys          => "block",
 781                 devpath         => "/block/sda",
 782                 exp_name        => "symlink-only2",
 783                 exp_target      => "link",
 784                 rules           => <<EOF
 785 BUS=="scsi", KERNEL=="sda", SYMLINK="symlink-only1"
 786 BUS=="scsi", KERNEL=="sda", SYMLINK="symlink-only2"
 787 BUS=="scsi", KERNEL=="sda", NAME="link", SYMLINK="symlink0"
 788 EOF
 789         },
 790         {
 791                 desc            => "symlink name '.'",
 792                 subsys          => "block",
 793                 devpath         => "/block/sda",
 794                 exp_name        => ".",
 795                 exp_target      => "link",
 796                 exp_add_error   => "yes",
 797                 exp_rem_error   => "yes",
 798                 rules           => <<EOF
 799 BUS=="scsi", KERNEL=="sda", NAME="link", SYMLINK="."
 800 EOF
 801         },
 802         {
 803                 desc            => "symlink node to itself",
 804                 subsys          => "tty",
 805                 devpath         => "/class/tty/tty0",
 806                 exp_name        => "link",
 807                 exp_target      => "link",
 808                 exp_rem_error   => "yes",
 809                 option          => "clean",
 810                 rules           => <<EOF
 811 KERNEL=="tty0", NAME="link", SYMLINK="link"
 812 EOF
 813         },
 814         {
 815                 desc            => "symlink %n substitution",
 816                 subsys          => "tty",
 817                 devpath         => "/class/tty/ttyUSB0",
 818                 exp_name        => "symlink0",
 819                 exp_target      => "ttyUSB0",
 820                 rules           => <<EOF
 821 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="symlink%n"
 822 EOF
 823         },
 824         {
 825                 desc            => "symlink %k substitution",
 826                 subsys          => "tty",
 827                 devpath         => "/class/tty/ttyUSB0",
 828                 exp_name        => "symlink-ttyUSB0",
 829                 exp_target      => "ttyUSB0",
 830                 rules           => <<EOF
 831 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="symlink-%k"
 832 EOF
 833         },
 834         {
 835                 desc            => "symlink %M:%m substitution",
 836                 subsys          => "tty",
 837                 devpath         => "/class/tty/ttyUSB0",
 838                 exp_name        => "major-188:0",
 839                 exp_target      => "ttyUSB0",
 840                 rules           => <<EOF
 841 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="major-%M:%m"
 842 EOF
 843         },
 844         {
 845                 desc            => "symlink %b substitution",
 846                 subsys          => "block",
 847                 devpath         => "/block/sda",
 848                 exp_name        => "symlink-0:0:0:0",
 849                 exp_target      => "node",
 850                 rules           => <<EOF
 851 BUS=="scsi", KERNEL=="sda", NAME="node", SYMLINK="symlink-%b"
 852 EOF
 853         },
 854         {
 855                 desc            => "symlink %c substitution",
 856                 subsys          => "tty",
 857                 devpath         => "/class/tty/ttyUSB0",
 858                 exp_name        => "test",
 859                 exp_target      => "ttyUSB0",
 860                 rules           => <<EOF
 861 KERNEL=="ttyUSB[0-9]*", PROGRAM=="/bin/echo test" NAME="ttyUSB%n", SYMLINK="%c"
 862 EOF
 863         },
 864         {
 865                 desc            => "symlink %c{N} substitution",
 866                 subsys          => "tty",
 867                 devpath         => "/class/tty/ttyUSB0",
 868                 exp_name        => "test",
 869                 exp_target      => "ttyUSB0",
 870                 rules           => <<EOF
 871 KERNEL=="ttyUSB[0-9]*", PROGRAM=="/bin/echo symlink test this" NAME="ttyUSB%n", SYMLINK="%c{2}"
 872 EOF
 873         },
 874         {
 875                 desc            => "symlink %c{N+} substitution",
 876                 subsys          => "tty",
 877                 devpath         => "/class/tty/ttyUSB0",
 878                 exp_name        => "this",
 879                 exp_target      => "ttyUSB0",
 880                 rules           => <<EOF
 881 KERNEL=="ttyUSB[0-9]*", PROGRAM=="/bin/echo symlink test this" NAME="ttyUSB%n", SYMLINK="%c{2+}"
 882 EOF
 883         },
 884         {
 885                 desc            => "symlink only rule with %c{N+}",
 886                 subsys          => "block",
 887                 devpath         => "/block/sda",
 888                 exp_name        => "test",
 889                 exp_target      => "link",
 890                 rules           => <<EOF
 891 BUS=="scsi", KERNEL=="sda", PROGRAM=="/bin/echo link test this" SYMLINK="%c{2+}"
 892 BUS=="scsi", KERNEL=="sda", NAME="link", SYMLINK="symlink0"
 893 EOF
 894         },
 895         {
 896                 desc            => "symlink %s{filename} substitution",
 897                 subsys          => "tty",
 898                 devpath         => "/class/tty/ttyUSB0",
 899                 exp_name        => "188:0",
 900                 exp_target      => "ttyUSB0",
 901                 rules           => <<EOF
 902 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="%s{dev}"
 903 EOF
 904         },
 905         {
 906                 desc            => "symlink %Ns{filename} substitution",
 907                 subsys          => "tty",
 908                 devpath         => "/class/tty/ttyUSB0",
 909                 exp_name        => "188",
 910                 exp_target      => "ttyUSB0",
 911                 rules           => <<EOF
 912 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="%3s{dev}"
 913 EOF
 914         },
 915         {
 916                 desc            => "symlink with '%' in name",
 917                 subsys          => "tty",
 918                 devpath         => "/class/tty/ttyUSB0",
 919                 exp_name        => "percent%sign",
 920                 exp_target      => "ttyUSB0",
 921                 rules           => <<EOF
 922 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="percent%%sign"
 923 EOF
 924         },
 925         {
 926                 desc            => "symlink with '%' in name",
 927                 subsys          => "tty",
 928                 devpath         => "/class/tty/ttyUSB0",
 929                 exp_name        => "%ttyUSB0_name",
 930                 exp_target      => "ttyUSB0",
 931                 rules           => <<EOF
 932 KERNEL=="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="%%%k_name"
 933 EOF
 934         },
 935         {
 936                 desc            => "program result substitution (numbered part of)",
 937                 subsys          => "block",
 938                 devpath         => "/block/sda/sda3",
 939                 exp_name        => "link1",
 940                 exp_target      => "node",
 941                 rules           => <<EOF
 942 BUS=="scsi", PROGRAM=="/bin/echo -n node link1 link2", RESULT=="node *", NAME="%c{1}", SYMLINK="%c{2} %c{3}"
 943 EOF
 944         },
 945         {
 946                 desc            => "program result substitution (numbered part of+)",
 947                 subsys          => "block",
 948                 devpath         => "/block/sda/sda3",
 949                 exp_name        => "link4",
 950                 exp_target      => "node",
 951                 rules           => <<EOF
 952 BUS=="scsi", PROGRAM=="/bin/echo -n node link1 link2 link3 link4", RESULT=="node *", NAME="%c{1}", SYMLINK="%c{2+}"
 953 EOF
 954         },
 955         {
 956                 desc            => "enumeration char test (single test)",
 957                 subsys          => "block",
 958                 devpath         => "/block/sda",
 959                 exp_name        => "cdrom",
 960                 rules           => <<EOF
 961 KERNEL=="sda", NAME="cdrom%e"
 962 EOF
 963         },
 964         {
 965                 desc            => "enumeration char test sequence 1/5 (keep)",
 966                 subsys          => "block",
 967                 devpath         => "/block/sda",
 968                 exp_name        => "cdrom",
 969                 option          => "keep",
 970                 rules           => <<EOF
 971 KERNEL=="sda", NAME="cdrom%e"
 972 EOF
 973         },
 974         {
 975                 desc            => "enumeration char test sequence 2/5 (keep)",
 976                 subsys          => "block",
 977                 devpath         => "/block/sda/sda1",
 978                 exp_name        => "enum",
 979                 option          => "keep",
 980                 rules           => <<EOF
 981 KERNEL=="sda1", NAME="enum%e"
 982 EOF
 983         },
 984         {
 985                 desc            => "enumeration char test sequence 3/5 (keep)",
 986                 subsys          => "block",
 987                 devpath         => "/block/sda/sda2",
 988                 exp_name        => "cdrom1",
 989                 option          => "keep",
 990                 rules           => <<EOF
 991 KERNEL=="sda2", NAME="cdrom%e"
 992 EOF
 993         },
 994         {
 995                 desc            => "enumeration char test sequence 4/5 (keep)",
 996                 subsys          => "block",
 997                 devpath         => "/block/sda/sda3",
 998                 exp_name        => "enum1",
 999                 option          => "keep",
1000                 rules           => <<EOF
1001 KERNEL=="sda3", NAME="enum%e"
1002 EOF
1003         },
1004         {
1005                 desc            => "enumeration char test sequence 5/5 (clean)",
1006                 subsys          => "block",
1007                 devpath         => "/block/sda/sda4",
1008                 exp_name        => "cdrom2",
1009                 option          => "clean",
1010                 rules           => <<EOF
1011 KERNEL=="sda4", NAME="cdrom%e"
1012 EOF
1013         },
1014         {
1015                 desc            => "enumeration char test after cleanup (single test)",
1016                 subsys          => "block",
1017                 devpath         => "/block/sda",
1018                 exp_name        => "cdrom",
1019                 rules           => <<EOF
1020 KERNEL=="sda", NAME="cdrom%e"
1021 EOF
1022         },
1023         {
1024                 desc            => "ignore rule test",
1025                 subsys          => "block",
1026                 devpath         => "/block/sda",
1027                 exp_name        => "node",
1028                 exp_add_error   => "yes",
1029                 rules           => <<EOF
1030 BUS=="scsi", KERNEL=="sda", NAME="node", OPTIONS="ignore"
1031 EOF
1032         },
1033         {
1034                 desc            => "all_partitions, option-only rule",
1035                 subsys          => "block",
1036                 devpath         => "/block/sda",
1037                 exp_name        => "node6",
1038                 rules           => <<EOF
1039 SUBSYSTEM=="block", OPTIONS="all_partitions"
1040 BUS=="scsi", KERNEL=="sda", NAME="node"
1041 EOF
1042         },
1043         {
1044                 desc            => "all_partitions, option-only rule (fail on partition)",
1045                 subsys          => "block",
1046                 devpath         => "/block/sda/sda1",
1047                 exp_name        => "node6",
1048                 exp_add_error   => "yes",
1049                 rules           => <<EOF
1050 SUBSYSTEM=="block", OPTIONS="all_partitions"
1051 BUS=="scsi", KERNEL=="sda", NAME="node"
1052 EOF
1053         },
1054         {
1055                 desc            => "ignore remove event test",
1056                 subsys          => "block",
1057                 devpath         => "/block/sda",
1058                 exp_name        => "node",
1059                 exp_rem_error   => "yes",
1060                 rules           => <<EOF
1061 BUS=="scsi", KERNEL=="sda", NAME="node", OPTIONS="ignore_remove"
1062 EOF
1063         },
1064         {
1065                 desc            => "ignore remove event test (with all partitions)",
1066                 subsys          => "block",
1067                 devpath         => "/block/sda",
1068                 exp_name        => "node14",
1069                 exp_rem_error   => "yes",
1070                 option          => "clean",
1071                 rules           => <<EOF
1072 BUS=="scsi", KERNEL=="sda", NAME="node", OPTIONS="ignore_remove, all_partitions"
1073 EOF
1074         },
1075         {
1076                 desc            => "SUBSYSTEM match test",
1077                 subsys          => "block",
1078                 devpath         => "/block/sda",
1079                 exp_name        => "node",
1080                 rules           => <<EOF
1081 BUS=="scsi", KERNEL=="sda", NAME="should_not_match", SUBSYSTEM=="vc"
1082 BUS=="scsi", KERNEL=="sda", NAME="node", SUBSYSTEM=="block"
1083 BUS=="scsi", KERNEL=="sda", NAME="should_not_match2", SUBSYSTEM=="vc"
1084 EOF
1085         },
1086         {
1087                 desc            => "DRIVER match test",
1088                 subsys          => "block",
1089                 devpath         => "/block/sda",
1090                 exp_name        => "node",
1091                 rules           => <<EOF
1092 BUS=="scsi", KERNEL=="sda", NAME="should_not_match", DRIVER=="sd-wrong"
1093 BUS=="scsi", KERNEL=="sda", NAME="node", DRIVER=="sd"
1094 EOF
1095         },
1096         {
1097                 desc            => "temporary node creation test",
1098                 subsys          => "block",
1099                 devpath         => "/block/sda",
1100                 exp_name        => "node",
1101                 rules           => <<EOF
1102 BUS=="scsi", KERNEL=="sda", PROGRAM=="/usr/bin/test -b %N" NAME="node"
1103 EOF
1104         },
1105         {
1106                 desc            => "devpath substitution test",
1107                 subsys          => "block",
1108                 devpath         => "/block/sda",
1109                 exp_name        => "sda",
1110                 rules           => <<EOF
1111 BUS=="scsi", KERNEL=="sda", PROGRAM=="/bin/echo %p", RESULT=="/block/sda" NAME="%k"
1112 EOF
1113         },
1114         {
1115                 desc            => "parent node name substitution test sequence 1/2 (keep)",
1116                 subsys          => "block",
1117                 devpath         => "/block/sda",
1118                 exp_name        => "main_device",
1119                 option          => "keep",
1120                 rules           => <<EOF
1121 BUS=="scsi", KERNEL=="sda", NAME="main_device"
1122 EOF
1123         },
1124         {
1125                 desc            => "parent node name substitution test sequence 2/2 (clean)",
1126                 subsys          => "block",
1127                 devpath         => "/block/sda/sda1",
1128                 exp_name        => "main_device-part-1",
1129                 option          => "clean",
1130                 rules           => <<EOF
1131 BUS=="scsi", KERNEL=="sda1", NAME="%P-part-1"
1132 EOF
1133         },
1134         {
1135                 desc            => "udev_root substitution",
1136                 subsys          => "block",
1137                 devpath         => "/block/sda/sda1",
1138                 exp_name        => "start-udev-root-end",
1139                 rules           => <<EOF
1140 BUS=="scsi", KERNEL=="sda1", NAME="start-%r-end"
1141 EOF
1142         },
1143         {
1144                 desc            => "last_rule option",
1145                 subsys          => "block",
1146                 devpath         => "/block/sda/sda1",
1147                 exp_name        => "last",
1148                 rules           => <<EOF
1149 BUS=="scsi", KERNEL=="sda1", SYMLINK="last", OPTIONS="last_rule"
1150 BUS=="scsi", KERNEL=="sda1", NAME="very-last"
1151 EOF
1152         },
1153         {
1154                 desc            => "negation KERNEL!=",
1155                 subsys          => "block",
1156                 devpath         => "/block/sda/sda1",
1157                 exp_name        => "match",
1158                 rules           => <<EOF
1159 BUS=="scsi", KERNEL!="sda1", NAME="matches-but-is-negated"
1160 BUS=="scsi", KERNEL!="xsda1", NAME="match"
1161 BUS=="scsi", KERNEL=="sda1", NAME="wrong"
1162 EOF
1163         },
1164         {
1165                 desc            => "negation SUBSYSTEM!=",
1166                 subsys          => "block",
1167                 devpath         => "/block/sda/sda1",
1168                 exp_name        => "not-anything",
1169                 rules           => <<EOF
1170 BUS=="scsi", SUBSYSTEM=="block", KERNEL!="sda1", NAME="matches-but-is-negated"
1171 BUS=="scsi", SUBSYSTEM!="anything", NAME="not-anything"
1172 BUS=="scsi", KERNEL=="sda1", NAME="wrong"
1173 EOF
1174         },
1175         {
1176                 desc            => "negation PROGRAM!= exit code",
1177                 subsys          => "block",
1178                 devpath         => "/block/sda/sda1",
1179                 exp_name        => "nonzero-program",
1180                 rules           => <<EOF
1181 KERNEL=="sda1", PROGRAM!="/bin/false", NAME="nonzero-program"
1182 BUS=="scsi", KERNEL=="sda1", NAME="wrong"
1183 EOF
1184         },
1185         {
1186                 desc            => "test for whitespace between the operator",
1187                 subsys          => "block",
1188                 devpath         => "/block/sda/sda1",
1189                 exp_name        => "true",
1190                 rules           => <<EOF
1191 KERNEL   ==   "sda1"     ,    NAME   =    "true"
1192 BUS=="scsi", KERNEL=="sda1", NAME="wrong"
1193 EOF
1194         },
1195         {
1196                 desc            => "ENV{} test",
1197                 subsys          => "block",
1198                 devpath         => "/block/sda/sda1",
1199                 exp_name        => "true",
1200                 rules           => <<EOF
1201 BUS=="scsi", KERNEL=="sda1", ENV{ENV_KEY_TEST}=="go", NAME="wrong"
1202 BUS=="scsi", KERNEL=="sda1", ENV{ENV_KEY_TEST}=="test", NAME="true"
1203 BUS=="scsi", KERNEL=="sda1", ENV{ENV_KEY_TEST}=="bad", NAME="bad"
1204 EOF
1205         },
1206         {
1207                 desc            => "ENV{} test",
1208                 subsys          => "block",
1209                 devpath         => "/block/sda/sda1",
1210                 exp_name        => "true",
1211                 rules           => <<EOF
1212 BUS=="scsi", KERNEL=="sda1", ENV{ENV_KEY_TEST}=="go", NAME="wrong"
1213 BUS=="scsi", KERNEL=="sda1", ENV{ENV_KEY_TEST}=="yes", ENV{ACTION}=="add", ENV{DEVPATH}=="/block/sda/sdax1", NAME="no"
1214 BUS=="scsi", KERNEL=="sda1", ENV{ENV_KEY_TEST}=="test", ENV{ACTION}=="add", ENV{DEVPATH}=="/block/sda/sda1", NAME="true"
1215 BUS=="scsi", KERNEL=="sda1", ENV{ENV_KEY_TEST}=="bad", NAME="bad"
1216 EOF
1217         },
1218         {
1219                 desc            => "untrusted string sanitize",
1220                 subsys          => "block",
1221                 devpath         => "/block/sda/sda1",
1222                 exp_name        => "sane",
1223                 rules           => <<EOF
1224 BUS=="scsi", KERNEL=="sda1", PROGRAM=="/bin/echo -e name; (/sbin/badprogram)", RESULT="name_ _/sbin/badprogram_", NAME="sane"
1225 EOF
1226         },
1227         {
1228                 desc            => "read sysfs value from device down in the chain",
1229                 subsys          => "block",
1230                 devpath         => "/class/tty/ttyUSB0",
1231                 exp_name        => "serial-0000:00:09.0",
1232                 rules           => <<EOF
1233 KERNEL=="ttyUSB*", NAME="serial-%s{serial}"
1234 EOF
1235         },
1236         {
1237                 desc            => "match against empty key string",
1238                 subsys          => "block",
1239                 devpath         => "/block/sda",
1240                 exp_name        => "ok",
1241                 rules           => <<EOF
1242 KERNEL=="sda", SYSFS{nothing}!="", NAME="not-1-ok"
1243 KERNEL=="sda", SYSFS{nothing}=="", NAME="not-2-ok"
1244 KERNEL=="sda", SYSFS{vendor}!="", NAME="ok"
1245 KERNEL=="sda", SYSFS{vendor}=="", NAME="not-3-ok"
1246 EOF
1247         },
1248         {
1249                 desc            => "check ACTION value",
1250                 subsys          => "block",
1251                 devpath         => "/block/sda",
1252                 exp_name        => "ok",
1253                 rules           => <<EOF
1254 ACTION=="unknown", KERNEL=="sda", NAME="unknown-not-ok"
1255 ACTION=="add", KERNEL=="sda", NAME="ok"
1256 EOF
1257         },
1258         {
1259                 desc            => "apply NAME only once",
1260                 subsys          => "block",
1261                 devpath         => "/block/sda",
1262                 exp_name        => "link",
1263                 exp_target      => "ok",
1264                 rules           => <<EOF
1265 KERNEL=="sda", NAME="ok"
1266 KERNEL=="sda", NAME="not-ok"
1267 KERNEL=="sda", SYMLINK+="link"
1268 EOF
1269         },
1270         {
1271                 desc            => "test RUN key",
1272                 subsys          => "block",
1273                 devpath         => "/block/sda",
1274                 exp_name        => "testsymlink",
1275                 exp_target      => "ok",
1276                 exp_rem_error   => "yes",
1277                 option          => "clean",
1278                 rules           => <<EOF
1279 KERNEL=="sda", NAME="ok", RUN+="/bin/ln -s ok %r/testsymlink"
1280 KERNEL=="sda", NAME="not-ok"
1281 EOF
1282         },
1283         {
1284                 desc            => "test RUN key remove",
1285                 subsys          => "block",
1286                 devpath         => "/block/sda",
1287                 exp_name        => "testsymlink2",
1288                 exp_target      => "ok2",
1289                 rules           => <<EOF
1290 KERNEL=="sda", NAME="ok2", RUN+="/bin/ln -s ok2 %r/testsymlink2"
1291 KERNEL=="sda", ACTION=="remove", RUN+="/bin/rm -f %r/testsymlink2"
1292 KERNEL=="sda", NAME="not-ok2"
1293 EOF
1294         },
1295 );
1296
1297 # set env
1298 $ENV{ENV_KEY_TEST} = "test";
1299 $ENV{SYSFS_PATH} = $sysfs;
1300 $ENV{UDEV_CONFIG_FILE} = $udev_conf;
1301 $ENV{UDEV_NO_DEVD} = "yes";
1302 $ENV{UDEV_NO_HOTPLUGD} = "yes";
1303
1304
1305 sub udev {
1306         my ($action, $subsys, $devpath, $rules) = @_;
1307
1308         $ENV{DEVPATH} = $devpath;
1309
1310         # create temporary rules
1311         open CONF, ">$udev_rules" || die "unable to create rules file: $udev_rules";
1312         print CONF $$rules;
1313         close CONF;
1314
1315         $ENV{ACTION} = $action;
1316         system("$udev_bin $subsys");
1317 }
1318
1319 my $error = 0;
1320
1321 sub permissions_test {
1322         my($rules, $uid, $gid, $mode) = @_;
1323
1324         my $wrong = 0;
1325         my $userid;
1326         my $groupid;
1327
1328         $rules->{exp_perms} =~ m/^(.*):(.*):(.*)$/;
1329         if ($1 ne "") {
1330                 if (defined(getpwnam($1))) {
1331                         $userid = int(getpwnam($1));
1332                 } else {
1333                         $userid = $1;
1334                 }
1335                 if ($uid != $userid) { $wrong = 1; }
1336         }
1337         if ($2 ne "") {
1338                 if (defined(getgrnam($2))) {
1339                         $groupid = int(getgrnam($2));
1340                 } else {
1341                         $groupid = $2;
1342                 }
1343                 if ($gid != $groupid) { $wrong = 1; }
1344         }
1345         if ($3 ne "") {
1346                 if (($mode & 07777) != oct($3)) { $wrong = 1; };
1347         }
1348         if ($wrong == 0) {
1349                 print "permissions: ok\n";
1350         } else {
1351                 printf "  expected permissions are: %s:%s:%#o\n", $1, $2, oct($3);
1352                 printf "  created permissions are : %i:%i:%#o\n", $uid, $gid, $mode & 07777;
1353                 print "permissions: error\n";
1354                 $error++;
1355         }
1356 }
1357
1358 sub major_minor_test {
1359         my($rules, $rdev) = @_;
1360
1361         my $major = ($rdev >> 8) & 0xfff;
1362         my $minor = ($rdev & 0xff) | (($rdev >> 12) & 0xfff00);
1363         my $wrong = 0;
1364
1365         $rules->{exp_majorminor} =~ m/^(.*):(.*)$/;
1366         if ($1 ne "") {
1367                 if ($major != $1) { $wrong = 1; };
1368         }
1369         if ($2 ne "") {
1370                 if ($minor != $2) { $wrong = 1; };
1371         }
1372         if ($wrong == 0) {
1373                 print "major:minor: ok\n";
1374         } else {
1375                 printf "  expected major:minor is: %i:%i\n", $1, $2;
1376                 printf "  created major:minor is : %i:%i\n", $major, $minor;
1377                 print "major:minor: error\n";
1378                 $error++;
1379         }
1380 }
1381
1382 sub symlink_test {
1383         my ($rules) = @_;
1384
1385         my $output = `ls -l $PWD/$udev_root$rules->{exp_name}`;
1386
1387         if ($output =~ m/(.*)-> (.*)/) {
1388                 if ($2 eq $rules->{exp_target}) {
1389                         print "symlink:     ok\n";
1390                 } else {
1391                         print "  expected symlink from: \'$rules->{exp_name}\' to \'$rules->{exp_target}\'\n";
1392                         print "  created symlink from: \'$rules->{exp_name}\' to \'$2\'\n";
1393                         print "symlink: error";
1394                         if ($rules->{exp_add_error}) {
1395                                 print " as expected\n";
1396                         } else {
1397                                 print "\n";
1398                                 $error++;
1399                         }
1400                 }
1401         } else {
1402                 print "  expected symlink from: \'$rules->{exp_name}\' to \'$rules->{exp_target}\'\n";
1403                 print "symlink:     not created";
1404                 if ($rules->{exp_add_error}) {
1405                         print " as expected\n";
1406                 } else {
1407                         print "\n";
1408                         $error++;
1409                 }
1410         }
1411 }
1412
1413 sub run_test {
1414         my ($rules, $number) = @_;
1415
1416         print "TEST $number: $rules->{desc}\n";
1417
1418         if ($rules->{exp_target}) {
1419                 print "device \'$rules->{devpath}\' expecting symlink '$rules->{exp_name}' to node \'$rules->{exp_target}\'\n";
1420         } else {
1421                 print "device \'$rules->{devpath}\' expecting node \'$rules->{exp_name}\'\n";
1422         }
1423
1424
1425         udev("add", $rules->{subsys}, $rules->{devpath}, \$rules->{rules});
1426         if ((-e "$PWD/$udev_root$rules->{exp_name}") ||
1427             (-l "$PWD/$udev_root$rules->{exp_name}")) {
1428
1429                 my ($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size,
1430                     $atime, $mtime, $ctime, $blksize, $blocks) = stat("$PWD/$udev_root$rules->{exp_name}");
1431
1432                 if (defined($rules->{exp_perms})) {
1433                         permissions_test($rules, $uid, $gid, $mode);
1434                 }
1435                 if (defined($rules->{exp_majorminor})) {
1436                         major_minor_test($rules, $rdev);
1437                 }
1438                 if (defined($rules->{exp_target})) {
1439                         symlink_test($rules);
1440                 }
1441                 print "add:         ok\n";
1442         } else {
1443                 print "add:         error";
1444                 if ($rules->{exp_add_error}) {
1445                         print " as expected\n";
1446                 } else {
1447                         print "\n";
1448                         system("tree $udev_root");
1449                         print "\n";
1450                         $error++;
1451                 }
1452         }
1453
1454         if (defined($rules->{option}) && $rules->{option} eq "keep") {
1455                 print "\n\n";
1456                 return;
1457         }
1458
1459         udev("remove", $rules->{subsys}, $rules->{devpath}, \$rules->{rules});
1460         if ((-e "$PWD/$udev_root$rules->{exp_name}") ||
1461             (-l "$PWD/$udev_root$rules->{exp_name}")) {
1462                 print "remove:      error";
1463                 if ($rules->{exp_rem_error}) {
1464                         print " as expected\n";
1465                 } else {
1466                         print "\n";
1467                         system("tree $udev_root");
1468                         print "\n";
1469                         $error++;
1470                 }
1471         } else {
1472                 print "remove:      ok\n";
1473         }
1474
1475         print "\n";
1476
1477         if (defined($rules->{option}) && $rules->{option} eq "clean") {
1478                 system("rm -rf $udev_db");
1479                 system("rm -rf $udev_root");
1480                 mkdir($udev_root) || die "unable to create udev_root: $udev_root\n";
1481         }
1482
1483 }
1484
1485 # only run if we have root permissions
1486 # due to mknod restrictions
1487 if (!($<==0)) {
1488         print "Must have root permissions to run properly.\n";
1489         exit;
1490 }
1491
1492 # prepare
1493 system("rm -rf $udev_root");
1494 mkdir($udev_root) || die "unable to create udev_root: $udev_root\n";
1495
1496 # create config file
1497 open CONF, ">$udev_conf" || die "unable to create config file: $udev_conf";
1498 print CONF "udev_root=\"$udev_root\"\n";
1499 print CONF "udev_db=\"$udev_db\"\n";
1500 print CONF "udev_rules=\"$udev_rules\"\n";
1501 close CONF;
1502
1503 my $test_num = 1;
1504
1505 if ($ARGV[0]) {
1506         # only run one test
1507         $test_num = $ARGV[0];
1508
1509         if (defined($tests[$test_num-1]->{desc})) {
1510                 print "udev-test will run test number $test_num only:\n\n";
1511                 run_test($tests[$test_num-1], $test_num);
1512         } else {
1513                 print "test does not exist.\n";
1514         }
1515 } else {
1516         # test all
1517         print "\nudev-test will run ".($#tests + 1)." tests:\n\n";
1518
1519         foreach my $rules (@tests) {
1520                 run_test($rules, $test_num);
1521                 $test_num++;
1522         }
1523 }
1524
1525 print "$error errors occured\n\n";
1526
1527 # cleanup
1528 system("rm -rf $udev_db");
1529 system("rm -rf $udev_root");
1530 unlink($udev_rules);
1531 unlink($udev_conf);
1532