diff options
Diffstat (limited to '')
-rw-r--r-- | src/tests/keywords/return | 33 | ||||
-rw-r--r-- | src/tests/keywords/return-group | 22 | ||||
-rw-r--r-- | src/tests/keywords/return-group.attrs | 4 | ||||
-rw-r--r-- | src/tests/keywords/return-section | 35 |
4 files changed, 94 insertions, 0 deletions
diff --git a/src/tests/keywords/return b/src/tests/keywords/return new file mode 100644 index 0000000..49779a5 --- /dev/null +++ b/src/tests/keywords/return @@ -0,0 +1,33 @@ +# +# PRE: update if +# +update control { + Cleartext-Password := 'hello' +} + +if (User-Name == "bob") { + update reply { + Filter-Id := "filter" + } + + # + # We need this because the "return" below + # will prevent the "pap" module from being run + # in the "authorize" section. + # + update control { + Auth-Type := PAP + } + + # + # Stop processing "authorize", and go to the next section. + # + return + + # + # Shouldn't reach this + # + update reply { + Filter-Id := "fail" + } +} diff --git a/src/tests/keywords/return-group b/src/tests/keywords/return-group new file mode 100644 index 0000000..92978e4 --- /dev/null +++ b/src/tests/keywords/return-group @@ -0,0 +1,22 @@ +# PRE: return +# +update { + control:Auth-Type = 'Accept' +} + +group { + # Section should exit after this statement + ok { + ok = return + } + + # This entry should never be reached + update { + reply:Reply-Message := 'fail' + } +} + +# We should continue processing after the previous group. +update { + reply:Reply-Message += 'pass' +} diff --git a/src/tests/keywords/return-group.attrs b/src/tests/keywords/return-group.attrs new file mode 100644 index 0000000..ad30f4d --- /dev/null +++ b/src/tests/keywords/return-group.attrs @@ -0,0 +1,4 @@ +User-Name = 'test' + +Response-Packet-Type == Access-Accept +Reply-Message == 'pass' diff --git a/src/tests/keywords/return-section b/src/tests/keywords/return-section new file mode 100644 index 0000000..21ecea1 --- /dev/null +++ b/src/tests/keywords/return-section @@ -0,0 +1,35 @@ +# +# PRE: update if +# +update control { + Cleartext-Password := 'hello' +} + +if (User-Name == "bob") { + update reply { + Filter-Id := "filter" + } + + # + # We need this because the "return" below + # will prevent the "pap" module from being run + # in the "authorize" section. + # + update control { + Auth-Type := PAP + } + + # + # Stop processing "authorize", and go to the next section. + # + return { # ERROR + ok = 1 + } + + # + # Shouldn't reach this + # + update reply { + Filter-Id := "fail" + } +} |