From e55f0fc7c8af2a52959cb7fe97359255750b80a0 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Rowdy=20Schwach=F6fer?= <rowdy@rowdy.nl>
Date: Thu, 7 Apr 2011 11:45:41 +0200
Subject: [PATCH] Initial version

---
 plugins/other/spotweb_cat_total | 78 +++++++++++++++++++++++++++++++++
 1 file changed, 78 insertions(+)
 create mode 100755 plugins/other/spotweb_cat_total

diff --git a/plugins/other/spotweb_cat_total b/plugins/other/spotweb_cat_total
new file mode 100755
index 00000000..77259e03
--- /dev/null
+++ b/plugins/other/spotweb_cat_total
@@ -0,0 +1,78 @@
+#!/usr/bin/perl
+#
+# Munin plugin for total spot by categories in a spotweb MySQL database
+#
+# Copyright (C) 2011 - Rowdy Schwachöfer (http://rowdy.nl)
+#
+# Spotweb       : http://github.com/spotweb/spotweb
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#
+#
+#
+### Configuration example
+#
+# [spotweb*]
+# env.mysql /usr/bin/mysql                               # MySQL binary (optional)
+# env.mysqlopts -u <MYSQL_USERNAME> -p<MYSQL_PASSWORD>   # How to connect to the database (optional if no password is set)
+# env.database spotweb                                   # Spotweb database (optional)
+#
+# [spotweb_cat_total]
+# env.countporn = 'no'									 # Also count porn? Default is 'yes'
+#
+#
+
+use strict;
+
+# Environment variables
+my $MYSQL 		= $ENV{mysql} || "/usr/bin/mysql";
+my $MYSQLOPTS 	= $ENV{mysqlopts} || "";
+my $DATABASE 	= $ENV{database} || "spotweb";
+my $COUNTPORN 	= $ENV{countporn} || "yes";
+
+
+# Output for config
+if(defined $ARGV[0] && $ARGV[0] eq 'config') {
+print <<EOC
+graph_title Spotweb spots by Category (Totals)
+graph_vlabel Spots
+graph_category spotweb
+cat0.label Videos/images
+cat1.label Music
+cat2.label Games
+cat3.label Applications
+EOC
+;
+exit 0;
+}
+
+
+# Output of values. We just call a subroutine here to prevent much duplicate code
+if($COUNTPORN eq 'yes') { 
+    &print_value(0);
+}
+else { 
+    &print_value(0, " AND subcatd NOT LIKE '%23%' AND subcatd NOT LIKE '%24%' AND subcatd NOT LIKE '%25%' AND subcatd NOT LIKE '%26%'"); 
+}
+&print_value(1);
+&print_value(2);
+&print_value(3);
+
+
+# Subroutine to print the values
+sub print_value {
+    my $spots = `$MYSQL $MYSQLOPTS -e "SELECT count(*) as spots FROM $DATABASE.spots WHERE category = $_[0]$_[1];"`;
+    $spots =~ /(\d+)/; 
+    print "cat".$_[0].".value ".$1."\n"; 
+}
\ No newline at end of file