4 # input file = CMakeTest.txt
7 die "Usage: generate_memcheck_tests.pl <project_directory> <CMakeTests.txt>\n";
10 my($proj_dir)=$ARGV[0];
11 open MAKETEST, $ARGV[1] or die "Unable to open $ARGV[1]. $!\n";
17 print "if(enable_memcheck)\n";
18 while(defined($line=<MAKETEST>)) {
20 if($line =~ /BEGIN TESH TESTS/) {
24 if($line =~ /END TESH TESTS/) {
29 if($line =~ /ADD_TEST/) {
30 if($line =~ /ADD_TEST\(([\S]+)\s+.*\/tools\/tesh\/tesh\s*--cd\s*(\S+)\s+(.*)\)$/) {
31 my($name_test,$path,$tesh_file)=($1,$2,$3);
33 my($complete_tesh_file)=$path."/".$tesh_file;
37 $complete_tesh_file =~ s/\${PROJECT_DIRECTORY}/$proj_dir/g;
38 open TESH_FILE, $complete_tesh_file or die "Unable to open $complete_tesh_file $!\n";
40 while(defined($l=<TESH_FILE>)) {
42 if($l =~ /^\$ (.*)$/) {
44 $command =~ s/\${srcdir:=.}/./g;
45 $command =~ s/\${EXEEXT:=}//g;
46 $command =~ s/\$SG_TEST_EXENV //g;
47 $command =~ s/\$SG_TEST_ENV //g;
48 $command =~ s/\$SG_EXENV_TEST //g;
49 $command =~ s/\$EXEEXT//g;
50 $command =~ s/\${srcdir}/\${PROJECT_DIRECTORY}\/src/g;
51 $command =~ s/ \$ARGS//g;
52 $command =~ s/ \$@ //g;
53 print "ADD_TEST(memcheck-$name_test-$count $command --cd $path\/)\n";
54 #push @test_list, "memcheck-$name_test-$count";
57 if($l =~ /^\& (.*)$/) {
71 print "endif(enable_memcheck)\n";
72 #print "set(MEMCHECK_LIST\n";
73 #print (join("\n", @test_list));