Add tests descriptions

README

@@ -153,3 +153,6 @@ following actions are available:
   reports_index::
         Create an index page listing the tests reports.
 
+  list_tests::
+        List available tests and their descriptions.
+

TBBTestSuite/Tests.pm

@@ -19,12 +19,27 @@ use TBBTestSuite::Common qw(exit_error);
 use TBBTestSuite::Options qw($options);
 
 my %tests = (
-    tor_bootstrap => { type => 'tor_bootstrap' },
-    check_screenshot => { type => 'mozmill' },
-    check => { type => 'selenium' },
+    tor_bootstrap => {
+        type  => 'tor_bootstrap',
+        descr => 'Check that we can bootstrap tor',
+    },
+    check_screenshot => {
+        type  => 'mozmill',
+        descr => 'Load http://check.torproject.org/ and take a screenshot',
+    },
+    check => {
+        type => 'selenium',
+        descr => 'Check that http://check.torproject.org/ think we are using tor',
+    },
 );
 %tests = map { $_ => { name => $_, %{$tests{$_}} } } keys %tests;
 
+sub list_tests {
+    foreach my $test (keys %tests) {
+        print "$test ($tests{$test}->{type})\n   $tests{$test}->{descr}\n\n";
+    }
+}
+
 sub get_tbbfile {
     my ($tbbinfos, $tbbfile) = @_;
     if ($tbbfile =~ m/^https?:\/\//) {

tbb-testsuite

@@ -25,6 +25,7 @@ sub run_tests {
 
 my %actions = (
     run_tests => \&run_tests,
+    list_tests => \&TBBTestSuite::Tests::list_tests,
     reports_index => \&TBBTestSuite::Reports::make_reports_index,
 );