Common Lisp XMPP client implementation

Upstream URL


Erik Enge


This is a Common Lisp implementation of the XMPP RFCs. Please see for more information. Example: * (require :cl-xmpp) * (defvar *connection* (xmpp:connect :hostname "")) ;; or xmpp:connect-tls if you loaded cl-xmpp-tls ;; note that for XMPP servers which do not have the same hostname ;; as the domain-part of the user's JID you will have to pass that ;; in. eg for Google Talk: ;; (defvar *connection* (xmpp:connect-tls :hostname "" :jid-domain-part "")) * (xmpp:auth *connection* "username" "password" "resource") ;; or pass :mechanism :sasl-plain, :digest-md5 or sasl-digest-md5 ;; if you loaded cl-xmpp-sasl or cl-xmpp-tls. ;; send someone a message * (xmpp:message *connection* "username@hostname" "what's going on?") ;; then sit back and watch the messages roll in: * (xmpp:receive-stanza-loop *connection*) <MESSAGE from=username@hostname to=me@myserver> [....] ;; or use xmpp:receive-stanza if you're just wanting one stanza ;; (note it will still block until you have received a complete ;; stanza) ;; That's it. Interrupt the loop to issue other commands, eg: * (xmpp:get-roster *connection*) ;; or any of the other ones you may find by looking through cl-xmpp.lisp ;; and package.lisp to see which ones are exported. ;; If you wish to handle the incoming messages or other objects simply ;; specify an xmpp:handle method for the objects you are interested in ;; or (defmethod xmpp:handle (connection object) ...) to get them ;; all. Or alternatively specify :dom-repr t to receive-stanza-loop ;; to get DOM-ish objects. ;; For example, if you wanted to create an annoying reply bot: * (defmethod xmpp:handle ((connection xmpp:connection) (message xmpp:message)) (xmpp:message connection (xmpp:from message) (format nil "reply to: ~a" (xmpp:message object))))

Dependencies (6)

  • cl-base64
  • cl-sasl
  • cl+ssl
  • cxml
  • ironclad
  • usocket

Dependents (1)

  • GitHub
  • Quicklisp