~ubuntu-branches/ubuntu/vivid/libmonitoring-livestatus-class-perl/vivid-proposed

« back to all changes in this revision

Viewing changes to t/01-class_options.t

  • Committer: Package Import Robot
  • Author(s): Alexander Wirt
  • Date: 2012-09-23 12:52:44 UTC
  • Revision ID: package-import@ubuntu.com-20120923125244-tj2b60nma3530edj
Tags: upstream-0.3
ImportĀ upstreamĀ versionĀ 0.3

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
use strict;
 
2
use warnings;
 
3
use Test::More tests => 6;
 
4
use Data::Dumper;
 
5
 
 
6
use_ok('Monitoring::Livestatus::Class');
 
7
 
 
8
# single tcp connection
 
9
my $class = Monitoring::Livestatus::Class->new( peer => 'localhost:1234', );
 
10
isa_ok($class, "Monitoring::Livestatus::Class", 'tcp connection');
 
11
 
 
12
# single unix connection
 
13
$class = Monitoring::Livestatus::Class->new( peer => '/tmp/unix.socket', );
 
14
isa_ok($class, "Monitoring::Livestatus::Class", 'unix connection');
 
15
 
 
16
# complex multi config
 
17
$class = Monitoring::Livestatus::Class->new(
 
18
            peer      => [
 
19
                {
 
20
                    name => 'DMZ Monitoring',
 
21
                    peer => '50.50.50.50:9999',
 
22
                },
 
23
                {
 
24
                    name => 'Local Monitoring',
 
25
                    peer => '/tmp/livestatus.socket',
 
26
                },
 
27
                {
 
28
                    name => 'Special Monitoring',
 
29
                    peer => '100.100.100.100:9999',
 
30
                }
 
31
          ]);
 
32
isa_ok($class, "Monitoring::Livestatus::Class", 'multi connection');
 
33
 
 
34
# keepalive
 
35
$class = Monitoring::Livestatus::Class->new( peer => 'localhost:1234', keepalive => 1 );
 
36
isa_ok($class, "Monitoring::Livestatus::Class", 'keepalive option');
 
37
 
 
38
# verbose
 
39
$class = Monitoring::Livestatus::Class->new( peer => 'localhost:1234', verbose => 0 );
 
40
isa_ok($class, "Monitoring::Livestatus::Class", 'verbose option');