# HG changeset patch
# User Paul Aurich <paul@darkrain42.org>
# Date 1268864954 25200
# Node ID ea5fe15a82f52bdfef539fd9cb006a079b75bc6f
# Parent  066c199135d56e15c77643ca76eb594ae678ab6d
util.sasl_cyrus: If available, use a c14n callback for interoperability with bad clients.

Specifically, clients that specify an authzid 'user@domain.com' and authcid 'user'.

diff -r 066c199135d5 -r ea5fe15a82f5 util/sasl_cyrus.lua
--- a/util/sasl_cyrus.lua	Wed Mar 17 15:29:14 2010 -0700
+++ b/util/sasl_cyrus.lua	Wed Mar 17 15:29:14 2010 -0700
@@ -53,6 +53,16 @@
 	sasl_i.realm = realm;
 	sasl_i.service_name = service_name;
 	sasl_i.cyrus = cyrussasl.server_new(service_name, nil, realm, nil, nil)
+
+	if cyrussasl.set_canon_cb then
+		local c14n_cb = function (user)
+			local node = s_match(user, "^([^@]+)");
+			log("debug", "Canonicalizing username %s to %s", user, node)
+			return node
+		end
+		cyrussasl.set_canon_cb(sasl_i.cyrus, c14n_cb);
+	end
+
 	if sasl_i.cyrus == 0 then
 		log("error", "got NULL return value from server_new")
 		return nil;