Mirrors/Munin-Contrib
1
0
Fork 0
mirror of https://github.com/munin-monitoring/contrib.git synced 2025-07-21 18:41:03 +00:00
Code Issues Releases Wiki Activity

Move some more plugins in their place.

Browse source
This commit is contained in:
Diego Elio Pettenò 2012-08-09 16:47:30 -07:00
parent 3bb2c5e2aa
commit d3a4f12d3f
14 changed files with 0 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

84
plugins/apache/apache_blackbox Executable file
View file

@ -0,0 +1,84 @@
#!/usr/bin/perl
#
# apache http status code monitoring
#
# luis peralta - luis@11870.com
# http://www.ziritione.org
#
# Installing: configure apache blackbox and set the logfile to /var/log/blackbox.log
# or change the BLACKBOXLOG setting bellow.
#
# Dependencies: apache mod_logio, apache blackbox
# http://www.devco.net/archives/2008/03/05/detailed_apache_stats.php
#
# Last version available at: http://www.ziritione.org/http_status
#
# Parameters:
#
# config
# autoconf
#
#%# family=auto
#%# capabilities=autoconf
use strict;
my $BLACKBOXLOG = "/var/log/blackbox.log";
my %WANTED = ( "apache.status.200" => "_200",
"apache.status.301" => "_301",
"apache.status.302" => "_302",
"apache.status.404" => "_404",
"apache.status.5xx" => "_5xx",
);
my $arg = shift();
if ($arg eq 'config') {
print_config();
exit();
} elsif ($arg eq 'autoconf') {
print "yes\n";
exit();
}
open(SERVICE, "<$BLACKBOXLOG")
or die("Could not open '$BLACKBOXLOG': $!");
while (<SERVICE>) {
my ($k, $v) = (m/(apache.status.*)=(\d+)/);
next unless ($k);
if (exists $WANTED{$k} ) {
print("$WANTED{$k}.value $v\n");
}
}
close(SERVICE);
sub print_config {
my $num = 0;
print("graph_title HTTP requests status
graph_args --base 1000
graph_vlabel requests / second
graph_category Network
graph_total total\n");
for my $key (sort { $WANTED{$a} cmp $WANTED{$b} } (keys %WANTED)) {
my $title = $WANTED{$key};
print("$title.label ${title}\n",
"$title.min 0\n",
"$title.type DERIVE\n",
"$title.max 500000\n",
#"$title.draw ", ($num) ? "STACK" : "AREA" , "\n",
"$title.draw ", ($num) ? "AREA" : "AREA" , "\n",
);
$num++;
}
}