1
0
Fork 0
mirror of https://github.com/munin-monitoring/contrib.git synced 2025-07-21 18:41:03 +00:00

Save with UNIX line breaks

This commit is contained in:
Stig Sandbeck Mathisen 2014-10-04 22:29:27 +02:00
parent 96f2bc003a
commit b407ae17ca

View file

@ -1,96 +1,96 @@
#!/bin/bash #!/bin/bash
# -*- sh -*- # -*- sh -*-
: << =cut : << =cut
=head1 NAME =head1 NAME
glassfish_counters_ - Wildcard-plugin to monitor counters in GlassFish glassfish_counters_ - Wildcard-plugin to monitor counters in GlassFish
=head1 CONFIGURATION =head1 CONFIGURATION
This plugin does need the full path to the asadmin script: This plugin does need the full path to the asadmin script:
[glassfish_counters_*] [glassfish_counters_*]
env.ASADMIN /usr/local/glassfish/bin/asadmin env.ASADMIN /usr/local/glassfish/bin/asadmin
This is a wildcard plugin. To monitor an subtree, link This is a wildcard plugin. To monitor an subtree, link
glassfish_counters_<subtree> to this file. E.g. glassfish_counters_<subtree> to this file. E.g.
ln -s /usr/share/munin/plugins/glassfish_counters_ \ ln -s /usr/share/munin/plugins/glassfish_counters_ \
/etc/munin/plugins/glassfish_counters_server.web.request /etc/munin/plugins/glassfish_counters_server.web.request
...will monitor server.web.request.* ...will monitor server.web.request.*
To ignore certain counters, just add more "IGNORE" lines on top of To ignore certain counters, just add more "IGNORE" lines on top of
the awk script. (XXX: Fixme for env.) the awk script. (XXX: Fixme for env.)
=head1 AUTHOR =head1 AUTHOR
Philipp Buehler Philipp Buehler
=head1 LICENSE =head1 LICENSE
BSD 2-clause BSD 2-clause
=head1 VERSION =head1 VERSION
$Id: glassfish_counters_.in$ $Id: glassfish_counters_.in$
0.0.1 0.0.1
=cut =cut
[ -z $ASADMIN ] && { [ -z $ASADMIN ] && {
echo "ASADMIN not set in node configuration" echo "ASADMIN not set in node configuration"
exit 1 exit 1
} || MUN_AS_ADMIN=${ASADMIN} } || MUN_AS_ADMIN=${ASADMIN}
check_link () { check_link () {
scriptname=${0##*/} scriptname=${0##*/}
myself=${scriptname##*_} myself=${scriptname##*_}
if [ "x$myself" = "x" ] ; then if [ "x$myself" = "x" ] ; then
echo "plugin must be symlinked, e.g. to glassfish_counters_server.web.request" echo "plugin must be symlinked, e.g. to glassfish_counters_server.web.request"
exit 1 exit 1
fi fi
} }
SUBTREE=${0##*glassfish_counters_} SUBTREE=${0##*glassfish_counters_}
case $1 in case $1 in
suggest) suggest)
echo "not implemented" echo "not implemented"
exit 0 exit 0
;; ;;
config) config)
check_link check_link
$MUN_AS_ADMIN get -t --monitor=true "${SUBTREE}.*" | \ $MUN_AS_ADMIN get -t --monitor=true "${SUBTREE}.*" | \
awk 'BEGIN{ FS="[ = ]"} awk 'BEGIN{ FS="[ = ]"}
/requestcount/ { next; } # IGNORE /requestcount/ { next; } # IGNORE
/dotted-name/ { myself = $NF /dotted-name/ { myself = $NF
print "graph_title GlassFish", myself print "graph_title GlassFish", myself
print "graph_vlabel count" print "graph_vlabel count"
print "graph_category glassfish" print "graph_category glassfish"
print "graph_info this shows available counters from", myself print "graph_info this shows available counters from", myself
next next
} }
/-name / { nwhat = split($1, what, ".") /-name / { nwhat = split($1, what, ".")
gsub(/-name/, "", what[nwhat]) gsub(/-name/, "", what[nwhat])
print what[nwhat] ".label " $NF print what[nwhat] ".label " $NF
print what[nwhat] ".type GAUGE" print what[nwhat] ".type GAUGE"
} }
/-description / { nwhat = split($1, what, ".") /-description / { nwhat = split($1, what, ".")
gsub(/-description/, "", what[nwhat]) gsub(/-description/, "", what[nwhat])
$1 = ""; line = $0 $1 = ""; line = $0
gsub(/^ /,"", line) gsub(/^ /,"", line)
print what[nwhat] ".info " line print what[nwhat] ".info " line
} }
' '
exit 0 exit 0
;; ;;
esac esac
check_link check_link
$MUN_AS_ADMIN get -t --monitor=true "${SUBTREE}.*" | \ $MUN_AS_ADMIN get -t --monitor=true "${SUBTREE}.*" | \
awk 'BEGIN{ FS="[ = ]" } awk 'BEGIN{ FS="[ = ]" }
/requestcount/ { next;} # IGNORE /requestcount/ { next;} # IGNORE
/-count / { nwhat = split($1, what, ".") /-count / { nwhat = split($1, what, ".")
gsub(/-count/, "", what[nwhat]) gsub(/-count/, "", what[nwhat])
print what[nwhat] ".value " $NF} print what[nwhat] ".value " $NF}
' '