t/20-package_nagios.t

   1 #!/usr/bin/env perl
   2
   3 use warnings;
   4 use strict;
   5 use Test::More;
   6
   7 BEGIN {
   8     use lib('t');
   9     require TestUtils;
  10     import TestUtils;
  11     use FindBin;
  12     use lib "$FindBin::Bin/lib/lib/perl5";
  13 }
  14
  15 plan( tests => 24 );
  16
  17 ##################################################
  18 # create our test site
  19 my $omd_bin = TestUtils::get_omd_bin();
  20 my $site    = TestUtils::create_test_site() or TestUtils::bail_out_clean("no further testing without site");
  21
  22 ##################################################
  23 # execute some checks
  24 my $tests = [
  25   { cmd => $omd_bin." start $site" },
  26
  27   { cmd => "/bin/su - $site -c 'lib/nagios/plugins/check_http -H localhost -u /$site/nagios -e 401'",                  like => '/HTTP OK:/' },
  28   { cmd => "/bin/su - $site -c 'lib/nagios/plugins/check_http -H localhost -a omdadmin:omd -u /$site/nagios -e 301'",  like => '/HTTP OK:/' },
  29   { cmd => "/bin/su - $site -c 'lib/nagios/plugins/check_http -H localhost -a omdadmin:omd -u /$site/nagios/ -e 200'", like => '/HTTP OK:/' },
  30
  31   { cmd => $omd_bin." stop $site" },
  32 ];
  33 for my $test (@{$tests}) {
  34     TestUtils::test_command($test);
  35 }
  36
  37 ##################################################
  38 # cleanup test site
  39 TestUtils::remove_test_site($site);