7 debug
("ENERGY battery", $
0)
9 db
["energy_state_prev"] = db
["energy_state_curr"]
10 db
["energy_state_curr"] = $
3
11 db
["energy_percentage"] = ensure_numeric
($
4)
12 alert_check_energy_battery
()
15 /^in
:ENERGY line_power
/\
17 debug
("ENERGY line_power", $
0)
18 db
["energy_line_power_prev"] = db
["energy_line_power_curr"]
19 db
["energy_line_power_curr"] = $
3
20 alert_check_energy_line_power
()
26 db
["memory_total"] = $
1
27 db
["memory_used"] = $
2
51 db
["temperature"] = $
1
69 db
["disk_space_used"] = $
0
78 /^in
:NET_WIFI_STATUS
/\
81 db
["net_wifi_status"] = $
0
84 /^in
:BLUETOOTH_POWER
/\
87 db
["bluetooth_power"] = $
0
90 /^in
:SCREEN_BRIGHTNESS
/\
93 set_screen_brightness
()
102 /^in
:MPD_SONG OK
+MPD
/ { delete db_mpd_song
; next }
103 /^in
:MPD_SONG OK$
/ { set_mpd_playing
() ; next }
104 /^in
:MPD_SONG
/ { set_mpd_song
() ; next }
109 db
["mpd_status_state"] = $
1
110 db
["mpd_status_time"] = $
2
111 db
["mpd_status_percent"] = $
3
117 db
["weather_temperature"] = $
0
124 output_msg_status_bar
(make_status_bar
())
127 function set_mpd_song
( key
, val
) {
132 db_mpd_song
[key
] = val
133 debug
("set_mpd_song", "", db_mpd_song
)
136 function set_mpd_playing
( \
137 currently_playing
, name
, title
, file
, last
, parts\
139 debug
("set_mpd_playing", "", db_mpd_song
)
140 name = db_mpd_song
["Name:"]
141 title = db_mpd_song
["Title:"]
142 file = db_mpd_song
["file:"]
145 currently_playing = name
147 currently_playing = title
149 last =
split(file
, parts
, "/")
150 currently_playing = parts
[last
]
152 currently_playing =
""
154 db
["mpd_playing_prev"] = db
["mpd_playing_curr"]
155 db
["mpd_playing_curr"] = currently_playing
160 function alert_check_mpd
( curr
, prev
, name
, body
) {
161 prev = db
["mpd_playing_prev"]
162 curr = db
["mpd_playing_curr"]
163 if (curr
&& curr
!= prev
) {
164 name = db_mpd_song
["Name:"]
169 db_mpd_song
["Artist:"] \
170 " - " db_mpd_song
["Album:"] \
171 " - " db_mpd_song
["Title:"]
173 alert_trigger_low
("alert_check_mpd", "NowPlaying", body
)
177 # TODO: Generalize alert spec lang
178 # - trigger threshold
179 # - above/bellow/equal to threshold value
181 # - snooze time (if already alerted, when to re-alert?)
182 # - text: subject/body
183 function alert_check_energy_battery
( \
184 from
, dbg
, state_curr
, state_prev
, remaining
, subj
, body\
186 from =
"alert_check_energy_battery"
188 state_curr = db
["energy_state_curr"]
189 state_prev = db
["energy_state_prev"]
190 remaining = db
["energy_percentage"]
192 dbg
["state_curr"] = state_curr
193 dbg
["remaining"] = remaining
196 if (state_curr ==
"discharging") {
198 subj =
"Energy_CRITICALLY_Low"
199 body =
sprintf("%d%% CHARGE NOW!!! GO GO GO!!!", remaining
)
200 alert_trigger_hi
(from
, subj
, body
)
201 } else if (remaining
< 10) {
202 subj =
"Energy_Very_Low"
203 body =
sprintf("%d%% Plug it in ASAP.", remaining
)
204 alert_trigger_hi
(from
, subj
, body
)
205 } else if (remaining
< 15) {
207 body =
sprintf("%d%% Get the charger.", remaining
)
208 alert_trigger_hi
(from
, subj
, body
)
209 } else if (remaining
< 20) {
211 body =
sprintf("%d%% Get the charger.", remaining
)
212 alert_trigger_med
(from
, subj
, body
)
213 } else if (remaining
< 50) {
214 if (!state__alerts__energy__notified_bellow_half
) {
215 state__alerts__energy__notified_bellow_half =
1
216 subj =
"Energy_Bellow_Half"
217 body =
sprintf("%d%% Where is the charger?", remaining
)
218 alert_trigger_med
(from
, subj
, body
)
222 # TODO: Reconsider the competing global-state organizing-conventions
223 state__alerts__energy__notified_bellow_half =
0
227 function alert_check_energy_line_power
( \
228 from
, dbg
, line_power_curr
, line_power_prev
, subj
, body \
230 from =
"alert_check_energy_line_power"
232 dbg
["energy_line_power_prev"] = db
["energy_line_power_prev"]
233 dbg
["energy_line_power_curr"] = db
["energy_line_power_curr"]
236 line_power_curr = db
["energy_line_power_curr"]
237 line_power_prev = db
["energy_line_power_prev"]
239 if (line_power_curr ==
"no" && line_power_prev
!= "no") {
240 alert_trigger_low
(from
, "PowerUnplugged", "")
244 function alert_trigger_low
(from
, subject
, body
) {
245 alert_trigger
("low", from
, subject
, body
)
248 function alert_trigger_med
(from
, subject
, body
) {
249 alert_trigger
("med", from
, subject
, body
)
252 function alert_trigger_hi
(from
, subject
, body
) {
253 alert_trigger
("hi", from
, subject
, body
)
256 function alert_trigger
(priority
, from
, subject
, body
, msg
) {
257 # priority : "low" | "med" | "hi"
258 # subject : no spaces
260 msg =
sprintf("khatus_%s %s %s %s", from
, priority
, subject
, body
)
261 output_msg_alert
(msg
)
264 function output_msg_alert
(msg
) {
265 # TODO: Should alerts go into a dedicated channel?
266 output_msg
("ALERT", msg
, "/dev/stdout")
269 function output_msg_status_bar
(msg
) {
270 output_msg
("STATUS_BAR", msg
, "/dev/stdout")
273 function output_msg
(type
, content
, channel
) {
274 print(type
, content
) > channel
277 function set_load_avg
( sched
) {
278 split($
4, sched
, "/")
279 db
["load_avg_1min"] = $
1
280 db
["load_avg_5min"] = $
2
281 db
["load_avg_15min"] = $
3
282 db
["kern_sched_queue_runnable"] = sched
[1]
283 db
["kern_sched_queue_total"] = sched
[2]
284 db
["kern_sched_latest_pid"] = $
5
287 function set_disk_io
( curr_w
, curr_r
, prev_w
, prev_r
) {
290 prev_w = db
["disk_io_curr_w"]
291 prev_r = db
["disk_io_curr_r"]
292 db
["disk_io_curr_w"] = curr_w
293 db
["disk_io_curr_r"] = curr_r
294 db
["disk_io_diff_w"] = curr_w
- prev_w
295 db
["disk_io_diff_r"] = curr_r
- prev_r
298 function set_net_addr_io
( \
299 interface
, address
, io_curr_w
, io_curr_r
, io_prev_w
, io_prev_r\
306 if (address
&& io_curr_w
&& io_curr_r
) {
308 io_prev_w = net_io_curr_w
[interface
]
309 io_prev_r = net_io_curr_r
[interface
]
311 net_addr
[interface
] = address
312 net_io_curr_w
[interface
] = io_curr_w
313 net_io_curr_r
[interface
] = io_curr_r
314 net_io_diff_w
[interface
] = io_curr_w
- io_prev_w
315 net_io_diff_r
[interface
] = io_curr_r
- io_prev_r
318 net_addr
[interface
] =
""
319 net_io_curr_w
[interface
] =
0
320 net_io_curr_r
[interface
] =
0
321 net_io_diff_w
[interface
] =
0
322 net_io_diff_r
[interface
] =
0
327 function set_screen_brightness
( max
, cur
) {
330 db
["screen_brightness"] =
(cur
/ max
) * 100
333 # TODO: Revise overuse of shift() where it is not really needed
338 function make_status_bar
( position
, bar
, sep
, i
, j
) {
339 position
[++i
] = make_status_energy
()
340 position
[++i
] = make_status_mem
()
341 position
[++i
] = make_status_cpu
()
342 position
[++i
] = make_status_disk
()
343 position
[++i
] = make_status_net
()
344 position
[++i
] =
sprintf("B=%s", db
["bluetooth_power"])
345 position
[++i
] =
sprintf("*%d%%", db
["screen_brightness"])
346 position
[++i
] =
sprintf("(%s)", db
["volume"])
347 position
[++i
] = make_status_mpd
()
348 position
[++i
] = db
["weather_temperature"]
349 position
[++i
] = db
["datetime"]
352 for (j =
1; j
<= i
; j
++) {
353 bar = bar sep position
[j
]
359 function make_status_energy
( state
, direction_of_change
) {
360 state = db
["energy_state_curr"]
361 if (state ==
"discharging") {
362 direction_of_change =
"<"
363 } else if (state ==
"charging") {
364 direction_of_change =
">"
366 direction_of_change =
"="
368 return sprintf("E%s%d%%", direction_of_change
, db
["energy_percentage"])
371 function make_status_mem
( total
, used
, percent
, status
) {
372 total = db
["memory_total"]
373 used = db
["memory_used"]
374 # To avoid division by zero when data is missing
376 percent = round
((used
/ total
) * 100)
377 status =
sprintf("%d%%", percent
)
381 return sprintf("M=%s", status
)
384 function make_status_cpu
( load
, temp
, fan
) {
385 load = db
["load_avg_1min"]
386 temp = db
["temperature"] / 1000
387 fan = db
["fan_speed"]
388 return sprintf("C=[%4.2f %d°C %4drpm]", load
, temp
, fan
)
391 function make_status_disk
( bytes_per_sector
, bytes_per_mb
, w
, r
) {
392 bytes_per_sector =
512
393 bytes_per_mb =
1024 * 1024
394 w =
(db
["disk_io_diff_w"] * bytes_per_sector
) / bytes_per_mb
395 r =
(db
["disk_io_diff_r"] * bytes_per_sector
) / bytes_per_mb
397 sprintf("D=[%s %0.3f▲ %0.3f▼]", db
["disk_space_used"], w
, r
)
400 function make_status_net
( \
402 number_of_interfaces_to_show
,
404 array_of_prefixes_of_interfaces_to_show
,
415 number_of_interfaces_to_show = \
417 opt_prefixes_of_net_interfaces_to_show
,\
418 array_of_prefixes_of_interfaces_to_show
,\
421 for (n =
1; n
<= number_of_interfaces_to_show
; n
++) {
422 prefix = array_of_prefixes_of_interfaces_to_show
[n
]
423 for (interface in net_addr
) {
424 if (interface ~
("^" prefix
)) {
425 label =
substr(interface
, 1, 1)
426 if (net_addr
[interface
]) {
427 bytes_per_mb =
1024 * 1024 # TODO: option
428 dw = net_io_diff_w
[interface
] / bytes_per_mb
429 dr = net_io_diff_r
[interface
] / bytes_per_mb
430 io_stat =
sprintf("%0.3f▲ %0.3f▼", dw
, dr
)
434 if (interface ~
"^w") {
435 label = label
":" db
["net_wifi_status"]
437 if (++count_printed
> 1) {
442 out = out sep label
":" io_stat
446 return sprintf("N[%s]", out
)
449 function make_status_mpd
( state
, status
) {
450 state = db
["mpd_status_state"]
452 if (state ==
"play") {
453 status = make_status_mpd_state_known
("▶")
454 } else if (state ==
"pause") {
455 status = make_status_mpd_state_known
("❚❚")
456 } else if (state ==
"stop") {
457 status = make_status_mpd_state_known
("⬛")
459 status = make_status_mpd_state_unknown
("--")
462 return sprintf("[%s]", status
)
465 function make_status_mpd_state_known
(symbol
) {
469 db
["mpd_status_time"],
470 db
["mpd_status_percent"],
471 substr(db
["mpd_playing_curr"], 1, opt_mpd_song_max_chars
)\
475 function make_status_mpd_state_unknown
(symbol
) {
476 return sprintf("%s", symbol
)
483 function debug
(location
, msg
, values
, sep
, vals
, key
, payload
) {
487 for (key in values
) {
488 vals =
sprintf("%s%s%s: %s", vals
, sep
, key
, values
[key
])
492 sprintf("LOCATION[%s] MSG[%s] DATA[%s]", location
, msg
, vals
)
493 output_msg
("DEBUG", payload
, "/dev/stderr")
497 function ensure_numeric
(n
) {
500 #-------------------------------
501 # Why do we need ensure_numeric?
502 #-------------------------------
503 # awk appears to be guessing the type of an inputted scalar based on usage, so
504 # if we read-in a number, but did not use it in any numeric operations, but did
505 # use as a string (even in just a format string!) - it will be treated as a
506 # string and can lead to REALLY SURPRISING behavior in conditional statements,
507 # where smaller number may compare as greater than the bigger ones, such as.
511 # $ awk 'BEGIN {x = "75"; y = "100"; sprintf("x: %d, y: %d\n", x, y); if (x > y) {print "75 > 100"} else if (x < y) {print "75 < 100"}}'
513 # $ awk 'BEGIN {x = "75"; y = "100"; sprintf("x: %s, y: %d\n", x, y); if (x > y) {print "75 > 100"} else if (x < y) {print "75 < 100"}}'
516 # However, once used as a number, seems to stay that way even after being
519 # $ awk 'BEGIN {x = "75"; y = "100"; x + y; sprintf("x: %s, y: %d\n", x, y); if (x > y) {print "75 > 100"} else if (x < y) {print "75 < 100"}}'
522 # $ awk 'BEGIN {x = "75"; y = "100"; x + y; sprintf("x: %s, y: %d\n", x, y); z = x y; if (x > y) {print "75 > 100"} else if (x < y) {print "75 < 100"}}'
525 # $ awk 'BEGIN {x = "75"; y = "100"; x + y; z = x y; if (x > y) {print "75 > 100"} else if (x < y) {print "75 < 100"}}'
527 # $ awk 'BEGIN {x = "75"; y = "100"; z = x y; if (x > y) {print "75 > 100"} else if (x < y) {print "75 < 100"}}'