diff options
Diffstat (limited to 'nagios-plugins-contrib-24.20190301~bpo9+1/check_mysql_health/check_mysql_health-2.2.2/contrib')
3 files changed, 577 insertions, 0 deletions
diff --git a/nagios-plugins-contrib-24.20190301~bpo9+1/check_mysql_health/check_mysql_health-2.2.2/contrib/CheckMySQLHealthExt1.pm b/nagios-plugins-contrib-24.20190301~bpo9+1/check_mysql_health/check_mysql_health-2.2.2/contrib/CheckMySQLHealthExt1.pm new file mode 100755 index 0000000..c5bb9d3 --- /dev/null +++ b/nagios-plugins-contrib-24.20190301~bpo9+1/check_mysql_health/check_mysql_health-2.2.2/contrib/CheckMySQLHealthExt1.pm @@ -0,0 +1,68 @@ +package MyQueue; + +our @ISA = qw(DBD::MySQL::Server); + +sub init { + my $self = shift; + my %params = @_; + $self->{running} = 0; + $self->{waiting} = 0; + $self->{held} = 20; + $self->{cancelled} = 0; + $self->{length} = 100; + if ($params{mode} =~ /my::queue::status/) { + ($self->{running}, $self->{waiting}, $self->{held}, $self->{cancelled}) = + $self->{handle}->fetchrow_array(q{ + SELECT COUNT(*) FROM queues WHERE + status IN ('running', 'waiting', 'held', 'cancelled') + GROUP BY status + }); + } elsif ($params{mode} =~ /my::queue::length/) { + $self->{length} = $self->{handle}->fetchrow_array(q{ + SELECT COUNT(*) FROM queues + }); + } elsif ($params{mode} =~ /my::queue::througput/) { + $self->{processed_items} = $self->{handle}->fetchrow_array(q{ + SELECT processed FROM queue_status + }); + $self->valdiff(\%params, qw(processed_items)); + # this automatically creates + # $self->{delta_timestamp} + # the time in seconds since the last run of check_mysql_health + # $self->{delta_processed_items} + # the difference between processed_items now and + # processed_items when check_mysql_health was run last time + $self->{throughput} = $self->{delta_processed_items} / $self->{delta_timestamp}; + } else { + } +} + +sub nagios { + my $self = shift; + my %params = @_; + if ($params{mode} =~ /my::queue::status/) { + if ($self->{held} > 10 || $self->{cancelled} > 10) { + $self->add_nagios_critical("more than 10 queues are held or cancelled"); + } elsif ($self->{waiting} > 20 && $self->{running} < 3) { + $self->add_nagios_warning("more than 20 queues are waiting and less than 3 queues are running"); + } else { + $self->add_nagios_ok("queues are running normal"); + } + $self->add_perfdata(sprintf "held=%d cancelled=%d waiting=%d running=%d", + $self->{running}, $self->{waiting}, $self->{held}, $self->{cancelled}); + } elsif ($params{mode} =~ /my::queue::length/) { + $self->add_nagios( + $self->check_thresholds($self->{length}, 100, 500), + sprintf "queue length is %d", $self->{length}); + $self->add_perfdata(sprintf "queuelen=%d;%d;%d", + $self->{length}, $self->{warningrange}, $self->{criticalrange}); + } elsif ($params{mode} =~ /my::queue::througput/) { + $self->add_nagios( + $self->check_thresholds($self->{throughput}, "50:", "10:"), + sprintf "queue throughput is %d", $self->{throughput}); + $self->add_perfdata(sprintf "throughput=%.2f;%d;%d", + $self->{throughput}, $self->{warningrange}, $self->{criticalrange}); + } else { + $self->add_nagios_unknown("unknown mode"); + } +} diff --git a/nagios-plugins-contrib-24.20190301~bpo9+1/check_mysql_health/check_mysql_health-2.2.2/contrib/README.my-extensions b/nagios-plugins-contrib-24.20190301~bpo9+1/check_mysql_health/check_mysql_health-2.2.2/contrib/README.my-extensions new file mode 100755 index 0000000..92aec08 --- /dev/null +++ b/nagios-plugins-contrib-24.20190301~bpo9+1/check_mysql_health/check_mysql_health-2.2.2/contrib/README.my-extensions @@ -0,0 +1,139 @@ +# you will find instructions how to write extensions here
+
+Self-written code is addressed by using a mode which starts with my-
+--mode=my-thing-does ?
+
+check_mysql_health will then look for a package named MyThing.
+
+So you first have to write a Module which describes MyThing. Such a thing iinherits from DBD::MySQL::Server and needs two methods: init and nagios.
+
+Start with a file called CheckMySQLHealthExt1.pm and skeleton code:
+
+###################################################
+package MyThing;
+
+our @ISA = qw(DBD::MySQL::Server);
+
+sub init {
+ my $self = shift;
+ my %params = @_;
+}
+
+sub nagios {
+ my $self = shift;
+ my %params = @_;
+}
+###################################################
+
+When you call check_mysql_health with --mode=my-thing-does, it will
+- create a DBD::MySQL::Server object
+ $obj = DBD::MySQL::Server->new()
+- connect to the database
+ $obj->connect()
+- re-bless the object
+ bless $obj, "MyThing"
+- call $obj->init()
+- if that was ok, call $obj->nagios()
+
+
+So you need to write code which
+- initializes the parameters you want to check
+- calculates the nagios result from these parameters
+
+For your convenience there are some predefined methods and variables:
+
+Variable $self
+ $self is a hash-based object of type My::Thing
+ You can pass metrics from the init() method to the nagios() method by
+ adding attributes to the hash.
+ One important predefined attribute is $self->{handle} which points to
+ a database Connection object. You surely will use this.
+
+Variable %params
+ $params{mode} contains the string you passed to the
+ --mode command line parameter, only with the "-" replaced by "::".
+ In the above example it will be "my::thing::does".
+ Because you can have only one init() method for your MyThing object but
+ more than one related modes (my-thing-does, my-thing-length, my-thing-rate)
+ you use $params{mode} for branching in your code. (see the example file)
+
+Method add_nagios
+ $self->add_nagios(1, "i warn you");
+ This method can be called several times. The messages will be concatenated.
+ The first parameter is one of 0..3 and sets the nagios level. The worst level
+ among several calls to add_nagios will determine the plugin's exit code.
+
+Method add_nagios_[ok|warning|critical|unknown]
+ $self->add_nagios_critical("i warned you!!! now it's too late");
+ $self->add_nagios_ok("everything is ok. i am the exit message");
+ These methods are wrappers for add_nagios which make your code more readable.
+
+Method add_perfdata
+ $self->add_perfdata("metric1=0 metric2=100");
+ $self->add_perfdata("metric3=0);
+ $self->add_perfdata(sprintf "metric_xy=%d", $self->{xy});
+ You can call add_perfdata as often as you like.
+ The strings will be concatenated.
+
+Method valdiff
+ $self->valdiff(\%params, qw(metric1 metric2));
+ Use this if you want to know how a metric has changed since the last run
+ of check_mysql_health.
+ Provided you have attributes metric1 and metric2 this method will create
+ new attributes for your $self object.
+ $self->{delta_metric1} which is the difference between the value of
+ $self->{metric1} during the current run and $self->{metric1} during the
+ last run.
+ $self->{delta_timestamp} which is the number of seconds which passed
+ since the last run of check_mysql_health.
+ If you have ever-growing values, you can simply calculate the rate:
+ $self->{metric1_per_second} = $self->{delta_metric1} / $self->{delta_timestamp}
+ The valdiff method will automatically save the current value to a state file
+ and read the past value from this file.
+ If you used the --name parameter which appears as $params{name} in your code
+ then you probably need to separate the saved values from each other. Otherwise
+ name1 would read the same saved value as name2. They would overwrite the
+ saved values. Use $params{differentiator} to use different state files.
+ $params{differenciator} = lc $self->{name};
+ $self->valdiff(\%params, qw(gets misses));
+
+Method fetchrow_array
+ my($column1, $column2) = $self->{handle}->fetchrow_array(q{
+ SELECT col1, col2 FROM table1 where col1 = 'val1'
+ });
+ $self->{connected_users} = $self->{handle}->fetchrow_array(q{
+ SELECT COUNT(*) FROM v$session WHERE type = 'USER'
+ });
+ This method is used like the Perl DBI method fetchrow_array.
+
+
+Method fetchall_array
+ my @results = $self->{handle}->fetchall_array(q{
+ SELECT col1, col2, col3 FROM table1
+ });
+ foreach (@results) {
+ my($column1, $column2, $column3) = @{$_};
+ ...
+ }
+ This method is used like the Perl DBI method fetchall_array.
+
+
+
+
+Now you have written your first extension to check_mysql_health. Maybe you
+just modified the example file contrib/CheckMySQLHealthExt1.pm
+There are two methods how to import your own code into check_mysql_health:
+
+- the static method
+with ./configure --with-mymodules-dir=<dir> parameter you build a plugin which
+contains both my code and your code in a single file. When you call "make"
+every file in <dir> which matches CheckMySQLHealthExt*.pm is appended
+to the final plugin check_mysql_health.
+
+- the dynamic method
+with ./configure --with-mymodules-dyn-dir=<dir> you build a plugin which will
+search at runtime the <dir> for files matching CheckMySQLHealthExt*.pm and
+import them. This way you can have different extensions on different hosts.
+You also can modify your extension without having to rebuild the plugin.
+On the other hand you have to distribute your extensions along with the plugin.
+
diff --git a/nagios-plugins-contrib-24.20190301~bpo9+1/check_mysql_health/check_mysql_health-2.2.2/contrib/check_mysql_health.php b/nagios-plugins-contrib-24.20190301~bpo9+1/check_mysql_health/check_mysql_health-2.2.2/contrib/check_mysql_health.php new file mode 100755 index 0000000..8bcd516 --- /dev/null +++ b/nagios-plugins-contrib-24.20190301~bpo9+1/check_mysql_health/check_mysql_health-2.2.2/contrib/check_mysql_health.php @@ -0,0 +1,370 @@ +<?php
+#
+# Copyright (c) 2009 Gerhard Lausser (gerhard.lausser@consol.de)
+# Plugin: check_mysql_health (http://www.consol.com/opensource/nagios/check-mysql-health)
+# Release 1.0 2009-03-02
+#
+# This is a template for the visualisation addon PNP (http://www.pnp4nagios.org)
+#
+
+$defcnt = 1;
+
+$green = "33FF00E0";
+$yellow = "FFFF00E0";
+$red = "F83838E0";
+$now = "FF00FF";
+$ds_count = count($DS);
+
+for ($i = 1; $i <= $ds_count; $i++) {
+ $warning = ($WARN[$i] != "") ? $WARN[$i] : "";
+ $warnmin = ($WARN_MIN[$i] != "") ? $WARN_MIN[$i] : "";
+ $warnmax = ($WARN_MAX[$i] != "") ? $WARN_MAX[$i] : "";
+ $critical = ($CRIT[$i] != "") ? $CRIT[$i] : "";
+ $critmin = ($CRIT_MIN[$i] != "") ? $CRIT_MIN[$i] : "";
+ $critmax = ($CRIT_MAX[$i] != "") ? $CRIT_MAX[$i] : "";
+ $minimum = ($MIN[$i] != "") ? $MIN[$i] : "";
+ $maximum = ($MAX[$i] != "") ? $MAX[$i] : "";
+
+ if(preg_match('/^pct_open_files$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Open Files Usage";
+ $opt[$defcnt] = "--vertical-label \"Percent\" --title \"Open files usage on $hostname\" --upper-limit 100 --lower-limit 0";
+ $def[$defcnt] = "";
+ $def[$defcnt] .= "DEF:openfiles_pct=$RRDFILE[$i]:$DS[$i]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "AREA:openfiles_pct#111111:\" \" ";
+ $def[$defcnt] .= "VDEF:vopenfiles=openfiles_pct,LAST " ;
+ $def[$defcnt] .= "GPRINT:vopenfiles:\"Open files usage is %3.2lf percent\\n\" " ;
+ $defcnt++;
+ }
+ if(preg_match('/^connects_aborted_per_sec$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Aborted connections per second";
+ $opt[$defcnt] = "--vertical-label \"Seconds\" --title \"Aborted connections per second on $hostname\" ";
+ $def[$defcnt] = "";
+ $def[$defcnt] .= "DEF:aborted_conn=$RRDFILE[$i]:$DS[$i]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "AREA:aborted_conn#444444:\" \" ";
+ $def[$defcnt] .= "VDEF:vaborted_conn=aborted_conn,LAST " ;
+ $def[$defcnt] .= "GPRINT:vaborted_conn:\"Aborted connections per sec is %3.2lf \\n\" " ;
+ $defcnt++;
+ }
+ if(preg_match('/^connection_time$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Time to connect";
+ $opt[$defcnt] = "--vertical-label \"Seconds\" --title \"Time to establish a connection to $hostname\" ";
+ $def[$defcnt] = "";
+ $def[$defcnt] .= "DEF:connectiontime=$RRDFILE[$i]:$DS[$i]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "AREA:connectiontime#111111 ";
+ $def[$defcnt] .= "VDEF:vconnetiontime=connectiontime,LAST " ;
+ $def[$defcnt] .= "GPRINT:vconnetiontime:\"is %3.2lf Seconds \" " ;
+ $defcnt++;
+ }
+ if(preg_match('/^uptime$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Uptime";
+ $opt[$defcnt] = "--vertical-label \"Seconds\" --title \"Uptime of the database at $hostname\" ";
+ $def[$defcnt] = "";
+ $def[$defcnt] .= "DEF:uptime=$RRDFILE[$i]:$DS[$i]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "AREA:uptime#111111 ";
+ $def[$defcnt] .= "CDEF:uptimed=uptime,86400,/ " ;
+ $def[$defcnt] .= "CDEF:uptimew=uptimed,7,/ " ;
+ $def[$defcnt] .= "VDEF:vuptime=uptime,LAST " ;
+ $def[$defcnt] .= "VDEF:vuptimed=uptimed,LAST " ;
+ $def[$defcnt] .= "VDEF:vuptimew=uptimew,LAST " ;
+ $def[$defcnt] .= "GPRINT:vuptime:\"%.0lf Seconds \" " ;
+ $def[$defcnt] .= "GPRINT:vuptimed:\"%.0lf Days \" " ;
+ $def[$defcnt] .= "GPRINT:vuptimew:\"%.0lf Weeks \" " ;
+ $defcnt++;
+ }
+ if(preg_match('/^index_usage_now$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Index usage";
+ $opt[$defcnt] = "--vertical-label \"Percent\" --title \"Index usage $hostname\" --upper-limit 100 --lower-limit 0 ";
+ $def[$defcnt] = "";
+ for ($ii = 1; $ii <= $ds_count; $ii++) {
+ if(preg_match('/^index_usage$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:indexusage=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "CDEF:ar=indexusage,$CRIT_MIN[$ii],LE,indexusage,0,GT,INF,UNKN,IF,UNKN,IF,ISINF,indexusage,0,IF ";
+ $def[$defcnt] .= "CDEF:ay=indexusage,$WARN_MIN[$ii],LE,indexusage,$CRIT_MIN[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,indexusage,0,IF ";
+ $def[$defcnt] .= "CDEF:ag=indexusage,100,LE,indexusage,$WARN_MIN[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,indexusage,0,IF ";
+ $def[$defcnt] .= "AREA:ag#$green: " ;
+ $def[$defcnt] .= "AREA:ay#$yellow: " ;
+ $def[$defcnt] .= "AREA:ar#$red: " ;
+ $def[$defcnt] .= "LINE:indexusage#111111:\" \" ";
+ $def[$defcnt] .= "VDEF:vindexusage=indexusage,LAST " ;
+ $def[$defcnt] .= "GPRINT:vindexusage:\"Index usage (since epoch) is %3.2lf percent\\n\" " ;
+ }
+ if(preg_match('/^index_usage_now$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:indexusagenow=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "LINE1.5:indexusagenow#$now:\" \" ";
+ $def[$defcnt] .= "VDEF:vindexusagenow=indexusagenow,LAST " ;
+ $def[$defcnt] .= "GPRINT:vindexusagenow:\"Index usage (current) is %3.2lf percent\\n\" ";
+ }
+ }
+ $defcnt++;
+ }
+ if(preg_match('/^bufferpool_hitrate_now$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Innodb buffer pool hitrate";
+ $opt[$defcnt] = "--vertical-label \"Percent\" --title \"Innodb buffer pool hitrate on $hostname\" --upper-limit 100 --lower-limit 0 ";
+ $def[$defcnt] = "";
+ for ($ii = 1; $ii <= $ds_count; $ii++) {
+ if(preg_match('/^bufferpool_hitrate$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:hitrate=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "CDEF:ar=hitrate,$CRIT_MIN[$ii],LE,hitrate,0,GT,INF,UNKN,IF,UNKN,IF,ISINF,hitrate,0,IF ";
+ $def[$defcnt] .= "CDEF:ay=hitrate,$WARN_MIN[$ii],LE,hitrate,$CRIT_MIN[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,hitrate,0,IF ";
+ $def[$defcnt] .= "CDEF:ag=hitrate,100,LE,hitrate,$WARN_MIN[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,hitrate,0,IF ";
+ $def[$defcnt] .= "AREA:ag#$green: " ;
+ $def[$defcnt] .= "AREA:ay#$yellow: " ;
+ $def[$defcnt] .= "AREA:ar#$red: " ;
+ $def[$defcnt] .= "LINE1.5:hitrate#111111:\" \" ";
+ $def[$defcnt] .= "VDEF:vhitrate=hitrate,LAST " ;
+ $def[$defcnt] .= "GPRINT:vhitrate:\"Hitratio (since epoch) is %3.2lf percent \\n\" ";
+ }
+ if(preg_match('/^bufferpool_hitrate_now$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:hitratenow=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "LINE1.5:hitratenow#$now:\" \" ";
+ $def[$defcnt] .= "VDEF:vhitratenow=hitratenow,LAST " ;
+ $def[$defcnt] .= "GPRINT:vhitratenow:\"Hitratio (current) is %3.2lf percent \\n\" ";
+ }
+ }
+ $defcnt++;
+ }
+ if(preg_match('/^bufferpool_free_waits_rate$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Innodb buffer pool waits rate";
+ $opt[$defcnt] = "--vertical-label \"Waits/sec\" --title \"Innodb buffer pool waits on $hostname\" ";
+ $def[$defcnt] = "";
+ $def[$defcnt] .= "DEF:logwait=$RRDFILE[$i]:$DS[$i]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "AREA:logwait#111111 ";
+ $def[$defcnt] .= "VDEF:vlogwait=logwait,LAST " ;
+ $def[$defcnt] .= "GPRINT:vlogwait:\"Rate is %3.2lf Waits / Second \" " ;
+ $defcnt++;
+ }
+ if(preg_match('/^innodb_log_waits_rate$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Innodb log buffer waits rate";
+ $opt[$defcnt] = "--vertical-label \"Waits/sec\" --title \"Innodb waits for log buffer $hostname\" ";
+ $def[$defcnt] = "";
+ $def[$defcnt] .= "DEF:logwait=$RRDFILE[$i]:$DS[$i]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "AREA:logwait#111111 ";
+ $def[$defcnt] .= "VDEF:vlogwait=logwait,LAST " ;
+ $def[$defcnt] .= "GPRINT:vlogwait:\"Rate is %3.2lf Waits / Second \" " ;
+ $defcnt++;
+ }
+ if(preg_match('/^long_running_procs$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Long running processes";
+ $opt[$defcnt] = "--vertical-label \"Processes\" --title \"Long running processes (>60s) on $hostname\" ";
+ $def[$defcnt] = "";
+ $def[$defcnt] .= "DEF:longrun=$RRDFILE[$i]:$DS[$i]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "AREA:longrun#111111 ";
+ $def[$defcnt] .= "VDEF:vlongrun=longrun,LAST " ;
+ $def[$defcnt] .= "GPRINT:vlongrun:\"%.0lf long running processes \" " ;
+ $defcnt++;
+ }
+ if(preg_match('/^keycache_hitrate_now$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "MyISAM key cache hitrate";
+ $opt[$defcnt] = "--vertical-label \"Percent\" --title \"MyISAM key cache hitrate on $hostname\" --upper-limit 100 --lower-limit 0 ";
+ $def[$defcnt] = "";
+ for ($ii = 1; $ii <= $ds_count; $ii++) {
+ if(preg_match('/^keycache_hitrate$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:hitrate=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "CDEF:ar=hitrate,$CRIT_MIN[$ii],LE,hitrate,0,GT,INF,UNKN,IF,UNKN,IF,ISINF,hitrate,0,IF ";
+ $def[$defcnt] .= "CDEF:ay=hitrate,$WARN_MIN[$ii],LE,hitrate,$CRIT_MIN[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,hitrate,0,IF ";
+ $def[$defcnt] .= "CDEF:ag=hitrate,100,LE,hitrate,$WARN_MIN[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,hitrate,0,IF ";
+ $def[$defcnt] .= "AREA:ag#$green: " ;
+ $def[$defcnt] .= "AREA:ay#$yellow: " ;
+ $def[$defcnt] .= "AREA:ar#$red: " ;
+ $def[$defcnt] .= "LINE1.5:hitrate#111111:\" \" ";
+ $def[$defcnt] .= "VDEF:vhitrate=hitrate,LAST " ;
+ $def[$defcnt] .= "GPRINT:vhitrate:\"Hitratio (since epoch) is %3.2lf percent \\n\" ";
+ }
+ if(preg_match('/^keycache_hitrate_now$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:hitratenow=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "LINE1.5:hitratenow#$now:\" \" ";
+ $def[$defcnt] .= "VDEF:vhitratenow=hitratenow,LAST " ;
+ $def[$defcnt] .= "GPRINT:vhitratenow:\"Hitratio (current) is %3.2lf percent \\n\" ";
+ }
+ }
+ $defcnt++;
+ }
+ if(preg_match('/^qcache_hitrate_now$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Query cache hitrate";
+ $opt[$defcnt] = "--vertical-label \"Percent\" --title \"Query cache hitrate on $hostname\" --upper-limit 100 --lower-limit 0 ";
+ $def[$defcnt] = "";
+ for ($ii = 1; $ii <= $ds_count; $ii++) {
+ if(preg_match('/^qcache_hitrate$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:hitrate=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "CDEF:ar=hitrate,$CRIT_MIN[$ii],LE,hitrate,0,GT,INF,UNKN,IF,UNKN,IF,ISINF,hitrate,0,IF ";
+ $def[$defcnt] .= "CDEF:ay=hitrate,$WARN_MIN[$ii],LE,hitrate,$CRIT_MIN[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,hitrate,0,IF ";
+ $def[$defcnt] .= "CDEF:ag=hitrate,100,LE,hitrate,$WARN_MIN[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,hitrate,0,IF ";
+ $def[$defcnt] .= "AREA:ag#$green: " ;
+ $def[$defcnt] .= "AREA:ay#$yellow: " ;
+ $def[$defcnt] .= "AREA:ar#$red: " ;
+ $def[$defcnt] .= "LINE1.5:hitrate#111111:\" \" ";
+ $def[$defcnt] .= "VDEF:vhitrate=hitrate,LAST " ;
+ $def[$defcnt] .= "GPRINT:vhitrate:\"Hitratio (since epoch) is %3.2lf percent \\n\" ";
+ }
+ if(preg_match('/^qcache_hitrate_now$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:hitratenow=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "LINE1.5:hitratenow#$now:\" \" ";
+ $def[$defcnt] .= "VDEF:vhitratenow=hitratenow,LAST " ;
+ $def[$defcnt] .= "GPRINT:vhitratenow:\"Hitratio (current) is %3.2lf percent \\n\" ";
+ }
+ }
+ $defcnt++;
+ $ds_name[$defcnt] = "Selects per second";
+ $opt[$defcnt] = "--vertical-label \"Selects / sec\" --title \"Selects per second on $hostname\" ";
+ $def[$defcnt] = "";
+ for ($ii = 1; $ii <= $ds_count; $ii++) {
+ if(preg_match('/^selects_per_sec$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:sps=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "AREA:sps#$now:\" \" ";
+ $def[$defcnt] .= "VDEF:vsps=sps,LAST " ;
+ $def[$defcnt] .= "GPRINT:vsps:\"%3.2lf Selects per second \\n\" ";
+ }
+ }
+ $defcnt++;
+ }
+ if(preg_match('/^qcache_lowmem_prunes_rate$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Query cache low memory prunes";
+ $opt[$defcnt] = "--vertical-label \"Prunes / sec\" --title \"Query cache low mem prunes on $hostname\" ";
+ $def[$defcnt] = "";
+ $def[$defcnt] .= "DEF:prunes=$RRDFILE[$i]:$DS[$i]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "AREA:prunes#111111 ";
+ $def[$defcnt] .= "VDEF:vprunes=prunes,LAST " ;
+ $def[$defcnt] .= "GPRINT:vprunes:\"Rate is %3.2lf Prunes / Second \" " ;
+ $defcnt++;
+ }
+ if(preg_match('/^slow_queries_rate$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Slow query rate";
+ $opt[$defcnt] = "--vertical-label \"Slow queries / sec\" --title \"Slow queries on $hostname\" ";
+ $def[$defcnt] = "";
+ $def[$defcnt] .= "DEF:prunes=$RRDFILE[$i]:$DS[$i]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "AREA:prunes#111111 ";
+ $def[$defcnt] .= "VDEF:vprunes=prunes,LAST " ;
+ $def[$defcnt] .= "GPRINT:vprunes:\"%3.2lf Slow queries / Second \" " ;
+ $defcnt++;
+ }
+ if(preg_match('/^tablelock_contention_now$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Table lock contention";
+ # set upper limit to 10, because 3 means an already dead database
+ $opt[$defcnt] = "--vertical-label \"Percent\" --title \"Table lock contention on $hostname\" --upper-limit 10 --lower-limit 0 ";
+ $def[$defcnt] = "";
+ for ($ii = 1; $ii <= $ds_count; $ii++) {
+ if(preg_match('/^tablelock_contention$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:tbllckcont=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "CDEF:ag=tbllckcont,$WARN[$ii],LE,tbllckcont,0,GT,INF,UNKN,IF,UNKN,IF,ISINF,tbllckcont,0,IF ";
+ $def[$defcnt] .= "CDEF:ay=tbllckcont,$CRIT[$ii],LE,tbllckcont,$WARN[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,tbllckcont,0,IF ";
+ $def[$defcnt] .= "CDEF:ar=tbllckcont,100,LE,tbllckcont,$CRIT[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,tbllckcont,0,IF ";
+ $def[$defcnt] .= "AREA:ag#$green: " ;
+ $def[$defcnt] .= "AREA:ay#$yellow: " ;
+ $def[$defcnt] .= "AREA:ar#$red: " ;
+ $def[$defcnt] .= "LINE:tbllckcont#111111:\" \" ";
+ $def[$defcnt] .= "VDEF:vtbllckcont=tbllckcont,LAST " ;
+ $def[$defcnt] .= "GPRINT:vtbllckcont:\"Lock contention (since epoch) is %3.2lf%%\\n\" " ;
+ }
+ if(preg_match('/^tablelock_contention_now$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:tbllckcontnow=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "LINE1.5:tbllckcontnow#$now:\" \" ";
+ $def[$defcnt] .= "VDEF:vtbllckcontnow=tbllckcontnow,LAST " ;
+ $def[$defcnt] .= "GPRINT:vtbllckcontnow:\"Lock contention (current) is %3.2lf%%\" ";
+ }
+ }
+ $defcnt++;
+ }
+ if(preg_match('/^tablecache_fillrate$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Table cache hitrate";
+ $opt[$defcnt] = "--vertical-label \"Percent\" --title \"Table cache hitrate on $hostname\" --upper-limit 100 --lower-limit 0 ";
+ $def[$defcnt] = "";
+ for ($ii = 1; $ii <= $ds_count; $ii++) {
+ if(preg_match('/^tablecache_hitrate$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:hitrate=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "CDEF:ar=hitrate,$CRIT_MIN[$ii],LE,hitrate,0,GT,INF,UNKN,IF,UNKN,IF,ISINF,hitrate,0,IF ";
+ $def[$defcnt] .= "CDEF:ay=hitrate,$WARN_MIN[$ii],LE,hitrate,$CRIT_MIN[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,hitrate,0,IF ";
+ $def[$defcnt] .= "CDEF:ag=hitrate,100,LE,hitrate,$WARN_MIN[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,hitrate,0,IF ";
+ $def[$defcnt] .= "AREA:ag#$green: " ;
+ $def[$defcnt] .= "AREA:ay#$yellow: " ;
+ $def[$defcnt] .= "AREA:ar#$red: " ;
+ $def[$defcnt] .= "LINE:hitrate#111111:\" \" ";
+ $def[$defcnt] .= "VDEF:vhitrate=hitrate,LAST " ;
+ $def[$defcnt] .= "GPRINT:vhitrate:\"Hitratio is %3.2lf percent \\n\" ";
+ }
+ if(preg_match('/^tablecache_fillrate$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:hitratenow=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "LINE1.5:hitratenow#$now:\" \" ";
+ $def[$defcnt] .= "VDEF:vhitratenow=hitratenow,LAST " ;
+ $def[$defcnt] .= "GPRINT:vhitratenow:\"%3.2lf%% of the cache is filled \\n\" ";
+ }
+ }
+ $defcnt++;
+ }
+ if(preg_match('/^pct_tmp_table_on_disk_now$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Temporary tables created on disk ";
+ $opt[$defcnt] = "--vertical-label \"Percent\" --title \"Temporary tables created on disk on $hostname\" --upper-limit 10 --lower-limit 0 ";
+ $def[$defcnt] = "";
+ for ($ii = 1; $ii <= $ds_count; $ii++) {
+ if(preg_match('/^pct_tmp_table_on_disk$/', $NAME[$ii])) {
+
+ $def[$defcnt] .= "DEF:tmptbldsk=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "CDEF:ag=tmptbldsk,$WARN[$ii],LE,tmptbldsk,0,GT,INF,UNKN,IF,UNKN,IF,ISINF,tmptbldsk,0,IF ";
+ $def[$defcnt] .= "CDEF:ay=tmptbldsk,$CRIT[$ii],LE,tmptbldsk,$WARN[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,tmptbldsk,0,IF ";
+ $def[$defcnt] .= "CDEF:ar=tmptbldsk,100,LE,tmptbldsk,$CRIT[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,tmptbldsk,0,IF ";
+ $def[$defcnt] .= "AREA:ag#$green: " ;
+ $def[$defcnt] .= "AREA:ay#$yellow: " ;
+ $def[$defcnt] .= "AREA:ar#$red: " ;
+ $def[$defcnt] .= "LINE:tmptbldsk#111111:\" \" ";
+ $def[$defcnt] .= "VDEF:vtmptbldsk=tmptbldsk,LAST " ;
+ $def[$defcnt] .= "GPRINT:vtmptbldsk:\"%3.2lf percent of temp tables were created on disk (since epoch)\\n\" " ;
+ }
+ if(preg_match('/^pct_tmp_table_on_disk_now$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:tmptbldsknow=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "LINE1.5:tmptbldsknow#$now:\" \" ";
+ $def[$defcnt] .= "VDEF:vtmptbldsknow=tmptbldsknow,LAST " ;
+ $def[$defcnt] .= "GPRINT:vtmptbldsknow:\"%3.2lf percent of temp tables were created on disk (recently)\\n\" " ;
+ }
+ }
+ $defcnt++;
+ }
+ if(preg_match('/^thread_cache_hitrate_now$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Thread cache hitrate";
+ $opt[$defcnt] = "--vertical-label \"Percent\" --title \"Thread cache hitrate on $hostname\" --upper-limit 100 --lower-limit 0 ";
+ $def[$defcnt] = "";
+ for ($ii = 1; $ii <= $ds_count; $ii++) {
+ if(preg_match('/^thread_cache_hitrate$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:hitrate=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "CDEF:ar=hitrate,$CRIT_MIN[$ii],LE,hitrate,0,GT,INF,UNKN,IF,UNKN,IF,ISINF,hitrate,0,IF ";
+ $def[$defcnt] .= "CDEF:ay=hitrate,$WARN_MIN[$ii],LE,hitrate,$CRIT_MIN[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,hitrate,0,IF ";
+ $def[$defcnt] .= "CDEF:ag=hitrate,100,LE,hitrate,$WARN_MIN[$ii],GT,INF,UNKN,IF,UNKN,IF,ISINF,hitrate,0,IF ";
+ $def[$defcnt] .= "AREA:ag#$green: " ;
+ $def[$defcnt] .= "AREA:ay#$yellow: " ;
+ $def[$defcnt] .= "AREA:ar#$red: " ;
+ $def[$defcnt] .= "LINE:hitrate#111111:\" \" ";
+ $def[$defcnt] .= "VDEF:vhitrate=hitrate,LAST " ;
+ $def[$defcnt] .= "GPRINT:vhitrate:\"Hitratio (since epoch) is %3.2lf percent \\n\" ";
+ }
+ if(preg_match('/^thread_cache_hitrate_now$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:hitratenow=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "LINE1.5:hitratenow#$now:\" \" ";
+ $def[$defcnt] .= "VDEF:vhitratenow=hitratenow,LAST " ;
+ $def[$defcnt] .= "GPRINT:vhitratenow:\"Hitratio (current) is %3.2lf percent \\n\" ";
+ }
+ }
+ $defcnt++;
+ $ds_name[$defcnt] = "Connects per second";
+ $opt[$defcnt] = "--vertical-label \"Conects / sec\" --title \"Connects per second on $hostname\" ";
+ $def[$defcnt] = "";
+ for ($ii = 1; $ii <= $ds_count; $ii++) {
+ if(preg_match('/^connections_per_sec$/', $NAME[$ii])) {
+ $def[$defcnt] .= "DEF:sps=$RRDFILE[$ii]:$DS[$ii]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "AREA:sps#$now:\" \" ";
+ $def[$defcnt] .= "VDEF:vsps=sps,LAST " ;
+ $def[$defcnt] .= "GPRINT:vsps:\"%3.2lf Connects per second \\n\" ";
+ }
+ }
+ $defcnt++;
+ }
+ if(preg_match('/^threads_connected$/', $NAME[$i])) {
+ $ds_name[$defcnt] = "Connection threads";
+ $opt[$defcnt] = "--vertical-label \"Threads\" --title \"Connection threads on $hostname\" ";
+ $def[$defcnt] = "";
+ $def[$defcnt] .= "DEF:threads=$RRDFILE[$i]:$DS[$i]:AVERAGE:reduce=LAST " ;
+ $def[$defcnt] .= "AREA:threads#111111 ";
+ $def[$defcnt] .= "VDEF:vthreads=threads,LAST " ;
+ $def[$defcnt] .= "GPRINT:vthreads:\"%.0lf Connection threads \" " ;
+ $defcnt++;
+ }
+}
+?>
+
|