bar_gauge() {
awk "$@" '
BEGIN {
+ # CLI options
+ width = width ? width : 80
ch_left = ch_left ? ch_left : "["
ch_right = ch_right ? ch_right : "]"
ch_blank = ch_blank ? ch_blank : "-"
ch_used = ch_used ? ch_used : "|"
+ num = num ? 1 : 0
+ pct = pct ? 1 : 0
}
{
cur_scaled = num_scale(cur, max, 1, width)
printf \
- "%s%s%s", \
+ "%s%s%s%s", \
lab ? lab " " : "", \
num ? cur "/" max " " : "", \
+ pct ? sprintf("%3.0f%% ", cur / max * 100) : "", \
ch_left
for (i=1; i<=width; i++) {
c = i <= cur_scaled ? ch_used : ch_blank
'
}
+flat_top_5() {
+ sort -n -k 1 -r \
+ | head -5 \
+ | awk '
+ {
+ cur = $1
+ max = $2
+ name = $3
+ pct = cur / max * 100
+ printf "%s%s %.2f%%", sep, name, pct
+ sep = ", "
+ }
+
+ END {printf "\n"}
+ '
+}
+
motd_batt() {
case "$(uname)" in
'Linux')
- upower --dump \
- | awk '
- /^Device:[ \t]+/ {
- device["path"] = $2
- next
- }
-
- / battery/ && device["path"] {
- device["is_battery"] = 1
- next
- }
-
- / percentage:/ && device["is_battery"] {
- device["battery_percentage"] = $2
- sub("%$", "", device["battery_percentage"])
- next
- }
-
- /^$/ {
- if (device["is_battery"] && device["path"] == "/org/freedesktop/UPower/devices/DisplayDevice")
- print device["battery_percentage"], 100, "batt"
- delete device
- }
- '
+ if which upower > /dev/null
+ then
+ upower --dump \
+ | awk '
+ /^Device:[ \t]+/ {
+ device["path"] = $2
+ next
+ }
+
+ / battery/ && device["path"] {
+ device["is_battery"] = 1
+ next
+ }
+
+ / percentage:/ && device["is_battery"] {
+ device["battery_percentage"] = $2
+ sub("%$", "", device["battery_percentage"])
+ next
+ }
+
+ /^$/ {
+ if (device["is_battery"] && device["path"] == "/org/freedesktop/UPower/devices/DisplayDevice")
+ print device["battery_percentage"], 100, "batt"
+ delete device
+ }
+ '
+ fi
;;
esac
}
}
motd() {
- local -r bar_width='60'
local -r indent_unit=' '
uname -srvmo
echo
- printf 'tmux: sessions %d, clients %d\n' \
+ echo 'accounting'
+
+ printf '%stmux\n%ssessions %d, clients %d\n' \
+ "$indent_unit" \
+ "${indent_unit}${indent_unit}" \
"$(tmux list-sessions 2> /dev/null | wc -l)" \
"$(tmux list-clients 2> /dev/null | wc -l)"
echo
- echo 'Resources'
+ printf '%sprocs by user\n' "${indent_unit}"
+ ps -eo user \
+ | awk '
+ NR > 1 {
+ count_by_user[$1]++
+ total++
+ }
+
+ END {
+ for (user in count_by_user)
+ print count_by_user[user], total, user
+ }
+ ' \
+ | flat_top_5 \
+ | indent "${indent_unit}${indent_unit}"
+
+ echo
+
+ echo 'resources'
(
free | awk '$1 == "Mem:" {print $3, $2, "mem"}'
df ~ | awk 'NR == 2 {print $3, $3 + $4, "disk"}'
motd_batt
) \
- | bar_gauge -v width="$bar_width" \
+ | bar_gauge -v width=60 -v pct=1 \
| column -t \
| indent "$indent_unit"
echo
- echo 'Network'
+ printf '%smem by proc\n' "$indent_unit"
+ ps -eo rss,cmd \
+ | awk -v total="$(free | awk '$1 == "Mem:" {print $2; exit}')" '
+ NR > 1 {
+ rss = $1
+ cmd = $2
+ n = split(cmd, path, "/") # _may_ be a path
+ proc = path[n]
+ by_proc[proc] += rss
+ }
+
+ END {
+ for (proc in by_proc)
+ print by_proc[proc], total, proc
+ }
+ ' \
+ | flat_top_5 \
+ | indent "${indent_unit}${indent_unit}"
+
+ echo
+
+ echo 'net'
echo "${indent_unit}if"
(ifconfig; iwconfig) 2> /dev/null \
| awk '
| 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}"
}
ssh_invalid_attempts_from() {
| bar_gauge -v width="$(stty size | awk '{print $2}')" -v num=1 -v ch_right=' ' -v ch_left=' ' -v ch_blank=' ' \
| column -t
}
+
+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
+ }' \
+ | bar_gauge -v num=1 -v ch_right=' ' -v ch_left=' ' -v ch_blank=' ' \
+ | column -t
+}