From 01c55abaf6bbc1ff59ffa741798f4598632db360 Mon Sep 17 00:00:00 2001
From: Clombrong <cromblong@egregore.fun>
Date: Wed, 11 Jun 2025 00:41:16 +0200
Subject: feat(auth): add MalformedRequest SASL error

---
 lib/auth.ml | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'lib/auth.ml')

diff --git a/lib/auth.ml b/lib/auth.ml
index 450c89b..c1486d6 100644
--- a/lib/auth.ml
+++ b/lib/auth.ml
@@ -4,9 +4,11 @@ type auth_mechanism = PLAIN  [@@deriving show { with_path = false }]
 
 type sasl_error =
   | NotAuthorized
+  | MalformedRequest
 
 let read_sasl_error = function
   | "not-authorized" -> NotAuthorized
+  | "malformed-request" -> MalformedRequest
   | _ -> failwith "Unsupported SASL error returned by the server."
 
 type sasl_auth = (string option, sasl_error * (string * string) option) result
-- 
cgit v1.2.3