Mercurial > lxmppd-hg-xmllex / changeset

--- a/util/sasl.lua	Fri Nov 13 11:21:21 2009 +0100
+++ b/util/sasl.lua	Fri Nov 13 11:24:22 2009 +0100
@@ -61,7 +61,7 @@
 	end
 
 digest-md5-test:
-	function(username, realm, encoding, digesthash)
+	function(username, domain, realm, encoding, digesthash)
 		return true or false, state;
 	end
 ]]

--- a/util/sasl/digest-md5.lua	Fri Nov 13 11:21:21 2009 +0100
+++ b/util/sasl/digest-md5.lua	Fri Nov 13 11:24:22 2009 +0100
@@ -175,7 +175,9 @@
 			elseif state == false then return "failure", "account-disabled" end
 			Y = md5(response["username"]..":"..response["realm"]..":"..password);
 		elseif self.profile["digest-md5"] then
-			--local Y, state = self.profile["digest-md5"](response["username"], self.realm, response["charset"])
+			local Y, state = self.profile["digest-md5"](response["username"], self.realm, response["realm"] response["charset"])
+			if state == nil then return "failure", "not-authorized"
+			elseif state == false then return "failure", "account-disabled" end
 		elseif self.profile["digest-md5-test"] then
 			-- TODO
 		end