X-Git-Url: https://git.exim.org/exim.git/blobdiff_plain/e1d04f48a45c9f8e8ff75610003048f8ead73219..8dcd332fbfd7ecefe548be074637fccae8cf23f0:/test/stderr/3000 diff --git a/test/stderr/3000 b/test/stderr/3000 index b77ca8923..137ca11ef 100644 --- a/test/stderr/3000 +++ b/test/stderr/3000 @@ -1,53 +1,73 @@ 1999-03-02 09:44:33 this is a warning at TESTSUITE/aux-fixed/3000.pl line 25. Exim version x.yz .... +environment after trimming: + PATH= +adding SSLKEYLOGFILE=TESTSUITE/spool/sslkeys configuration file is TESTSUITE/test-config admin user - /considering: ${perl{foo}{arg1}} - /considering: foo}{arg1}} - |__expanding: foo - \_____result: foo - /considering: arg1}} - |__expanding: arg1 - \_____result: arg1 +dropping to exim gid; retaining priv uid + ╭considering: ${perl{foo}{arg1}} + ╭considering: foo}{arg1}} + ├───────text: foo + ├considering: }{arg1}} + ├──expanding: foo + ╰─────result: foo + ╭considering: arg1}} + ├───────text: arg1 + ├considering: }} + ├──expanding: arg1 + ╰─────result: arg1 Starting Perl interpreter - |__expanding: ${perl{foo}{arg1}} - \_____result: Subroutine foo called with args: arg1 - /considering: ${perl{foo_undef}} - /considering: foo_undef}} - |__expanding: foo_undef - \_____result: foo_undef - |failed to expand: ${perl{foo_undef}} - |___error message: Perl subroutine "foo_undef" returned undef to force failure - \failure was forced - /considering: ${perl{debug_write}{debug from Perl\n}} - /considering: debug_write}{debug from Perl\n}} - |__expanding: debug_write - \_____result: debug_write - /considering: debug from Perl\n}} - |__expanding: debug from Perl\n - \_____result: debug from Perl - + ├──expanding: ${perl{foo}{arg1}} + ╰─────result: Subroutine foo called with args: arg1 + ╭considering: ${perl{foo_undef}} + ╭considering: foo_undef}} + ├───────text: foo_undef + ├considering: }} + ├──expanding: foo_undef + ╰─────result: foo_undef + ├failed to expand: ${perl{foo_undef}} + ├───error message: Perl subroutine "foo_undef" returned undef to force failure + ╰failure was forced + ╭considering: ${perl{debug_write}{debug from Perl\n}} + ╭considering: debug_write}{debug from Perl\n}} + ├───────text: debug_write + ├considering: }{debug from Perl\n}} + ├──expanding: debug_write + ╰─────result: debug_write + ╭considering: debug from Perl\n}} + ├───────text: debug from Perl + ├considering: \n}} + ├backslashed: '\n' + ├considering: }} + ├──expanding: debug from Perl\n + ╰─────result: debug from Perl + debug from Perl - |__expanding: ${perl{debug_write}{debug from Perl\n}} - \_____result: Wrote debug - /considering: ${perl{log_write}{log from Perl}} - /considering: log_write}{log from Perl}} - |__expanding: log_write - \_____result: log_write - /considering: log from Perl}} - |__expanding: log from Perl - \_____result: log from Perl + ├──expanding: ${perl{debug_write}{debug from Perl\n}} + ╰─────result: Wrote debug + ╭considering: ${perl{log_write}{log from Perl}} + ╭considering: log_write}{log from Perl}} + ├───────text: log_write + ├considering: }{log from Perl}} + ├──expanding: log_write + ╰─────result: log_write + ╭considering: log from Perl}} + ├───────text: log from Perl + ├considering: }} + ├──expanding: log from Perl + ╰─────result: log from Perl LOG: MAIN log from Perl - |__expanding: ${perl{log_write}{log from Perl}} - \_____result: Wrote log ->>>>>>>>>>>>>>>> Exim pid=pppp terminating with rc=0 >>>>>>>>>>>>>>>> + ├──expanding: ${perl{log_write}{log from Perl}} + ╰─────result: Wrote log +>>>>>>>>>>>>>>>> Exim pid=p1235 (fresh-exec) terminating with rc=0 >>>>>>>>>>>>>>>> LOG: smtp_connection MAIN SMTP connection from CALLER LOG: MAIN this is a warning at TESTSUITE/aux-fixed/3000.pl line 25. LOG: smtp_connection MAIN - SMTP connection from CALLER closed by QUIT + SMTP connection from CALLER D=qqs closed by QUIT >>> host in hosts_connection_nolog? no (option unset) >>> host in host_lookup? no (option unset) >>> host in host_reject_connection? no (option unset) @@ -56,12 +76,18 @@ LOG: smtp_connection MAIN >>> host in helo_verify_hosts? no (option unset) >>> host in helo_try_verify_hosts? no (option unset) >>> host in helo_accept_junk_hosts? no (option unset) +>>> x.y.z in helo_lookup_domains? +>>> list element: @ +>>> list element: @[] >>> x.y.z in helo_lookup_domains? no (end of list) >>> host in dsn_advertise_hosts? no (option unset) ->>> host in pipelining_advertise_hosts? yes (matched "*") +>>> host in pipelining_advertise_hosts? +>>> list element: * +>>> host in pipelining_advertise_hosts? yes (matched "*") +>>> host in chunking_advertise_hosts? >>> host in chunking_advertise_hosts? no (end of list) >>> using ACL "check_rcpt" ->>> processing "accept" +>>> processing "accept" (TESTSUITE/test-config 20) LOG: this is a warning at TESTSUITE/aux-fixed/3000.pl line 25. >>> check condition = ${if !eq {${perl{foo_warn}}}{}} >>> = true