X-Git-Url: http://git.rot13.org/?p=air-quality;a=blobdiff_plain;f=zph02.pl;h=d0797d9db6331be3a5d5117112c60331dc8394e6;hp=ef547656c7f5a74412a6a2b2d504555124d66f45;hb=HEAD;hpb=632fc9b95bf751f33b6d71238adc6bb94f2e5ae6 diff --git a/zph02.pl b/zph02.pl index ef54765..10f961e 100755 --- a/zph02.pl +++ b/zph02.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.4:1.0-port0'; -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.0'; +my $influx_url = shift @ARGV || 'http://192.168.3.40:8086/write?consistency=any&db=rot13'; my $s = new Device::SerialPort( $port ) || die $!; $s->baudrate(9600); @@ -44,10 +43,11 @@ while (1) { my $checksum = $v[8]; my $pcnt = $v[3] + ( $v[4] / 100 ); - if ( $v[0] == 0xff && $sum == $checksum ) { + if ( $v[0] == 0xff && $sum == $checksum && $pcnt > 0) { my $influx = "zph02,dc=trnjanska pm25_pcnt=$pcnt $t"; - print "$influx\n"; - system "curl --silent -XPOST '$influx_url' --data-binary '$influx'" + print "$influx\n" if -e '/dev/shm/air-debug'; + system "curl --max-time 2 --silent -XPOST '$influx_url' --data-binary '$influx'"; + system "mosquitto_pub -h rpi2 -t 'air/zph02/pm25' -m $pcnt"; } }