summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorClombrong <cromblong@egregore.fun>2025-06-24 15:29:57 +0200
committerClombrong <cromblong@egregore.fun>2025-06-24 15:29:57 +0200
commit2cb21183660dfa7062c9c6c6c388ac39c09007d7 (patch)
tree815ae8bb70f99858355fe8233df05999139537cc
parent9da921ec23e88fd9fd36a759127b9a058c4eee70 (diff)
feat(sasl): add stream_features record
-rw-r--r--lib/stream.ml6
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/stream.ml b/lib/stream.ml
index 6e4829b..141e2a5 100644
--- a/lib/stream.ml
+++ b/lib/stream.ml
@@ -12,6 +12,12 @@ let parse_auth_mechanism = function
| "PLAIN" -> PLAIN
| other -> Unknown other
+type stream_features = {
+ sasl_mechanisms : auth_mechanism list;
+ starttls : [`Required | `Optional | `None];
+ unknown_features : Xml.element list;
+ }
+
let get (stream : (signal, async) stream) : (signal, sync) stream Lwt.t =
(** [stanza stream] is a promise containing a full stanza of the fragments of
[stream]. *)