diff options
Diffstat (limited to 't/Nagios-Plugin-Performance.t')
-rw-r--r-- | t/Nagios-Plugin-Performance.t | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/t/Nagios-Plugin-Performance.t b/t/Nagios-Plugin-Performance.t index aa0ab64..b10a988 100644 --- a/t/Nagios-Plugin-Performance.t +++ b/t/Nagios-Plugin-Performance.t | |||
@@ -1,6 +1,6 @@ | |||
1 | 1 | ||
2 | use strict; | 2 | use strict; |
3 | use Test::More tests => 43; | 3 | use Test::More tests => 49; |
4 | BEGIN { use_ok('Nagios::Plugin::Performance') }; | 4 | BEGIN { use_ok('Nagios::Plugin::Performance') }; |
5 | 5 | ||
6 | use Nagios::Plugin::Base; | 6 | use Nagios::Plugin::Base; |
@@ -65,12 +65,13 @@ cmp_ok( $p[0]->threshold->critical, 'eq', "10", "crit okay"); | |||
65 | cmp_ok( $p[1]->label, "eq", "size", "label okay"); | 65 | cmp_ok( $p[1]->label, "eq", "size", "label okay"); |
66 | cmp_ok( $p[1]->value, "==", 426, "value okay"); | 66 | cmp_ok( $p[1]->value, "==", 426, "value okay"); |
67 | cmp_ok( $p[1]->uom, "eq", "B", "uom okay"); | 67 | cmp_ok( $p[1]->uom, "eq", "B", "uom okay"); |
68 | ok( ! defined $p[1]->threshold->warning, "warn okay"); | 68 | ok( ! $p[1]->threshold->warning->is_set, "warn okay"); |
69 | ok( ! defined $p[1]->threshold->critical, "crit okay"); | 69 | ok( ! $p[1]->threshold->critical->is_set, "crit okay"); |
70 | 70 | ||
71 | # RRDlabel testing | 71 | # Edge cases |
72 | @p = Nagios::Plugin::Performance->parse_perfstring("/home/a-m=0 shared-folder:big=20 12345678901234567890=20"); | 72 | @p = Nagios::Plugin::Performance->parse_perfstring("/home/a-m=0;0;0 shared-folder:big=20 12345678901234567890=20"); |
73 | cmp_ok( $p[0]->rrdlabel, "eq", "home_a_m", "changing / to _"); | 73 | cmp_ok( $p[0]->rrdlabel, "eq", "home_a_m", "changing / to _"); |
74 | ok( $p[0]->threshold->warning->is_set, "Warning range has been set"); | ||
74 | cmp_ok( $p[1]->rrdlabel, "eq", "shared_folder_big", "replacing bad characters"); | 75 | cmp_ok( $p[1]->rrdlabel, "eq", "shared_folder_big", "replacing bad characters"); |
75 | cmp_ok( $p[2]->rrdlabel, "eq", "1234567890123456789", "shortening rrd label"); | 76 | cmp_ok( $p[2]->rrdlabel, "eq", "1234567890123456789", "shortening rrd label"); |
76 | 77 | ||