From 4a25d79feef0dd6e462abfb48173da7e470127a5 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Karel=20Ko=C4=8D=C3=AD?= Date: Mon, 15 Apr 2024 23:34:35 +0200 Subject: Replace i3blocks with swaybar --- config/i3blocks/scripts/cpu_usage | 66 --------------------------------------- 1 file changed, 66 deletions(-) delete mode 100755 config/i3blocks/scripts/cpu_usage (limited to 'config/i3blocks/scripts/cpu_usage') diff --git a/config/i3blocks/scripts/cpu_usage b/config/i3blocks/scripts/cpu_usage deleted file mode 100755 index b298a97..0000000 --- a/config/i3blocks/scripts/cpu_usage +++ /dev/null @@ -1,66 +0,0 @@ -#!/usr/bin/env perl -# -# Copyright 2014 Pierre Mavro -# Copyright 2014 Vivien Didelot -# Copyright 2014 Andreas Guldstrand -# -# 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} // 50; -my $t_crit = $ENV{T_CRIT} // 80; -my $cpu_usage = -1; -my $decimals = $ENV{DECIMALS} // 2; -my $label = $ENV{LABEL} // ""; -my $color_normal = $ENV{COLOR_NORMAL} // "#EBDBB2"; -my $color_warn = $ENV{COLOR_WARN} // "#FFFC00"; -my $color_crit = $ENV{COLOR_CRIT} // "#FF0000"; - -sub help { - print "Usage: cpu_usage [-w ] [-c ] [-d ]\n"; - print "-w : warning threshold to become yellow\n"; - print "-c : critical threshold to become red\n"; - print "-d : Use 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 1 1 |') or die; -while () { - 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 "${label}"; -printf "%.${decimals}f%%\n", $cpu_usage; - -# Print color, if needed -if ($cpu_usage >= $t_crit) { - print "${color_crit}\n"; -} elsif ($cpu_usage >= $t_warn) { - print "${color_warn}\n"; -} else { - print "${color_normal}\n"; -} - -exit 0; -- cgit v1.2.3