autotest: improve valgrind integration
introduce recognition of $USE_VALGRIND to run all mbsync invocations through valgrind. this also removes the seemingly purposeless --log-fd=3 indirection.
This commit is contained in:
parent
f29bed526b
commit
d754608f55
|
@ -21,6 +21,7 @@ use strict;
|
||||||
use Cwd;
|
use Cwd;
|
||||||
use File::Path;
|
use File::Path;
|
||||||
|
|
||||||
|
my $use_vg = $ENV{USE_VALGRIND};
|
||||||
my $mbsync = getcwd()."/mbsync";
|
my $mbsync = getcwd()."/mbsync";
|
||||||
|
|
||||||
-d "tmp" or mkdir "tmp";
|
-d "tmp" or mkdir "tmp";
|
||||||
|
@ -282,8 +283,14 @@ sub runsync($$)
|
||||||
{
|
{
|
||||||
my ($flags, $file) = @_;
|
my ($flags, $file) = @_;
|
||||||
|
|
||||||
# open FILE, "valgrind -q --log-fd=3 $mbsync $flags -c .mbsyncrc test 3>&2 2>&1 |";
|
my $cmd;
|
||||||
open FILE, "$mbsync -D -Z $flags -c .mbsyncrc test 2>&1 |";
|
if ($use_vg) {
|
||||||
|
$cmd = "valgrind -q --error-exitcode=1 ";
|
||||||
|
} else {
|
||||||
|
$flags .= " -D";
|
||||||
|
}
|
||||||
|
$cmd .= "$mbsync -Z $flags -c .mbsyncrc test";
|
||||||
|
open FILE, "$cmd 2>&1 |";
|
||||||
my @out = <FILE>;
|
my @out = <FILE>;
|
||||||
close FILE or push(@out, $! ? "*** error closing mbsync: $!\n" : "*** mbsync exited with signal ".($?&127).", code ".($?>>8)."\n");
|
close FILE or push(@out, $! ? "*** error closing mbsync: $!\n" : "*** mbsync exited with signal ".($?&127).", code ".($?>>8)."\n");
|
||||||
if ($file) {
|
if ($file) {
|
||||||
|
|
Loading…
Reference in New Issue
Block a user