From 01c594601670c7e48e676d6c6d32d0f0084067fa Mon Sep 17 00:00:00 2001 From: Jeremy Harris Date: Sat, 18 Nov 2017 15:22:48 +0000 Subject: [PATCH] Testsuite: more pre-run configuration checks --- test/runtest | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/test/runtest b/test/runtest index 2a13b4832..a1259f769 100755 --- a/test/runtest +++ b/test/runtest @@ -2762,6 +2762,9 @@ die "CONFIGURE_GROUP ($parm_configure_group) does not match the group invoking $ if 0020 & (stat "$parm_cwd/test-config")[2] and $parm_configure_group != $); +die "aux-fixed file is world-writeable; best to strip them all, recursively\n" + if 0020 & (stat "aux-fixed/0037.f-1")[2]; + open(EXIMINFO, "$parm_exim -d-all+transport -bV -C $parm_cwd/test-config -DDIR=$parm_cwd |") || die "** Cannot run $parm_exim: $!\n"; @@ -3146,6 +3149,12 @@ unless (defined $parm_eximgroup) die "** ABANDONING.\n"; } +if ($parm_caller_home eq $parm_cwd) + { + print "will confuse working dir with homedir; change homedir\n"; + die "** ABANDONING.\n"; + } + print "You need to be in the Exim group to run these tests. Checking ..."; if (`groups` =~ /\b\Q$parm_eximgroup\E\b/) -- 2.25.1