# HG changeset patch
# User Tobias Markmann <tm@ayena.de>
# Date 1258107862 -3600
# Node ID e79c0ce6cf543d90df297ac9c543133446c62e8f
# Parent  9657276387af8e1a34f46f233e73aa5794b0de62
Adding support for digest-md5 profile in DIGEST-MD5 implementation.

diff -r 9657276387af -r e79c0ce6cf54 util/sasl.lua
--- 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
 ]]
diff -r 9657276387af -r e79c0ce6cf54 util/sasl/digest-md5.lua
--- 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