Client (xmpp.Xmpp_pubsub.Make.1-Client)

type transport

Transport

type transport_options

Client

type t

Type of the client

type credentials = [

| `JidPassword of Xmpp.Jid.t * string

A JID password pair

| `Anonymous of string

Anonymously

see https://xmpp.org/extensions/xep-0175.html
XEP-0175: Best Practices or Use of SASL ANONYMOUS

]

Credentials used to authenticate with XMPP server

val create : ?seed:Stdlib.Random.State.t -> transport_options -> credentials:credentials -> t Lwt.t

val connect : t -> unit Lwt.t

val disconnect : t -> unit Lwt.t

type state =

| Disconnected

| Connected of Xmpp.Jid.t

val pp_state : state Fmt.t

val state : t -> state React.signal

val on_connect : t -> Xmpp.Jid.t React.event

val jid : t -> Xmpp.Jid.t Lwt.t

val stanzas : t -> Xmpp.Stanza.t React.event

val iq_gets : ?element:Xmlm.name -> t -> Xmpp.Stanza.Iq.get React.event

val iq_sets : ?element:Xmlm.name -> t -> Xmpp.Stanza.Iq.set React.event

exception StanzaError of Xmpp.Stanza.Error.t

val iq_get : t -> ?to':Xmpp.Jid.t -> Xmlc.Tree.t -> Xmpp.Stanza.Iq.result Lwt.t

val iq_set : t -> ?to':Xmpp.Jid.t -> Xmlc.Tree.t -> Xmpp.Stanza.Iq.result Lwt.t

val send_message : t -> Xmpp.Stanza.Message.t -> unit Lwt.t

val send_iq : t -> Xmpp.Stanza.Iq.t -> unit Lwt.t

val send_presence : t -> Xmpp.Stanza.Presence.t -> unit Lwt.t

val send_xml : t -> Xmlc.Tree.t -> unit Lwt.t

val generate_id : t -> string