X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=iio2mqtt.pl;h=50668f0f6dcb5e5214106f3d510bcae703cf012e;hb=4914d51b06240ba013d2534cd3cebf0f7ce9c8f1;hp=a9dce9f5c15cf451b474ccb4e28a90e13909a889;hpb=4b3c2f6ff428be69aae03d1d0555fb3e71ce2742;p=air-quality

diff --git a/iio2mqtt.pl b/iio2mqtt.pl
index a9dce9f..50668f0 100755
--- a/iio2mqtt.pl
+++ b/iio2mqtt.pl
@@ -6,21 +6,36 @@ use Time::HiRes;
 
 # sudo apt install libiio-utils mosquitto-clients
 
+my $influx_url = shift @ARGV || 'http://192.168.3.40:8086/write?consistency=any&db=rot13';
+
+my $delay = $ENV{DELAY} || 1;
+
 my $hostname = `hostname -s`;
 chomp($hostname);
 
 while(1) {
 
 	my $t = Time::HiRes::time;
+	my $t_influx = int( $t * 1_000_000_000 );
 
 	my $iio = `iio_info`;
 
 	my $device;
 	my $name;
 
+	my $influx = '';
+
 	foreach ( split(/\n/, $iio) ) {
 		if ( m/iio:device\d+:\s+(\S+)/ ) {
 			$device = $1;
+
+			if ( $influx =~ m/,$/ ) {
+				$influx =~ s/,$/ $t_influx\n/;
+			} elsif ( $influx =~ m/ $/ ) { # only device
+				$influx =~ s/\S+\s$//;
+			}
+			$influx .= "iio,dc=trnjanska,host=$hostname,device=$device ";
+
 		} elsif ( m/(\S+):\s+\(input\)/ ) {
 			$name = $1;
 		} elsif ( m/attr\s+0:\s+input\svalue: (\d+[\.\d]+)/ ) {
@@ -31,10 +46,19 @@ while(1) {
 			my $topic = "iio/$hostname/$device/$name";
 			#print "$topic $val\n";
 			system "mosquitto_pub -h rpi2 -t $topic -m $val";
+
+			$influx .= "$name=$val,";
 		} else {
 			#warn "# $_\n";
 		}
 	}
 
-	sleep Time::HiRes::time + 1 - $t;
+	$influx =~ s/,$/ $t_influx/;
+	system "curl --silent -XPOST '$influx_url' --data-binary '$influx'";
+	warn "$influx\n";
+
+	my $dt = Time::HiRes::time + $delay - $t - 0.01;
+	if ( $dt > 0 ) {
+		sleep $dt;
+	}
 }