Comparison

mod_rest: Add support for form-encoded output This roughtly matches the input capabilities when given an form-encoded payload.

comparison

equal deleted inserted replaced

-:92152437ecfe
+:07ae583bc565
 };
 local supported_outputs = {
 	"application/xmpp+xml",
 	"application/json",
+	"application/x-www-form-urlencoded",
 };
 if have_cbor then
 	table.insert(supported_inputs, "application/cbor");
 	table.insert(supported_outputs, "application/cbor");
 end
+-- Only { string : string } can be form-encoded, discard the rest
+-- (jsonmap also discards anything unknown or unsupported)
+local function flatten(t)
+	local form = {};
+	for k, v in pairs(t) do
+		if type(v) == "string" then
+			form[k] = v;
+		elseif type(v) == "number" then
+			form[k] = tostring(v);
+		elseif v == true then
+			form[k] = "";
+		end
+	end
+	return form;
+end
 local function encode(type, s)
 	if type == "application/json" then
 		return json.encode(jsonmap.st2json(s));
+	elseif type == "application/x-www-form-urlencoded" then
+		return http.formencode(flatten(jsonmap.st2json(s)));
 	elseif type == "application/cbor" then
 		return cbor.encode(jsonmap.st2json(s));
 	elseif type == "text/plain" then
 		return s:get_child_text("body") or "";
 	end