summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
Diffstat (limited to 'test')
-rw-r--r--test/confs/30012
-rw-r--r--test/confs/30022
-rw-r--r--test/confs/30115
-rw-r--r--test/confs/30127
-rw-r--r--test/scripts/3000-Perl/30113
l---------test/scripts/3000-Perl/30121
-rw-r--r--test/stdout/30111
-rw-r--r--test/stdout/30121
8 files changed, 20 insertions, 2 deletions
diff --git a/test/confs/3001 b/test/confs/3001
index 86ecee108..bc0e7e771 100644
--- a/test/confs/3001
+++ b/test/confs/3001
@@ -1,4 +1,4 @@
-# exim test configuration 0615
+# exim test configuration 3001
exim_path = EXIM_PATH
tls_advertise_hosts =
spool_directory = DIR/spool
diff --git a/test/confs/3002 b/test/confs/3002
index 7962d9734..9b668f002 100644
--- a/test/confs/3002
+++ b/test/confs/3002
@@ -1,4 +1,4 @@
-# exim test configuration 0616
+# exim test configuration 3002
exim_path = EXIM_PATH
keep_environment = ^FOO\d : BAR
add_environment = ADDED1=added1 : ADDED2=added2
diff --git a/test/confs/3011 b/test/confs/3011
new file mode 100644
index 000000000..f584ff517
--- /dev/null
+++ b/test/confs/3011
@@ -0,0 +1,5 @@
+# exim test configuration 3011
+exim_path = EXIM_PATH
+tls_advertise_hosts =
+spool_directory = DIR/spool
+perl_startup = sub taint_flag { ${^TAINT} ? 'ON' : 'OFF' }
diff --git a/test/confs/3012 b/test/confs/3012
new file mode 100644
index 000000000..505e49f94
--- /dev/null
+++ b/test/confs/3012
@@ -0,0 +1,7 @@
+# exim test configuration 3012
+exim_path = EXIM_PATH
+keep_environment = ^FOO\d : BAR
+add_environment = ADDED1=added1 : ADDED2=added2
+tls_advertise_hosts =
+perl_startup = sub taint_flag { ${^TAINT} ? 'ON' : 'OFF' }
+perl_taintmode = yes
diff --git a/test/scripts/3000-Perl/3011 b/test/scripts/3000-Perl/3011
new file mode 100644
index 000000000..87b32e7cf
--- /dev/null
+++ b/test/scripts/3000-Perl/3011
@@ -0,0 +1,3 @@
+# Perl w/o taintmode
+exim -be '${perl{taint_flag}}'
+****
diff --git a/test/scripts/3000-Perl/3012 b/test/scripts/3000-Perl/3012
new file mode 120000
index 000000000..3ae81fbb2
--- /dev/null
+++ b/test/scripts/3000-Perl/3012
@@ -0,0 +1 @@
+3011 \ No newline at end of file
diff --git a/test/stdout/3011 b/test/stdout/3011
new file mode 100644
index 000000000..6506cb3d7
--- /dev/null
+++ b/test/stdout/3011
@@ -0,0 +1 @@
+OFF
diff --git a/test/stdout/3012 b/test/stdout/3012
new file mode 100644
index 000000000..76371f28f
--- /dev/null
+++ b/test/stdout/3012
@@ -0,0 +1 @@
+ON