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