aboutsummaryrefslogtreecommitdiffstats
path: root/util
diff options
context:
space:
mode:
authorKim Alvefur <zash@zash.se>2018-06-02 19:57:46 +0200
committerKim Alvefur <zash@zash.se>2018-06-02 19:57:46 +0200
commita7448e43e0daa2772511d7744727f91db4962346 (patch)
tree810fd6136e2a41a3b4316066eaccace728e7e185 /util
parent5b1a2360296bfec2e8ff7242a6c12cda54521f6a (diff)
downloadprosody-a7448e43e0daa2772511d7744727f91db4962346.tar.gz
prosody-a7448e43e0daa2772511d7744727f91db4962346.zip
util.dataforms: Add a simple function for identifying form types
This is meant to allow identifying forms without parsing them completely.
Diffstat (limited to 'util')
-rw-r--r--util/dataforms.lua16
1 files changed, 16 insertions, 0 deletions
diff --git a/util/dataforms.lua b/util/dataforms.lua
index 8c5b8ee2..7b832f78 100644
--- a/util/dataforms.lua
+++ b/util/dataforms.lua
@@ -249,8 +249,24 @@ field_readers["hidden"] =
return field_tag:get_child_text("value");
end
+
+local function get_form_type(form)
+ if not st.is_stanza(form) then
+ return nil, "not a stanza object";
+ elseif form.attr.xmlns ~= "jabber:x:data" or form.name ~= "x" then
+ return nil, "not a dataform element";
+ end
+ for field in form:childtags("field") do
+ if field.attr.var == "FORM_TYPE" then
+ return field:get_child_text("value");
+ end
+ end
+ return "";
+end
+
return {
new = new;
+ get_type = get_form_type;
};