maxjhandsome
/
llvm-project
forked from OSchip/llvm-project
1
0
Fork 0
Code Issues Pull Requests Packages Releases Wiki Activity

A dumber way to invoke the test suite. 

Use this script to visit each python test case under the specified directory and
run python unittest.main() on each test case.

llvm-svn: 107447
This commit is contained in:
Johnny Chen 2010-07-01 23:01:23 +00:00
parent 744c74c444
commit 3d7e687245
1 changed files with 43 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

43
lldb/test/dotest.pl Executable file
View File

@ -0,0 +1,43 @@
#!/usr/bin/perl -w
#
# Use this script to visit each python test case under the specified directory
# and invoke unittest.main() on each test case.
#
use strict;
use FindBin;
use File::Find;
use File::Basename;
use Cwd;
use Cwd 'abs_path';
scalar(@ARGV) == 1 or die "Usage: dotest.pl testdir";
my $scriptDir = $FindBin::Bin;
my $baseDir = abs_path("$scriptDir/..");
my $testDir = $ARGV[0];
my $dbgPath = "$baseDir/build/Debug/LLDB.framework/Resources/Python";
my $relPath = "$baseDir/build/Release/LLDB.framework/Resources/Python";
if (-d $dbgPath) {
$ENV{'PYTHONPATH'} = "$dbgPath";
} elsif (-d $relPath) {
$ENV{'PYTHONPATH'} = "$relPath";
}
#print("ENV{PYTHONPATH}=$ENV{'PYTHONPATH'}\n");
# Traverse the directory to find our python test cases.
find(\&handleFind, $testDir);
sub handleFind {
my $foundFile = $File::Find::name;
my $dir = getcwd;
#print("foundFile: $foundFile\n");
# Test*.py is the naming pattern for our test cases.
if ($foundFile =~ /.*\/(Test.*\.py)$/) {
print("Running python $1 (cwd = $dir)...\n");
system("python $1");
}
}