[commit] master: autotest: add support for strace-ing

[Oswald B. <os...@us...>]

commit 7f38c5dc53450d3f3b55341cf7dd2b185ff4ad50
Author: Oswald Buddenhagen <os...@us...>
Date:   Mon Apr 4 21:51:16 2022 +0200

    autotest: add support for strace-ing
    
    works just like valgrind-ing.

 src/run-tests.pl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/run-tests.pl b/src/run-tests.pl
index e5a0de9c..8bd36460 100755
--- a/src/run-tests.pl
+++ b/src/run-tests.pl
@@ -16,6 +16,7 @@ use File::Path;
 use File::Temp 'tempdir';
 
 my $use_vg = $ENV{USE_VALGRIND};
+my $use_st = $ENV{USE_STRACE};
 my $mbsync = getcwd()."/mbsync";
 
 my (@match, $start);
@@ -349,6 +350,8 @@ sub runsync($$$)
 	my $cmd;
 	if ($use_vg) {
 		$cmd = "valgrind -q --error-exitcode=1 ";
+	} elsif ($use_st) {
+		$cmd = "strace ";
 	} else {
 		$flags .= " -D";
 	}