A scalable MQTT broker written in erlang