diff options
| author | = | 2018-07-31 00:27:13 -0500 | 
|---|---|---|
| committer | = | 2018-07-31 00:27:13 -0500 | 
| commit | d003edcba6aaf29f74b904c09fc9dfdf3b2ff2cc (patch) | |
| tree | 0e8587ef2b978cc872d5cd53b957fbd18c2db717 /testcases | |
| parent | Merge pull request #296 from Stunkymonkey/include-order (diff) | |
Fix for issue 300: Correctly print usage for cpu 10
Diffstat (limited to 'testcases')
| -rw-r--r-- | testcases/022-cpu-usage-tenth-cpu/cleanup.pl | 15 | ||||
| -rw-r--r-- | testcases/022-cpu-usage-tenth-cpu/expected_output.pl | 12 | ||||
| -rw-r--r-- | testcases/022-cpu-usage-tenth-cpu/i3status.conf | 10 | ||||
| -rw-r--r-- | testcases/022-cpu-usage-tenth-cpu/setup.pl | 19 | 
4 files changed, 56 insertions, 0 deletions
| diff --git a/testcases/022-cpu-usage-tenth-cpu/cleanup.pl b/testcases/022-cpu-usage-tenth-cpu/cleanup.pl new file mode 100644 index 0000000..ac341be --- /dev/null +++ b/testcases/022-cpu-usage-tenth-cpu/cleanup.pl @@ -0,0 +1,15 @@ +#!/usr/bin/env perl + +use v5.10; +use strict; +use warnings; + +if ($#ARGV != 0 || ! -d $ARGV[0]) { +    say "Error with cleanup script: argument not provided or not a directory"; +    exit 1; +} + +my $output_file = "$ARGV[0]/stat"; +if (-f $output_file) { +    unlink $output_file; +} diff --git a/testcases/022-cpu-usage-tenth-cpu/expected_output.pl b/testcases/022-cpu-usage-tenth-cpu/expected_output.pl new file mode 100644 index 0000000..21482ab --- /dev/null +++ b/testcases/022-cpu-usage-tenth-cpu/expected_output.pl @@ -0,0 +1,12 @@ +#!/usr/bin/env perl + +use v5.10; +use strict; +use warnings; + +chomp(my $cpu_count = `grep -c -P '^processor\\s+:' /proc/cpuinfo`); +if ($cpu_count < 10) { +    print "all: 00% CPU_0: 00% CPU_10: \n"; +} else { +    print "all: 00% CPU_0: 00% CPU_10: 00%\n"; +} diff --git a/testcases/022-cpu-usage-tenth-cpu/i3status.conf b/testcases/022-cpu-usage-tenth-cpu/i3status.conf new file mode 100644 index 0000000..060adb3 --- /dev/null +++ b/testcases/022-cpu-usage-tenth-cpu/i3status.conf @@ -0,0 +1,10 @@ +general { +        output_format = "none" +} + +order += "cpu_usage" + +cpu_usage { +    format = "all: %usage CPU_0: %cpu0 CPU_10: %cpu10" +    path = "testcases/022-cpu-usage-tenth-cpu/stat" +} diff --git a/testcases/022-cpu-usage-tenth-cpu/setup.pl b/testcases/022-cpu-usage-tenth-cpu/setup.pl new file mode 100644 index 0000000..ec4bca3 --- /dev/null +++ b/testcases/022-cpu-usage-tenth-cpu/setup.pl @@ -0,0 +1,19 @@ +#!/usr/bin/env perl + +use v5.10; +use strict; +use warnings; + +if ($#ARGV != 0 || ! -d $ARGV[0]) { +    say "Error with setup script: argument not provided or not a directory"; +    exit 1; +} + +chomp(my $cpu_count = `grep -c -P '^processor\\s+:' /proc/cpuinfo`); +my $output_file = "$ARGV[0]/stat"; +open(my $fh, '>', $output_file) or die "Could not open file '$output_file' $!"; +print $fh "cpu  0 0 0 0 0 0 0 0 0 0\n"; +for (my $i = 0; $i < $cpu_count; $i++) { +    print $fh "cpu$i 0 0 0 0 0 0 0 0 0 0\n"; +} +close $fh; | 
