Munin contributed plugins

#		RAM Used	Anon, Exec + Libs, Page cache

#		RAM Avail	Free memory that can be immediately used

#

# REFERENCE: http://www.brendangregg.com/k9toolkit.html - the swap diagram.

#

# COPYRIGHT: Copyright (c) 2004 Brendan Gregg.

=head1 AUTHOR

Christian Braum, chrisi_braum@web.de

Core logic developed by Brendan Gregg. See K9Toolkit:

http://www.brendangregg.com/K9Toolkit/swapinfo

	my %VMinfo;

	my %VMold;

	{

		#

		#  The values are counters that increment each second, here we

		#  (reading them once then again a second later was not reliable).

		#

		{

			$VMnow{$var} = $Kstat->{unix}->{0}->{vminfo}->{$var};

			unless ($count) {

	my $ram_used = $pagestotal - $freemem - $ram_kernel - $ram_locked;

	### format values

	my $freemem_B      = sprintf( "%d ", $freemem * $PAGETOBYTE );

	my $pp_kernel_B    = sprintf( "%d ", $pp_kernel * $PAGETOBYTE );

	my $pageslocked_B  = sprintf( "%d ", $pageslocked * $PAGETOBYTE );

	my $pagestotal_B   = sprintf( "%d ", $pagestotal * $PAGETOBYTE );

	my $ram_unusable_B = sprintf( "%d ", $ram_unusable * $PAGETOBYTE );

	my $ram_locked_B   = sprintf( "%d ", $ram_locked * $PAGETOBYTE );

	my $ram_used_B     = sprintf( "%d ", $ram_used * $PAGETOBYTE );

	my $ram_total_B    = sprintf( "%d ", $ram_total * $PAGETOBYTE );

	$h_ramvalues{"Unusable.value"} = "$ram_unusable_B";

	$h_ramvalues{"Kernel.value"} = "$ram_kernel_B";

	$h_ramvalues{"Locked.value"} = "$ram_locked_B";

		  "Used ",

		    "Avail ",

		    "\n";

	    print "Unusable.label Unusable \n";

	    print "Unusable.draw AREA \n";

	    print "Unusable.info RAM consumed by the OBP and TSBs.\n";