Monitoring/monitor-utils
1
0
Fork 0
mirror of https://github.com/ranl/monitor-utils.git synced 2024-11-16 12:53:41 +01:00
Code Issues Releases Wiki Activity

add memory usage check (tested with PA VM-100)

Browse Source
This commit is contained in:
Martin Garbe 2017-08-21 13:45:36 +02:00
parent fc9c1902ab
commit e14c1d5633
1 changed files with 26 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
nagios/check-paloalto-A500.pl
View File

@ -51,6 +51,8 @@ my $s_pa_total_active_sessions = '.1.3.6.1.4.1.25461.2.1.2.3.3.0';
my $s_pa_total_tcp_active_sessions = '.1.3.6.1.4.1.25461.2.1.2.3.4.0'; my $s_pa_total_tcp_active_sessions = '.1.3.6.1.4.1.25461.2.1.2.3.4.0';
my $s_pa_total_udp_active_sessions = '.1.3.6.1.4.1.25461.2.1.2.3.5.0'; my $s_pa_total_udp_active_sessions = '.1.3.6.1.4.1.25461.2.1.2.3.5.0';
my $s_pa_total_icmp_active_sessions = '.1.3.6.1.4.1.25461.2.1.2.3.6.0'; my $s_pa_total_icmp_active_sessions = '.1.3.6.1.4.1.25461.2.1.2.3.6.0';
my $s_mgmt_max_mem = '.1.3.6.1.2.1.25.2.3.1.5.1020';
my $s_mgmt_used_mem = '.1.3.6.1.2.1.25.2.3.1.6.1020';
### Functions ### Functions
############### ###############
@ -72,7 +74,7 @@ sub FSyntaxError {
print "Version : $script_version\n"; print "Version : $script_version\n";
print "-H = Ip/Dns Name of the FW\n"; print "-H = Ip/Dns Name of the FW\n";
print "-C = SNMP Community\n"; print "-C = SNMP Community\n";
print "-t = Check type (currently only cpu/firmware/model/ha/sessions/icmp_sessions/tcp_sessions/udp_sessions)\n"; print "-t = Check type (currently only cpu/firmware/model/ha/sessions/icmp_sessions/tcp_sessions/udp_sessions/mgmt_used_mem)\n";
print "-w = Warning Value\n"; print "-w = Warning Value\n";
print "-c = Critical Value\n"; print "-c = Critical Value\n";
exit(3); exit(3);
@ -93,6 +95,7 @@ my $int;
while(@ARGV) { while(@ARGV) {
my $temp = shift(@ARGV); my $temp = shift(@ARGV);
if("$temp" eq '-H') { if("$temp" eq '-H') {
$switch = shift(@ARGV); $switch = shift(@ARGV);
} elsif("$temp" eq '-C') { } elsif("$temp" eq '-C') {
@ -224,6 +227,28 @@ elsif($check_type eq "icmp_sessions") {
$perf=""; $perf="";
} }
### management used memory ###
elsif($check_type eq "mgmt_used_mem") {
my $R_firm = $snmp_session->get_request(-varbindlist => [$s_mgmt_used_mem]);
my $mgmt_used_mem = "$R_firm->{$s_mgmt_used_mem}";
my $R_firm = $snmp_session->get_request(-varbindlist => [$s_mgmt_max_mem]);
my $mgmt_max_mem = "$R_firm->{$s_mgmt_max_mem}";
if($mgmt_used_mem > $crit ) {
$msg = "CRITICAL: Management Used Memory: $mgmt_used_mem";
$stat = 2;
} elsif($mgmt_used_mem > $warn ) {
$msg = "WARNING: Management Used Memory: $mgmt_used_mem";
$stat = 1;
} else {
$msg = "OK: Management Used Memory: $mgmt_used_mem";
$stat = 0;
}
$msg .= " - Max Management Memory: $mgmt_max_mem";
$perf="";
}
### firmware ### ### firmware ###
elsif($check_type eq "firmware") { elsif($check_type eq "firmware") {
my $R_firm = $snmp_session->get_request(-varbindlist => [$s_firmware_version]); my $R_firm = $snmp_session->get_request(-varbindlist => [$s_firmware_version]);