1
0
mirror of https://github.com/pgbackrest/pgbackrest.git synced 2024-12-14 10:13:05 +02:00

Changes to allow specific tests to be run.

This commit is contained in:
David Steele 2014-06-05 10:20:03 -04:00
parent 5813aedaa3
commit c2dd53f908
2 changed files with 666 additions and 620 deletions

File diff suppressed because it is too large Load Diff

View File

@ -20,9 +20,13 @@ use BackRestTest::FileTest;
####################################################################################################################################
# Command line parameters
####################################################################################################################################
my $strLogLevel = "OFF"; # Log level for tests
my $strLogLevel = 'off'; # Log level for tests
my $strModule = 'all';
my $strModuleTest = 'all';
GetOptions ("log-level=s" => \$strLogLevel)
GetOptions ("log-level=s" => \$strLogLevel,
"module=s" => \$strModule,
"module-test=s" => \$strModuleTest)
or die("Error in command line arguments\n");
####################################################################################################################################
@ -34,9 +38,17 @@ umask(0);
# Set console log level to trace for testing
log_level_set(undef, uc($strLogLevel));
if ($strModuleTest ne 'all' && $strModule eq 'all')
{
confess "--module must be provided for test \"${strModuleTest}\"";
}
####################################################################################################################################
# Runs tests
####################################################################################################################################
BackRestFileTest();
if ($strModule eq 'all' || $strModule eq "file")
{
BackRestFileTest($strModuleTest);
}
print "\nTEST COMPLETED SUCCESSFULLY (DESPITE ANY ERROR MESSAGES YOU SAW)\n";