get mqtt reciving working

This commit is contained in:
Travis Shears 2026-03-25 08:52:34 +01:00
parent 45b934b3ad
commit 6c0711acd5
Signed by: travisshears
GPG key ID: CB9BF1910F3F7469
4 changed files with 75 additions and 57 deletions

View file

@ -2,59 +2,17 @@ import config
import gleam/erlang/process
import gleam/io
import mqtt
import mqtt_dummy
import sensors
pub fn main() -> Nil {
let cfg = config.load_config()
io.println("Config loaded successfully!")
let mqtt_updates = process.new_subject()
let client = mqtt.start(cfg, mqtt_updates)
// Start MQTT, which will forward updates to sensor_reader
let client = mqtt.start(cfg)
let assert Ok(s) =
mqtt.subscribe(client, "homeassistant/sensor/bws/node1/state1")
echo s
let assert Ok(dummy_one) = mqtt_dummy.start()
let assert Ok(dummy_two) = mqtt_dummy.start()
process.send_after(dummy_one, 1000, mqtt_dummy.Proc)
process.send_after(dummy_two, 1000, mqtt_dummy.Proc)
loop(LoopState(
dummy_one_receive_subject: mqtt_dummy.subscribe(dummy_one),
dummy_one_send_subject: dummy_one,
dummy_two_receive_subject: mqtt_dummy.subscribe(dummy_two),
dummy_two_send_subject: dummy_two,
))
process.sleep_forever()
Nil
}
type LoopState {
LoopState(
dummy_one_receive_subject: process.Subject(sensors.SensorReading),
dummy_one_send_subject: process.Subject(mqtt_dummy.Message),
dummy_two_receive_subject: process.Subject(sensors.SensorReading),
dummy_two_send_subject: process.Subject(mqtt_dummy.Message),
)
}
fn loop(state: LoopState) -> Nil {
case process.receive(state.dummy_one_receive_subject, 1500) {
Ok(msg) -> {
sensors.print_sensor_reading(msg)
process.send_after(state.dummy_one_send_subject, 1000, mqtt_dummy.Proc)
Nil
}
Error(Nil) -> {
io.println("Timeout on dummy one")
}
}
case process.receive(state.dummy_two_receive_subject, 1500) {
Ok(msg) -> {
sensors.print_sensor_reading(msg)
process.send_after(state.dummy_two_send_subject, 1000, mqtt_dummy.Proc)
Nil
}
Error(Nil) -> {
io.println("Timeout on dummy two..")
}
}
loop(state)
}