X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=test%2Fruntest;h=7bf74d7e1b1178df17484b34f1e8af7ff81ddfbd;hb=b83823bd386eb32cd37b8087429ff58fd21d0f2e;hp=157ff050a62622a9b9ea0ba8831cab7e3920ca62;hpb=d1139f18482c3d4847e5bb6bf5619f61e03e8c31;p=user%2Fhenk%2Fcode%2Fexim.git diff --git a/test/runtest b/test/runtest index 157ff050a..7bf74d7e1 100755 --- a/test/runtest +++ b/test/runtest @@ -83,6 +83,10 @@ $parm_port_d4 = 1228; # Additional for daemon # Manually set locale $ENV{'LC_ALL'} = 'C'; +# In some environments USER does not exists, but we +# need it for some test(s) +$ENV{USER} = getpwuid($>) + if not exists $ENV{USER}; ############################################################################### @@ -871,7 +875,7 @@ RESET_AFTER_EXTRA_LINE_READ: # IP address lookups use gethostbyname() when IPv6 is not supported, # and gethostbyname2() or getipnodebyname() when it is. - s/\bgethostbyname2?|\bgetipnodebyname/get[host|ipnode]byname[2]/; + s/\b(gethostbyname2?|\bgetipnodebyname)(\(af=inet\))?/get[host|ipnode]byname[2]/; # drop gnutls version strings next if /GnuTLS compile-time version: \d+[\.\d]+$/; @@ -1015,6 +1019,9 @@ RESET_AFTER_EXTRA_LINE_READ: @saved = (); } + # remote port numbers vary + s/(Connection request from 127.0.0.1 port) \d{1,5}/$1 sssss/; + # Skip hosts_require_dane checks when the options # are unset, because dane ain't always there. @@ -1371,6 +1378,12 @@ $munges = 'delay_1500' => { 'stderr' => 's/(1[5-9]|23\d)\d\d msec/ssss msec/' }, + 'tls_anycipher' => + { 'mainlog' => 's/ X=TLS\S+ / X=TLS_proto_and_cipher /' }, + + 'debug_pid' => + { 'stderr' => 's/(^\s{0,4}|(?<=Process )|(?<=child ))\d{1,5}/ppppp/g' }, + }; @@ -2380,7 +2393,7 @@ if ($parm_exim eq "") # directory. Thus, we should choose the highest version of Exim that has # been compiled. - if ($f eq "exim4" || $f eq "exim-snapshot") + if ($f eq "exim4" || $f eq "exim-snapshot" || $f eq 'src') { $srcdir = $f; } else { $srcdir = $f