Changeset 2729 in /cluster/svnroot


Ignore:
Timestamp:
Oct 16, 2010 12:12:40 PM (10 years ago)
Author:
skylar
Message:

adding working liberation test (#520)

Location:
bccd-ng/branches/skylar-test_fw/trees/home/bccd/tests
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • bccd-ng/branches/skylar-test_fw/trees/home/bccd/tests/test_defs.pm

    r2728 r2729  
    88
    99%tests = (
    10                 'test' => sub { #Test the test suite
    11                     (my $testdir, my $testname) = @_;
    12                     my $storeOutput =
    13                         bccd_test_suite::generate_storeOutput($testdir,$testname);
    14                     system("
     10    'test' => sub { #Test the test suite
     11        (my $testdir, my $testname) = @_;
     12        my $storeOutput =
     13            bccd_test_suite::generate_storeOutput($testdir,$testname);
     14        system("
    1515                echo \"BCCD\nBCCD\nBCCD\" $storeOutput
    1616                echo \"ok, it works.\" $storeOutput
     
    5757        (my $testdir, my $testname) = @_;
    5858        bccd_test_suite::mpi_test($testdir, $testname);
    59     })
     59    },
     60
     61    'liberate' => sub { # Liberate to /dev/hda
     62        (my $testdir, my $testname) = @_;
     63        chdir("$ENV{HOME}/tests");
     64        my $out = getcwd()."/$testdir/$testname.dat";
     65        open(my $OUT, '>>', $out) or
     66            croak "Can't open $out for appending: $!\n";
     67        open(my $LIB, '-|', '/usr/bin/sudo',
     68             '/usr/bin/perl', '/root/liberate.pl',
     69            '--libdev=/dev/hda') or
     70                croak "Can't open /root/liberate.pl: $!\n";
     71
     72        while(my $line = <$LIB>) {
     73            chomp $line;
     74            print $LIB "$line\n";
     75        }
     76
     77        close($LIB);
     78        close($OUT);
     79    },
     80    )
    6081   
  • bccd-ng/branches/skylar-test_fw/trees/home/bccd/tests/test_lists/std

    r2714 r2729  
    1010GalaxSee # Test the GalaxSee program
    1111Life # Test John Conway's Game of Life
    12 #liberate # Liberation
     12liberate # Liberation
Note: See TracChangeset for help on using the changeset viewer.