1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
|
#!/usr/bin/perl
#
# Veritas Cluster System monitor for Nagios.
# Written by Aaron Bostick (abostick@mydoconline.com)
# Last modified: 05-22-2002
#
# Usage: check_vcs {-g <vcs_group> | -r <vcs_resource> } -s <vcs_system> [-n]
#
# Description:
#
# This plugin is just a perl wrapper to the vcs commands hagrp and hares.
# You specify what group/resource and system you want the status for, and
# the plugin returns a status code based on the output of either hagrp or
# hares.
#
# Normal hagrp/hares status codes are ONLINE and OFFLINE depending on where the
# cluster service currently lives. I have added an option, -n, which makes
# the expected state to be OFFLINE rather than ONLINE so you can run the
# plugin on both sides of the cluster and will receive critical alerts when
# the cluster fails over i.e. a proper failover will make the standby node
# go from OFFLINE to ONLINE for the group, so an ONLINE status should alert
# you! (You do want to know when the cluster fails over, right? :))
#
# Output:
#
# This plugin returns OK when hagrp/hares -state <grp> -sys <system> returns
# ONLINE (or OFFLINE if -n is specified). Any other hagrp/hares string returns
# CRITICAL... Would a WARNING ever be justified??? UNKNOWN is returned if
# hagrp/hares cannot run for some reason.
#
# Examples:
#
# Make sure group oracle is ONLINE on server dbserver1:
# check_vcs -g oracle -s dbserver1
#
# Make sure group oracle is OFFLINE on server dbserver2:
# check_vcs -g oracle -s dbserver2 -n
#
# Make sure resource oraip is ONLINE on server dbserver1:
# check_vcs -r oraip -s dbserver1
#
# Make sure resource oraip is OFFLINE on server dbserver2:
# check_vcs -r oraip -s dbserver2 -n
#
BEGIN {
if ($0 =~ s/^(.*?)[\/\\]([^\/\\]+)$//) {
$prog_dir = $1;
$prog_name = $2;
}
}
require 5.004;
use lib $main::prog_dir;
use utils qw($TIMEOUT %ERRORS &print_revision &support);
use Getopt::Long;
sub print_usage ();
sub print_version ();
sub print_help ();
# Initialize strings
$vcs_bin = '/opt/VRTSvcs/bin';
$vcs_command = '';
$vcs_arg = '';
$vcs_group = '';
$vcs_resource = '';
$vcs_system = '';
$vcs_negate = '';
$vcs_result = '';
$vcs_expected_result = 'ONLINE';
$plugin_revision = '$Revision$ ';
# Grab options from command line
GetOptions
("g|group:s" => \$vcs_group,
"r|resouce:s" => \$vcs_resource,
"s|system=s" => \$vcs_system,
"n|negate" => \$vcs_negate,
"v|version" => \$version,
"h|help" => \$help);
(!$version) || print_version ();
(!$help) || print_help ();
(!$vcs_negate) || ($vcs_expected_result = 'OFFLINE');
# Make sure group and resource is not specified
!($vcs_group && $vcs_resource) || usage("Please specify either a group or a resource, but not both.\n");
# Make sure group or resource is specified
($vcs_group || $vcs_resource) || usage("HA group or resource not specified.\n");
# Make sure system is specified
($vcs_system) || usage("HA system not specified.\n");
# Specify proper command
if ($vcs_group) {
$vcs_command = 'hagrp';
$vcs_arg = $vcs_group;
} else {
$vcs_command = 'hares';
$vcs_arg = $vcs_resource;
}
# Run command and save output
$vcs_result = `$vcs_bin/$vcs_command -state $vcs_arg -sys $vcs_system`;
chomp ($vcs_result);
# If empty result, return UNKNOWN
if (!$vcs_result) {
print "UNKNOWN: Problem running $vcs_command...\n";
exit $ERRORS{'UNKNOWN'};
}
# If result is expected, return OK
# If result is not expected, return CRITICAL
if ($vcs_result eq $vcs_expected_result) {
print "OK: $vcs_command $vcs_arg is $vcs_result\n";
exit $ERRORS{'OK'};
} else {
print "CRITICAL: $vcs_command $vcs_arg is $vcs_result\n";
exit $ERRORS{'CRITICAL'};
}
#
# Subroutines
#
sub usage () {
print @_;
print_usage();
exit $ERRORS{'OK'};
}
sub print_usage () {
print "\nUsage: $prog_name { -g <vcs_group> | -r <vcs_resource> } -s <vcs_system> [-n]\n";
print "Usage: $prog_name [ -v | --version ]\n";
print "Usage: $prog_name [ -h | --help ]\n";
}
sub print_version () {
print_revision($prog_name, $plugin_revision);
exit $ERRORS{'OK'};
}
sub print_help () {
print_revision($prog_name, $plugin_revision);
print "\n";
print "Validate output from hagrp/hares command.\n";
print "\n";
print_usage();
print "\n";
print "-g, --group=<vcs_group>\n";
print " The HA group to be validated\n";
print "-r, --resource=<vcs_resource>\n";
print " The HA resource to be validated\n";
print "-s, --system=<vcs_system>\n";
print " The HA system where the group/resource lives\n";
print "-n, --negate=<negate>\n";
print " Set expected result to OFFLINE instead of ONLINE\n";
print "\n";
support();
exit $ERRORS{'OK'};
}
|