diff options
author | Vikas Kushwaha <dev@vikas.rocks> | 2024-11-21 13:30:52 +0530 |
---|---|---|
committer | Vikas Kushwaha <dev@vikas.rocks> | 2024-11-21 13:30:52 +0530 |
commit | 5c916d69d457101326803eb076a746060e3618cf (patch) | |
tree | d6fce3256eede1c1bf78fb6a1be75b9cc4b84cee /.local/bin/statusbar/i3cpuload |
Moved from github
Diffstat (limited to '.local/bin/statusbar/i3cpuload')
-rwxr-xr-x | .local/bin/statusbar/i3cpuload | 68 |
1 files changed, 68 insertions, 0 deletions
diff --git a/.local/bin/statusbar/i3cpuload b/.local/bin/statusbar/i3cpuload new file mode 100755 index 0000000..6c14ddd --- /dev/null +++ b/.local/bin/statusbar/i3cpuload @@ -0,0 +1,68 @@ +#!/usr/bin/perl +# +# Copyright 2014 Pierre Mavro <deimos@deimos.fr> +# Copyright 2014 Vivien Didelot <vivien@didelot.org> +# Copyright 2014 Andreas Guldstrand <andreas.guldstrand@gmail.com> +# +# Licensed under the terms of the GNU GPL v3, or any later version. + +use strict; +use warnings; +use utf8; +use Getopt::Long; + +# default values +my $t_warn = $ENV{T_WARN} // 70; # default 50 +my $t_crit = $ENV{T_CRIT} // 90; # default 80 +my $cpu_usage = -1; +my $decimals = $ENV{DECIMALS} // 2; +my $label = $ENV{LABEL} // ""; + +sub help { + print "Usage: cpu_usage [-w <warning>] [-c <critical>] [-d <decimals>]\n"; + print "-w <percent>: warning threshold to become yellow\n"; + print "-c <percent>: critical threshold to become red\n"; + print "-d <decimals>: Use <decimals> decimals for percentage (default is $decimals) \n"; + exit 0; +} + +GetOptions("help|h" => \&help, + "w=i" => \$t_warn, + "c=i" => \$t_crit, + "d=i" => \$decimals, +); + +# Get CPU usage +$ENV{LC_ALL}="en_US"; # if mpstat is not run under en_US locale, things may break, so make sure it is +open (MPSTAT, 'mpstat |') or die; +while (<MPSTAT>) { + if (/^.*\s+(\d+\.\d+)[\s\x00]?$/) { + $cpu_usage = 100 - $1; # 100% - %idle + last; + } +} +close(MPSTAT); + +$cpu_usage eq -1 and die 'Can\'t find CPU information'; + +# Print short_text, full_text +print "${label}"; +printf "%.${decimals}f%%\n", $cpu_usage; + + +# print "\n"; +# # Print color, if needed +# if ($cpu_usage >= $t_crit) { +# print "$ENV{BLOCK_COLOR_LEVEL5}\n"; +# exit 33; +# } elsif ($cpu_usage >= $t_warn) { +# print "$ENV{BLOCK_COLOR_LEVEL4}\n"; +# } elsif ($cpu_usage >= 50) { +# print "$ENV{BLOCK_COLOR_LEVEL3}\n"; +# } elsif ($cpu_usage >= 20) { +# print "$ENV{BLOCK_COLOR_LEVEL2}\n"; +# } else { +# print "$ENV{BLOCK_COLOR_LEVEL1}\n"; +# } + +exit 0; |