539 行
12 KiB
Bash
実行ファイル
539 行
12 KiB
Bash
実行ファイル
#!/bin/bash
|
||
#---------------------------------------------------------------------
|
||
# Script to display unicode characters representing the level of
|
||
# some indicator.
|
||
#
|
||
# Designed to work with the wonderful byobu(1) but can be run
|
||
# stand-alone.
|
||
#---------------------------------------------------------------------
|
||
#
|
||
# Copyright (C) 2011 Canonical Ltd.
|
||
#
|
||
# Author: James Hunt <james.hunt@canonical.com>
|
||
#
|
||
# This program is free software: you can redistribute it and/or modify
|
||
# it under the terms of the GNU General Public License as published by
|
||
# the Free Software Foundation, version 3 of the License.
|
||
#
|
||
# This program is distributed in the hope that it will be useful,
|
||
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
# GNU General Public License for more details.
|
||
#
|
||
# You should have received a copy of the GNU General Public License
|
||
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||
#
|
||
#---------------------------------------------------------------------
|
||
|
||
#------------------------------
|
||
# Themes with 2 values.
|
||
#
|
||
# Two-value themes are handled differently to other n-value types of
|
||
# theme: the first array entry in each theme is generally some unfilled
|
||
# glyph, denoting an "off" value and the second value is the filled
|
||
# version of the unfilled glyph and denotes an "on" value. Note that
|
||
# you can always change the ordering of these values using the 'invert'
|
||
# command-line option.
|
||
|
||
PKG="byobu"
|
||
[ -r "$HOME/.config/byoburc" ] && . "$HOME/.config/byoburc"
|
||
[ -z "${BYOBU_PREFIX}" ] && export BYOBU_PREFIX="/usr" || export BYOBU_PREFIX
|
||
. "${BYOBU_PREFIX}/lib/${PKG}/include/common"
|
||
|
||
circles_2=(○ ●)
|
||
diamonds_2=(◇ ◆)
|
||
flags_2=(⚐ ⚑)
|
||
hearts_2=(♡ ♥)
|
||
squares_2=(◻ ◼)
|
||
squares_small_2=(◽ ◾)
|
||
stars_2=(☆ ★)
|
||
faces_2=(☹ ☺)
|
||
|
||
#------------------------------
|
||
# Themes with 4 values.
|
||
|
||
vdots_thick_4=(⣀ ⣤ ⣶ ⣿)
|
||
vdots_thin_4=(⢀ ⢠ ⢰ ⢸)
|
||
fractions_4=(¼ ½ ¾ ¹)
|
||
quadrants_4=(◔ ◑ ◕ ●)
|
||
shades_4=(░ ▒ ▓ █)
|
||
|
||
#------------------------------
|
||
# Themes with 5 values.
|
||
|
||
circles_5=(◦ ○ ◎ ◉ ●)
|
||
|
||
#------------------------------
|
||
# Themes with 6 values.
|
||
|
||
dice_6=(⚀ ⚁ ⚂ ⚃ ⚄ ⚅)
|
||
|
||
#------------------------------
|
||
# Themes with 8 values.
|
||
|
||
hbars_8=(▏ ▎ ▍ ▌ ▋ ▊ ▉ █)
|
||
vbars_8=(▁ ▂ ▃ ▄ ▅ ▆ ▇ █)
|
||
|
||
#------------------------------
|
||
# Themes with 10 values.
|
||
|
||
circle_number_10=(➀ ➁ ➂ ➃ ➄ ➅ ➆ ➇ ➈ ➉)
|
||
solid_numbers_a_10=(➊ ➋ ➌ ➍ ➎ ➏ ➐ ➑ ➒ ➓)
|
||
solid_numbers_b_10=(❶ ❷ ❸ ❹ ❺ ❻ ❼ ❽ ❾ ❿)
|
||
|
||
#------------------------------
|
||
# XXX: remember to update if you add new themes above!
|
||
|
||
theme_list=\
|
||
(
|
||
'circles_2 diamonds_2 flags_2 hearts_2 squares_2 squares_small_2 stars_2'
|
||
'vdots_thick_4 vdots_thin_4 fractions_4 quadrants_4 shades_4'
|
||
'circles_5'
|
||
'dice_6'
|
||
'hbars_8 vbars_8'
|
||
'circle_number_10 solid_numbers_a_10 solid_numbers_b_10'
|
||
)
|
||
|
||
#------------------------------
|
||
|
||
default_decimal_places=2
|
||
a11y=n
|
||
a11y_variable=BYOBU_A11Y
|
||
debug_enabled=n
|
||
newline=
|
||
list=n
|
||
quiet=n
|
||
invert=n
|
||
reverse=n
|
||
script_name=${0##*/}
|
||
min_default=0
|
||
max_default=100
|
||
width_default=5
|
||
zero_as_space=n
|
||
theme_default=vbars_8
|
||
permissive=n
|
||
|
||
debug()
|
||
{
|
||
msg="$*"
|
||
[ $debug_enabled = y ] && echo "DEBUG: $msg"
|
||
}
|
||
|
||
error()
|
||
{
|
||
msg="$*"
|
||
echo "ERROR: $msg" >&2
|
||
}
|
||
|
||
die()
|
||
{
|
||
error "$*"
|
||
exit 1
|
||
}
|
||
|
||
check_a11y()
|
||
{
|
||
eval result="\$$a11y_variable"
|
||
[ ! -z "$result" ] && a11y=y
|
||
}
|
||
|
||
# return 1 if expression specified is true (no return if false)
|
||
bc_test()
|
||
{
|
||
expr="$*"
|
||
echo $(echo "if ( $expr ) { print \"1\" }"|bc -l)
|
||
}
|
||
|
||
assert()
|
||
{
|
||
expr="$1"
|
||
str="$2"
|
||
|
||
debug "assert: expr='$expr'"
|
||
ret=$(bc_test "$expr")
|
||
|
||
[ ! -z "$ret" ] && return
|
||
|
||
die "$str"
|
||
}
|
||
|
||
usage()
|
||
{
|
||
cat <<EOT
|
||
Description: Display unicode characters representing the relative
|
||
level of some indicator value within a range.
|
||
|
||
Usage: $script_name [options] -c <current_num>
|
||
$script_name [options] <current_num>
|
||
$script_name <current_num>
|
||
|
||
Options:
|
||
|
||
-a : Accessibility mode: only output ASCII.
|
||
(Also enabled if variable '$a11y_variable' set).
|
||
-b : Display current value as space if zero, rather than lowest
|
||
'value' of theme.
|
||
-c <num> : Current value of your indicator.
|
||
-d : Enable debug output.
|
||
-e <int> : Number of decimal places to use for accessibility mode
|
||
(default=$default_decimal_places).
|
||
-h : Show this help.
|
||
-i : Invert colour scheme (rating themes only).
|
||
-l : List available themes. If '-t' also specified,
|
||
show all values for specified theme.
|
||
-m <num> : Minimum value (default=$min_default).
|
||
-n : Supress output of newline character.
|
||
-p : Permissive mode - if current value out of bounds, set it
|
||
to the nearest bound (min or max).
|
||
-q : Suppress messages (requires '-t').
|
||
-r : Reverse 'direction' of display (rating theme only).
|
||
-t <theme> : Name of theme (default=$theme_default).
|
||
-u <chars> : Specify a user theme (2 or more values).
|
||
-w <int> : Width of rating theme (default=$width_default).
|
||
-x <num> : Maximum value (default=$max_default).
|
||
|
||
|
||
Examples:
|
||
|
||
# Display character representing 27% using default theme.
|
||
$script_name 27
|
||
|
||
# As above.
|
||
$script_name -c 27
|
||
|
||
# Example showing floating-point and negative values.
|
||
$script_name -c 1.100001 -m -5.00234 -x 2.71828 -t dice_6
|
||
|
||
# Use accessibility mode to display a percentage value
|
||
# (rounded to nearest percentage)
|
||
$script_name -m -22.613 -x 5.00212 -c 0.10203 -a -e 0
|
||
|
||
# Display value using a "rating theme" (displayed left-to-right).
|
||
$script_name -c 83 -t stars_2
|
||
|
||
# Display right-to-left inverted "rating theme".
|
||
$script_name -c 60 -t diamonds_2 -ri
|
||
|
||
# Display all glyphs in 'solid_numbers_a_10' theme.
|
||
$script_name -l -t solid_numbers_a_10
|
||
|
||
# Display a user-specified rating theme 10 glyphs wide.
|
||
$script_name -c 666.321 -m -273.15 -x 1370 -u "· ☢" -w 10
|
||
|
||
# A multi-element user theme (this prints 'e').
|
||
$script_name -c 50 -u "a b c d e f g h i j"
|
||
|
||
|
||
Notes:
|
||
|
||
- Arguments of type "<int>" denote an integer value, whereas arguments
|
||
of type "<num>" denotes either an integer or a floating-point
|
||
number.
|
||
- The final '_<number>' in a theme name denotes the number of glyphs
|
||
in it.
|
||
- "Rating themes" are those with only 2 values.
|
||
- The <chars> argument to '-u' must contain space-delimited
|
||
characters.
|
||
|
||
EOT
|
||
}
|
||
|
||
# this is horribly inefficient - we should probably do some clever
|
||
# tricks using printf formats to avoid the silly while loop.
|
||
# Additionally, it is rather similar to show_theme_entry() but was split
|
||
# out from that in a vain attempt to make the overall logic clearer :)
|
||
show_rating_theme()
|
||
{
|
||
theme="$1"
|
||
min="$2"
|
||
max="$3"
|
||
current="$4"
|
||
percent="$5"
|
||
|
||
if [ $invert = n ]
|
||
then
|
||
on=1
|
||
off=0
|
||
else
|
||
on=0
|
||
off=1
|
||
fi
|
||
|
||
debug "width=$width"
|
||
debug "percent=$percent"
|
||
|
||
percent_per_glyph=$(echo "scale=4;100/${width}"|bc -l)
|
||
assert "$percent_per_glyph > 1.0" "width ($width) too great"
|
||
debug "percent_per_glyph=$percent_per_glyph"
|
||
|
||
debug "glyph_count=$glyph_count"
|
||
|
||
g=$percent_per_glyph
|
||
i=0
|
||
value=""
|
||
while [ $i -lt $width ]
|
||
do
|
||
if [ ! -z "$(bc_test "$g <= $percent")" ]
|
||
then
|
||
eval content="\${$theme[${on}]}"
|
||
else
|
||
eval content="\${$theme[${off}]}"
|
||
fi
|
||
if [ $reverse = n ]
|
||
then
|
||
value="${value}${content}"
|
||
else
|
||
value="${content}${value}"
|
||
fi
|
||
g=$(echo "$g + $percent_per_glyph"|bc -l)
|
||
i=$((i + 1))
|
||
done
|
||
echo $newline "$value"
|
||
}
|
||
|
||
show_theme_entry()
|
||
{
|
||
theme="$1"
|
||
min="$2"
|
||
max="$3"
|
||
current="$4"
|
||
|
||
debug "theme=$theme"
|
||
debug "min=$min"
|
||
debug "max=$max"
|
||
debug "current=$current"
|
||
|
||
range=$(echo "($max - $min)"|bc -l)
|
||
|
||
quotient=$(echo "scale=4;((${current} - ${min})/${range})"|bc -l)
|
||
percent=$(echo "$quotient * 100"|bc -l)
|
||
|
||
glyph_count=$(echo $theme|awk -F\_ '{print $NF}')
|
||
|
||
debug "range=$range"
|
||
debug "quotient=$quotient"
|
||
debug "percent=$percent"
|
||
debug "glyph_count=$glyph_count"
|
||
|
||
# just ASCII please
|
||
if [ $a11y = y ]
|
||
then
|
||
[ -z "$decimal_places" ] && decimal_places=$default_decimal_places
|
||
val=$(echo|awk -v p=$percent -v dp=$decimal_places '{printf("%.*f", dp, p)}')
|
||
echo $newline "$val"
|
||
return
|
||
fi
|
||
|
||
if [ $glyph_count -eq 2 ]
|
||
then
|
||
show_rating_theme "$theme" "$min" "$max" "$current" "$percent"
|
||
return
|
||
fi
|
||
|
||
percent_per_glyph=$(echo "100/$glyph_count"|bc -l)
|
||
debug "percent_per_glyph=$percent_per_glyph"
|
||
|
||
assert "$percent_per_glyph > 1.0" "width ($width) too great"
|
||
|
||
# with this scheme, assuming current value is 0-100 and theme has 10
|
||
# elements:
|
||
#
|
||
# current glyph from theme
|
||
#
|
||
# 0-19 1st
|
||
# 20-29 2nd
|
||
# 30-39 3rd
|
||
# :
|
||
# 90-99 9th
|
||
# 100 10th
|
||
i=$(echo|awk \
|
||
-v quotient=$quotient \
|
||
-v glyph_count=$glyph_count \
|
||
'{
|
||
x= int( (quotient * glyph_count) ) - 1;
|
||
x = (x > (glyph_count-1) ? (glyph_count-1) : x);
|
||
if ( x < 0 ) x = 0;
|
||
printf("%d", x);
|
||
}')
|
||
|
||
debug "index=$i"
|
||
eval content="\${$theme[$i]}"
|
||
|
||
[ ! -z "$(bc_test "$current == 0")" -a $zero_as_space = y ] && content=' '
|
||
echo $newline "$content"
|
||
|
||
return
|
||
}
|
||
|
||
list_theme()
|
||
{
|
||
theme="$1"
|
||
eval content="\${$theme[@]}"
|
||
echo
|
||
for c in $content
|
||
do
|
||
printf "$c "
|
||
done
|
||
echo -e "\n"
|
||
}
|
||
|
||
list_themes()
|
||
{
|
||
for entry in ${theme_list[@]}
|
||
do
|
||
for arg in "$entry"
|
||
do
|
||
echo "$arg"
|
||
done
|
||
done
|
||
}
|
||
|
||
theme_valid()
|
||
{
|
||
theme="$1"
|
||
[ -z "`list_themes|grep "^${theme}$"`" ] && return 1
|
||
return 0
|
||
}
|
||
|
||
check_a11y
|
||
|
||
# XXX: the seemingly pointless 'tr' calls translate unicode dashes (look
|
||
# closely!) into ASCII dashes. This is required since 'bc' borks on
|
||
# unicode and it is easy to mistakenly pass unicode dashes if you paste
|
||
# characters from another application, such as a web-browser.
|
||
while getopts "abc:de:hilm:npqrt:u:w:x:" opt
|
||
do
|
||
case "$opt" in
|
||
a)
|
||
a11y=y
|
||
;;
|
||
|
||
b)
|
||
zero_as_space=y
|
||
;;
|
||
|
||
c)
|
||
current=$(echo $OPTARG|tr '−' '-')
|
||
;;
|
||
|
||
d)
|
||
debug_enabled=y
|
||
;;
|
||
|
||
e)
|
||
decimal_places=$OPTARG
|
||
;;
|
||
|
||
h)
|
||
usage
|
||
exit 0
|
||
;;
|
||
|
||
i)
|
||
invert=y
|
||
;;
|
||
|
||
l)
|
||
list=y
|
||
;;
|
||
|
||
m)
|
||
min=$(echo $OPTARG|tr '−' '-')
|
||
;;
|
||
|
||
n)
|
||
newline=-n
|
||
;;
|
||
|
||
p)
|
||
permissive=y
|
||
;;
|
||
|
||
q)
|
||
quiet=y
|
||
;;
|
||
|
||
r)
|
||
reverse=y
|
||
;;
|
||
|
||
t)
|
||
theme=$OPTARG
|
||
;;
|
||
|
||
u)
|
||
user_theme="$OPTARG"
|
||
;;
|
||
|
||
w)
|
||
width=$OPTARG
|
||
;;
|
||
|
||
x)
|
||
max=$(echo $OPTARG|tr '−' '-')
|
||
;;
|
||
esac
|
||
done
|
||
|
||
shift $[$OPTIND-1]
|
||
|
||
if [ ! -z "$user_theme" ]
|
||
then
|
||
elements=$(echo "$user_theme"|awk '{print NF}')
|
||
|
||
assert "$elements >= 2" "user themes need >= 2 values"
|
||
|
||
# create new theme
|
||
name="_user_${elements}"
|
||
eval "$name=($user_theme)"
|
||
|
||
# add it to list
|
||
theme_list=("${theme_list[@]}" $name)
|
||
|
||
[ -z "$theme" ] && theme=$name
|
||
fi
|
||
|
||
if [ "$list" = y ]
|
||
then
|
||
if [ -z "$theme" ]
|
||
then
|
||
list_themes && exit 0
|
||
else
|
||
theme_valid "$theme" || die "invalid theme: $theme"
|
||
[ "$quiet" = n ] && echo "Listing theme '$theme'"
|
||
list_theme $theme && exit 0
|
||
fi
|
||
fi
|
||
[ -z "$min" ] && min=$min_default
|
||
[ -z "$max" ] && max=$max_default
|
||
[ -z "$width" ] && width=$width_default
|
||
|
||
assert "$min <= $max" "minimum ($min) > maximum ($max)"
|
||
assert "$min != $max" "minimum ($min) == maximum"
|
||
|
||
[ -z "$current" -a ! -z "$1" ] && current="$1"
|
||
|
||
if [ -z "$current" ]
|
||
then
|
||
error "must specify current value"
|
||
usage
|
||
exit 1
|
||
fi
|
||
|
||
if [ $permissive = n ]
|
||
then
|
||
assert "$current >= $min" "current ($current) < minimum ($min)"
|
||
assert "$current <= $max" "current ($current) > maximum ($max)"
|
||
else
|
||
[ ! -z "$(bc_test "$current < $min")" ] && current=$min
|
||
[ ! -z "$(bc_test "$current > $max")" ] && current=$max
|
||
fi
|
||
|
||
[ -z "$theme" ] && theme=$theme_default
|
||
|
||
theme_valid "$theme" || die "invalid theme: $theme"
|
||
|
||
show_theme_entry $theme $min $max $current
|
||
|
||
exit 0
|