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 reads the config, looks at the provided sysfs and
  13 # first creates and then removes the device node.
  14 # After creation and removal the result is checked against the
  15 # expected value and the result is printed.
  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 $main_conf = "udev-test.conf";
  29 my $conf_tmp  = "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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<EOF
 192 KERNEL="ttyUSB0", \\
 193 NAME="visor"
 194
 195 EOF
 196         },
 197         {
 198                 desc            => "Handle stupid backslashed multi lines in config file (and replace kernel name)",
 199                 subsys          => "tty",
 200                 devpath         => "/class/tty/ttyUSB0",
 201                 exp_name        => "visor" ,
 202                 conf            => <<EOF
 203
 204 #
 205 \\
 206
 207 \\\\
 208
 209 #\\
 210
 211 KERNEL="ttyUSB0", \\
 212         NAME="visor"
 213
 214 EOF
 215         },
 216         {
 217                 desc            => "subdirectory handling",
 218                 subsys          => "tty",
 219                 devpath         => "/class/tty/ttyUSB0",
 220                 exp_name        => "sub/direct/ory/visor" ,
 221                 conf            => <<EOF
 222 KERNEL="ttyUSB0", NAME="sub/direct/ory/visor"
 223 EOF
 224         },
 225         {
 226                 desc            => "place on bus of scsi partition",
 227                 subsys          => "block",
 228                 devpath         => "/block/sda/sda3",
 229                 exp_name        => "first_disk3" ,
 230                 conf            => <<EOF
 231 BUS="scsi", PLACE="0:0:0:0", NAME="first_disk%n"
 232 EOF
 233         },
 234         {
 235                 desc            => "test NAME substitution chars",
 236                 subsys          => "block",
 237                 devpath         => "/block/sda/sda3",
 238                 exp_name        => "Major:8:minor:3:kernelnumber:3:bus:0:0:0:0" ,
 239                 conf            => <<EOF
 240 BUS="scsi", PLACE="0:0:0:0", NAME="Major:%M:minor:%m:kernelnumber:%n:bus:%b"
 241 EOF
 242         },
 243         {
 244                 desc            => "test NAME substitution chars (with length limit)",
 245                 subsys          => "block",
 246                 devpath         => "/block/sda/sda3",
 247                 exp_name        => "M8-m3-n3-b0:0-sIBM" ,
 248                 conf            => <<EOF
 249 BUS="scsi", PLACE="0:0:0:0", NAME="M%M-m%m-n%n-b%3b-s%3s{vendor}"
 250 EOF
 251         },
 252         {
 253                 desc            => "old style SYSFS_ attribute",
 254                 subsys          => "block",
 255                 devpath         => "/block/sda",
 256                 exp_name        => "good" ,
 257                 conf            => <<EOF
 258 BUS="scsi", SYSFS_vendor="IBM-ESXS", NAME="good"
 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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<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                 conf            => <<EOF
 555 BUS="scsi", KERNEL="sda", NAME="node", GROUP="100"
 556 EOF
 557         },
 558         {
 559                 desc            => "permissions MODE=0777",
 560                 subsys          => "block",
 561                 devpath         => "/block/sda",
 562                 exp_name        => "node",
 563                 exp_perms       => "::0777",
 564                 conf            => <<EOF
 565 BUS="scsi", KERNEL="sda", NAME="node", MODE="0777"
 566 EOF
 567         },
 568         {
 569                 desc            => "permissions OWNER=5000 GROUP=100 MODE=0777",
 570                 subsys          => "block",
 571                 devpath         => "/block/sda",
 572                 exp_name        => "node",
 573                 exp_perms       => "5000:100:0777",
 574                 conf            => <<EOF
 575 BUS="scsi", KERNEL="sda", NAME="node", OWNER="5000", GROUP="100", MODE="0777"
 576 EOF
 577         },
 578         {
 579                 desc            => "permissions OWNER to 5000",
 580                 subsys          => "tty",
 581                 devpath         => "/class/tty/ttyUSB0",
 582                 exp_name        => "ttyUSB0",
 583                 exp_perms       => "5000::",
 584                 conf            => <<EOF
 585 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", OWNER="5000"
 586 EOF
 587         },
 588         {
 589                 desc            => "permissions GROUP to 100",
 590                 subsys          => "tty",
 591                 devpath         => "/class/tty/ttyUSB0",
 592                 exp_name        => "ttyUSB0",
 593                 exp_perms       => ":100:0660",
 594                 conf            => <<EOF
 595 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", GROUP="100"
 596 EOF
 597         },
 598         {
 599                 desc            => "permissions MODE to 0060",
 600                 subsys          => "tty",
 601                 devpath         => "/class/tty/ttyUSB0",
 602                 exp_name        => "ttyUSB0",
 603                 exp_perms       => "::0060",
 604                 conf            => <<EOF
 605 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", MODE="0060"
 606 EOF
 607         },
 608         {
 609                 desc            => "permissions OWNER, GROUP, MODE",
 610                 subsys          => "tty",
 611                 devpath         => "/class/tty/ttyUSB0",
 612                 exp_name        => "ttyUSB0",
 613                 exp_perms       => "5000:100:0777",
 614                 conf            => <<EOF
 615 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", OWNER="5000", GROUP="100", MODE="0777"
 616 EOF
 617         },
 618         {
 619                 desc            => "permissions only rule",
 620                 subsys          => "tty",
 621                 devpath         => "/class/tty/ttyUSB0",
 622                 exp_name        => "ttyUSB0",
 623                 exp_perms       => "5000:100:0777",
 624                 conf            => <<EOF
 625 KERNEL="ttyUSB[0-9]*", OWNER="5000", GROUP="100", MODE="0777"
 626 KERNEL="ttyUSX[0-9]*", OWNER="5001", GROUP="101", MODE="0444"
 627 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n"
 628 EOF
 629         },
 630         {
 631                 desc            => "multiple permissions only rule",
 632                 subsys          => "tty",
 633                 devpath         => "/class/tty/ttyUSB0",
 634                 exp_name        => "ttyUSB0",
 635                 exp_perms       => "3000:4000:0777",
 636                 conf            => <<EOF
 637 SUBSYSTEM="tty", OWNER="3000"
 638 SUBSYSTEM="tty", GROUP="4000"
 639 SUBSYSTEM="tty", MODE="0777"
 640 KERNEL="ttyUSX[0-9]*", OWNER="5001", GROUP="101", MODE="0444"
 641 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n"
 642 EOF
 643         },
 644         {
 645                 desc            => "permissions only rule with override at NAME rule",
 646                 subsys          => "tty",
 647                 devpath         => "/class/tty/ttyUSB0",
 648                 exp_name        => "ttyUSB0",
 649                 exp_perms       => "3000:8000:0777",
 650                 conf            => <<EOF
 651 SUBSYSTEM="tty", OWNER="3000"
 652 SUBSYSTEM="tty", GROUP="4000"
 653 SUBSYSTEM="tty", MODE="0777"
 654 KERNEL="ttyUSX[0-9]*", OWNER="5001", GROUP="101", MODE="0444"
 655 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", GROUP="8000"
 656 EOF
 657         },
 658         {
 659                 desc            => "major/minor number test",
 660                 subsys          => "block",
 661                 devpath         => "/block/sda",
 662                 exp_name        => "node",
 663                 exp_majorminor  => "8:0",
 664                 conf            => <<EOF
 665 BUS="scsi", KERNEL="sda", NAME="node"
 666 EOF
 667         },
 668         {
 669                 desc            => "big minor number test",
 670                 subsys          => "i2c-dev",
 671                 devpath         => "/class/i2c-dev/i2c-300",
 672                 exp_name        => "node",
 673                 exp_majorminor  => "89:300",
 674                 conf            => <<EOF
 675 KERNEL="i2c-300", NAME="node"
 676 EOF
 677         },
 678         {
 679                 desc            => "big major number test",
 680                 subsys          => "i2c-dev",
 681                 devpath         => "/class/i2c-dev/i2c-fake1",
 682                 exp_name        => "node",
 683                 exp_majorminor  => "4095:1",
 684                 conf            => <<EOF
 685 KERNEL="i2c-fake1", NAME="node"
 686 EOF
 687         },
 688         {
 689                 desc            => "big major and big minor number test",
 690                 subsys          => "i2c-dev",
 691                 devpath         => "/class/i2c-dev/i2c-fake2",
 692                 exp_name        => "node",
 693                 exp_majorminor  => "4094:89999",
 694                 conf            => <<EOF
 695 KERNEL="i2c-fake2", NAME="node"
 696 EOF
 697         },
 698         {
 699                 desc            => "multiple symlinks with format char",
 700                 subsys          => "tty",
 701                 devpath         => "/class/tty/ttyUSB0",
 702                 exp_name        => "symlink2-ttyUSB0",
 703                 exp_target      => "ttyUSB0",
 704                 conf            => <<EOF
 705 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="symlink1-%n symlink2-%k symlink3-%b"
 706 EOF
 707         },
 708         {
 709                 desc            => "symlink creation (same directory)",
 710                 subsys          => "tty",
 711                 devpath         => "/class/tty/ttyUSB0",
 712                 exp_name        => "visor0",
 713                 exp_target      => "ttyUSB0",
 714                 conf            => <<EOF
 715 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="visor%n"
 716 EOF
 717         },
 718         {
 719                 desc            => "symlink creation (relative link forward)",
 720                 subsys          => "block",
 721                 devpath         => "/block/sda/sda2",
 722                 exp_name        => "1/2/symlink" ,
 723                 exp_target      => "a/b/node",
 724                 conf            => <<EOF
 725 BUS="scsi", SYSFS{vendor}="IBM-ESXS", NAME="1/2/a/b/node", SYMLINK="1/2/symlink"
 726 EOF
 727         },
 728         {
 729                 desc            => "symlink creation (relative link back and forward)",
 730                 subsys          => "block",
 731                 devpath         => "/block/sda/sda2",
 732                 exp_name        => "1/2/c/d/symlink" ,
 733                 exp_target      => "../../a/b/node",
 734                 conf            => <<EOF
 735 BUS="scsi", SYSFS{vendor}="IBM-ESXS", NAME="1/2/a/b/node", SYMLINK="1/2/c/d/symlink"
 736 EOF
 737         },
 738         {
 739                 desc            => "multiple symlinks",
 740                 subsys          => "tty",
 741                 devpath         => "/class/tty/ttyUSB0",
 742                 exp_name        => "second-0" ,
 743                 exp_target      => "visor" ,
 744                 conf            => <<EOF
 745 KERNEL="ttyUSB0", NAME="visor", SYMLINK="first-%n second-%n third-%n"
 746 EOF
 747         },
 748         {
 749                 desc            => "symlink only rule",
 750                 subsys          => "block",
 751                 devpath         => "/block/sda",
 752                 exp_name        => "symlink-only2",
 753                 exp_target      => "link",
 754                 conf            => <<EOF
 755 BUS="scsi", KERNEL="sda", SYMLINK="symlink-only1"
 756 BUS="scsi", KERNEL="sda", SYMLINK="symlink-only2"
 757 BUS="scsi", KERNEL="sda", NAME="link", SYMLINK="symlink0"
 758 EOF
 759         },
 760         {
 761                 desc            => "symlink name '.'",
 762                 subsys          => "block",
 763                 devpath         => "/block/sda",
 764                 exp_name        => ".",
 765                 exp_target      => "link",
 766                 exp_add_error   => "yes",
 767                 exp_rem_error   => "yes",
 768                 conf            => <<EOF
 769 BUS="scsi", KERNEL="sda", NAME="link", SYMLINK="."
 770 EOF
 771         },
 772         {
 773                 desc            => "symlink to empty name",
 774                 subsys          => "block",
 775                 devpath         => "/block/sda",
 776                 exp_name        => "symlink",
 777                 exp_target      => "",
 778                 exp_add_error   => "yes",
 779                 conf            => <<EOF
 780 BUS="scsi", KERNEL="sda", NAME="", SYMLINK="symlink"
 781 EOF
 782         },
 783         {
 784                 desc            => "symlink and name empty",
 785                 subsys          => "block",
 786                 devpath         => "/block/sda",
 787                 exp_name        => "",
 788                 exp_target      => "",
 789                 exp_add_error   => "yes",
 790                 exp_rem_error   => "yes",
 791                 conf            => <<EOF
 792 BUS="scsi", KERNEL="sda", NAME="", SYMLINK=""
 793 EOF
 794         },
 795         {
 796                 desc            => "symlink node to itself",
 797                 subsys          => "tty",
 798                 devpath         => "/class/tty/tty0",
 799                 exp_name        => "link",
 800                 exp_target      => "link",
 801                 exp_rem_error   => "yes",
 802                 option          => "clear",
 803                 conf            => <<EOF
 804 KERNEL="tty0", NAME="link", SYMLINK="link"
 805 EOF
 806         },
 807         {
 808                 desc            => "symlink %n substitution",
 809                 subsys          => "tty",
 810                 devpath         => "/class/tty/ttyUSB0",
 811                 exp_name        => "symlink0",
 812                 exp_target      => "ttyUSB0",
 813                 conf            => <<EOF
 814 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="symlink%n"
 815 EOF
 816         },
 817         {
 818                 desc            => "symlink %k substitution",
 819                 subsys          => "tty",
 820                 devpath         => "/class/tty/ttyUSB0",
 821                 exp_name        => "symlink-ttyUSB0",
 822                 exp_target      => "ttyUSB0",
 823                 conf            => <<EOF
 824 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="symlink-%k"
 825 EOF
 826         },
 827         {
 828                 desc            => "symlink %M:%m substitution",
 829                 subsys          => "tty",
 830                 devpath         => "/class/tty/ttyUSB0",
 831                 exp_name        => "major-188:0",
 832                 exp_target      => "ttyUSB0",
 833                 conf            => <<EOF
 834 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="major-%M:%m"
 835 EOF
 836         },
 837         {
 838                 desc            => "symlink %b substitution",
 839                 subsys          => "block",
 840                 devpath         => "/block/sda",
 841                 exp_name        => "symlink-0:0:0:0",
 842                 exp_target      => "node",
 843                 conf            => <<EOF
 844 BUS="scsi", KERNEL="sda", NAME="node", SYMLINK="symlink-%b"
 845 EOF
 846         },
 847         {
 848                 desc            => "symlink %c substitution",
 849                 subsys          => "tty",
 850                 devpath         => "/class/tty/ttyUSB0",
 851                 exp_name        => "test",
 852                 exp_target      => "ttyUSB0",
 853                 conf            => <<EOF
 854 KERNEL="ttyUSB[0-9]*", PROGRAM="/bin/echo test" NAME="ttyUSB%n", SYMLINK="%c"
 855 EOF
 856         },
 857         {
 858                 desc            => "symlink %c{N} substitution",
 859                 subsys          => "tty",
 860                 devpath         => "/class/tty/ttyUSB0",
 861                 exp_name        => "test",
 862                 exp_target      => "ttyUSB0",
 863                 conf            => <<EOF
 864 KERNEL="ttyUSB[0-9]*", PROGRAM="/bin/echo symlink test this" NAME="ttyUSB%n", SYMLINK="%c{2}"
 865 EOF
 866         },
 867         {
 868                 desc            => "symlink %c{N+} substitution",
 869                 subsys          => "tty",
 870                 devpath         => "/class/tty/ttyUSB0",
 871                 exp_name        => "this",
 872                 exp_target      => "ttyUSB0",
 873                 conf            => <<EOF
 874 KERNEL="ttyUSB[0-9]*", PROGRAM="/bin/echo symlink test this" NAME="ttyUSB%n", SYMLINK="%c{2+}"
 875 EOF
 876         },
 877         {
 878                 desc            => "symlink only rule with %c{N+}",
 879                 subsys          => "block",
 880                 devpath         => "/block/sda",
 881                 exp_name        => "test",
 882                 exp_target      => "link",
 883                 conf            => <<EOF
 884 BUS="scsi", KERNEL="sda", PROGRAM="/bin/echo link test this" SYMLINK="%c{2+}"
 885 BUS="scsi", KERNEL="sda", NAME="link", SYMLINK="symlink0"
 886 EOF
 887         },
 888         {
 889                 desc            => "symlink %s{filename} substitution",
 890                 subsys          => "tty",
 891                 devpath         => "/class/tty/ttyUSB0",
 892                 exp_name        => "188:0",
 893                 exp_target      => "ttyUSB0",
 894                 conf            => <<EOF
 895 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="%s{dev}"
 896 EOF
 897         },
 898         {
 899                 desc            => "symlink %Ns{filename} substitution",
 900                 subsys          => "tty",
 901                 devpath         => "/class/tty/ttyUSB0",
 902                 exp_name        => "188",
 903                 exp_target      => "ttyUSB0",
 904                 conf            => <<EOF
 905 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="%3s{dev}"
 906 EOF
 907         },
 908         {
 909                 desc            => "symlink with '%' in name",
 910                 subsys          => "tty",
 911                 devpath         => "/class/tty/ttyUSB0",
 912                 exp_name        => "percent%sign",
 913                 exp_target      => "ttyUSB0",
 914                 conf            => <<EOF
 915 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="percent%%sign"
 916 EOF
 917         },
 918         {
 919                 desc            => "symlink with '%' in name",
 920                 subsys          => "tty",
 921                 devpath         => "/class/tty/ttyUSB0",
 922                 exp_name        => "%ttyUSB0_name",
 923                 exp_target      => "ttyUSB0",
 924                 conf            => <<EOF
 925 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="%%%k_name"
 926 EOF
 927         },
 928         {
 929                 desc            => "program result substitution (numbered part of)",
 930                 subsys          => "block",
 931                 devpath         => "/block/sda/sda3",
 932                 exp_name        => "link1",
 933                 exp_target      => "node",
 934                 conf            => <<EOF
 935 BUS="scsi", PROGRAM="/bin/echo -n node link1 link2", RESULT="node *", NAME="%c{1}", SYMLINK="%c{2} %c{3}"
 936 EOF
 937         },
 938         {
 939                 desc            => "program result substitution (numbered part of+)",
 940                 subsys          => "block",
 941                 devpath         => "/block/sda/sda3",
 942                 exp_name        => "link4",
 943                 exp_target      => "node",
 944                 conf            => <<EOF
 945 BUS="scsi", PROGRAM="/bin/echo -n node link1 link2 link3 link4", RESULT="node *", NAME="%c{1}", SYMLINK="%c{2+}"
 946 EOF
 947         },
 948         {
 949                 desc            => "enumeration char test (single test)",
 950                 subsys          => "block",
 951                 devpath         => "/block/sda",
 952                 exp_name        => "cdrom",
 953                 conf            => <<EOF
 954 KERNEL="sda", NAME="cdrom%e"
 955 EOF
 956         },
 957         {
 958                 desc            => "enumeration char test sequence 1/5 (keep)",
 959                 subsys          => "block",
 960                 devpath         => "/block/sda",
 961                 exp_name        => "cdrom",
 962                 option          => "keep",
 963                 conf            => <<EOF
 964 KERNEL="sda", NAME="cdrom%e"
 965 EOF
 966         },
 967         {
 968                 desc            => "enumeration char test sequence 2/5 (keep)",
 969                 subsys          => "block",
 970                 devpath         => "/block/sda/sda1",
 971                 exp_name        => "enum",
 972                 option          => "keep",
 973                 conf            => <<EOF
 974 KERNEL="sda1", NAME="enum%e"
 975 EOF
 976         },
 977         {
 978                 desc            => "enumeration char test sequence 3/5 (keep)",
 979                 subsys          => "block",
 980                 devpath         => "/block/sda/sda2",
 981                 exp_name        => "cdrom1",
 982                 option          => "keep",
 983                 conf            => <<EOF
 984 KERNEL="sda2", NAME="cdrom%e"
 985 EOF
 986         },
 987         {
 988                 desc            => "enumeration char test sequence 4/5 (keep)",
 989                 subsys          => "block",
 990                 devpath         => "/block/sda/sda3",
 991                 exp_name        => "enum1",
 992                 option          => "keep",
 993                 conf            => <<EOF
 994 KERNEL="sda3", NAME="enum%e"
 995 EOF
 996         },
 997         {
 998                 desc            => "enumeration char test sequence 5/5 (clean)",
 999                 subsys          => "block",
1000                 devpath         => "/block/sda/sda4",
1001                 exp_name        => "cdrom2",
1002                 option          => "clear",
1003                 conf            => <<EOF
1004 KERNEL="sda4", NAME="cdrom%e"
1005 EOF
1006         },
1007         {
1008                 desc            => "enumeration char test after cleanup (single test)",
1009                 subsys          => "block",
1010                 devpath         => "/block/sda",
1011                 exp_name        => "cdrom",
1012                 conf            => <<EOF
1013 KERNEL="sda", NAME="cdrom%e"
1014 EOF
1015         },
1016         {
1017                 desc            => "ignore rule test",
1018                 subsys          => "block",
1019                 devpath         => "/block/sda",
1020                 exp_name        => "node",
1021                 exp_add_error   => "yes",
1022                 conf            => <<EOF
1023 BUS="scsi", KERNEL="sda", NAME="node", OPTIONS="ignore"
1024 EOF
1025         },
1026         {
1027                 desc            => "all_partitions, option-only rule",
1028                 subsys          => "block",
1029                 devpath         => "/block/sda",
1030                 exp_name        => "node6",
1031                 conf            => <<EOF
1032 SUBSYSTEM="block", OPTIONS="all_partitions"
1033 BUS="scsi", KERNEL="sda", NAME="node"
1034 EOF
1035         },
1036         {
1037                 desc            => "all_partitions, option-only rule (fail on partition)",
1038                 subsys          => "block",
1039                 devpath         => "/block/sda/sda1",
1040                 exp_name        => "node6",
1041                 exp_add_error   => "yes",
1042                 conf            => <<EOF
1043 SUBSYSTEM="block", OPTIONS="all_partitions"
1044 BUS="scsi", KERNEL="sda", NAME="node"
1045 EOF
1046         },
1047         {
1048                 desc            => "ignore remove event test",
1049                 subsys          => "block",
1050                 devpath         => "/block/sda",
1051                 exp_name        => "node",
1052                 exp_rem_error   => "yes",
1053                 conf            => <<EOF
1054 BUS="scsi", KERNEL="sda", NAME="node", OPTIONS="ignore_remove"
1055 EOF
1056         },
1057         {
1058                 desc            => "ignore remove event test (with all partitions)",
1059                 subsys          => "block",
1060                 devpath         => "/block/sda",
1061                 exp_name        => "node14",
1062                 exp_rem_error   => "yes",
1063                 option          => "clear",
1064                 conf            => <<EOF
1065 BUS="scsi", KERNEL="sda", NAME="node", OPTIONS="ignore_remove, all_partitions"
1066 EOF
1067         },
1068         {
1069                 desc            => "SUBSYSTEM match test",
1070                 subsys          => "block",
1071                 devpath         => "/block/sda",
1072                 exp_name        => "node",
1073                 conf            => <<EOF
1074 BUS="scsi", KERNEL="sda", NAME="should_not_match", SUBSYSTEM="vc"
1075 BUS="scsi", KERNEL="sda", NAME="node", SUBSYSTEM="block"
1076 BUS="scsi", KERNEL="sda", NAME="should_not_match2", SUBSYSTEM="vc"
1077 EOF
1078         },
1079         {
1080                 desc            => "DRIVER match test",
1081                 subsys          => "block",
1082                 devpath         => "/block/sda",
1083                 exp_name        => "node",
1084                 conf            => <<EOF
1085 BUS="scsi", KERNEL="sda", NAME="should_not_match", DRIVER="sd-wrong"
1086 BUS="scsi", KERNEL="sda", NAME="node", DRIVER="sd"
1087 EOF
1088         },
1089         {
1090                 desc            => "temporary node creation test",
1091                 subsys          => "block",
1092                 devpath         => "/block/sda",
1093                 exp_name        => "node",
1094                 conf            => <<EOF
1095 BUS="scsi", KERNEL="sda", PROGRAM="/usr/bin/test -b %N" NAME="node"
1096 EOF
1097         },
1098         {
1099                 desc            => "devpath substitution test",
1100                 subsys          => "block",
1101                 devpath         => "/block/sda",
1102                 exp_name        => "sda",
1103                 conf            => <<EOF
1104 BUS="scsi", KERNEL="sda", PROGRAM="/bin/echo %p", RESULT="/block/sda" NAME="%k"
1105 EOF
1106         },
1107         {
1108                 desc            => "parent node name substitution test sequence 1/2 (keep)",
1109                 subsys          => "block",
1110                 devpath         => "/block/sda",
1111                 exp_name        => "main_device",
1112                 option          => "keep",
1113                 conf            => <<EOF
1114 BUS="scsi", KERNEL="sda", NAME="main_device"
1115 EOF
1116         },
1117         {
1118                 desc            => "parent node name substitution test sequence 2/2 (clean)",
1119                 subsys          => "block",
1120                 devpath         => "/block/sda/sda1",
1121                 exp_name        => "main_device-part-1",
1122                 option          => "clean",
1123                 conf            => <<EOF
1124 BUS="scsi", KERNEL="sda1", NAME="%P-part-1"
1125 EOF
1126         },
1127         {
1128                 desc            => "udev_root substitution",
1129                 subsys          => "block",
1130                 devpath         => "/block/sda/sda1",
1131                 exp_name        => "start-udev-root-end",
1132                 option          => "clean",
1133                 conf            => <<EOF
1134 BUS="scsi", KERNEL="sda1", NAME="start-%r-end"
1135 EOF
1136         },
1137 );
1138
1139 # set env
1140 $ENV{UDEV_TEST} = "yes";
1141 $ENV{SYSFS_PATH} = $sysfs;
1142 $ENV{UDEV_CONFIG_FILE} = $main_conf;
1143 $ENV{UDEV_NO_DEVD} = "yes";
1144 $ENV{UDEV_NO_HOTPLUGD} = "yes";
1145
1146
1147 sub udev {
1148         my ($action, $subsys, $devpath, $config) = @_;
1149
1150         $ENV{DEVPATH} = $devpath;
1151
1152         # create temporary config
1153         open CONF, ">$conf_tmp" || die "unable to create config file: $conf_tmp";
1154         print CONF $$config;
1155         close CONF;
1156
1157         $ENV{ACTION} = $action;
1158         system("$udev_bin $subsys");
1159 }
1160
1161 my $error = 0;
1162
1163 sub permissions_test {
1164         my($config, $uid, $gid, $mode) = @_;
1165
1166         my $wrong = 0;
1167         $config->{exp_perms} =~ m/^(.*):(.*):(.*)$/;
1168         if ($1 ne "") {
1169                 if ($uid != $1) { $wrong = 1; };
1170         }
1171         if ($2 ne "") {
1172                 if ($gid != $2) { $wrong = 1; };
1173         }
1174         if ($3 ne "") {
1175                 if (($mode & 07777) != oct($3)) { $wrong = 1; };
1176         }
1177         if ($wrong == 0) {
1178                 print "permissions: ok    ";
1179         } else {
1180                 printf "expected permissions are: %i:%i:%#o\n", $1, $2, oct($3);
1181                 printf "created permissions are : %i:%i:%#o\n", $uid, $gid, $mode & 07777;
1182                 $error++;
1183         }
1184 }
1185
1186 sub major_minor_test {
1187         my($config, $rdev) = @_;
1188
1189         my $major = ($rdev >> 8) & 0xfff;
1190         my $minor = ($rdev & 0xff) | (($rdev >> 12) & 0xfff00);
1191         my $wrong = 0;
1192
1193         $config->{exp_majorminor} =~ m/^(.*):(.*)$/;
1194         if ($1 ne "") {
1195                 if ($major != $1) { $wrong = 1; };
1196         }
1197         if ($2 ne "") {
1198                 if ($minor != $2) { $wrong = 1; };
1199         }
1200         if ($wrong == 0) {
1201                 print "major:minor: ok    ";
1202         } else {
1203                 printf "expected major:minor is: %i:%i\n", $1, $2;
1204                 printf "created major:minor is : %i:%i\n", $major, $minor;
1205                 print "major:minor: error    ";
1206                 $error++;
1207         }
1208 }
1209
1210 sub symlink_test {
1211         my ($config) = @_;
1212
1213         my $output = `ls -l $PWD/$udev_root$config->{exp_name}`;
1214
1215         if ($output =~ m/(.*)-> (.*)/) {
1216                 if ($2 eq $config->{exp_target}) {
1217                         print "symlink: ok    ";
1218                 } else {
1219                         print "expected symlink from: \'$config->{exp_name}\' to \'$config->{exp_target}\'\n";
1220                         print "created symlink from: \'$config->{exp_name}\' to \'$2\'\n";
1221                         if ($config->{exp_add_error}) {
1222                                 print "as expected    ";
1223                         } else {
1224                                 $error++;
1225                         }
1226                 }
1227         } else {
1228                 print "expected symlink from: \'$config->{exp_name}\' to \'$config->{exp_target}\'\n";
1229                 print "symlink: not created ";
1230                 if ($config->{exp_add_error}) {
1231                         print "as expected    ";
1232                 } else {
1233                         $error++;
1234                 }
1235         }
1236 }
1237
1238 sub run_test {
1239         my ($config, $number) = @_;
1240
1241         print "TEST $number: $config->{desc}\n";
1242
1243         if ($config->{exp_target}) {
1244                 print "device \'$config->{devpath}\' expecting symlink '$config->{exp_name}' to node \'$config->{exp_target}\'\n";
1245         } else {
1246                 print "device \'$config->{devpath}\' expecting node \'$config->{exp_name}\'\n";
1247         }
1248
1249
1250         udev("add", $config->{subsys}, $config->{devpath}, \$config->{conf});
1251         if ((-e "$PWD/$udev_root$config->{exp_name}") ||
1252             (-l "$PWD/$udev_root$config->{exp_name}")) {
1253
1254                 my ($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size,
1255                     $atime, $mtime, $ctime, $blksize, $blocks) = stat("$PWD/$udev_root$config->{exp_name}");
1256
1257                 if (defined($config->{exp_perms})) {
1258                         permissions_test($config, $uid, $gid, $mode);
1259                 }
1260                 if (defined($config->{exp_majorminor})) {
1261                         major_minor_test($config, $rdev);
1262                 }
1263                 if (defined($config->{exp_target})) {
1264                         symlink_test($config);
1265                 }
1266                 print "add: ok    ";
1267         } else {
1268                 print "add: error ";
1269                 if ($config->{exp_add_error}) {
1270                         print "as expected    ";
1271                 } else {
1272                         print "\n\n";
1273                         system("tree $udev_root");
1274                         print "\n";
1275                         $error++;
1276                 }
1277         }
1278
1279         if (defined($config->{option}) && $config->{option} eq "keep") {
1280                 print "\n\n";
1281                 return;
1282         }
1283
1284         udev("remove", $config->{subsys}, $config->{devpath}, \$config->{conf});
1285         if ((-e "$PWD/$udev_root$config->{exp_name}") ||
1286             (-l "$PWD/$udev_root$config->{exp_name}")) {
1287                 print "remove: error ";
1288                 if ($config->{exp_rem_error}) {
1289                         print "as expected\n\n";
1290                 } else {
1291                         print "\n\n";
1292                         system("tree $udev_root");
1293                         print "\n";
1294                         $error++;
1295                 }
1296         } else {
1297                 print "remove: ok\n\n";
1298         }
1299
1300         if (defined($config->{option}) && $config->{option} eq "clear") {
1301                 system("rm -rf $udev_db");
1302                 system("rm -rf $udev_root");
1303                 mkdir($udev_root) || die "unable to create udev_root: $udev_root\n";
1304         }
1305
1306 }
1307
1308 # only run if we have root permissions
1309 # due to mknod restrictions
1310 if (!($<==0)) {
1311         print "Must have root permissions to run properly.\n";
1312         exit;
1313 }
1314
1315 # prepare
1316 system("rm -rf $udev_root");
1317 mkdir($udev_root) || die "unable to create udev_root: $udev_root\n";
1318
1319 # create initial config file
1320 open CONF, ">$main_conf" || die "unable to create config file: $main_conf";
1321 print CONF "udev_root=\"$udev_root\"\n";
1322 print CONF "udev_db=\"$udev_db\"\n";
1323 print CONF "udev_rules=\"$conf_tmp\"\n";
1324 close CONF;
1325
1326 my $test_num = 1;
1327
1328 if ($ARGV[0]) {
1329         # only run one test
1330         $test_num = $ARGV[0];
1331
1332         if (defined($tests[$test_num-1]->{desc})) {
1333                 print "udev-test will run test number $test_num only:\n\n";
1334                 run_test($tests[$test_num-1], $test_num);
1335         } else {
1336                 print "test does not exist.\n";
1337         }
1338 } else {
1339         # test all
1340         print "\nudev-test will run ".($#tests + 1)." tests:\n\n";
1341
1342         foreach my $config (@tests) {
1343                 run_test($config, $test_num);
1344                 $test_num++;
1345         }
1346 }
1347
1348 print "$error errors occured\n\n";
1349
1350 # cleanup
1351 system("rm -rf $udev_db");
1352 system("rm -rf $udev_root");
1353 unlink($conf_tmp);
1354 unlink($main_conf);
1355