Commit 44a9ba4c authored by Leigh B. Stoller's avatar Leigh B. Stoller
Browse files

Minor output tweaks so that user is less confused about what has happened.

parent e4a38b1d
...@@ -299,7 +299,7 @@ else { ...@@ -299,7 +299,7 @@ else {
my $eventargs = $2; my $eventargs = $2;
if (($eventtype eq $STOPEVENT) || if (($eventtype eq $STOPEVENT) ||
($eventtype eq $COMPLETEEVENT)) { ($eventtype eq $COMPLETEEVENT)) {
print "Linktest completed normally.\n" print "Linktest completed.\n"
if($verbose); if($verbose);
last; last;
} }
...@@ -342,6 +342,12 @@ sub analyze { ...@@ -342,6 +342,12 @@ sub analyze {
unlink($logfile) unlink($logfile)
if (defined($logfile)); if (defined($logfile));
return 0
if (! @dir_contents);
print "***************************************************************\n";
print "***************** Linktest Error Reports **********************\n";
foreach my $file (@dir_contents) { foreach my $file (@dir_contents) {
# Hmm, need to taint check the filenames. Ick. # Hmm, need to taint check the filenames. Ick.
if ($file =~ /^([-\w\.\/]+)$/) { if ($file =~ /^([-\w\.\/]+)$/) {
...@@ -366,6 +372,7 @@ sub analyze { ...@@ -366,6 +372,7 @@ sub analyze {
system("/bin/cat $linktest_path/$file"); system("/bin/cat $linktest_path/$file");
} }
} }
print "***************************************************************\n";
return scalar(@dir_contents); return scalar(@dir_contents);
} }
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment