MQTT broker in Haskell