guile-mqtt-v0.1.0

Guile MQTT provides bindings for the libmosquitto MQTT client
library. The bindings are written in
GOOPS
and rely on lower-level bindings created by NYACC directly and
automatically from mosquitto.h.

The bindings align with GOOPS style, which means short method
names. (The specialization is done through the arguments.)

The user can extend the client class by inheritance.

This is still very much beta software. Also, not all method options in
this README are yet implemented. See the reference manual for better
indication of what is implemented.

This example, as well as the Guile libmosquitto bindings themselves,
are inspired by the Chicken Scheme mosquitto
bindings by Dmitrii
Kosenkov.

(use-modules (mosquitto client))

(let ((client (make-client #:on-connect
                          (lambda (client err)
                            (if (not (eq? err MOSQ_ERR_SUCCESS))
                                (abort err)
                                (display "Yay, we are connected!"))))))
  (set! (disconnect-callback client)
        (lambda (client err)
          (if (not (eq? err MOSQ_ERR_SUCCESS))
            (display "Unexpected disconnect..."))))

  (set! (message-callback client)
        (lambda (cl msg)
          (display (string->append "Topic: " (topic msg)
                                   "Payload:" payload msg))
          (publish client "topic2" "message received, thanks!")))
  (connect client "localhost" #:username "mqtt-admin" #:password "mypass")
  (subscribe client "topic1")
  (loop-forever client))

See further examples under the directory examples.

Guile MQTT is free software and is released under the LGPL v3 license.