Software / code / prosody
Changeset
19:65622bf34afc
Merged in Tobias's SASL lib
| author | Matthew Wild <mwild1@gmail.com> |
|---|---|
| date | Tue, 26 Aug 2008 13:15:06 +0100 |
| parents | 18:ae161e907149 (current diff) 17:9a2685f39f9f (diff) |
| children | 20:6885fd2cf51f |
| files | |
| diffstat | 1 files changed, 34 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/util/sasl.lua Tue Aug 26 13:15:06 2008 +0100 @@ -0,0 +1,34 @@ +require "base64" +sasl = {} + +function sasl:new_plain(onAuth, onSuccess, onFail, onWrite) + local object = { mechanism = "PLAIN", onAuth = onAuth, onSuccess = onSuccess, onFail = onFail, + onWrite = onWrite} + local challenge = base64.encode(""); + onWrite(stanza.stanza("challenge", {xmlns = "urn:ietf:params:xml:ns:xmpp-sasl"}):text(challenge)) + object.feed = function(self, stanza) + if (stanza.name ~= "response") then self.onFail() end + if (stanza.attr.xmlns ~= "urn:ietf:params:xml:ns:xmpp-sasl") then self.onFail() end + local response = base64.decode(stanza.tag[1]) + local authorization = string.match(response, [[([^&\0]+)]]) + local authentication = string.match(response, [[\0([^&\0]+)\0]]) + local password = string.match(response, [[\0[^&\0]+\0([^&\0]+)]]) + if self.onAuth(authorization, password) == true then + self.onWrite(stanza.stanza("success", {xmlns = "urn:ietf:params:xml:ns:xmpp-sasl"})) + self.onSuccess() + else + self.onWrite(stanza.stanza("failure", {xmlns = "urn:ietf:params:xml:ns:xmpp-sasl"}):tag("temporary-auth-failure")); + end + end + return object +end + +function sasl:new(mechanism, onAuth, onSuccess, onFail, onWrite) + local object + if mechanism == "PLAIN" then object = new_plain(onAuth, onSuccess, onFail, onWrite) + else onFail() + end + return object +end + +module "sasl"
