← Back to branch summary

~ubuntu-branches/ubuntu/precise/nagios-plugins/precise-proposed

« back to all changes in this revision

Viewing changes to plugins/t/check_time.t

  • Committer: Bazaar Package Importer
  • Author(s): Guido Trotter
  • Date: 2004-06-15 15:37:48 UTC
  • Revision ID: james.westby@ubuntu.com-20040615153748-pq7702qdzghqfcns
Tags: upstream-1.3.1.0
Import upstream version 1.3.1.0

Show diffs side-by-side

added added

removed removed

Lines of Context:
plugins/t/check_time.t
 
1
#! /usr/bin/perl -w
 
2
 
 
3
use strict;
 
4
use Cache;
 
5
use Helper;
 
6
use Test;
 
7
use vars qw($tests);
 
8
 
 
9
BEGIN {$tests = 6; plan tests => $tests}
 
10
 
 
11
my $null = '';
 
12
my $cmd;
 
13
my $str;
 
14
my $t;
 
15
my $udp_hostname=get_option("udp_hostname","UDP host name");
 
16
 
 
17
# standard mode
 
18
 
 
19
$cmd = "./check_time -H $udp_hostname -w 999999,59 -c 999999,59 -t 60";
 
20
$str = `$cmd`;
 
21
$t += ok $?>>8,0;
 
22
print "Test was: $cmd\n" if ($?);
 
23
$t += ok $str, '/^TIME OK - [0-9]+ second time difference$/';
 
24
 
 
25
$cmd = "./check_time -H $udp_hostname -w 999999 -W 59 -c 999999 -C 59 -t 60";
 
26
$str = `$cmd`;
 
27
$t += ok $?>>8,0;
 
28
print "Test was: $cmd\n" if ($?);
 
29
$t += ok $str, '/^TIME OK - [0-9]+ second time difference$/';
 
30
 
 
31
# reverse compatibility mode
 
32
 
 
33
$cmd = "./check_time $udp_hostname -wt 59 -ct 59 -cd 999999 -wd 999999 -to 60";
 
34
$str = `$cmd`;
 
35
$t += ok $?>>8,0;
 
36
print "Test was: $cmd\n" if ($?);
 
37
$t += ok $str, '/^TIME OK - [0-9]+ second time difference$/';
 
38
 
 
39
# failure mode
 
40
 
 
41
#$cmd = "./check_time -H $Cache::nullhost -t 1";
 
42
#$str = `$cmd`;
 
43
#$t += ok $?>>8,255;
 
44
#print "Test was: $cmd\n" unless ($?);
 
45
 
 
46
#$cmd = "./check_time -H $Cache::noserver -t 1";
 
47
#$str = `$cmd`;
 
48
#$t += ok $?>>8,255;
 
49
#print "$cmd\n" unless ($?);
 
50
 
 
51
exit(0) if defined($Test::Harness::VERSION);
 
52
exit($tests - $t);