This commit is contained in:
Tiara Rodney 2026-03-14 05:38:45 +01:00
commit 883f31932e
No known key found for this signature in database
GPG key ID: 5CD8EC1D46106723
169 changed files with 5676 additions and 0 deletions

View file

@ -0,0 +1,153 @@
-- Based on https://hg.prosody.im/prosody-modules/file/tip/mod_auth_oauth_external/mod_auth_oauth_external.lua
-- Patched to store email from userinfo in accounts store for mod_offline_email
local http = require "net.http";
local async = require "util.async";
local jid = require "util.jid";
local json = require "util.json";
local sasl = require "util.sasl";
local issuer_identity = module:get_option_string("oauth_external_issuer");
local oidc_discovery_url = module:get_option_string("oauth_external_discovery_url",
issuer_identity and issuer_identity .. "/.well-known/oauth-authorization-server" or nil);
local validation_endpoint = module:get_option_string("oauth_external_validation_endpoint");
local token_endpoint = module:get_option_string("oauth_external_token_endpoint");
local username_field = module:get_option_string("oauth_external_username_field", "preferred_username");
local allow_plain = module:get_option_boolean("oauth_external_resource_owner_password", true);
local client_id = module:get_option_string("oauth_external_client_id");
local client_secret = module:get_option_string("oauth_external_client_secret");
local scope = module:get_option_string("oauth_external_scope", "openid");
local accounts = module:open_store("accounts");
local host = module.host;
local provider = {};
local function not_implemented()
return nil, "method not implemented"
end
provider.test_password = not_implemented;
provider.get_password = not_implemented;
provider.set_password = not_implemented;
provider.create_user = not_implemented;
function provider.delete_user(username)
return accounts:set(username, nil);
end
function provider.get_account_info(username)
local account, err = accounts:get(username);
if not account then return nil, err or "Account not available"; end
return {
created = account.created;
password_updated = account.updated;
enabled = not account.disabled;
};
end
function provider.user_exists(username)
local account, err = accounts:get(username);
if err then
return nil, err;
elseif account then
return true;
else
return false
end
end
function provider.users()
return accounts:users();
end
local function save_account(username, response)
local account_data = { exists = true };
if type(response) == "table" and type(response.email) == "string" then
account_data.email = response.email;
end
accounts:set(username, account_data);
end
function provider.get_sasl_handler()
local profile = {};
profile.http_client = http.default:new({ connection_pooling = true });
local extra = { oidc_discovery_url = oidc_discovery_url };
if token_endpoint and allow_plain then
local map_username = function (username, _realm) return username; end;
function profile:plain_test(username, password, realm)
username = jid.unescape(username);
local tok, err = async.wait_for(self.profile.http_client:request(token_endpoint, {
headers = { ["Content-Type"] = "application/x-www-form-urlencoded; charset=utf-8"; ["Accept"] = "application/json" };
body = http.formencode({
grant_type = "password";
client_id = client_id;
client_secret = client_secret;
username = map_username(username, realm);
password = password;
scope = scope;
});
}))
if err or not (tok.code >= 200 and tok.code < 300) then
return false, nil;
end
local token_resp = json.decode(tok.body);
if not token_resp or string.lower(token_resp.token_type or "") ~= "bearer" then
return false, nil;
end
if not validation_endpoint then
self.username = jid.escape(username);
self.token_info = token_resp;
save_account(self.username, nil);
return true, true;
end
local ret, err = async.wait_for(self.profile.http_client:request(validation_endpoint,
{ headers = { ["Authorization"] = "Bearer " .. token_resp.access_token; ["Accept"] = "application/json" } }));
if err then
return false, nil;
end
if not (ret.code >= 200 and ret.code < 300) then
return false, nil;
end
local response = json.decode(ret.body);
if type(response) ~= "table" then
return false, nil, nil;
elseif type(response[username_field]) ~= "string" then
return false, nil, nil;
end
self.username = jid.escape(response[username_field]);
self.token_info = response;
save_account(self.username, response);
return true, true;
end
end
if validation_endpoint then
function profile:oauthbearer(token)
if token == "" then
return false, nil, extra;
end
local ret, err = async.wait_for(self.profile.http_client:request(validation_endpoint, {
headers = { ["Authorization"] = "Bearer " .. token; ["Accept"] = "application/json" };
}));
if err then
return false, nil, extra;
end
local response = ret and json.decode(ret.body);
if not (ret.code >= 200 and ret.code < 300) then
return false, nil, response or extra;
end
if type(response) ~= "table" or type(response[username_field]) ~= "string" then
return false, nil, nil;
end
local username = jid.escape(response[username_field]);
save_account(username, response);
return username, true, response;
end
end
return sasl.new(host, profile);
end
module:provides("auth", provider);

View file

@ -0,0 +1,35 @@
-- Strip PLAIN from SASL mechanisms for BOSH and WebSocket connections.
-- Direct c2s connections keep PLAIN for native XMPP client auth.
module:hook("stream-features", function(event)
local origin, features = event.origin, event.features;
local is_bosh = origin.bosh_version ~= nil;
local is_websocket = origin.websocket_request ~= nil;
if not (is_bosh or is_websocket) then
return;
end
for i, child in ipairs(features.tags) do
if child.name == "mechanisms" then
local dominated = {};
for j, mech in ipairs(child.tags) do
if mech:get_text() == "PLAIN" then
table.insert(dominated, j);
end
end
for k = #dominated, 1, -1 do
local idx = dominated[k];
table.remove(child.tags, idx);
for m = #child, 1, -1 do
if type(child[m]) == "table" and child[m].name == "mechanism" and child[m]:get_text() == "PLAIN" then
table.remove(child, m);
break;
end
end
end
break;
end
end
end, -1);

View file

@ -0,0 +1,16 @@
-- Disconnect c2s sessions after a configurable timeout to force re-authentication.
-- This ensures that expired credentials (e.g. app passwords) are caught promptly.
local timeout = module:get_option_number("session_timeout", 1800); -- default 30 minutes
module:hook("resource-bind", function(event)
local session = event.session;
if not session then return; end
session._timeout_timer = module:add_timer(timeout, function()
if session.type == "c2s" and not session.destroyed then
module:log("info", "Session timeout for %s, forcing re-authentication", session.full_jid);
session:close({ condition = "policy-violation", text = "Session expired, please reconnect" });
end
end);
end);