From c2214999c390777fd3a3533e8c9d09bc1e7838dc Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Antoine=20Beaupr=C3=A9?= <anarcat@koumbit.org>
Date: Thu, 2 Jan 2014 18:47:44 -0500
Subject: [PATCH] limit to ten the number of users by default

---
 plugins/mysql/mysql_connections_per_user | 17 +++++++++++++++--
 1 file changed, 15 insertions(+), 2 deletions(-)

diff --git a/plugins/mysql/mysql_connections_per_user b/plugins/mysql/mysql_connections_per_user
index e1da7130..ee000707 100755
--- a/plugins/mysql/mysql_connections_per_user
+++ b/plugins/mysql/mysql_connections_per_user
@@ -40,6 +40,7 @@
 #
 #   mysqlopts     - Options to pass to mysql
 #   mysqladmin    - Override location of mysqladmin
+#   numusers      - Override maximum number of users to display
 #   warning	  - Override default warning limit
 #   critical	  - Override default critical limit 
 #
@@ -54,6 +55,7 @@ my $TEST_COMMAND    = "$MYSQLADMIN $ENV{mysqlopts} processlist";
 my $MYSQL_VARIABLES = "$MYSQLADMIN $ENV{mysqlopts} extended-status variables";
 my $warning = $ENV{warning} || "80";
 my $critical = $ENV{critical} || "90";
+my $numusers = $ENV{numusers} || 10;
 
 # Pull in any arguments
 my $arg = shift();
@@ -67,6 +69,11 @@ if ($arg eq 'config') {
     else { print "no\n"; }
     exit;
 } else {
+    print_graph_data();
+    exit;
+}
+
+sub print_graph_data() {
 	# Define the values that are returned to munin
 	my ($current, $upper_limit) = (0,0,0);
 	
@@ -85,8 +92,14 @@ if ($arg eq 'config') {
             $counts{$user} = 0 unless defined($counts{$user});
             $counts{$user} += 1;
         }
-        while (($user, $count) = each %counts) {
-            print "$user.value $count\n";
+
+        sub valsort {
+            return $$threads{$a} <=> $$threads{$b};
+        }
+        my $i = 0;
+        foreach my $user (sort valsort keys(%counts)) {
+            last if $i++ >= $numusers;
+            print "$user.value $counts{$user}\n";
         }
 }