blob: 137ca11ef7ee2e67f93d774889b98cf43a273bbb (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
|
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=<munged>
adding SSLKEYLOGFILE=TESTSUITE/spool/sslkeys
configuration file is TESTSUITE/test-config
admin user
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}}
├───────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}}
├───────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=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 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)
>>> host in sender_unqualified_hosts? no (option unset)
>>> host in recipient_unqualified_hosts? no (option unset)
>>> 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?
>>> 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" (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
>>> accept: condition test succeeded in ACL "check_rcpt"
>>> end of ACL "check_rcpt": ACCEPT
******** SERVER ********
|
