]> git.gsnw.org Git - fping.git/commitdiff
more tests
authorDavid Schweikert <david@schweikert.ch>
Wed, 30 Apr 2014 20:56:21 +0000 (22:56 +0200)
committerDavid Schweikert <david@schweikert.ch>
Wed, 30 Apr 2014 20:56:21 +0000 (22:56 +0200)
ci/test-6-options-f-h.pl

index 7756ae4468fd30ba0e86183ca4e30ab0c5a63606..7ca7e8c3a06cbe31cb179263a58cc7b21cf913b2 100755 (executable)
@@ -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("");
+}