mod_tokenauth: Fix parsing binary part of tokens

Fixes parsing of tokens that happen to have a `;` in their secret part,
otherwise it splits there and the later bit goes into the username and
hitting the "Invalid token in storage" condition.

1 files changed, 1 insertions, 1 deletions

diff --git a/plugins/mod_tokenauth.lua b/plugins/mod_tokenauth.lua
index 240e9fbd..ccd06155 100644
--- a/plugins/mod_tokenauth.lua
+++ b/plugins/mod_tokenauth.lua
@@ -120,7 +120,7 @@ local function parse_token(encoded_token)
 	if not encoded_data then return nil; end
 	local token = base64.decode(encoded_data);
 	if not token then return nil; end
-	local token_id, token_secret, token_jid = token:match("^2;([^;]+);([^;]+);(.+)$");
+	local token_id, token_secret, token_jid = token:match("^2;([^;]+);(..................);(.+)$");
 	if not token_id then return nil; end
 	local token_user, token_host = jid.split(token_jid);
 	return token_id, token_user, token_host, token_secret;