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 # happy testing,
  18 # Kay Sievers <kay.sievers@vrfy.org>, 2003
  19 #
  20 # Modified April 9, 2004 by Leann Ogasawara <ogasawara@osdl.org>
  21 #  - expanded @tests array to add more symlinks and permissions tests
  22 #  - some of the symlinks tests also test lack of node creation
  23 #  - added symlink_test() function
  24 #  - moved permissions and major_minor tests into their own functions
  25
  26 use warnings;
  27 use strict;
  28
  29 my $PWD = $ENV{PWD};
  30 my $sysfs     = "sys/";
  31 my $udev_bin  = "../udev";
  32 my $udev_root = "udev-root/"; # !!! directory will be removed !!!
  33 my $udev_db   = ".udev.tdb";
  34 my $perm      = "udev.permissions";
  35 my $main_conf = "udev-test.conf";
  36 my $conf_tmp  = "udev-test.rules";
  37
  38
  39 my @tests = (
  40         {
  41                 desc            => "label test of scsi disc",
  42                 subsys          => "block",
  43                 devpath         => "/block/sda",
  44                 exp_name        => "boot_disk" ,
  45                 conf            => <<EOF
  46 BUS="scsi", SYSFS{vendor}="IBM-ESXS", NAME="boot_disk%n"
  47 KERNEL="ttyUSB0", NAME="visor"
  48 EOF
  49         },
  50         {
  51                 desc            => "label test of scsi partition",
  52                 subsys          => "block",
  53                 devpath         => "/block/sda/sda1",
  54                 exp_name        => "boot_disk1" ,
  55                 conf            => <<EOF
  56 BUS="scsi", SYSFS{vendor}="IBM-ESXS", NAME="boot_disk%n"
  57 EOF
  58         },
  59         {
  60                 desc            => "label test of pattern match",
  61                 subsys          => "block",
  62                 devpath         => "/block/sda/sda1",
  63                 exp_name        => "boot_disk1" ,
  64                 conf            => <<EOF
  65 BUS="scsi", SYSFS{vendor}="?IBM-ESXS", NAME="boot_disk%n-1"
  66 BUS="scsi", SYSFS{vendor}="IBM-ESXS?", NAME="boot_disk%n-2"
  67 BUS="scsi", SYSFS{vendor}="IBM-ES??", NAME="boot_disk%n"
  68 BUS="scsi", SYSFS{vendor}="IBM-ESXSS", NAME="boot_disk%n-3"
  69 EOF
  70         },
  71         {
  72                 desc            => "label test of multiple sysfs files",
  73                 subsys          => "block",
  74                 devpath         => "/block/sda/sda1",
  75                 exp_name        => "boot_disk1" ,
  76                 conf            => <<EOF
  77 BUS="scsi", SYSFS{vendor}="IBM-ESXS", SYSFS{model}="ST336605LW   !#", NAME="boot_diskX%n"
  78 BUS="scsi", SYSFS{vendor}="IBM-ESXS", SYSFS{model}="ST336605LW    !#", NAME="boot_disk%n"
  79 EOF
  80         },
  81         {
  82                 desc            => "label test of max sysfs files",
  83                 subsys          => "block",
  84                 devpath         => "/block/sda/sda1",
  85                 exp_name        => "boot_disk1" ,
  86                 conf            => <<EOF
  87 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"
  88 BUS="scsi", SYSFS{vendor}="IBM-ESXS", SYSFS{model}="ST336605LW    !#", SYSFS{scsi_level}="4", SYSFS{rev}="B245", SYSFS{type}="0", NAME="boot_disk%n"
  89 EOF
  90         },
  91         {
  92                 desc            => "catch device by *",
  93                 subsys          => "tty",
  94                 devpath         => "/class/tty/ttyUSB0",
  95                 exp_name        => "visor/0" ,
  96                 conf            => <<EOF
  97 KERNEL="ttyUSB*", NAME="visor/%n"
  98 EOF
  99         },
 100         {
 101                 desc            => "catch device by * - take 2",
 102                 subsys          => "tty",
 103                 devpath         => "/class/tty/ttyUSB0",
 104                 exp_name        => "visor/0" ,
 105                 conf            => <<EOF
 106 KERNEL="*USB1", NAME="bad"
 107 KERNEL="*USB0", NAME="visor/%n"
 108 EOF
 109         },
 110         {
 111                 desc            => "catch device by ?",
 112                 subsys          => "tty",
 113                 devpath         => "/class/tty/ttyUSB0",
 114                 exp_name        => "visor/0" ,
 115                 conf            => <<EOF
 116 KERNEL="ttyUSB??*", NAME="visor/%n-1"
 117 KERNEL="ttyUSB??", NAME="visor/%n-2"
 118 KERNEL="ttyUSB?", NAME="visor/%n"
 119 EOF
 120         },
 121         {
 122                 desc            => "catch device by character class",
 123                 subsys          => "tty",
 124                 devpath         => "/class/tty/ttyUSB0",
 125                 exp_name        => "visor/0" ,
 126                 conf            => <<EOF
 127 KERNEL="ttyUSB[A-Z]*", NAME="visor/%n-1"
 128 KERNEL="ttyUSB?[0-9]", NAME="visor/%n-2"
 129 KERNEL="ttyUSB[0-9]*", NAME="visor/%n"
 130 EOF
 131         },
 132         {
 133                 desc            => "replace kernel name",
 134                 subsys          => "tty",
 135                 devpath         => "/class/tty/ttyUSB0",
 136                 exp_name        => "visor" ,
 137                 conf            => <<EOF
 138 KERNEL="ttyUSB0", NAME="visor"
 139 EOF
 140         },
 141         {
 142                 desc            => "Handle comment lines in config file (and replace kernel name)",
 143                 subsys          => "tty",
 144                 devpath         => "/class/tty/ttyUSB0",
 145                 exp_name        => "visor" ,
 146                 conf            => <<EOF
 147 # this is a comment
 148 KERNEL="ttyUSB0", NAME="visor"
 149
 150 EOF
 151         },
 152         {
 153                 desc            => "Handle comment lines in config file with whitespace (and replace kernel name)",
 154                 subsys          => "tty",
 155                 devpath         => "/class/tty/ttyUSB0",
 156                 exp_name        => "visor" ,
 157                 conf            => <<EOF
 158  # this is a comment with whitespace before the comment
 159 KERNEL="ttyUSB0", NAME="visor"
 160
 161 EOF
 162         },
 163         {
 164                 desc            => "Handle whitespace only lines (and replace kernel name)",
 165                 subsys          => "tty",
 166                 devpath         => "/class/tty/ttyUSB0",
 167                 exp_name        => "whitespace" ,
 168                 conf            => <<EOF
 169
 170
 171
 172  # this is a comment with whitespace before the comment
 173 KERNEL="ttyUSB0", NAME="whitespace"
 174
 175
 176
 177 EOF
 178         },
 179         {
 180                 desc            => "Handle empty lines in config file (and replace kernel name)",
 181                 subsys          => "tty",
 182                 devpath         => "/class/tty/ttyUSB0",
 183                 exp_name        => "visor" ,
 184                 conf            => <<EOF
 185
 186 KERNEL="ttyUSB0", NAME="visor"
 187
 188 EOF
 189         },
 190         {
 191                 desc            => "subdirectory handling",
 192                 subsys          => "tty",
 193                 devpath         => "/class/tty/ttyUSB0",
 194                 exp_name        => "sub/direct/ory/visor" ,
 195                 conf            => <<EOF
 196 KERNEL="ttyUSB0", NAME="sub/direct/ory/visor"
 197 EOF
 198         },
 199         {
 200                 desc            => "place on bus of scsi partition",
 201                 subsys          => "block",
 202                 devpath         => "/block/sda/sda3",
 203                 exp_name        => "first_disk3" ,
 204                 conf            => <<EOF
 205 BUS="scsi", PLACE="0:0:0:0", NAME="first_disk%n"
 206 EOF
 207         },
 208         {
 209                 desc            => "test NAME substitution chars",
 210                 subsys          => "block",
 211                 devpath         => "/block/sda/sda3",
 212                 exp_name        => "Major:8:minor:3:kernelnumber:3:bus:0:0:0:0" ,
 213                 conf            => <<EOF
 214 BUS="scsi", PLACE="0:0:0:0", NAME="Major:%M:minor:%m:kernelnumber:%n:bus:%b"
 215 EOF
 216         },
 217         {
 218                 desc            => "test NAME substitution chars (with length limit)",
 219                 subsys          => "block",
 220                 devpath         => "/block/sda/sda3",
 221                 exp_name        => "M8-m3-n3-b0:0-sIBM" ,
 222                 conf            => <<EOF
 223 BUS="scsi", PLACE="0:0:0:0", NAME="M%M-m%m-n%n-b%3b-s%3s{vendor}"
 224 EOF
 225         },
 226         {
 227                 desc            => "old style SYSFS_ attribute",
 228                 subsys          => "block",
 229                 devpath         => "/block/sda",
 230                 exp_name        => "good" ,
 231                 conf            => <<EOF
 232 BUS="scsi", SYSFS_vendor="IBM-ESXS", NAME="good"
 233 EOF
 234         },
 235         {
 236                 desc            => "sustitution of sysfs value (%s{file})",
 237                 subsys          => "block",
 238                 devpath         => "/block/sda",
 239                 exp_name        => "disk-IBM-ESXS-sda" ,
 240                 conf            => <<EOF
 241 BUS="scsi", SYSFS{vendor}="IBM-ESXS", NAME="disk-%s{vendor}-%k"
 242 KERNEL="ttyUSB0", NAME="visor"
 243 EOF
 244         },
 245         {
 246                 desc            => "program result substitution",
 247                 subsys          => "block",
 248                 devpath         => "/block/sda/sda3",
 249                 exp_name        => "special-device-3" ,
 250                 conf            => <<EOF
 251 BUS="scsi", PROGRAM="/bin/echo -n special-device", RESULT="-special-*", NAME="%c-1-%n"
 252 BUS="scsi", PROGRAM="/bin/echo -n special-device", RESULT="special--*", NAME="%c-2-%n"
 253 BUS="scsi", PROGRAM="/bin/echo -n special-device", RESULT="special-device-", NAME="%c-3-%n"
 254 BUS="scsi", PROGRAM="/bin/echo -n special-device", RESULT="special-devic", NAME="%c-4-%n"
 255 BUS="scsi", PROGRAM="/bin/echo -n special-device", RESULT="special-*", NAME="%c-%n"
 256 EOF
 257         },
 258         {
 259                 desc            => "program result substitution (newline removal)",
 260                 subsys          => "block",
 261                 devpath         => "/block/sda/sda3",
 262                 exp_name        => "newline_removed" ,
 263                 conf            => <<EOF
 264 BUS="scsi", PROGRAM="/bin/echo test", RESULT="test", NAME="newline_removed"
 265 EOF
 266         },
 267         {
 268                 desc            => "program result substitution",
 269                 subsys          => "block",
 270                 devpath         => "/block/sda/sda3",
 271                 exp_name        => "test-0:0:0:0" ,
 272                 conf            => <<EOF
 273 BUS="scsi", PROGRAM="/bin/echo -n test-%b", RESULT="test-0:0*", NAME="%c"
 274 EOF
 275         },
 276         {
 277                 desc            => "program with escaped format char (tricky: callout returns format char!)",
 278                 subsys          => "block",
 279                 devpath         => "/block/sda/sda3",
 280                 exp_name        => "escape-3" ,
 281                 conf            => <<EOF
 282 BUS="scsi", PROGRAM="/bin/echo -n escape-%%n", KERNEL="sda3", NAME="%c"
 283 EOF
 284         },
 285         {
 286                 desc            => "program with lots of arguments",
 287                 subsys          => "block",
 288                 devpath         => "/block/sda/sda3",
 289                 exp_name        => "foo9" ,
 290                 conf            => <<EOF
 291 BUS="scsi", PROGRAM="/bin/echo -n foo3 foo4 foo5 foo6 foo7 foo8 foo9", KERNEL="sda3", NAME="%c{7}"
 292 EOF
 293         },
 294         {
 295                 desc            => "program with subshell",
 296                 subsys          => "block",
 297                 devpath         => "/block/sda/sda3",
 298                 exp_name        => "bar9" ,
 299                 conf            => <<EOF
 300 BUS="scsi", PROGRAM="/bin/sh -c 'echo foo3 foo4 foo5 foo6 foo7 foo8 foo9 | sed  s/foo9/bar9/'", KERNEL="sda3", NAME="%c{7}"
 301 EOF
 302         },
 303         {
 304                 desc            => "program arguments combined with apostrophes",
 305                 subsys          => "block",
 306                 devpath         => "/block/sda/sda3",
 307                 exp_name        => "foo7" ,
 308                 conf            => <<EOF
 309 BUS="scsi", PROGRAM="/bin/echo -n 'foo3 foo4'   'foo5   foo6   foo7 foo8'", KERNEL="sda3", NAME="%c{5}"
 310 EOF
 311         },
 312         {
 313                 desc            => "characters before the %c{N} substitution",
 314                 subsys          => "block",
 315                 devpath         => "/block/sda/sda3",
 316                 exp_name        => "my-foo9" ,
 317                 conf            => <<EOF
 318 BUS="scsi", PROGRAM="/bin/echo -n foo3 foo4 foo5 foo6 foo7 foo8 foo9", KERNEL="sda3", NAME="my-%c{7}"
 319 EOF
 320         },
 321         {
 322                 desc            => "substitute the second to last argument",
 323                 subsys          => "block",
 324                 devpath         => "/block/sda/sda3",
 325                 exp_name        => "my-foo8" ,
 326                 conf            => <<EOF
 327 BUS="scsi", PROGRAM="/bin/echo -n foo3 foo4 foo5 foo6 foo7 foo8 foo9", KERNEL="sda3", NAME="my-%c{6}"
 328 EOF
 329         },
 330         {
 331                 desc            => "invalid program for device with no bus",
 332                 subsys          => "tty",
 333                 devpath         => "/class/tty/console",
 334                 exp_name        => "TTY" ,
 335                 conf            => <<EOF
 336 BUS="scsi", PROGRAM="/bin/echo -n foo", RESULT="foo", NAME="foo"
 337 KERNEL="console", NAME="TTY"
 338 EOF
 339         },
 340         {
 341                 desc            => "valid program for device with no bus",
 342                 subsys          => "tty",
 343                 devpath         => "/class/tty/console",
 344                 exp_name        => "foo" ,
 345                 conf            => <<EOF
 346 PROGRAM="/bin/echo -n foo", RESULT="foo", NAME="foo"
 347 KERNEL="console", NAME="TTY"
 348 EOF
 349         },
 350         {
 351                 desc            => "invalid label for device with no bus",
 352                 subsys          => "tty",
 353                 devpath         => "/class/tty/console",
 354                 exp_name        => "TTY" ,
 355                 conf            => <<EOF
 356 BUS="foo", SYSFS{dev}="5:1", NAME="foo"
 357 KERNEL="console", NAME="TTY"
 358 EOF
 359         },
 360         {
 361                 desc            => "valid label for device with no bus",
 362                 subsys          => "tty",
 363                 devpath         => "/class/tty/console",
 364                 exp_name        => "foo" ,
 365                 conf            => <<EOF
 366 SYSFS{dev}="5:1", NAME="foo"
 367 KERNEL="console", NAME="TTY"
 368 EOF
 369         },
 370         {
 371                 desc            => "program and bus type match",
 372                 subsys          => "block",
 373                 devpath         => "/block/sda",
 374                 exp_name        => "scsi-0:0:0:0" ,
 375                 conf            => <<EOF
 376 BUS="usb", PROGRAM="/bin/echo -n usb-%b", NAME="%c"
 377 BUS="scsi", PROGRAM="/bin/echo -n scsi-%b", NAME="%c"
 378 BUS="foo", PROGRAM="/bin/echo -n foo-%b", NAME="%c"
 379 EOF
 380         },
 381         {
 382                 desc            => "create all possible partitions",
 383                 subsys          => "block",
 384                 devpath         => "/block/sda",
 385                 exp_name        => "boot_disk15" ,
 386                 conf            => <<EOF
 387 BUS="scsi", SYSFS{vendor}="IBM-ESXS", NAME{all_partitions}="boot_disk"
 388 EOF
 389         },
 390         {
 391                 desc            => "sysfs parent hierarchy",
 392                 subsys          => "tty",
 393                 devpath         => "/class/tty/ttyUSB0",
 394                 exp_name        => "visor" ,
 395                 conf            => <<EOF
 396 SYSFS{idProduct}="2008", NAME="visor"
 397 EOF
 398         },
 399         {
 400                 desc            => "name test with ! in the name",
 401                 subsys          => "block",
 402                 devpath         => "/block/rd!c0d0",
 403                 exp_name        => "rd/c0d0" ,
 404                 conf            => <<EOF
 405 BUS="scsi", NAME="%k"
 406 KERNEL="ttyUSB0", NAME="visor"
 407 EOF
 408         },
 409         {
 410                 desc            => "name test with ! in the name, but no matching rule",
 411                 subsys          => "block",
 412                 devpath         => "/block/rd!c0d0",
 413                 exp_name        => "rd/c0d0" ,
 414                 conf            => <<EOF
 415 KERNEL="ttyUSB0", NAME="visor"
 416 EOF
 417         },
 418         {
 419                 desc            => "name test with ! in the name for a partition",
 420                 subsys          => "block",
 421                 devpath         => "/block/cciss!c0d0/cciss!c0d0p1",
 422                 exp_name        => "cciss/c0d0p1" ,
 423                 conf            => <<EOF
 424 BUS="scsi", NAME="%k"
 425 KERNEL="ttyUSB0", NAME="visor"
 426 EOF
 427         },
 428         {
 429                 desc            => "ID rule",
 430                 subsys          => "block",
 431                 devpath         => "/block/sda",
 432                 exp_name        => "scsi-0:0:0:0",
 433                 conf            => <<EOF
 434 BUS="usb", ID="0:0:0:0", NAME="not-scsi"
 435 BUS="scsi", ID="0:0:0:1", NAME="no-match"
 436 BUS="scsi", ID=":0", NAME="short-id"
 437 BUS="scsi", ID="/0:0:0:0", NAME="no-match"
 438 BUS="scsi", ID="0:0:0:0", NAME="scsi-0:0:0:0"
 439 EOF
 440         },
 441         {
 442                 desc            => "ID wildcard all",
 443                 subsys          => "block",
 444                 devpath         => "/block/sda",
 445                 exp_name        => "scsi-0:0:0:0",
 446                 conf            => <<EOF
 447 BUS="scsi", ID="*:1", NAME="no-match"
 448 BUS="scsi", ID="*:0:1", NAME="no-match"
 449 BUS="scsi", ID="*:0:0:1", NAME="no-match"
 450 BUS="scsi", ID="*", NAME="scsi-0:0:0:0"
 451 BUS="scsi", ID="0:0:0:0", NAME="bad"
 452 EOF
 453         },
 454         {
 455                 desc            => "ID wildcard partial",
 456                 subsys          => "block",
 457                 devpath         => "/block/sda",
 458                 exp_name        => "scsi-0:0:0:0",
 459                 conf            => <<EOF
 460 BUS="scsi", ID="*:0", NAME="scsi-0:0:0:0"
 461 BUS="scsi", ID="0:0:0:0", NAME="bad"
 462 EOF
 463         },
 464         {
 465                 desc            => "ID wildcard partial 2",
 466                 subsys          => "block",
 467                 devpath         => "/block/sda",
 468                 exp_name        => "scsi-0:0:0:0",
 469                 conf            => <<EOF
 470 BUS="scsi", ID="*:0:0:0", NAME="scsi-0:0:0:0"
 471 BUS="scsi", ID="0:0:0:0", NAME="bad"
 472 EOF
 473         },
 474         {
 475                 desc            => "ignore SYSFS attribute whitespace",
 476                 subsys          => "block",
 477                 devpath         => "/block/sda",
 478                 exp_name        => "ignored",
 479                 conf            => <<EOF
 480 BUS="scsi", SYSFS{whitespace_test}="WHITE  SPACE", NAME="ignored"
 481 EOF
 482         },
 483         {
 484                 desc            => "do not ignore SYSFS attribute whitespace",
 485                 subsys          => "block",
 486                 devpath         => "/block/sda",
 487                 exp_name        => "matched-with-space",
 488                 conf            => <<EOF
 489 BUS="scsi", SYSFS{whitespace_test}="WHITE  SPACE ", NAME="wrong-to-ignore"
 490 BUS="scsi", SYSFS{whitespace_test}="WHITE  SPACE   ", NAME="matched-with-space"
 491 EOF
 492         },
 493         {
 494                 desc            => "permissions test",
 495                 subsys          => "block",
 496                 devpath         => "/block/sda",
 497                 exp_name        => "node",
 498                 exp_perms       => "5000::0444",
 499                 conf            => <<EOF
 500 BUS="scsi", KERNEL="sda", NAME="node", OWNER="5000", MODE="0444"
 501 EOF
 502         },
 503         {
 504                 desc            => "permissions ttyUSB0:root:uucp:0660",
 505                 subsys          => "tty",
 506                 devpath         => "/class/tty/ttyUSB0",
 507                 exp_name        => "ttyUSB0",
 508                 exp_perms       => "0:14:0660",
 509                 conf            => <<EOF
 510 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n"
 511 EOF
 512         },
 513         {
 514                 desc            => "permissions tty0::root:0444",
 515                 subsys          => "tty",
 516                 devpath         => "/class/tty/tty0",
 517                 exp_name        => "tty0",
 518                 exp_perms       => "0:0:0444",
 519                 conf            => <<EOF
 520 KERNEL="tty0", NAME="tty0"
 521 EOF
 522         },
 523         {
 524                 desc            => "permissions tty1:root::0555",
 525                 subsys          => "tty",
 526                 devpath         => "/class/tty/tty1",
 527                 exp_name        => "tty1",
 528                 exp_perms       => "0:0:0555",
 529                 conf            => <<EOF
 530 KERNEL="tty1", NAME="tty1"
 531 EOF
 532         },
 533         {
 534                 desc            => "permissions tty2:::0777",
 535                 subsys          => "tty",
 536                 devpath         => "/class/tty/tty2",
 537                 exp_name        => "tty2",
 538                 exp_perms       => "0:0:0777",
 539                 conf            => <<EOF
 540 KERNEL="tty2", NAME="tty2"
 541 EOF
 542         },
 543         {
 544                 desc            => "permissions tty3:::",
 545                 subsys          => "tty",
 546                 devpath         => "/class/tty/tty3",
 547                 exp_name        => "tty3",
 548                 exp_perms       => "0:0:0",
 549                 conf            => <<EOF
 550 KERNEL="tty3", NAME="tty3"
 551 EOF
 552         },
 553         {
 554                 desc            => "permissions i2c-300:root:sys:0744",
 555                 subsys          => "i2c-dev",
 556                 devpath         => "/class/i2c-dev/i2c-300",
 557                 exp_name        => "i2c-300",
 558                 exp_perms       => "0:3:0744",
 559                 conf            => <<EOF
 560 KERNEL="i2c-300", NAME="i2c-300"
 561 EOF
 562         },
 563         {
 564                 desc            => "permissions i2c-fake1:root:7:0007",
 565                 subsys          => "i2c-dev",
 566                 devpath         => "/class/i2c-dev/i2c-fake1",
 567                 exp_name        => "i2c-fake1",
 568                 exp_perms       => "0:7:0007",
 569                 conf            => <<EOF
 570 KERNEL="i2c-fake1", NAME="i2c-fake1"
 571 EOF
 572         },
 573         {
 574                 desc            => "permissions ttyS[01]:0:5:0700",
 575                 subsys          => "tty",
 576                 devpath         => "/class/tty/ttyS1",
 577                 exp_name        => "ttyS1",
 578                 exp_perms       => "0:5:0700",
 579                 conf            => <<EOF
 580 KERNEL="ttyS1", NAME="ttyS1"
 581 EOF
 582         },
 583         {
 584                 desc            => "permissions ttyS[4-9]:tty:5:0060",
 585                 subsys          => "tty",
 586                 devpath         => "/class/tty/ttyS7",
 587                 exp_name        => "ttyS7",
 588                 exp_perms       => "0:5:0060",
 589                 conf            => <<EOF
 590 KERNEL="ttyS7", NAME="ttyS7"
 591 EOF
 592         },
 593         {
 594                 desc            => "permissions tty4:0:5:0707",
 595                 subsys          => "ttyS4",
 596                 devpath         => "/class/tty/tty4",
 597                 exp_name        => "tty4",
 598                 exp_perms       => "0:5:0707",
 599                 conf            => <<EOF
 600 KERNEL="tty4", NAME="tty4"
 601 EOF
 602         },
 603         {
 604                 desc            => "permissions tty4?:0:5:0007",
 605                 subsys          => "tty",
 606                 devpath         => "/class/tty/tty44",
 607                 exp_name        => "tty44",
 608                 exp_perms       => "0:5:0007",
 609                 conf            => <<EOF
 610 KERNEL="tty44", NAME="tty44"
 611 EOF
 612         },
 613         {
 614                 desc            => "permissions tty3[!3]:::0467",
 615                 subsys          => "tty",
 616                 devpath         => "/class/tty/tty35",
 617                 exp_name        => "tty35",
 618                 exp_perms       => "0:0:0467",
 619                 conf            => <<EOF
 620 KERNEL="tty35", NAME="tty35"
 621 EOF
 622         },
 623         {
 624                 desc            => "permissions tty33:bad:name:0500",
 625                 subsys          => "tty",
 626                 devpath         => "/class/tty/tty33",
 627                 exp_name        => "tty33",
 628                 exp_perms       => "0:0:0500",
 629                 conf            => <<EOF
 630 KERNEL="tty33", NAME="tty33"
 631 EOF
 632         },
 633         {
 634                 desc            => "permissions rtc:0:users:0600",
 635                 subsys          => "misc",
 636                 devpath         => "/class/misc/rtc",
 637                 exp_name        => "misc/rtc",
 638                 exp_perms       => "0:100:0600",
 639                 conf            => <<EOF
 640 KERNEL="rtc", NAME="misc/rtc"
 641 EOF
 642         },
 643         {
 644                 desc            => "permissions misc:0:users:0600",
 645                 subsys          => "misc",
 646                 devpath         => "/class/misc/psaux",
 647                 exp_name        => "misc/psaux",
 648                 exp_perms       => "0:100:0600",
 649                 conf            => <<EOF
 650 KERNEL="psaux", NAME="misc/psaux"
 651 EOF
 652         },
 653         {
 654                 desc            => "permissions set OWNER=5000",
 655                 subsys          => "block",
 656                 devpath         => "/block/sda",
 657                 exp_name        => "node",
 658                 exp_perms       => "5000::0600",
 659                 conf            => <<EOF
 660 BUS="scsi", KERNEL="sda", NAME="node", OWNER="5000"
 661 EOF
 662         },
 663         {
 664                 desc            => "permissions set GROUP=100",
 665                 subsys          => "block",
 666                 devpath         => "/block/sda",
 667                 exp_name        => "node",
 668                 exp_perms       => ":100:0600",
 669                 conf            => <<EOF
 670 BUS="scsi", KERNEL="sda", NAME="node", GROUP="100"
 671 EOF
 672         },
 673         {
 674                 desc            => "permissions set mode=0777",
 675                 subsys          => "block",
 676                 devpath         => "/block/sda",
 677                 exp_name        => "node",
 678                 exp_perms       => "::0777",
 679                 conf            => <<EOF
 680 BUS="scsi", KERNEL="sda", NAME="node", MODE="0777"
 681 EOF
 682         },
 683         {
 684                 desc            => "permissions set OWNER=5000 GROUP=100 MODE=0777",
 685                 subsys          => "block",
 686                 devpath         => "/block/sda",
 687                 exp_name        => "node",
 688                 exp_perms       => "5000:100:0777",
 689                 conf            => <<EOF
 690 BUS="scsi", KERNEL="sda", NAME="node", OWNER="5000", GROUP="100", MODE="0777"
 691 EOF
 692         },
 693         {
 694                 desc            => "permissions override OWNER to 5000",
 695                 subsys          => "tty",
 696                 devpath         => "/class/tty/ttyUSB0",
 697                 exp_name        => "ttyUSB0",
 698                 exp_perms       => "5000:14:0660",
 699                 conf            => <<EOF
 700 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", OWNER="5000"
 701 EOF
 702         },
 703         {
 704                 desc            => "permissions override GROUP to 100",
 705                 subsys          => "tty",
 706                 devpath         => "/class/tty/ttyUSB0",
 707                 exp_name        => "ttyUSB0",
 708                 exp_perms       => ":100:0660",
 709                 conf            => <<EOF
 710 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", GROUP="100"
 711 EOF
 712         },
 713         {
 714                 desc            => "permissions override MODE to 0060",
 715                 subsys          => "tty",
 716                 devpath         => "/class/tty/ttyUSB0",
 717                 exp_name        => "ttyUSB0",
 718                 exp_perms       => ":14:0060",
 719                 conf            => <<EOF
 720 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", MODE="0060"
 721 EOF
 722         },
 723         {
 724                 desc            => "permissions override OWNER, GROUP, MODE",
 725                 subsys          => "tty",
 726                 devpath         => "/class/tty/ttyUSB0",
 727                 exp_name        => "ttyUSB0",
 728                 exp_perms       => "5000:100:0777",
 729                 conf            => <<EOF
 730 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", OWNER="5000", GROUP="100", MODE="0777"
 731 EOF
 732         },
 733         {
 734                 desc            => "major/minor number test",
 735                 subsys          => "block",
 736                 devpath         => "/block/sda",
 737                 exp_name        => "node",
 738                 exp_majorminor  => "8:0",
 739                 conf            => <<EOF
 740 BUS="scsi", KERNEL="sda", NAME="node"
 741 EOF
 742         },
 743         {
 744                 desc            => "big minor number test",
 745                 subsys          => "i2c-dev",
 746                 devpath         => "/class/i2c-dev/i2c-300",
 747                 exp_name        => "node",
 748                 exp_majorminor  => "89:300",
 749                 conf            => <<EOF
 750 KERNEL="i2c-300", NAME="node"
 751 EOF
 752         },
 753         {
 754                 desc            => "big major number test",
 755                 subsys          => "i2c-dev",
 756                 devpath         => "/class/i2c-dev/i2c-fake1",
 757                 exp_name        => "node",
 758                 exp_majorminor  => "4095:1",
 759                 conf            => <<EOF
 760 KERNEL="i2c-fake1", NAME="node"
 761 EOF
 762         },
 763         {
 764                 desc            => "big major and big minor number test",
 765                 subsys          => "i2c-dev",
 766                 devpath         => "/class/i2c-dev/i2c-fake2",
 767                 exp_name        => "node",
 768                 exp_majorminor  => "4094:89999",
 769                 conf            => <<EOF
 770 KERNEL="i2c-fake2", NAME="node"
 771 EOF
 772         },
 773         {
 774                 desc            => "symlink creation (same directory)",
 775                 subsys          => "tty",
 776                 devpath         => "/class/tty/ttyUSB0",
 777                 exp_name        => "visor0",
 778                 exp_target      => "ttyUSB0",
 779                 conf            => <<EOF
 780 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="visor%n"
 781 EOF
 782         },
 783         {
 784                 desc            => "symlink creation (relative link forward)",
 785                 subsys          => "block",
 786                 devpath         => "/block/sda/sda2",
 787                 exp_name        => "1/2/symlink" ,
 788                 exp_target      => "a/b/node",
 789                 conf            => <<EOF
 790 BUS="scsi", SYSFS{vendor}="IBM-ESXS", NAME="1/2/a/b/node", SYMLINK="1/2/symlink"
 791 EOF
 792         },
 793         {
 794                 desc            => "symlink creation (relative link back and forward)",
 795                 subsys          => "block",
 796                 devpath         => "/block/sda/sda2",
 797                 exp_name        => "1/2/c/d/symlink" ,
 798                 exp_target      => "../../a/b/node",
 799                 conf            => <<EOF
 800 BUS="scsi", SYSFS{vendor}="IBM-ESXS", NAME="1/2/a/b/node", SYMLINK="1/2/c/d/symlink"
 801 EOF
 802         },
 803         {
 804                 desc            => "multiple symlinks",
 805                 subsys          => "tty",
 806                 devpath         => "/class/tty/ttyUSB0",
 807                 exp_name        => "second-0" ,
 808                 exp_target      => "visor" ,
 809                 conf            => <<EOF
 810 KERNEL="ttyUSB0", NAME="visor", SYMLINK="first-%n second-%n third-%n"
 811 EOF
 812         },
 813         {
 814                 desc            => "symlink only rule",
 815                 subsys          => "block",
 816                 devpath         => "/block/sda",
 817                 exp_name        => "symlink-only2",
 818                 exp_target      => "link",
 819                 conf            => <<EOF
 820 BUS="scsi", KERNEL="sda", SYMLINK="symlink-only1"
 821 BUS="scsi", KERNEL="sda", SYMLINK="symlink-only2"
 822 BUS="scsi", KERNEL="sda", NAME="link", SYMLINK="symlink0"
 823 EOF
 824         },
 825         {
 826                 desc            => "symlink name empty",
 827                 subsys          => "block",
 828                 devpath         => "/block/sda",
 829                 exp_name        => "",
 830                 exp_target      => "link",
 831                 exp_error       => "yes",
 832                 conf            => <<EOF
 833 BUS="scsi", KERNEL="sda", NAME="link", SYMLINK=""
 834 EOF
 835         },
 836         {
 837                 desc            => "symlink name '.'",
 838                 subsys          => "block",
 839                 devpath         => "/block/sda",
 840                 exp_name        => ".",
 841                 exp_target      => "link",
 842                 exp_error       => "yes",
 843                 conf            => <<EOF
 844 BUS="scsi", KERNEL="sda", NAME="link", SYMLINK="."
 845 EOF
 846         },
 847         {
 848                 desc            => "symlink to empty name",
 849                 subsys          => "block",
 850                 devpath         => "/block/sda",
 851                 exp_name        => "symlink",
 852                 exp_target      => "",
 853                 exp_error       => "yes",
 854                 conf            => <<EOF
 855 BUS="scsi", KERNEL="sda", NAME="", SYMLINK="symlink"
 856 EOF
 857         },
 858         {
 859                 desc            => "symlink and name empty",
 860                 subsys          => "block",
 861                 devpath         => "/block/sda",
 862                 exp_name        => "",
 863                 exp_target      => "",
 864                 exp_error       => "yes",
 865                 conf            => <<EOF
 866 BUS="scsi", KERNEL="sda", NAME="", SYMLINK=""
 867 EOF
 868         },
 869         {
 870                 desc            => "symlink node to itself",
 871                 subsys          => "tty",
 872                 devpath         => "/class/tty/tty0",
 873                 exp_name        => "link",
 874                 exp_target      => "link",
 875                 conf            => <<EOF
 876 KERNEL="tty0", NAME="link", SYMLINK="link"
 877 EOF
 878         },
 879         {
 880                 desc            => "symlink %n substitution",
 881                 subsys          => "tty",
 882                 devpath         => "/class/tty/ttyUSB0",
 883                 exp_name        => "symlink0",
 884                 exp_target      => "ttyUSB0",
 885                 conf            => <<EOF
 886 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="symlink%n"
 887 EOF
 888         },
 889         {
 890                 desc            => "symlink %k substitution",
 891                 subsys          => "tty",
 892                 devpath         => "/class/tty/ttyUSB0",
 893                 exp_name        => "symlink-ttyUSB0",
 894                 exp_target      => "ttyUSB0",
 895                 conf            => <<EOF
 896 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="symlink-%k"
 897 EOF
 898         },
 899         {
 900                 desc            => "symlink %M:%m substitution",
 901                 subsys          => "tty",
 902                 devpath         => "/class/tty/ttyUSB0",
 903                 exp_name        => "major-188:0",
 904                 exp_target      => "ttyUSB0",
 905                 conf            => <<EOF
 906 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="major-%M:%m"
 907 EOF
 908         },
 909         {
 910                 desc            => "symlink %b substitution",
 911                 subsys          => "block",
 912                 devpath         => "/block/sda",
 913                 exp_name        => "symlink-0:0:0:0",
 914                 exp_target      => "node",
 915                 conf            => <<EOF
 916 BUS="scsi", KERNEL="sda", NAME="node", SYMLINK="symlink-%b"
 917 EOF
 918         },
 919         {
 920                 desc            => "symlink %c substitution",
 921                 subsys          => "tty",
 922                 devpath         => "/class/tty/ttyUSB0",
 923                 exp_name        => "test",
 924                 exp_target      => "ttyUSB0",
 925                 conf            => <<EOF
 926 KERNEL="ttyUSB[0-9]*", PROGRAM="/bin/echo test" NAME="ttyUSB%n", SYMLINK="%c"
 927 EOF
 928         },
 929         {
 930                 desc            => "symlink %c{N} substitution",
 931                 subsys          => "tty",
 932                 devpath         => "/class/tty/ttyUSB0",
 933                 exp_name        => "test",
 934                 exp_target      => "ttyUSB0",
 935                 conf            => <<EOF
 936 KERNEL="ttyUSB[0-9]*", PROGRAM="/bin/echo symlink test this" NAME="ttyUSB%n", SYMLINK="%c{2}"
 937 EOF
 938         },
 939         {
 940                 desc            => "symlink %c{N+} substitution",
 941                 subsys          => "tty",
 942                 devpath         => "/class/tty/ttyUSB0",
 943                 exp_name        => "this",
 944                 exp_target      => "ttyUSB0",
 945                 conf            => <<EOF
 946 KERNEL="ttyUSB[0-9]*", PROGRAM="/bin/echo symlink test this" NAME="ttyUSB%n", SYMLINK="%c{2+}"
 947 EOF
 948         },
 949         {
 950                 desc            => "symlink only rule with %c{N+}",
 951                 subsys          => "block",
 952                 devpath         => "/block/sda",
 953                 exp_name        => "test",
 954                 exp_target      => "link",
 955                 conf            => <<EOF
 956 BUS="scsi", KERNEL="sda", PROGRAM="/bin/echo link test this" SYMLINK="%c{2+}"
 957 BUS="scsi", KERNEL="sda", NAME="link", SYMLINK="symlink0"
 958 EOF
 959         },
 960         {
 961                 desc            => "symlink %s{filename} substitution",
 962                 subsys          => "tty",
 963                 devpath         => "/class/tty/ttyUSB0",
 964                 exp_name        => "188:0",
 965                 exp_target      => "ttyUSB0",
 966                 conf            => <<EOF
 967 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="%s{dev}"
 968 EOF
 969         },
 970         {
 971                 desc            => "symlink %Ns{filename} substitution",
 972                 subsys          => "tty",
 973                 devpath         => "/class/tty/ttyUSB0",
 974                 exp_name        => "188",
 975                 exp_target      => "ttyUSB0",
 976                 conf            => <<EOF
 977 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="%3s{dev}"
 978 EOF
 979         },
 980         {
 981                 desc            => "symlink with '%' in name",
 982                 subsys          => "tty",
 983                 devpath         => "/class/tty/ttyUSB0",
 984                 exp_name        => "percent%sign",
 985                 exp_target      => "ttyUSB0",
 986                 conf            => <<EOF
 987 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="percent%%sign"
 988 EOF
 989         },
 990         {
 991                 desc            => "symlink with '%' in name",
 992                 subsys          => "tty",
 993                 devpath         => "/class/tty/ttyUSB0",
 994                 exp_name        => "%ttyUSB0_name",
 995                 exp_target      => "ttyUSB0",
 996                 conf            => <<EOF
 997 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="%%%k_name"
 998 EOF
 999         },
1000         {
1001                 desc            => "program result substitution (numbered part of)",
1002                 subsys          => "block",
1003                 devpath         => "/block/sda/sda3",
1004                 exp_name        => "link1",
1005                 exp_target      => "node",
1006                 conf            => <<EOF
1007 BUS="scsi", PROGRAM="/bin/echo -n node link1 link2", RESULT="node *", NAME="%c{1}", SYMLINK="%c{2} %c{3}"
1008 EOF
1009         },
1010         {
1011                 desc            => "program result substitution (numbered part of+)",
1012                 subsys          => "block",
1013                 devpath         => "/block/sda/sda3",
1014                 exp_name        => "link4",
1015                 exp_target      => "node",
1016                 conf            => <<EOF
1017 BUS="scsi", PROGRAM="/bin/echo -n node link1 link2 link3 link4", RESULT="node *", NAME="%c{1}", SYMLINK="%c{2+}"
1018 EOF
1019         },
1020 );
1021
1022 # set env
1023 $ENV{UDEV_TEST} = "yes";
1024 $ENV{SYSFS_PATH} = $sysfs;
1025 $ENV{UDEV_CONFIG_FILE} = $main_conf;
1026 $ENV{UDEV_NO_SLEEP} = "yes";
1027 $ENV{UDEV_NO_DEVD} = "yes";
1028
1029
1030 sub udev {
1031         my ($action, $subsys, $devpath, $config) = @_;
1032
1033         $ENV{DEVPATH} = $devpath;
1034
1035         # create temporary config
1036         open CONF, ">$conf_tmp" || die "unable to create config file: $conf_tmp";
1037         print CONF $$config;
1038         close CONF;
1039
1040         $ENV{ACTION} = $action;
1041         system("$udev_bin $subsys");
1042 }
1043
1044 my $error = 0;
1045
1046 sub permissions_test {
1047         my($config, $uid, $gid, $mode) = @_;
1048
1049         my $wrong = 0;
1050         $config->{exp_perms} =~ m/^(.*):(.*):(.*)$/;
1051         if ($1 ne "") {
1052                 if ($uid != $1) { $wrong = 1; };
1053         }
1054         if ($2 ne "") {
1055                 if ($gid != $2) { $wrong = 1; };
1056         }
1057         if ($3 ne "") {
1058                 if (($mode & 07777) != oct($3)) { $wrong = 1; };
1059         }
1060         if ($wrong == 0) {
1061                 print "permissions: ok    ";
1062         } else {
1063                 printf "expected permissions are: %i:%i:%#o\n", $1, $2, oct($3);
1064                 printf "created permissions are : %i:%i:%#o\n", $uid, $gid, $mode & 07777;
1065                 $error++;
1066         }
1067 }
1068
1069 sub major_minor_test {
1070         my($config, $rdev) = @_;
1071
1072         my $major = ($rdev >> 8) & 0xfff;
1073         my $minor = ($rdev & 0xff) | (($rdev >> 12) & 0xfff00);
1074         my $wrong = 0;
1075
1076         $config->{exp_majorminor} =~ m/^(.*):(.*)$/;
1077         if ($1 ne "") {
1078                 if ($major != $1) { $wrong = 1; };
1079         }
1080         if ($2 ne "") {
1081                 if ($minor != $2) { $wrong = 1; };
1082         }
1083         if ($wrong == 0) {
1084                 print "major:minor: ok    ";
1085         } else {
1086                 printf "expected major:minor is: %i:%i\n", $1, $2;
1087                 printf "created major:minor is : %i:%i\n", $major, $minor;
1088                 print "major:minor: error    ";
1089                 $error++;
1090         }
1091 }
1092
1093 sub symlink_test {
1094         my ($config) = @_;
1095
1096         my $output = `ls -l $PWD/$udev_root$config->{exp_name}`;
1097
1098         if ($output =~ m/(.*)-> (.*)/) {
1099                 if ($2 eq $config->{exp_target}) {
1100                         print "symlink: ok    ";
1101                 } else {
1102                         print "expected symlink from: \'$config->{exp_name}\' to \'$config->{exp_target}\'\n";
1103                         print "created symlink from: \'$config->{exp_name}\' to \'$2\'\n";
1104                         if ($config->{exp_error}) {
1105                                 print "as expected    ";
1106                         } else {
1107                                 $error++;
1108                         }
1109                 }
1110         } else {
1111                 print "expected symlink from: \'$config->{exp_name}\' to \'$config->{exp_target}\'\n";
1112                 print "symlink: not created ";
1113                 if ($config->{exp_error}) {
1114                         print "as expected    ";
1115                 } else {
1116                         $error++;
1117                 }
1118         }
1119 }
1120
1121 sub run_test {
1122         my ($config, $number) = @_;
1123
1124         print "TEST $number: $config->{desc}\n";
1125
1126         if ($config->{exp_target}) {
1127                 print "device \'$config->{devpath}\' expecting symlink '$config->{exp_name}' to node \'$config->{exp_target}\'\n";
1128         } else {
1129                 print "device \'$config->{devpath}\' expecting node \'$config->{exp_name}\'\n";
1130         }
1131
1132
1133         udev("add", $config->{subsys}, $config->{devpath}, \$config->{conf});
1134
1135         if ((-e "$PWD/$udev_root$config->{exp_name}") ||
1136             (-l "$PWD/$udev_root$config->{exp_name}")) {
1137
1138                 my ($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size,
1139                     $atime, $mtime, $ctime, $blksize, $blocks) = stat("$PWD/$udev_root$config->{exp_name}");
1140
1141                 if (defined($config->{exp_perms})) {
1142                         permissions_test($config, $uid, $gid, $mode);
1143                 }
1144                 if (defined($config->{exp_majorminor})) {
1145                         major_minor_test($config, $rdev);
1146                 }
1147                 if (defined($config->{exp_target})) {
1148                         symlink_test($config);
1149                 }
1150                 print "add: ok    ";
1151         } else {
1152                 print "add: error ";
1153                 if ($config->{exp_error}) {
1154                         print "as expected    ";
1155                 } else {
1156                         print "\n\n";
1157                         system("tree $udev_root");
1158                         print "\n";
1159                         $error++;
1160                 }
1161         }
1162
1163         udev("remove", $config->{subsys}, $config->{devpath}, \$config->{conf});
1164         if ((-e "$PWD/$udev_root$config->{exp_name}") ||
1165             (-l "$PWD/$udev_root$config->{exp_name}")) {
1166                 print "remove: error ";
1167                 if ($config->{exp_error}) {
1168                         print "as expected\n\n";
1169                 } else {
1170                         print "\n\n";
1171                         system("tree $udev_root");
1172                         print "\n";
1173                         $error++;
1174                 }
1175         } else {
1176                 print "remove: ok\n\n";
1177         }
1178 }
1179
1180 # prepare
1181 system("rm -rf $udev_root");
1182 mkdir($udev_root) || die "unable to create udev_root: $udev_root\n";
1183
1184 # create initial config file
1185 open CONF, ">$main_conf" || die "unable to create config file: $main_conf";
1186 print CONF "udev_root=\"$udev_root\"\n";
1187 print CONF "udev_db=\"$udev_db\"\n";
1188 print CONF "udev_rules=\"$conf_tmp\"\n";
1189 print CONF "udev_permissions=\"$perm\"\n";
1190 close CONF;
1191
1192 my $test_num = 1;
1193
1194 if ($ARGV[0]) {
1195         # only run one test
1196         $test_num = $ARGV[0];
1197         print "udev-test will run test number $test_num only\n";
1198
1199         run_test($tests[$test_num-1], $test_num);
1200 } else {
1201         # test all
1202         print "\nudev-test will run ".($#tests + 1)." tests:\n\n";
1203
1204         foreach my $config (@tests) {
1205                 run_test($config, $test_num);
1206                 $test_num++;
1207
1208         }
1209 }
1210
1211 print "$error errors occured\n\n";
1212
1213 # cleanup
1214 unlink($udev_db);
1215 system("rm -rf $udev_root");
1216 unlink($conf_tmp);
1217 unlink($main_conf);
1218