Mercurial > prosody-modules
changeset 123:c04443ea114c
mod_adhoc, mod_adhoc_cmd_admin: use util.datforms for type="result" forms
author | Florian Zeitz <florob@babelmonkeys.de> |
---|---|
date | Fri, 22 Jan 2010 19:05:28 +0100 |
parents | c3a874eec712 |
children | 843cadf36306 |
files | mod_adhoc/adhoc/adhoc.lib.lua mod_adhoc_cmd_admin/mod_adhoc_cmd_admin.lua |
diffstat | 2 files changed, 24 insertions(+), 18 deletions(-) [+] |
line wrap: on
line diff
--- a/mod_adhoc/adhoc/adhoc.lib.lua Fri Jan 22 14:45:36 2010 +0100 +++ b/mod_adhoc/adhoc/adhoc.lib.lua Fri Jan 22 19:05:28 2010 +0100 @@ -54,11 +54,13 @@ '" at node "'..command.node..'" provided an invalid action "'..action..'"'); end end - cmdtag:add_child(actions):up(); + cmdtag:add_child(actions); elseif name == "form" then - cmdtag:add_child(data.form:form()):up(); + cmdtag:add_child(content:form()); + elseif name == "result" then + cmdtag:add_child(content.layout:form(content.data, "result")); elseif name == "other" then - cmdtag:add_child(content):up(); + cmdtag:add_child(content); end end stanza:add_child(cmdtag);
--- a/mod_adhoc_cmd_admin/mod_adhoc_cmd_admin.lua Fri Jan 22 14:45:36 2010 +0100 +++ b/mod_adhoc_cmd_admin/mod_adhoc_cmd_admin.lua Fri Jan 22 19:05:28 2010 +0100 @@ -58,6 +58,12 @@ { name = "accountjid", type = "jid-single", label = "The Jabber ID for which to retrieve the password" }; }; +local get_user_password_result_layout = dataforms_new{ + { name = "FORM_TYPE", type = "hidden", value = "http://jabber.org/protocol/admin" }; + { name = "accountjid", type = "jid-single", label = "JID" }; + { name = "password", type = "text-single", label = "Password" }; +}; + local get_online_users_layout = dataforms_new{ title = "Getting List of Online Users"; instructions = "How many users should be returned at most?"; @@ -67,6 +73,11 @@ value = { "25", "50", "75", "100", "150", "200", "all" } }; }; +local get_online_users_result_layout = dataforms_new{ + { name = "FORM_TYPE", type = "hidden", value = "http://jabber.org/protocol/admin" }; + { name = "onlineuserjids", type = "text-multi", label = "The list of all online users" }; +}; + local announce_layout = dataforms_new{ title = "Making an Announcement"; instructions = "Fill out this form to make an announcement to all\nactive users of this service."; @@ -173,22 +184,18 @@ return { status = "canceled" }, sessid; end local fields = get_user_password_layout:data(data.form); - local accountjid = st.stanza("field", {var="accountjid", label = "JID", type="jid-single"}); - local password = st.stanza("field", {var="password", label = "Password", type="text-single"}); local user, host, resource = jid.split(fields.accountjid); + local accountjid = ""; + local password = ""; if usermanager_user_exists(user, host) then - accountjid:tag("value"):text(fields.accountjid):up(); - password:tag("value"):text(usermanager_get_password(user, host)):up(); + accountjid = fields.accountjid; + password = usermanager_get_password(user, host); else sessions[sessid] = nil; return { status = "error", error = { type = "cancel", condition = "item-not-found", message = "User does not exist" } }, sessid; end sessions[sessid] = nil; - return { status = "completed", other = st.stanza("x", {xmlns="jabber:x:data", type="result"}) - :tag("field", {type="hidden", var="FORM_TYPE"}) - :tag("value"):text("http://jabber.org/protocol/admin"):up():up() - :add_child(accountjid) - :add_child(password) }, sessid; + return { status = "completed", result = { layout = get_user_password_result_layout, data = {accountjid = accountjid, password = password} } }, sessid; else local sessionid=uuid.generate(); sessions[sessionid] = "executing"; @@ -210,19 +217,16 @@ max_items = tonumber(fields.max_items); end local count = 0; - local field = st.stanza("field", {label="The list of all online users", var="onlineuserjids", type="text-multi"}); + local users = nil; for username, user in pairs(hosts[data.to].sessions or {}) do if (max_items ~= nil) and (count >= max_items) then break; end - field:tag("value"):text(username.."@"..data.to):up(); + users = ((users and users.."\n") or "")..(username.."@"..data.to); count = count + 1; end sessions[sessid] = nil; - return { status = "completed", other = st.stanza("x", {xmlns="jabber:x:data", type="result"}) - :tag("field", {type="hidden", var="FORM_TYPE"}) - :tag("value"):text("http://jabber.org/protocol/admin"):up():up() - :add_child(field) }, sessid; + return { status = "completed", result = {layout = get_online_users_result_layout, data = {onlineuserjids=users}} }, sessid; else local sessionid=uuid.generate(); sessions[sessionid] = "executing";