Testsuite: check for conflicting host name

1 files changed, 6 insertions, 0 deletions

diff --git a/test/runtest b/test/runtest
index 76e1177c5..d4cf9f90e 100755
--- a/test/runtest
+++ b/test/runtest
@@ -3385,6 +3385,12 @@ if ($parm_hostname =~ /[[:upper:]]/)
   print "\n*** Host name has upper case characters: this may cause problems ***\n\n";
   }
 
+if ($parm_hostname =~ /\.example\.com$/)
+  {
+  die "\n*** Host name ends in .example.com; this conflicts with the testsuite use of that domain.\n"
+	. "    Please change the host's name (or comment out this check, and fail several testcases)\n";
+  }
+
 
 
 ##################################################