From 33aaa41692cf48d157f34e7252dada5e81ae5b7d Mon Sep 17 00:00:00 2001
From: "Paul Buetow (mars)" <paul@buetow.org>
Date: Sun, 27 Nov 2011 14:46:45 +0100
Subject: Initial meminfo for Linux

---
 loadbars.pl | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/loadbars.pl b/loadbars.pl
index 9136911..7b46c24 100755
--- a/loadbars.pl
+++ b/loadbars.pl
@@ -26,7 +26,7 @@ use threads::shared;
 
 use constant {
 	DEPTH => 8,
-	VERSION => 'loadbars v0.2.2',
+	VERSION => 'loadbars v0.2.2-devel',
 	Copyright => '2010-2011 (c) Paul Buetow <loadbars@mx.buetow.org>',
 	BLACK => SDL::Color->new(-r => 0x00, -g => 0x00, -b => 0x00),
 	BLUE => SDL::Color->new(-r => 0x00, -g => 0x00, -b => 0xff),
@@ -51,6 +51,7 @@ $| = 1;
 
 my %AVGSTATS : shared;
 my %CPUSTATS : shared;
+my %MEMSTATS : shared;
 
 # Global configuration hash
 my %C : shared;
@@ -99,9 +100,10 @@ sub thread_get_stats ($) {
 			if [ -e /proc/stat ]; then 
 				loadavg=/proc/loadavg
 				stat=/proc/stat
+				meminfo=/proc/meminfo
 
 				for i in \$(seq $C{samples}); do 
-				   	cat \$loadavg \$stat
+				   	cat \$loadavg \$stat \$meminfo
 					sleep $C{inter}
 				done
 			else 
@@ -127,8 +129,6 @@ BASH
 		$SIG{USR1} = sub { $sigusr1 = 1 };
 		my $cpuregexp = qr/$C{cpuregexp}/;
 
-		# $SIG{STOP} = sub { debugsay kill 9, $pid; $quit = 1 };
-
 		while (<$pipe>) {		
 	   		if (/^$loadavgexp/) {
 				$AVGSTATS{$host} = "$1;$2;$3";
-- 
cgit v1.2.3