tyler.durden
/
centreon-plugins
mirror of https://github.com/centreon/centreon-plugins.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

bug #288 for plugins meta service 

git-svn-id: http://svn.centreon.com/trunk/plugins-2.x@6899 6bcd3966-0018-0410-8128-fd23d134de7e
This commit is contained in:
Julien Mathis 2008-10-23 22:00:58 +00:00
parent 33564078e7
commit 2fbb5c45bd
1 changed files with 67 additions and 61 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

128
centreon-plugins/src/check_meta_service
View File

@ -79,66 +79,72 @@ sub return_value($$$$){
$output =~ s/\%d/$result/g; $output =~ s/\%d/$result/g;
} }
if (defined($warning) && defined($critical) && $warning ne $critical){ if (defined($warning) && defined($critical) && $warning ne $critical){
if ($warning < $critical){ # Bon sens if ($warning < $critical){ # Bon sens
if ($result < $warning){ if ($result < $warning){
if ($output) { if ($output) {
print $output. "|value=" . $result . ";".$warning.";".$critical."\n"; print $output. "|value=" . $result . ";".$warning.";".$critical."\n";
}else { } else {
print "OK result : " . $result . "|value=" . $result . ";".$warning.";".$critical."\n"; print "OK result : " . $result . "|value=" . $result . ";".$warning.";".$critical."\n";
}
exit $ERRORS{'OK'};
} elsif (($result >= $warning) && ($result < $critical)){
if ($output) {
print $output. "|value=" . $result . ";".$warning.";".$critical."\n";
}else {
print "WARNING result : " . $result . "|value=" . $result . ";".$warning.";".$critical."\n";
}
exit $ERRORS{'WARNING'};
} elsif ($result >= $critical){
if ($output) {
print $output. "|value=" . $result . ";".$warning.";".$critical."\n";
}else {
print "CRITICAL result : " . $result . "|value=" . $result . ";".$warning.";".$critical."\n";
}
exit $ERRORS{'CRITICAL'};
}
} else { # sens inverse
if ($result < $critical){
if ($output) {
print $output. "|value=" . $result . ";".$warning.";".$critical."\n";
}else {
print "CRITICAL result : " . $result . "|value=" . $result . ";".$warning.";".$critical."\n";
}
exit $ERRORS{'CRITICAL'};
} elsif ($result >= $critical && $result < $warning){
if ($output) {
print $output. "|value=" . $result . ";".$warning.";".$critical."\n";
}else {
print "WARNING result : " . $result . "|value=" . $result . ";".$warning.";".$critical."\n";
}
exit $ERRORS{'WARNING'};
} elsif ($result >= $warning){
if ($output) {
print $output. "|value=" . $result . ";".$warning.";".$critical."\n";
}else {
print "OK result : " . $result . "|value=" . $result . ";".$warning.";".$critical."\n";
}
exit $ERRORS{'OK'};
} else{
if ($output) {
print $output. "|value=" . $result . ";".$warning.";".$critical."\n";
}else {
print "OK result : " . $result . "|value=" . $result . ";".$warning.";".$critical."\n";
}
exit $ERRORS{'OK'};
}
} }
exit $ERRORS{'OK'};
} elsif (($result >= $warning) && ($result < $critical)){
if ($output) {
print $output. "|value=" . $result . ";".$warning.";".$critical."\n";
}else {
print "WARNING result : " . $result . "|value=" . $result . ";".$warning.";".$critical."\n";
}
exit $ERRORS{'WARNING'};
} elsif ($result >= $critical){
if ($output) {
print $output. "|value=" . $result . ";".$warning.";".$critical."\n";
}else {
print "CRITICAL result : " . $result . "|value=" . $result . ";".$warning.";".$critical."\n";
}
exit $ERRORS{'CRITICAL'};
}
} else { # sens inverse
if ($result < $critical){
if ($output) {
print $output. "|value=" . $result . ";".$warning.";".$critical."\n";
}else {
print "CRITICAL result : " . $result . "|value=" . $result . ";".$warning.";".$critical."\n";
}
exit $ERRORS{'CRITICAL'};
} elsif ($result >= $critical && $result < $warning){
if ($output) {
print $output. "|value=" . $result . ";".$warning.";".$critical."\n";
}else {
print "WARNING result : " . $result . "|value=" . $result . ";".$warning.";".$critical."\n";
}
exit $ERRORS{'WARNING'};
} elsif ($result >= $warning){
if ($output) {
print $output. "|value=" . $result . ";".$warning.";".$critical."\n";
}else {
print "OK result : " . $result . "|value=" . $result . ";".$warning.";".$critical."\n";
}
exit $ERRORS{'OK'};
} else{
if ($output) {
print $output. "|value=" . $result . ";".$warning.";".$critical."\n";
}else {
print "OK result : " . $result . "|value=" . $result . ";".$warning.";".$critical."\n";
}
exit $ERRORS{'OK'};
}
}
} elsif (!defined($warning) || !defined($critical)) { } elsif (!defined($warning) || !defined($critical)) {
print "Result : " . $result . "|value=" . $result . "\n"; if ($output) {
exit $ERRORS{'OK'}; if ($output) {
print $output. "|value=" . $result . "\n";
} else {
print "OK result : " . $result . "|value=" . $result . "\n";
}
}
exit $ERRORS{'OK'};
} else { } else {
print "ERROR : warnig level = critical level"; print "ERROR : warnig level = critical level";
exit $ERRORS{'CRITICAL'}; exit $ERRORS{'CRITICAL'};
} }
} }
@ -151,7 +157,7 @@ my $host_id;
sub get_value_in_database_metric_id($$$$){ sub get_value_in_database_metric_id($$$$){
## Get last entry in perfparse database for this service ## Get last entry in perfparse database for this service
my $str = "SELECT value FROM data_bin WHERE id_metric = '".$metric_id."'"; my $str = "SELECT value FROM data_bin WHERE id_metric = '".$metric_id."' ORDER BY ctime DESC LIMIT 1";
if ($debug) {print $str . "\n";} if ($debug) {print $str . "\n";}
my $sth_deb2 = $dbh2->prepare($str); my $sth_deb2 = $dbh2->prepare($str);
if (!$sth_deb2->execute) {die "Error:" . $sth_deb2->errstr . "\n";} if (!$sth_deb2->execute) {die "Error:" . $sth_deb2->errstr . "\n";}
@ -175,7 +181,7 @@ service.service_id = host_service_relation.service_service_id AND service.servic
my $data = $host_data->fetchrow_hashref(); my $data = $host_data->fetchrow_hashref();
## Get last entry in perfparse database for this service ## Get last entry in perfparse database for this service
my $sth_deb2 = $dbh2->prepare("SELECT value FROM metrics m, data_bin d, index_data i WHERE i.host_name = '".$data->{'host_name'}."' AND i.service_description = '".$data->{'service_description'}."' AND and m.index_id=i.id AND m.metric_id = d.id_metric AND m.metric_name = '".$metric."'"); my $sth_deb2 = $dbh2->prepare("SELECT value FROM metrics m, data_bin d, index_data i WHERE i.host_name = '".$data->{'host_name'}."' AND i.service_description = '".$data->{'service_description'}."' AND and m.index_id=i.id AND m.metric_id = d.id_metric AND m.metric_name = '".$metric."' ORDER BY ctime DESC LIMIT 1");
if (!$sth_deb2->execute) {die "Error:" . $sth_deb2->errstr . "\n";} if (!$sth_deb2->execute) {die "Error:" . $sth_deb2->errstr . "\n";}
my $sth_deb2_data = $sth_deb2->fetchrow_hashref(); my $sth_deb2_data = $sth_deb2->fetchrow_hashref();
return $sth_deb2_data->{'value'}; return $sth_deb2_data->{'value'};
@ -195,7 +201,7 @@ sub get_value_in_database_by_host($$$$$){
## Get last entry in perfparse database for this service ## Get last entry in perfparse database for this service
my $sth_deb2 = $dbh2->prepare("SELECT value FROM metrics m, data_bin d, index_data i WHERE i.host_name = '".$data->{'host_name'}."' AND i.service_description = '".$data->{'service_description'}."' AND m.index_id=i.id AND m.metric_id = d.id_metric AND m.metric_name = '".$metric."'"); my $sth_deb2 = $dbh2->prepare("SELECT value FROM metrics m, data_bin d, index_data i WHERE i.host_name = '".$data->{'host_name'}."' AND i.service_description = '".$data->{'service_description'}."' AND m.index_id=i.id AND m.metric_id = d.id_metric AND m.metric_name = '".$metric."' ORDER BY ctime DESC LIMIT 1");
if (!$sth_deb2->execute) {die "Error:" . $sth_deb2->errstr . "\n";} if (!$sth_deb2->execute) {die "Error:" . $sth_deb2->errstr . "\n";}
my $sth_deb2_data = $sth_deb2->fetchrow_hashref(); my $sth_deb2_data = $sth_deb2->fetchrow_hashref();
return $sth_deb2_data->{'value'}; return $sth_deb2_data->{'value'};
@ -220,7 +226,7 @@ sub get_value_in_database_by_hg($$$$$$){
## Get last entry in perfparse database for this service ## Get last entry in perfparse database for this service
my $sth_deb2 = $dbh2->prepare("SELECT value FROM metrics m, data_bin d, index_data i WHERE i.host_name = '".$host_data->{'host_name'}."' AND i.service_description = '".$service_data->{'service_description'}."' AND m.index_id=i.id AND m.metric_id = d.id_metric AND m.metric_name = '".$metric."'"); my $sth_deb2 = $dbh2->prepare("SELECT value FROM metrics m, data_bin d, index_data i WHERE i.host_name = '".$host_data->{'host_name'}."' AND i.service_description = '".$service_data->{'service_description'}."' AND m.index_id=i.id AND m.metric_id = d.id_metric AND m.metric_name = '".$metric."' ORDER BY ctime DESC LIMIT 1");
if (!$sth_deb2->execute) {die "Error:" . $sth_deb2->errstr . "\n";} if (!$sth_deb2->execute) {die "Error:" . $sth_deb2->errstr . "\n";}
my $sth_deb2_data = $sth_deb2->fetchrow_hashref(); my $sth_deb2_data = $sth_deb2->fetchrow_hashref();
return $sth_deb2_data->{'value'}; return $sth_deb2_data->{'value'};