From 50b37d4a27d3295a29afca2286f1a5a086142cec Mon Sep 17 00:00:00 2001 From: Daniel Baumann Date: Sun, 28 Apr 2024 11:49:46 +0200 Subject: Adding upstream version 3.2.1+dfsg. Signed-off-by: Daniel Baumann --- src/tests/keywords/ipaddr | 51 +++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 51 insertions(+) create mode 100644 src/tests/keywords/ipaddr (limited to 'src/tests/keywords/ipaddr') diff --git a/src/tests/keywords/ipaddr b/src/tests/keywords/ipaddr new file mode 100644 index 0000000..3010a23 --- /dev/null +++ b/src/tests/keywords/ipaddr @@ -0,0 +1,51 @@ +# +# PRE: update if +# +update control { + Cleartext-Password := 'hello' + reply:Filter-Id := "filter" +} + +update request { + # Dotted Quad + Tmp-IP-Address-0 := 127.0.0.1 + + # Dotted Quad with prefix + Tmp-IP-Address-1 := 127.0.0.2/32 + + # Hex (0x) + Tmp-IP-Address-2 := 0x7f000003 + + # Decimal + Tmp-IP-Address-3 := 2130706436 +} + +if (NAS-IP-Address != 127.0.0.1) { + update reply { + Filter-Id += "fail 1" + } +} + +if (Tmp-IP-Address-0 != 127.0.0.1) { + update reply { + Filter-Id += "fail 2" + } +} + +if (Tmp-IP-Address-1 != 127.0.0.2) { + update reply { + Filter-Id += "fail 3" + } +} + +if (Tmp-IP-Address-2 != 127.0.0.3) { + update reply { + Filter-Id += "fail 4" + } +} + +if (Tmp-IP-Address-3 != 127.0.0.4) { + update reply { + Filter-Id += "fail 5" + } +} -- cgit v1.2.3