Don't assume fixed page size

diff --git a/proc/sysv-lib.pl b/proc/sysv-lib.pl
index 3cd7182..30c21a6 100644 (file)
--- a/proc/sysv-lib.pl
+++ b/proc/sysv-lib.pl
@@ -234,7 +234,10 @@ while(<SWAP>) {
                }
        }
 close(SWAP);
-return ($stat{'physmem'}*8, $stat{'freemem'}*8,
+local $pagesize = `pagesize 2>/dev/null`;
+$pagesize = int($pagesize)/1024;
+$pagesize ||= 8;       # Fallback
+return ($stat{'physmem'}*$pagesize, $stat{'freemem'}*$pagesize,
        $swaptotal/2, $swapfree/2);
 }