From ae9855034610e63be9416ae4386f7a46b7a0936e Mon Sep 17 00:00:00 2001
From: jvoisin
Date: Wed, 26 Dec 2018 14:00:01 +0100
Subject: Add two eval-related tests

---
 src/tests/eval_backlist_call_user_func.phpt | 14 ++++++++++++++
 src/tests/eval_backlist_chained.phpt        | 16 ++++++++++++++++
 2 files changed, 30 insertions(+)
 create mode 100644 src/tests/eval_backlist_call_user_func.phpt
 create mode 100644 src/tests/eval_backlist_chained.phpt

(limited to 'src/tests')

diff --git a/src/tests/eval_backlist_call_user_func.phpt b/src/tests/eval_backlist_call_user_func.phpt
new file mode 100644
index 0000000..47e8d71
--- /dev/null
+++ b/src/tests/eval_backlist_call_user_func.phpt
@@ -0,0 +1,14 @@
+--TEST--
+Eval blacklist - with several calls in an eval.
+--SKIPIF--
+<?php if (!extension_loaded("snuffleupagus")) die "skip"; ?>
+--INI--
+sp.configuration_file={PWD}/config/eval_backlist.ini
+--FILE--
+<?php 
+eval('
+	call_user_func("strlen", 2);
+')
+?>
+--EXPECTF--
+Fatal error: [snuffleupagus][eval] A call to strlen was tried in eval, in %s/eval_backlist_call_user_func.php:%d, dropping it. in %s/eval_backlist_call_user_func.php(%d) : eval()'d code on line %d
diff --git a/src/tests/eval_backlist_chained.phpt b/src/tests/eval_backlist_chained.phpt
new file mode 100644
index 0000000..2360e06
--- /dev/null
+++ b/src/tests/eval_backlist_chained.phpt
@@ -0,0 +1,16 @@
+--TEST--
+Eval blacklist - with several calls in an eval.
+--SKIPIF--
+<?php if (!extension_loaded("snuffleupagus")) die "skip"; ?>
+--INI--
+sp.configuration_file={PWD}/config/eval_backlist.ini
+--FILE--
+<?php 
+eval('
+	cos(1);
+	strlen(2);
+	sin(3);
+')
+?>
+--EXPECTF--
+Fatal error: [snuffleupagus][eval] A call to strlen was tried in eval, in %s/eval_backlist_chained.php:%d, dropping it. in %s/eval_backlist_chained.php(%d) : eval()'d code on line %d
-- 
cgit v1.3