]> git.donarmstrong.com Git - infobot.git/commitdiff
- update to 'cpustats'.
authordms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Wed, 10 Jan 2001 14:56:13 +0000 (14:56 +0000)
committerdms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Wed, 10 Jan 2001 14:56:13 +0000 (14:56 +0000)
git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@237 c11ca15a-4712-0410-83d8-924469b57eb5

blootbot/src/UserExtra.pl

index 32108e916c92ec0970030b6c9d9f60cb421d1c94..e998be4b1fe7de846bf513cdfca6a2b0aba77587 100644 (file)
@@ -579,7 +579,16 @@ sub userCommands {
        # utime(13) + stime(14).
        my $cpu_usage   = sprintf("%.01f", ($data[13]+$data[14]) / 100 );
        my $time        = time() - $^T;
-       my $perc        = sprintf("%.01f", $cpu_usage*100/$time );
+       my $raw_perc    = $cpu_usage*100/$time;
+       my $perc;
+
+       if ($raw_perc > 1) {
+           $perc       = sprintf("%.01f", $raw_perc);
+       } elsif ($raw_perc > 0.1) {
+           $perc       = sprintf("%.02f", $raw_perc);
+       } else {                        # <=0.1
+           $perc       = sprintf("%.03f", $raw_perc);
+       }
 
        &performStrictReply("Total CPU usage: $cpu_usage s ... Percentage CPU used: $perc %");
        &DEBUG("15 => $data[15] (cutime)");