mod_ipcheck: Initial commit. An implementation of the Server IP Check proto-XEP.
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/mod_ipcheck/mod_ipcheck.lua Fri Feb 19 09:08:22 2010 +0500
@@ -0,0 +1,22 @@
+
+-- mod_ipcheck.lua
+-- Implementation of XEP-xxxx: Server IP Check <http://xmpp.org/extensions/inbox/sic.html>
+
+local st = require "util.stanza";
+
+module:add_feature("urn:xmpp:sic:0");
+
+module:hook("iq/bare/urn:xmpp:sic:0:ip", function(event)
+ local origin, stanza = event.origin, event.stanza;
+ if not stanza.attr.to and stanza.attr.type == "get" then
+ if stanza.attr.to then
+ origin.send(st.error_reply(stanza, "auth", "not-authorized", "You can only ask about your own IP address"));
+ elseif origin.ip then
+ origin.send(st.reply(stanza):tag("ip", {xmlns='urn:xmpp:sic:0'}):text(origin.ip));
+ else
+ -- IP addresses should normally be available, but in case they are not
+ origin.send(st.error_reply(stanza, "cancel", "item-not-found", "IP address for this session is not available"));
+ end
+ return true;
+ end
+end);