From: Dirk Koopman <djk@tobit.co.uk>
Date: Fri, 2 Nov 2007 16:18:29 +0000 (+0100)
Subject: try to improve the cpu account in mrtg
X-Git-Tag: 1.55~42
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=8eb97fa0b7aa30c63519a1ad41e65356ea765a2b;p=spider.git

try to improve the cpu account in mrtg
---

diff --git a/cmd/mrtg.pl b/cmd/mrtg.pl
index 58967955..b0757ecf 100644
--- a/cmd/mrtg.pl
+++ b/cmd/mrtg.pl
@@ -64,7 +64,7 @@ if ($want{agw}) {
 if (!$main::is_win && ($want{proc} || $want{all})) {
 	$ENV{COLUMNS} = 250;
 	my $secs;
-	my $f = new IO::File "ps aux |";
+	my $f = new IO::File "ps ax -ocputime,args |";
 #	dbg("$f");
 	if ($f) {
 		while (<$f>) {
@@ -75,8 +75,9 @@ if (!$main::is_win && ($want{proc} || $want{all})) {
 			next if $l =~ m{bash\s+\-c};
 			my @f = split /\s+/, $l;
 #			dbg("$f[9]");
-			my ($m, $s) = split /:/, $f[9];
-			$secs = ($m * 60) + $s;
+			my ($d, $h, $m, $s) = $f[0] =~ /(?:(\d+)-)?(\d+):(\d\d):(\d\d)$/;
+			$d ||= 0;
+			$secs = ($d * 86400) + ($h * 3600) + ($m * 60) + $s;
 			last;
 		}
 		$f->close;