From 99588daf8caef3d03703b27150858fd0437422c7 Mon Sep 17 00:00:00 2001
From: "pbuetow (lap824)" <puppet@mx.buetow.org>
Date: Sun, 22 Jan 2012 11:29:00 +0100
Subject: preparations for memstats

---
 loadbars | 21 ++++++++++++++++++++-
 1 file changed, 20 insertions(+), 1 deletion(-)

diff --git a/loadbars b/loadbars
index 624e51f..625916d 100755
--- a/loadbars
+++ b/loadbars
@@ -53,6 +53,7 @@ $| = 1;
 
 my %AVGSTATS : shared;
 my %CPUSTATS : shared;
+my %MEMSTATS_HAS : shared;
 my %MEMSTATS : shared;
 
 # Global configuration hash
@@ -63,6 +64,7 @@ my %C : shared;
     title          => Loadbars::VERSION . ' (press h for help on stdout)',
     average        => 15,
     showcores      => 0,
+    showmem        => 1,
     cpuregexp      => 'cpu',
     factor         => 1,
     extended       => 0,
@@ -165,6 +167,7 @@ BASH
             } else {
                 for my $meminfo (qw(MemTotal MemFree Buffers Cached SwapTotal SwapFree)) {
                     if (/^$meminfo: *(\d+)/) {
+                        $MEMSTATS_HAS{$host} = 1;
                         $MEMSTATS{"$host;$meminfo"} = $1;
                     }
                 }
@@ -306,6 +309,12 @@ sub main_loop ($@) {
                 say $dispatch->('hotkeys');
                 $displayinfo = 'Hotkeys help printed on terminal stdout';
 
+            }
+            elsif ( $key_name eq 'm' ) {
+                $C{showmem} = !$C{showmem};
+                $displayinfo = 'Toggled show mem';
+                %MEMSTATS_HAS    = ();
+
             }
             elsif ( $key_name eq 't' ) {
                 $C{displaytxt} = !$C{displaytxt};
@@ -361,6 +370,7 @@ sub main_loop ($@) {
         my %is_host_summary;
 
         my $new_num_stats = keys %CPUSTATS;
+        $new_num_stats += keys %MEMSTATS_HAS if $C{showmem};
 
         if ( $new_num_stats != $num_stats ) {
             %prev_stats = ();
@@ -886,7 +896,16 @@ END
             type    => 'i'
         },
         showcores_hot =>
-          { menupos => 17, cmd => '1', help => 'Toggle CPUs', mode => 1 },
+          { menupos => 17, cmd => '1', help => 'Toggle show cores', mode => 1 },
+
+        showmem => {
+            menupos => 17,
+            help    => 'Toggle mem display (0 or 1)',
+            mode    => 7,
+            type    => 'i'
+        },
+        showmem_hot =>
+          { menupos => 17, cmd => 'm', help => 'Toggle show mem', mode => 1 },
 
         showtexthost => {
             menupos => 18,
-- 
cgit v1.2.3