x2/src/bash/exe/khatus.sh

   1 #! /bin/bash
   2
   3 MSG_FS='|'
   4
   5 set -e
   6
   7 executable_name_of_cmd() {
   8     basename "$(echo $1 | awk '{print $1; exit}')"
   9 }
  10
  11 run_producer() {
  12     pipe="$1"
  13     bin="$2"
  14     cmd="$3"
  15     executable_name="$4"
  16     perf_log="$5"
  17
  18     if [ ! "$perf_log" = '' ]
  19     then
  20         # %S system  time in seconds
  21         # %U user    time in seconds
  22         # %e elapsed time in seconds
  23         # %c context switches involuntary
  24         # %w context switches voluntary
  25         # %x exit code
  26         time_fmt='%S %U %e %c %w %x'
  27         time="/usr/bin/time -ao ${perf_log} -f "
  28         time_sep=' '
  29     else
  30         time_fmt=''
  31         time=''
  32         time_sep=''
  33     fi
  34
  35     ${time}"${time_fmt}"${time_sep}$bin/$cmd \
  36     2> >(
  37         while read line
  38         do
  39             echo "${NODE}${MSG_FS}${executable_name}${MSG_FS}error${MSG_FS}$line" > "$pipe"
  40         done \
  41     ) \
  42     | while read line
  43         do
  44             echo "${NODE}${MSG_FS}${executable_name}${MSG_FS}data${MSG_FS}$line" > "$pipe"
  45         done
  46     cmd_exit_code=${PIPESTATUS[0]}
  47     if [ "$cmd_exit_code" -ne 0 ]
  48     then
  49         echo
  50             "${NODE}${MSG_FS}${executable_name}${MSG_FS}error${MSG_FS}NON_ZERO_EXIT_CODE${MSG_FS}$cmd_exit_code" \
  51             > "$pipe"
  52     fi
  53 }
  54
  55 fork_watcher() {
  56     pipe="$1"
  57     bin="$2"
  58     cmd="$3"
  59     executable_name=$(executable_name_of_cmd "$cmd")
  60     run_producer "$pipe" "$bin" "$cmd" "$executable_name" &
  61 }
  62
  63 fork_poller() {
  64     interval="$1"
  65     perf_log_dir="$2"
  66     shift 2
  67     pipe="$1"
  68     bin="$2"
  69     cmd="$3"
  70
  71     executable_name=$(basename "$(echo $cmd | awk '{print $1; exit}')")
  72
  73     if [ ! "$perf_log_dir" = '' ]
  74     then
  75         cmd="$3"
  76         perf_log_file=${executable_name}.log
  77         mkdir -p "$perf_log_dir"
  78         perf_log_path="$perf_log_dir/$perf_log_file"
  79     fi
  80
  81     while :
  82     do
  83         run_producer "$pipe" "$bin" "$cmd" "$executable_name" "$perf_log_path"
  84         sleep "$interval"
  85     done &
  86 }
  87
  88 find_thermal_zone() {
  89     local -r _type="$1"
  90     awk \
  91         -v _type="$_type" \
  92         '
  93         $0 ~ ("^" _type "$") {
  94             split(FILENAME, f, "thermal_zone");
  95             split(f[2], f2, "/");
  96             print f2[1]}
  97         ' \
  98         /sys/class/thermal/thermal_zone*/type
  99 }
 100
 101 main() {
 102     declare -A opts=(
 103         ["--node"]=$(hostname)
 104         ["--dir_bin"]="$HOME/bin"
 105         ["--dir_perf_logs"]=''
 106         ["--file_pipe"]=$(mktemp)
 107         ["--weather_station_id"]='KJFK'
 108         ["--screen_brightness_device_name"]='acpi_video0'
 109         ["--wifi_interface"]=''
 110         ["--disk_space_device"]='/'
 111         ["--disk_io_device"]='sda'
 112         ["--thermal_zone"]="$(find_thermal_zone x86_pkg_temp)"
 113         ["--fan_path"]='/proc/acpi/ibm/fan'
 114         ["--pulseaudio_sink"]='0'
 115         ["--interval_datetime"]=1
 116         ["--interval_procs"]=1
 117         ["--interval_brightness"]=1
 118         ["--interval_weather"]=$(( 30 * 60))  # 30 minutes
 119         ["--interval_mpd"]=1
 120         ["--interval_volume"]=1
 121         ["--interval_bluetooth"]=1
 122         ["--interval_net_wifi"]=1
 123         ["--interval_net_io"]=1
 124         ["--interval_net_carrier"]=1
 125         ["--interval_disk_space"]=1
 126         ["--interval_disk_io"]=1
 127         ["--interval_loadavg"]=1
 128         ["--interval_temp"]=1
 129         ["--interval_fan"]=1
 130         ["--interval_mem"]=1
 131     )
 132     while :
 133     do
 134         key="$1"
 135         val="$2"
 136         case "$key" in
 137             '')
 138                 break
 139                 ;;
 140             * )
 141                 if [ -v opts["$key"] ]
 142                 then
 143                     if [ "$val" != "" ]
 144                     then
 145                         opts["$key"]="$val"
 146                         shift
 147                         shift
 148                     else
 149                         echo "Option $key requires an argument" >&2
 150                         exit 1
 151                     fi
 152                 else
 153                     echo "Unknown option: $key" >&2
 154                     exit 1
 155                 fi
 156         esac
 157     done
 158
 159     if [ "${opts['--wifi_interface']}" = ''  ]
 160     then
 161         echo 'Please provide the required parameter: --wifi_interface' >&2
 162         exit 1
 163     fi
 164
 165     (
 166         echo '=============================================='
 167         echo "Khatus starting with the following parameters:"
 168         echo '=============================================='
 169         for param in ${!opts[@]}
 170         do
 171             echo "$param := ${opts[$param]}"
 172         done \
 173         | column -ts: \
 174         | sort
 175         echo '----------------------------------------------'
 176     ) >&2
 177
 178     NODE="${opts['--node']}"
 179
 180     screen_brightness_device_path='/sys/class/backlight'
 181     screen_brightness_device_path+="/${opts['--screen_brightness_device_name']}"
 182
 183     # Just shorthand
 184     pipe="${opts['--file_pipe']}"
 185     bin="${opts['--dir_bin']}"
 186     perf="${opts['--dir_perf_logs']}"
 187
 188     rm -f "$pipe"
 189     mkfifo "$pipe"
 190
 191     cmd_sens_screen_brightness='khatus_sensor_screen_brightness'
 192     cmd_sens_screen_brightness+=" $screen_brightness_device_path"
 193
 194     cmd_sens_weather="khatus_sensor_weather $bin ${opts['--weather_station_id']}"
 195     cmd_sens_disk_space="khatus_sensor_disk_space $bin ${opts['--disk_space_device']}"
 196     cmd_sens_disk_io="khatus_sensor_disk_io $bin ${opts['--disk_io_device']}"
 197     cmd_sens_temperature="khatus_sensor_temperature ${opts['--thermal_zone']}"
 198     cmd_sens_fan="khatus_sensor_fan $bin ${opts['--fan_path']}"
 199     cmd_sens_bluetooth="khatus_sensor_bluetooth_power $bin"
 200     cmd_sens_mpd="khatus_sensor_mpd $bin"
 201     cmd_sens_net_addr_io="khatus_sensor_net_addr_io $bin"
 202     cmd_sens_volume="khatus_sensor_volume $bin"
 203     cmd_sens_wifi="khatus_sensor_net_wifi_status $bin ${opts['--wifi_interface']}"
 204     cmd_sens_loadavg="khatus_sensor_loadavg $bin"
 205     cmd_sens_memory="khatus_sensor_memory $bin"
 206
 207     fork_watcher                                           "$pipe" "$bin" "khatus_sensor_energy $bin"
 208     fork_watcher                                           "$pipe" "$bin" "khatus_sensor_devices $bin"
 209     fork_poller "${opts['--interval_datetime']}"   "$perf" "$pipe" "$bin" khatus_sensor_datetime
 210     fork_poller "${opts['--interval_procs']}"      "$perf" "$pipe" "$bin" "khatus_sensor_procs $bin"
 211     fork_poller "${opts['--interval_brightness']}" "$perf" "$pipe" "$bin" "$cmd_sens_screen_brightness"
 212     fork_poller "${opts['--interval_weather']}"    "$perf" "$pipe" "$bin" "$cmd_sens_weather"
 213     fork_poller "${opts['--interval_mpd']}"        "$perf" "$pipe" "$bin" "$cmd_sens_mpd"
 214     fork_poller "${opts['--interval_volume']}"     "$perf" "$pipe" "$bin" "$cmd_sens_volume"
 215     fork_poller "${opts['--interval_bluetooth']}"  "$perf" "$pipe" "$bin" "$cmd_sens_bluetooth"
 216     fork_poller "${opts['--interval_bluetooth']}"  "$perf" "$pipe" "$bin" 'khatus_sensor_bluetooth'
 217     fork_poller "${opts['--interval_net_wifi']}"   "$perf" "$pipe" "$bin" "$cmd_sens_wifi"
 218     fork_poller "${opts['--interval_net_io']}"     "$perf" "$pipe" "$bin" "$cmd_sens_net_addr_io"
 219     fork_poller "${opts['--interval_disk_space']}" "$perf" "$pipe" "$bin" "$cmd_sens_disk_space"
 220     fork_poller "${opts['--interval_disk_io']}"    "$perf" "$pipe" "$bin" "$cmd_sens_disk_io"
 221     fork_poller "${opts['--interval_loadavg']}"    "$perf" "$pipe" "$bin" "$cmd_sens_loadavg"
 222     fork_poller "${opts['--interval_temp']}"       "$perf" "$pipe" "$bin" "$cmd_sens_temperature"
 223     fork_poller "${opts['--interval_fan']}"        "$perf" "$pipe" "$bin" "$cmd_sens_fan"
 224     fork_poller "${opts['--interval_mem']}"        "$perf" "$pipe" "$bin" "$cmd_sens_memory"
 225     fork_poller "${opts['--interval_net_carrier']}" "$perf" "$pipe" "$bin" khatus_sensor_net_carrier
 226
 227     stdbuf -o L tail -f "$pipe"
 228 }
 229
 230 main $@