}
bar_gauge() {
- local -r width="$1"
+ awk "$@" '
+ BEGIN {
+ ch_left = ch_left ? ch_left : "["
+ ch_right = ch_right ? ch_right : "]"
+ ch_blank = ch_blank ? ch_blank : "-"
+ ch_used = ch_used ? ch_used : "|"
+ }
- awk -v width="$width" '
{
cur = $1
max = $2
lab = $3
- u = num_scale(cur, max, 1, width)
+ cur_scaled = num_scale(cur, max, 1, width)
- printf "%s%s[", lab, lab ? " " : ""
+ printf \
+ "%s%s%s", \
+ lab ? lab " " : "", \
+ num ? cur "/" max " " : "", \
+ ch_left
for (i=1; i<=width; i++) {
- c = i <= u ? "|" : "-"
+ c = i <= cur_scaled ? ch_used : ch_blank
printf "%s", c
}
- printf "]\n"
+ printf "%s\n", ch_right
}
function num_scale(src_cur, src_max, dst_min, dst_max) {
echo
- printf 'tmux sessions: %d\n' "$(tmux ls 2> /dev/null | wc -l)"
+ printf 'tmux: sessions %d, clients %d\n' \
+ "$(tmux list-sessions 2> /dev/null | wc -l)" \
+ "$(tmux list-clients 2> /dev/null | wc -l)"
echo
df ~ | awk 'NR == 2 {print $3, $3 + $4, "disk"}'
motd_batt
) \
- | bar_gauge "$bar_width" \
+ | bar_gauge -v width="$bar_width" \
| column -t \
| indent "$indent_unit"
echo
echo 'Network'
- echo "${indent_unit}interfaces:"
+ echo "${indent_unit}if"
(ifconfig; iwconfig) 2> /dev/null \
| awk '
/^[^ ]/ {
| indent "${indent_unit}${indent_unit}"
# WARN: ensure: $USER ALL=(ALL) NOPASSWD:/bin/netstat
- echo "${indent_unit}TCP servers"
+
+ echo "${indent_unit}-->"
+
+ printf '%sUDP: ' "${indent_unit}${indent_unit}"
+ sudo -n netstat -ulnp \
+ | awk 'NR > 2 {print $6}' \
+ | awk -F/ '{print $2}' \
+ | sort -u \
+ | xargs \
+ | column -t
+
+ printf '%sTCP: ' "${indent_unit}${indent_unit}"
sudo -n netstat -tlnp \
| awk 'NR > 2 {print $7}' \
| awk -F/ '{print $2}' \
| sort -u \
| xargs \
+ | column -t
+
+ echo "${indent_unit}<->"
+
+ printf '%sTCP: ' "${indent_unit}${indent_unit}"
+ sudo -n netstat -tnp \
+ | awk 'NR > 2 && $6 == "ESTABLISHED" {print $7}' \
+ | awk -F/ '{print $2}' \
+ | sort -u \
+ | xargs \
+ | column -t
+
+ echo
+
+ echo 'Loggers'
+ awk '
+ {
+ split($5, prog, "[")
+ sub(":$", "", prog[1]) # if there were no [], than : will is left behind
+ print prog[1]
+ }' /var/log/syslog \
+ | awk '
+ {
+ n = split($1, path, "/") # prog may be in path form
+ prog = path[n]
+ total++
+ count[prog]++
+ }
+
+ END {
+ for (prog in count)
+ print count[prog], total, prog
+ }' \
+ | sort -n -k 1 -r \
+ | bar_gauge -v width=30 -v num=1 -v ch_left=' ' -v ch_right=' ' -v ch_blank=' ' \
| column -t \
- | indent "${indent_unit}${indent_unit}"
+ | indent "${indent_unit}"
}