Add nested subrequest tests

diff --git a/src/tests/keywords/subrequest-src-dst-nested b/src/tests/keywords/subrequest-src-dst-nested
new file mode 100644 (file)
index 0000000..b6d2fa8
--- /dev/null
+++ b/src/tests/keywords/subrequest-src-dst-nested
@@ -0,0 +1,34 @@
+update request {
+        &User-Name := 'bob'
+}
+
+subrequest Access-Request &request &reply.Tmp-Group-0 {
+        subrequest Access-Request &request &reply.Tmp-Group-0 {
+                if (!&User-Name) {
+                        test_fail
+                }
+
+                if (&User-Name != 'bob') {
+                        test_fail
+                }
+
+                update reply {
+                        &Tmp-String-0 := 'hello from subrequest'
+                }
+        }
+}
+
+if (!&reply.Tmp-Group-0.Tmp-Group-0) {
+        test_fail
+}
+
+if (!&reply.Tmp-Group-0.Tmp-Group-0.Tmp-String-0) {
+        test_fail
+}
+
+if (&reply.Tmp-Group-0.Tmp-Group-0.Tmp-String-0 != 'hello from subrequest') {
+        test_fail
+}
+
+success
+

diff --git a/src/tests/keywords/subrequest-src-dst-nested.attrs b/src/tests/keywords/subrequest-src-dst-nested.attrs
new file mode 100644 (file)
index 0000000..443f84c
--- /dev/null
+++ b/src/tests/keywords/subrequest-src-dst-nested.attrs
@@ -0,0 +1,12 @@
+#
+#  Input packet
+#
+User-Name = "bob"
+User-Password = "hello"
+
+#
+#  Expected answer
+#
+Packet-Type == Access-Accept
+Tmp-Group-0 == { Tmp-Group-0 == { Tmp-String-0 == 'hello from subrequest' } }
+Filter-Id == 'filter'