From: David Schweikert <david@schweikert.ch>
Date: Tue, 1 Nov 2016 08:18:18 +0000 (+0100)
Subject: add test for new -N option
X-Git-Url: https://git.gsnw.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=2ae80b2210e792950bf2cdf8342630a4cb18fd79;p=fping.git

add test for new -N option
---

diff --git a/ci/test-15-netdata.pl b/ci/test-15-netdata.pl
new file mode 100755
index 0000000..6e820ea
--- /dev/null
+++ b/ci/test-15-netdata.pl
@@ -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+});
+}