net.dns: Ensure all pending requests get notified of a timeout when looking up a...

[prosody.git] / util / sasl_cyrus.lua

diff --git a/util/sasl_cyrus.lua b/util/sasl_cyrus.lua
index 002118fdc07c86f14b8f0c0686e8c70537e73db0..196845876c84141b3c8a10a402ee5a3fae424559 100644 (file)
--- a/util/sasl_cyrus.lua
+++ b/util/sasl_cyrus.lua
@@ -78,11 +78,15 @@ local function init(service_name)
 end
 
 -- create a new SASL object which can be used to authenticate clients
-function new(realm, service_name, app_name)
+-- host_fqdn may be nil in which case gethostname() gives the value. 
+--      For GSSAPI, this determines the hostname in the service ticket (after
+--      reverse DNS canonicalization, only if [libdefaults] rdns = true which
+--      is the default).  
+function new(realm, service_name, app_name, host_fqdn)
 
        init(app_name or service_name);
 
-       local st, ret = pcall(cyrussasl.server_new, service_name, nil, realm, nil, nil)
+       local st, ret = pcall(cyrussasl.server_new, service_name, host_fqdn, realm, nil, nil)
        if not st then
                log("error", "Creating SASL server connection failed: %s", ret);
                return nil;