autotest: create the temp dir in $TEMP

on modern systems, this makes it likely to end up on tmpfs, which is a
lot faster and ssd-friendlier.

the symlink is not deleted at the end, to minimize fs churn. that means
it will be dangling after a reboot, which gets fixed in the next run.
This commit is contained in:
Oswald Buddenhagen 2019-12-29 11:59:05 +01:00
parent 5fee222f84
commit ef2caa074e

View File

@ -20,11 +20,16 @@ use warnings;
use strict; use strict;
use Cwd; use Cwd;
use File::Path; use File::Path;
use File::Temp 'tempdir';
my $use_vg = $ENV{USE_VALGRIND}; my $use_vg = $ENV{USE_VALGRIND};
my $mbsync = getcwd()."/mbsync"; my $mbsync = getcwd()."/mbsync";
-d "tmp" or mkdir "tmp"; if (!-d "tmp") {
unlink "tmp";
my $tdir = tempdir();
symlink $tdir, "tmp" or die "Cannot symlink temp directory: $!\n";
}
chdir "tmp" or die "Cannot enter temp direcory.\n"; chdir "tmp" or die "Cannot enter temp direcory.\n";
sub show($$$); sub show($$$);
@ -236,8 +241,6 @@ test("max messages + expunge", \@x50, \@X51, @O51);
################################################################################ ################################################################################
chdir "..";
rmdir "tmp";
print "OK.\n"; print "OK.\n";
exit 0; exit 0;