X-Git-Url: http://git.rot13.org/?p=air-quality;a=blobdiff_plain;f=mh-z19b.pl;h=8307838938b064d1361a93e8976d24db38fa9317;hp=c2f8ffe302d16299fc7f41fb5292719af320a764;hb=32bcafc453e010a0115903d346d4d3d6acdc33a0;hpb=632fc9b95bf751f33b6d71238adc6bb94f2e5ae6 diff --git a/mh-z19b.pl b/mh-z19b.pl index c2f8ffe..8307838 100755 --- a/mh-z19b.pl +++ b/mh-z19b.pl @@ -6,9 +6,8 @@ use Device::SerialPort; use Time::HiRes; use Data::Dump qw(dump); -my $port = shift @ARGV || '/dev/serial/by-path/pci-0000:00:1a.7-usb-0:5.3.4:1.2'; -my $influx_url = shift @ARGV || 'http://10.13.37.229:8186/write?db=telegraf'; -$influx_url = 'http://10.13.37.92:8086/write?db=rot13'; +my $port = shift @ARGV || '/dev/serial/by-path/platform-3f980000.usb-usb-0:1.5:1.2'; +my $influx_url = shift @ARGV || 'http://10.13.37.92:8086/write?consistency=any&db=rot13'; my $s = new Device::SerialPort( $port ) || die $!; $s->baudrate(9600); @@ -45,7 +44,10 @@ while (1) { if ( $v[0] == 0xff && $sum == $checksum ) { my $influx = "mh-z19b,dc=trnjanska co2=$co2 $t"; print "$influx\n"; - system "curl --silent -XPOST '$influx_url' --data-binary '$influx'" + system "curl --max-time 2 --silent -XPOST '$influx_url' --data-binary '$influx'"; + system "mosquitto_pub -h rpi2 -t 'air/mh-z19b/co2' -m $co2"; + } else { + die "checksum error"; } sleep 1; $s->write("\xFF\x01\x86\x00\x00\x00\x00\x00\x79");