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            => "major/minor number test",
 626                 subsys          => "block",
 627                 devpath         => "/block/sda",
 628                 exp_name        => "node",
 629                 exp_majorminor  => "8:0",
 630                 conf            => <<EOF
 631 BUS="scsi", KERNEL="sda", NAME="node"
 632 EOF
 633         },
 634         {
 635                 desc            => "big minor number test",
 636                 subsys          => "i2c-dev",
 637                 devpath         => "/class/i2c-dev/i2c-300",
 638                 exp_name        => "node",
 639                 exp_majorminor  => "89:300",
 640                 conf            => <<EOF
 641 KERNEL="i2c-300", NAME="node"
 642 EOF
 643         },
 644         {
 645                 desc            => "big major number test",
 646                 subsys          => "i2c-dev",
 647                 devpath         => "/class/i2c-dev/i2c-fake1",
 648                 exp_name        => "node",
 649                 exp_majorminor  => "4095:1",
 650                 conf            => <<EOF
 651 KERNEL="i2c-fake1", NAME="node"
 652 EOF
 653         },
 654         {
 655                 desc            => "big major and big minor number test",
 656                 subsys          => "i2c-dev",
 657                 devpath         => "/class/i2c-dev/i2c-fake2",
 658                 exp_name        => "node",
 659                 exp_majorminor  => "4094:89999",
 660                 conf            => <<EOF
 661 KERNEL="i2c-fake2", NAME="node"
 662 EOF
 663         },
 664         {
 665                 desc            => "multiple symlinks with format char",
 666                 subsys          => "tty",
 667                 devpath         => "/class/tty/ttyUSB0",
 668                 exp_name        => "symlink2-ttyUSB0",
 669                 exp_target      => "ttyUSB0",
 670                 conf            => <<EOF
 671 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="symlink1-%n symlink2-%k symlink3-%b"
 672 EOF
 673         },
 674         {
 675                 desc            => "symlink creation (same directory)",
 676                 subsys          => "tty",
 677                 devpath         => "/class/tty/ttyUSB0",
 678                 exp_name        => "visor0",
 679                 exp_target      => "ttyUSB0",
 680                 conf            => <<EOF
 681 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="visor%n"
 682 EOF
 683         },
 684         {
 685                 desc            => "symlink creation (relative link forward)",
 686                 subsys          => "block",
 687                 devpath         => "/block/sda/sda2",
 688                 exp_name        => "1/2/symlink" ,
 689                 exp_target      => "a/b/node",
 690                 conf            => <<EOF
 691 BUS="scsi", SYSFS{vendor}="IBM-ESXS", NAME="1/2/a/b/node", SYMLINK="1/2/symlink"
 692 EOF
 693         },
 694         {
 695                 desc            => "symlink creation (relative link back and forward)",
 696                 subsys          => "block",
 697                 devpath         => "/block/sda/sda2",
 698                 exp_name        => "1/2/c/d/symlink" ,
 699                 exp_target      => "../../a/b/node",
 700                 conf            => <<EOF
 701 BUS="scsi", SYSFS{vendor}="IBM-ESXS", NAME="1/2/a/b/node", SYMLINK="1/2/c/d/symlink"
 702 EOF
 703         },
 704         {
 705                 desc            => "multiple symlinks",
 706                 subsys          => "tty",
 707                 devpath         => "/class/tty/ttyUSB0",
 708                 exp_name        => "second-0" ,
 709                 exp_target      => "visor" ,
 710                 conf            => <<EOF
 711 KERNEL="ttyUSB0", NAME="visor", SYMLINK="first-%n second-%n third-%n"
 712 EOF
 713         },
 714         {
 715                 desc            => "symlink only rule",
 716                 subsys          => "block",
 717                 devpath         => "/block/sda",
 718                 exp_name        => "symlink-only2",
 719                 exp_target      => "link",
 720                 conf            => <<EOF
 721 BUS="scsi", KERNEL="sda", SYMLINK="symlink-only1"
 722 BUS="scsi", KERNEL="sda", SYMLINK="symlink-only2"
 723 BUS="scsi", KERNEL="sda", NAME="link", SYMLINK="symlink0"
 724 EOF
 725         },
 726         {
 727                 desc            => "symlink name empty",
 728                 subsys          => "block",
 729                 devpath         => "/block/sda",
 730                 exp_name        => "",
 731                 exp_target      => "link",
 732                 exp_error       => "yes",
 733                 conf            => <<EOF
 734 BUS="scsi", KERNEL="sda", NAME="link", SYMLINK=""
 735 EOF
 736         },
 737         {
 738                 desc            => "symlink name '.'",
 739                 subsys          => "block",
 740                 devpath         => "/block/sda",
 741                 exp_name        => ".",
 742                 exp_target      => "link",
 743                 exp_error       => "yes",
 744                 conf            => <<EOF
 745 BUS="scsi", KERNEL="sda", NAME="link", SYMLINK="."
 746 EOF
 747         },
 748         {
 749                 desc            => "symlink to empty name",
 750                 subsys          => "block",
 751                 devpath         => "/block/sda",
 752                 exp_name        => "symlink",
 753                 exp_target      => "",
 754                 exp_error       => "yes",
 755                 conf            => <<EOF
 756 BUS="scsi", KERNEL="sda", NAME="", SYMLINK="symlink"
 757 EOF
 758         },
 759         {
 760                 desc            => "symlink and name empty",
 761                 subsys          => "block",
 762                 devpath         => "/block/sda",
 763                 exp_name        => "",
 764                 exp_target      => "",
 765                 exp_error       => "yes",
 766                 conf            => <<EOF
 767 BUS="scsi", KERNEL="sda", NAME="", SYMLINK=""
 768 EOF
 769         },
 770         {
 771                 desc            => "symlink node to itself",
 772                 subsys          => "tty",
 773                 devpath         => "/class/tty/tty0",
 774                 exp_name        => "link",
 775                 exp_target      => "link",
 776                 conf            => <<EOF
 777 KERNEL="tty0", NAME="link", SYMLINK="link"
 778 EOF
 779         },
 780         {
 781                 desc            => "symlink %n substitution",
 782                 subsys          => "tty",
 783                 devpath         => "/class/tty/ttyUSB0",
 784                 exp_name        => "symlink0",
 785                 exp_target      => "ttyUSB0",
 786                 conf            => <<EOF
 787 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="symlink%n"
 788 EOF
 789         },
 790         {
 791                 desc            => "symlink %k substitution",
 792                 subsys          => "tty",
 793                 devpath         => "/class/tty/ttyUSB0",
 794                 exp_name        => "symlink-ttyUSB0",
 795                 exp_target      => "ttyUSB0",
 796                 conf            => <<EOF
 797 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="symlink-%k"
 798 EOF
 799         },
 800         {
 801                 desc            => "symlink %M:%m substitution",
 802                 subsys          => "tty",
 803                 devpath         => "/class/tty/ttyUSB0",
 804                 exp_name        => "major-188:0",
 805                 exp_target      => "ttyUSB0",
 806                 conf            => <<EOF
 807 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="major-%M:%m"
 808 EOF
 809         },
 810         {
 811                 desc            => "symlink %b substitution",
 812                 subsys          => "block",
 813                 devpath         => "/block/sda",
 814                 exp_name        => "symlink-0:0:0:0",
 815                 exp_target      => "node",
 816                 conf            => <<EOF
 817 BUS="scsi", KERNEL="sda", NAME="node", SYMLINK="symlink-%b"
 818 EOF
 819         },
 820         {
 821                 desc            => "symlink %c substitution",
 822                 subsys          => "tty",
 823                 devpath         => "/class/tty/ttyUSB0",
 824                 exp_name        => "test",
 825                 exp_target      => "ttyUSB0",
 826                 conf            => <<EOF
 827 KERNEL="ttyUSB[0-9]*", PROGRAM="/bin/echo test" NAME="ttyUSB%n", SYMLINK="%c"
 828 EOF
 829         },
 830         {
 831                 desc            => "symlink %c{N} substitution",
 832                 subsys          => "tty",
 833                 devpath         => "/class/tty/ttyUSB0",
 834                 exp_name        => "test",
 835                 exp_target      => "ttyUSB0",
 836                 conf            => <<EOF
 837 KERNEL="ttyUSB[0-9]*", PROGRAM="/bin/echo symlink test this" NAME="ttyUSB%n", SYMLINK="%c{2}"
 838 EOF
 839         },
 840         {
 841                 desc            => "symlink %c{N+} substitution",
 842                 subsys          => "tty",
 843                 devpath         => "/class/tty/ttyUSB0",
 844                 exp_name        => "this",
 845                 exp_target      => "ttyUSB0",
 846                 conf            => <<EOF
 847 KERNEL="ttyUSB[0-9]*", PROGRAM="/bin/echo symlink test this" NAME="ttyUSB%n", SYMLINK="%c{2+}"
 848 EOF
 849         },
 850         {
 851                 desc            => "symlink only rule with %c{N+}",
 852                 subsys          => "block",
 853                 devpath         => "/block/sda",
 854                 exp_name        => "test",
 855                 exp_target      => "link",
 856                 conf            => <<EOF
 857 BUS="scsi", KERNEL="sda", PROGRAM="/bin/echo link test this" SYMLINK="%c{2+}"
 858 BUS="scsi", KERNEL="sda", NAME="link", SYMLINK="symlink0"
 859 EOF
 860         },
 861         {
 862                 desc            => "symlink %s{filename} substitution",
 863                 subsys          => "tty",
 864                 devpath         => "/class/tty/ttyUSB0",
 865                 exp_name        => "188:0",
 866                 exp_target      => "ttyUSB0",
 867                 conf            => <<EOF
 868 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="%s{dev}"
 869 EOF
 870         },
 871         {
 872                 desc            => "symlink %Ns{filename} substitution",
 873                 subsys          => "tty",
 874                 devpath         => "/class/tty/ttyUSB0",
 875                 exp_name        => "188",
 876                 exp_target      => "ttyUSB0",
 877                 conf            => <<EOF
 878 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="%3s{dev}"
 879 EOF
 880         },
 881         {
 882                 desc            => "symlink with '%' in name",
 883                 subsys          => "tty",
 884                 devpath         => "/class/tty/ttyUSB0",
 885                 exp_name        => "percent%sign",
 886                 exp_target      => "ttyUSB0",
 887                 conf            => <<EOF
 888 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="percent%%sign"
 889 EOF
 890         },
 891         {
 892                 desc            => "symlink with '%' in name",
 893                 subsys          => "tty",
 894                 devpath         => "/class/tty/ttyUSB0",
 895                 exp_name        => "%ttyUSB0_name",
 896                 exp_target      => "ttyUSB0",
 897                 conf            => <<EOF
 898 KERNEL="ttyUSB[0-9]*", NAME="ttyUSB%n", SYMLINK="%%%k_name"
 899 EOF
 900         },
 901         {
 902                 desc            => "program result substitution (numbered part of)",
 903                 subsys          => "block",
 904                 devpath         => "/block/sda/sda3",
 905                 exp_name        => "link1",
 906                 exp_target      => "node",
 907                 conf            => <<EOF
 908 BUS="scsi", PROGRAM="/bin/echo -n node link1 link2", RESULT="node *", NAME="%c{1}", SYMLINK="%c{2} %c{3}"
 909 EOF
 910         },
 911         {
 912                 desc            => "program result substitution (numbered part of+)",
 913                 subsys          => "block",
 914                 devpath         => "/block/sda/sda3",
 915                 exp_name        => "link4",
 916                 exp_target      => "node",
 917                 conf            => <<EOF
 918 BUS="scsi", PROGRAM="/bin/echo -n node link1 link2 link3 link4", RESULT="node *", NAME="%c{1}", SYMLINK="%c{2+}"
 919 EOF
 920         },
 921         {
 922                 desc            => "enumeration char test (single test)",
 923                 subsys          => "block",
 924                 devpath         => "/block/sda",
 925                 exp_name        => "cdrom",
 926                 conf            => <<EOF
 927 KERNEL="sda", NAME="cdrom%e"
 928 EOF
 929         },
 930         {
 931                 desc            => "enumeration char test sequence (1/5 keep)",
 932                 subsys          => "block",
 933                 devpath         => "/block/sda",
 934                 exp_name        => "cdrom",
 935                 option          => "keep",
 936                 conf            => <<EOF
 937 KERNEL="sda", NAME="cdrom%e"
 938 EOF
 939         },
 940         {
 941                 desc            => "enumeration char test sequence 2/5 (keep)",
 942                 subsys          => "block",
 943                 devpath         => "/block/sda/sda1",
 944                 exp_name        => "enum",
 945                 option          => "keep",
 946                 conf            => <<EOF
 947 KERNEL="sda1", NAME="enum%e"
 948 EOF
 949         },
 950         {
 951                 desc            => "enumeration char test sequence 3/5 (keep)",
 952                 subsys          => "block",
 953                 devpath         => "/block/sda/sda2",
 954                 exp_name        => "cdrom1",
 955                 option          => "keep",
 956                 conf            => <<EOF
 957 KERNEL="sda2", NAME="cdrom%e"
 958 EOF
 959         },
 960         {
 961                 desc            => "enumeration char test sequence 4/5 (keep)",
 962                 subsys          => "block",
 963                 devpath         => "/block/sda/sda3",
 964                 exp_name        => "enum1",
 965                 option          => "keep",
 966                 conf            => <<EOF
 967 KERNEL="sda3", NAME="enum%e"
 968 EOF
 969         },
 970         {
 971                 desc            => "enumeration char test sequence 5/5 (clean)",
 972                 subsys          => "block",
 973                 devpath         => "/block/sda/sda4",
 974                 exp_name        => "cdrom2",
 975                 option          => "clear",
 976                 conf            => <<EOF
 977 KERNEL="sda4", NAME="cdrom%e"
 978 EOF
 979         },
 980         {
 981                 desc            => "enumeration char test after cleanup (single test)",
 982                 subsys          => "block",
 983                 devpath         => "/block/sda",
 984                 exp_name        => "cdrom",
 985                 conf            => <<EOF
 986 KERNEL="sda", NAME="cdrom%e"
 987 EOF
 988         },
 989         {
 990                 desc            => "ignore remove event test",
 991                 subsys          => "block",
 992                 devpath         => "/block/sda",
 993                 exp_name        => "node",
 994                 exp_error       => "yes",
 995                 conf            => <<EOF
 996 BUS="scsi", KERNEL="sda", NAME{ignore_remove}="node"
 997 EOF
 998         },
 999         {
1000                 desc            => "ignore remove event test (with all partitions)",
1001                 subsys          => "block",
1002                 devpath         => "/block/sda",
1003                 exp_name        => "node14",
1004                 exp_error       => "yes",
1005                 option          => "clear",
1006                 conf            => <<EOF
1007 BUS="scsi", KERNEL="sda", NAME{ignore_remove, all_partitions}="node"
1008 EOF
1009         },
1010         {
1011                 desc            => "SUBSYSTEM match test",
1012                 subsys          => "block",
1013                 devpath         => "/block/sda",
1014                 exp_name        => "node",
1015                 conf            => <<EOF
1016 BUS="scsi", KERNEL="sda", NAME="should_not_match", SUBSYSTEM="vc"
1017 BUS="scsi", KERNEL="sda", NAME="node", SUBSYSTEM="block"
1018 BUS="scsi", KERNEL="sda", NAME="should_not_match2", SUBSYSTEM="vc"
1019 EOF
1020         },
1021         {
1022                 desc            => "DRIVER match test",
1023                 subsys          => "block",
1024                 devpath         => "/block/sda",
1025                 exp_name        => "node",
1026                 conf            => <<EOF
1027 BUS="scsi", KERNEL="sda", NAME="should_not_match", DRIVER="sd-wrong"
1028 BUS="scsi", KERNEL="sda", NAME="node", DRIVER="sd"
1029 EOF
1030         },
1031 );
1032
1033 # set env
1034 $ENV{UDEV_TEST} = "yes";
1035 $ENV{SYSFS_PATH} = $sysfs;
1036 $ENV{UDEV_CONFIG_FILE} = $main_conf;
1037 $ENV{UDEV_NO_DEVD} = "yes";
1038 $ENV{UDEV_NO_HOTPLUGD} = "yes";
1039
1040
1041 sub udev {
1042         my ($action, $subsys, $devpath, $config) = @_;
1043
1044         $ENV{DEVPATH} = $devpath;
1045
1046         # create temporary config
1047         open CONF, ">$conf_tmp" || die "unable to create config file: $conf_tmp";
1048         print CONF $$config;
1049         close CONF;
1050
1051         $ENV{ACTION} = $action;
1052         system("$udev_bin $subsys");
1053 }
1054
1055 my $error = 0;
1056
1057 sub permissions_test {
1058         my($config, $uid, $gid, $mode) = @_;
1059
1060         my $wrong = 0;
1061         $config->{exp_perms} =~ m/^(.*):(.*):(.*)$/;
1062         if ($1 ne "") {
1063                 if ($uid != $1) { $wrong = 1; };
1064         }
1065         if ($2 ne "") {
1066                 if ($gid != $2) { $wrong = 1; };
1067         }
1068         if ($3 ne "") {
1069                 if (($mode & 07777) != oct($3)) { $wrong = 1; };
1070         }
1071         if ($wrong == 0) {
1072                 print "permissions: ok    ";
1073         } else {
1074                 printf "expected permissions are: %i:%i:%#o\n", $1, $2, oct($3);
1075                 printf "created permissions are : %i:%i:%#o\n", $uid, $gid, $mode & 07777;
1076                 $error++;
1077         }
1078 }
1079
1080 sub major_minor_test {
1081         my($config, $rdev) = @_;
1082
1083         my $major = ($rdev >> 8) & 0xfff;
1084         my $minor = ($rdev & 0xff) | (($rdev >> 12) & 0xfff00);
1085         my $wrong = 0;
1086
1087         $config->{exp_majorminor} =~ m/^(.*):(.*)$/;
1088         if ($1 ne "") {
1089                 if ($major != $1) { $wrong = 1; };
1090         }
1091         if ($2 ne "") {
1092                 if ($minor != $2) { $wrong = 1; };
1093         }
1094         if ($wrong == 0) {
1095                 print "major:minor: ok    ";
1096         } else {
1097                 printf "expected major:minor is: %i:%i\n", $1, $2;
1098                 printf "created major:minor is : %i:%i\n", $major, $minor;
1099                 print "major:minor: error    ";
1100                 $error++;
1101         }
1102 }
1103
1104 sub symlink_test {
1105         my ($config) = @_;
1106
1107         my $output = `ls -l $PWD/$udev_root$config->{exp_name}`;
1108
1109         if ($output =~ m/(.*)-> (.*)/) {
1110                 if ($2 eq $config->{exp_target}) {
1111                         print "symlink: ok    ";
1112                 } else {
1113                         print "expected symlink from: \'$config->{exp_name}\' to \'$config->{exp_target}\'\n";
1114                         print "created symlink from: \'$config->{exp_name}\' to \'$2\'\n";
1115                         if ($config->{exp_error}) {
1116                                 print "as expected    ";
1117                         } else {
1118                                 $error++;
1119                         }
1120                 }
1121         } else {
1122                 print "expected symlink from: \'$config->{exp_name}\' to \'$config->{exp_target}\'\n";
1123                 print "symlink: not created ";
1124                 if ($config->{exp_error}) {
1125                         print "as expected    ";
1126                 } else {
1127                         $error++;
1128                 }
1129         }
1130 }
1131
1132 sub run_test {
1133         my ($config, $number) = @_;
1134
1135         print "TEST $number: $config->{desc}\n";
1136
1137         if ($config->{exp_target}) {
1138                 print "device \'$config->{devpath}\' expecting symlink '$config->{exp_name}' to node \'$config->{exp_target}\'\n";
1139         } else {
1140                 print "device \'$config->{devpath}\' expecting node \'$config->{exp_name}\'\n";
1141         }
1142
1143
1144         udev("add", $config->{subsys}, $config->{devpath}, \$config->{conf});
1145         if ((-e "$PWD/$udev_root$config->{exp_name}") ||
1146             (-l "$PWD/$udev_root$config->{exp_name}")) {
1147
1148                 my ($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size,
1149                     $atime, $mtime, $ctime, $blksize, $blocks) = stat("$PWD/$udev_root$config->{exp_name}");
1150
1151                 if (defined($config->{exp_perms})) {
1152                         permissions_test($config, $uid, $gid, $mode);
1153                 }
1154                 if (defined($config->{exp_majorminor})) {
1155                         major_minor_test($config, $rdev);
1156                 }
1157                 if (defined($config->{exp_target})) {
1158                         symlink_test($config);
1159                 }
1160                 print "add: ok    ";
1161         } else {
1162                 print "add: error ";
1163                 if ($config->{exp_error}) {
1164                         print "as expected    ";
1165                 } else {
1166                         print "\n\n";
1167                         system("tree $udev_root");
1168                         print "\n";
1169                         $error++;
1170                 }
1171         }
1172
1173         if (defined($config->{option}) && $config->{option} eq "keep") {
1174                 print "\n\n";
1175                 return;
1176         }
1177
1178         udev("remove", $config->{subsys}, $config->{devpath}, \$config->{conf});
1179         if ((-e "$PWD/$udev_root$config->{exp_name}") ||
1180             (-l "$PWD/$udev_root$config->{exp_name}")) {
1181                 print "remove: error ";
1182                 if ($config->{exp_error}) {
1183                         print "as expected\n\n";
1184                 } else {
1185                         print "\n\n";
1186                         system("tree $udev_root");
1187                         print "\n";
1188                         $error++;
1189                 }
1190         } else {
1191                 print "remove: ok\n\n";
1192         }
1193
1194         if (defined($config->{option}) && $config->{option} eq "clear") {
1195                 system("rm -rf $udev_db");
1196                 system("rm -rf $udev_root");
1197                 mkdir($udev_root) || die "unable to create udev_root: $udev_root\n";
1198         }
1199
1200 }
1201
1202 # only run if we have root permissions
1203 # due to mknod restrictions
1204 if (!($<==0)) {
1205         print "Must have root permissions to run properly.\n";
1206         exit;
1207 }
1208
1209 # prepare
1210 system("rm -rf $udev_root");
1211 mkdir($udev_root) || die "unable to create udev_root: $udev_root\n";
1212
1213 # create initial config file
1214 open CONF, ">$main_conf" || die "unable to create config file: $main_conf";
1215 print CONF "udev_root=\"$udev_root\"\n";
1216 print CONF "udev_db=\"$udev_db\"\n";
1217 print CONF "udev_rules=\"$conf_tmp\"\n";
1218 print CONF "default_mode=\"0660\"\n";
1219 print CONF "default_owner=\"root\"\n";
1220 print CONF "default_group=\"root\"\n";
1221 close CONF;
1222
1223 my $test_num = 1;
1224
1225 if ($ARGV[0]) {
1226         # only run one test
1227         $test_num = $ARGV[0];
1228
1229         if (defined($tests[$test_num-1]->{desc})) {
1230                 print "udev-test will run test number $test_num only:\n\n";
1231                 run_test($tests[$test_num-1], $test_num);
1232         } else {
1233                 print "test does not exist.\n";
1234         }
1235 } else {
1236         # test all
1237         print "\nudev-test will run ".($#tests + 1)." tests:\n\n";
1238
1239         foreach my $config (@tests) {
1240                 run_test($config, $test_num);
1241                 $test_num++;
1242         }
1243 }
1244
1245 print "$error errors occured\n\n";
1246
1247 # cleanup
1248 system("rm -rf $udev_db");
1249 system("rm -rf $udev_root");
1250 unlink($conf_tmp);
1251 unlink($main_conf);
1252