From: David Schweikert <david@schweikert.ch>
Date: Wed, 30 Apr 2014 20:56:21 +0000 (+0200)
Subject: more tests
X-Git-Url: https://git.gsnw.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=ab006a5113b18c3e2cc9691879452b307303dc39;p=fping.git

more tests
---

diff --git a/ci/test-6-options-f-h.pl b/ci/test-6-options-f-h.pl
index 7756ae4..7ca7e8c 100755
--- a/ci/test-6-options-f-h.pl
+++ b/ci/test-6-options-f-h.pl
@@ -1,6 +1,6 @@
 #!/usr/bin/perl -w
 
-use Test::Command tests => 9;
+use Test::Command tests => 15;
 use Test::More;
 use Time::HiRes qw(gettimeofday tv_interval);
 use File::Temp;
@@ -38,3 +38,19 @@ $cmd->exit_is_num(0);
 $cmd->stdout_is_eq("127.0.0.1 is alive\n127.0.0.2 is alive\n");
 $cmd->stderr_is_eq("");
 }
+
+# fping -g
+{
+my $cmd = Test::Command->new(cmd => "fping -g 127.0.0.1/30");
+$cmd->exit_is_num(0);
+$cmd->stdout_is_eq("127.0.0.1 is alive\n127.0.0.2 is alive\n");
+$cmd->stderr_is_eq("");
+}
+
+# fping -H
+{
+my $cmd = Test::Command->new(cmd => "fping -H 1 127.0.0.1");
+$cmd->exit_is_num(0);
+$cmd->stdout_is_eq("127.0.0.1 is alive\n");
+$cmd->stderr_is_eq("");
+}