Testsuite: more pre-run configuration checks
authorJeremy Harris <jgh146exb@wizmail.org>
Sat, 18 Nov 2017 15:22:48 +0000 (15:22 +0000)
committerJeremy Harris <jgh146exb@wizmail.org>
Sat, 18 Nov 2017 15:22:48 +0000 (15:22 +0000)
test/runtest

index 2a13b4832d92f945d7ecc63ecf591b056dacf7d2..a1259f76920c8b73671e260c1d66d71a31bfd04c 100755 (executable)
@@ -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/)