From: Arran Cudbard-Bell <a.cudbardb@freeradius.org>
Date: Thu, 31 Jul 2025 04:45:04 +0000 (-0700)
Subject: Add json.encode regression test for DHCPv4 in RADIUS
X-Git-Url: http://git.ipfire.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=bb5100616693a9389b222f304f3381967ac64789;p=thirdparty%2Ffreeradius-server.git

Add json.encode regression test for DHCPv4 in RADIUS
---

diff --git a/src/tests/modules/json/regression04.unlang b/src/tests/modules/json/regression04.unlang
new file mode 100644
index 0000000000..f8dfd4da28
--- /dev/null
+++ b/src/tests/modules/json/regression04.unlang
@@ -0,0 +1,18 @@
+Vendor-Specific.Nokia-SR = {
+	ToServer-Dhcp-Options = {
+		Message-Type = ::Discover
+		Parameter-Request-List = ::Subnet-Mask
+		Parameter-Request-List = ::Router-Address
+		Vendor-Class-Identifier = 0x756468637020312e33302e31
+		Hostname = "modem"
+		Relay-Agent-Information = {
+			Remote-Id = 0x32323935353534343630
+		}
+	}
+}
+
+if (!(%json.encode('&Vendor-Specific') == "{\"Vendor-Specific\":{\"type\":\"vsa\",\"value\":{\"Nokia-SR\":{\"type\":\"vendor\",\"value\":{\"ToServer-Dhcp-Options\":{\"type\":\"group\",\"value\":{\"Message-Type\":{\"type\":\"uint8\",\"value\":\"Discover\"},\"Parameter-Request-List\":{\"type\":\"attribute\",\"value\":[\"::Subnet-Mask\",\"::Router-Address\"]},\"Vendor-Class-Identifier\":{\"type\":\"octets\",\"value\":\"udhcp 1.30.1\"},\"Hostname\":{\"type\":\"string\",\"value\":\"modem\"},\"Relay-Agent-Information\":{\"type\":\"tlv\",\"value\":{\"Remote-Id\":{\"type\":\"octets\",\"value\":\"2295554460\"}}}}}}}}}}")) {
+	test_fail
+}
+
+test_pass