]> git.gsnw.org Git - fping.git/commitdiff
add test for new -N option
authorDavid Schweikert <david@schweikert.ch>
Tue, 1 Nov 2016 08:18:18 +0000 (09:18 +0100)
committerDavid Schweikert <david@schweikert.ch>
Tue, 1 Nov 2016 08:18:18 +0000 (09:18 +0100)
ci/test-15-netdata.pl [new file with mode: 0755]

diff --git a/ci/test-15-netdata.pl b/ci/test-15-netdata.pl
new file mode 100755 (executable)
index 0000000..6e820ea
--- /dev/null
@@ -0,0 +1,35 @@
+#!/usr/bin/perl -w
+
+use Test::Command;
+use Test::More;
+
+plan tests => 3;
+
+# fping
+{
+my $cmd = Test::Command->new(cmd => "fping -c 2 -Q 1 -N 127.0.0.1");
+$cmd->exit_is_num(0);
+$cmd->stdout_like(qr{CHART fping\.127_0_0_1_packets '' 'FPing Packets for host 127\.0\.0\.1' packets '127_0_0_1' fping\.packets line 110020 1
+DIMENSION xmt sent absolute 1 1
+DIMENSION rcv received absolute 1 1
+BEGIN fping\.127_0_0_1_packets
+SET xmt = 1
+SET rcv = 1
+END
+CHART fping\.127_0_0_1_quality '' 'FPing Quality for host 127\.0\.0\.1' percentage '127_0_0_1' fping\.quality line 110010 1
+DIMENSION returned '' absolute 1 1
+BEGIN fping\.127_0_0_1_quality
+SET returned = 100
+END
+CHART fping\.127_0_0_1_latency '' 'FPing Latency for host 127\.0\.0\.1' ms '127_0_0_1' fping\.latency line 110000 1
+DIMENSION min minimum absolute 10 1000
+DIMENSION max maximum absolute 10 1000
+DIMENSION avg average absolute 10 1000
+BEGIN fping\.127_0_0_1_latency
+SET min = \d{1,2}
+SET avg = \d{1,2}
+SET max = \d{1,2}
+END}
+);
+$cmd->stderr_like(qr{127.0.0.1 : xmt/rcv/%loss = 2/2/0%, min/avg/max = 0.\d+/0.\d+/0.\d+});
+}