diff options
Diffstat (limited to '')
-rw-r--r-- | plugins/t/check_users.t | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/plugins/t/check_users.t b/plugins/t/check_users.t new file mode 100644 index 0000000..9ebc2fc --- /dev/null +++ b/plugins/t/check_users.t @@ -0,0 +1,30 @@ +#! /usr/bin/perl -w -I .. +# +# Logged in Users Tests via check_users +# +# Trick: This check requires at least 1 user logged in. These commands should +# leave a session open forever in the background: +# +# $ ssh -tt localhost </dev/null >/dev/null 2>/dev/null & +# $ disown %1 + +use strict; +use Test; +use NPTest; + +use vars qw($tests); +BEGIN {$tests = 8; plan tests => $tests} + +my $successOutput = '/^USERS OK - [0-9]+ users currently logged in/'; +my $failureOutput = '/^USERS CRITICAL - [0-9]+ users currently logged in/'; + +my $t; + +$t += checkCmd( "./check_users 1000 1000", 0, $successOutput ); +$t += checkCmd( "./check_users 0 0", 2, $failureOutput ); +$t += checkCmd( "./check_users -w 0:1000 -c 0:1000", 0, $successOutput ); +$t += checkCmd( "./check_users -w 0:0 -c 0:0", 2, $failureOutput ); + +exit(0) if defined($Test::Harness::VERSION); +exit($tests - $t); + |