trap destroy SIGINT SIGTERM ERR EXIT
# Settings
-temp_file="/tmp/elgatokeylights"
script_dir=$(cd "$(dirname "${BASH_SOURCE[0]}")" &>/dev/null && pwd -P)
icon="${script_dir}/assets/elgato.png"
declare -i silent=0
declare -i pretty=0
declare action="usage"
-declare target=""
+declare target='.'
declare format="json"
declare -A lights
declare lights_json
+declare simple_json
declare flat_json
declare call='curl --silent --show-error --location --header "Accept: application/json" --request'
declare devices="/elgato/lights"
destroy() {
code=$?
- rm "$temp_file" 2>/dev/null
exit ${code}
}
status Get state of lights
on Turn all lights on
off Turn all lights off
- temperature Set temperature level (260-470)
+ temperature Set temperature level (260-470)
brightness Set brightness level (0-100)
increase Increases brightness by 10
decrease Decreases brightness by 10
Available formats:
json Renders output as JSON (default)
- flat Renders output as flattened JSON with .(dot) notation JSON (default)
+ simple Renders output as JSON array of single level objects with subarrays as .(dot) notation JSON
+ flat Renders output as fully flattened single level JSON with .(dot) notation JSON
html Renders output as basic html table
csv Renders output as csv
table Renders output as a printed table
t=$(eval echo "'[.[] | select($target)]'")
lights_json=$(echo "${lights[@]}" | jq -c -s "$t")
-}
-
-# produce_json() {
-# declare json
-# t=$(eval echo "'.[] | select($target)'")
+ simple_json=$(echo "${lights_json}" | jq -c '.[] | reduce ( tostream | select(length==2) | .[0] |= [join(".")] ) as [$p,$v] ({}; setpath($p; $v)) ')
+ simple_json=$(echo "${simple_json}" | jq -c -s '.') # slurp it to make it an array
+ flat_json=$(echo "${lights_json}" | jq -c -s '.[] | reduce ( tostream | select(length==2) | .[0] |= [join(".")] ) as [$p,$v] ({}; setpath($p; $v)) ')
-# for l in "${!lights[@]}"; do
-# json+="${lights[$l]},"
-# done
+}
-# lights_json=$(echo "[${json%,}]" | jq -c "$t")
-# }
output() {
- data=${1-}
- type=${2-"$format"}
# Mange user requested output format
case $format in
- json | flat) print_json "$data" ;;
- table) print_json "$data" ;;
- csv) print_csv "$data" ;;
- pair) print_pair "$data" ;;
- html) print_html "$data" ;;
- -?*) die "Unknown output format (-f/--format): $type" ;;
+ json) print_json "$lights_json" ;;
+ simple) print_json "$simple_json" ;;
+ flat) print_json "$flat_json" ;;
+ table) print_structured '@tsv' ;;
+ csv) print_structured '@csv' ;;
+ pair) print_structured 'pairs' ;;
+ html) print_html ;;
+ -?*) die "Unknown output format (-f/--format): $format" ;;
esac
}
print_json() {
- # TODO: Evaluate adding jq filtering as filter argument
- query=""
-
- # Deconstruct json and assemble in flattened with .(dot) notation
- if [[ $format == "flat" ]]; then
- #query='.[]| . as $in | reduce leaf_paths as $path ({}; . + { ($path | map(tostring) | join(".")): $in | getpath($path) })'
- #query='. as \$data | [ path(.. | select(scalars|tostring), select($empty_tests)) ] | map({ (map(tostring) | join("$join_char")) : (. as \$path | . = \$data | getpath(\$path)) }) | reduce .[] as \$item ({ }; . + \$item);'
- #query='[leaf_paths as $path | {"key": $path | join("."), "value": getpath($path)}] | from_entries'
- query='reduce ( tostream | select(length==2) | .[0] |= [join(".")] ) as [$p,$v] ({}; setpath($p; $v))'
- else
- query='.'
- fi
# Manage pretty printing
if [[ $pretty -eq 1 ]]; then
- echo "${1-}" | jq "$query"
+ echo "${1-}" | jq '.'
else
- echo "${1-}" | jq -c -M "$query"
+ echo "${1-}" | jq -c -M '.'
fi
exit 0
}
-print_table() {
- bold=$(tput bold)
- normal=$(tput sgr0)
- message='
-
-'
- die "To be implemented"
+print_structured() {
+ pp=${2-$pretty}
+ # Handle csv and table printing
+ query="(.[0] | keys_unsorted | map(ascii_upcase)), (.[] | [.[]])|${1-@csv}"
+
+ # Handle printing as key value pairs
+ if [[ ${1} == 'pairs' ]]; then
+ query='.[] | "--------------",(to_entries[] | [.key, "=", .value] | @tsv)'
+ fi
+
+ # Manage pretty printing
+ if [[ $pp -eq 1 ]]; then
+ echo "${simple_json}" | jq --raw-output "$query" | column -t -s$'\t' | sed -e 's/"//g'
+ else
+ echo "${simple_json}" | jq -r "$query"
+ fi
+}
+
+print_html() {
+ data=$(print_structured '@csv' 1)
+
+ html="
+ <table>
+ $(
+ print_header=true
+ while read d; do
+ if $print_header; then
+ echo "<tr><th>${d//,/<\/th><th>}</th></tr>"
+ print_header=false
+ continue
+ fi
+ echo "<tr><td>${d//,/</td><td>}</td></tr>"
+ done <<<"${data}"
+ )
+ </table>"
+ echo "$html"
}
set_state() {
find_lights() {
# Scan the network for Elgato devices
- avahi-browse -d local _elg._tcp --resolve -t | grep -v "^\+" >"$temp_file"
+ declare -a avahi
+ readarray -t avahi < <(avahi-browse -d local _elg._tcp --resolve -t -p | grep -v "^\+")
declare device
declare hostname
declare light
default_light_properties
- cat "$temp_file" >tmp
- while read -r line; do
+ for l in "${avahi[@]}"; do
+ IFS=';' read -ra data <<<"$l" # split line into array
# Gather information about the light
- if [[ ($line == =*) && ($line =~ IPv[46][[:space:]](.+)[[:space:]]_elg) ]]; then
- device=$(eval echo "${BASH_REMATCH[1]}") # eval to strip whitespace
- elif [[ $line =~ hostname.+\[(.+)\] ]]; then
- hostname=${BASH_REMATCH[1]}
- elif [[ $line =~ address.+\[(.+)\] ]]; then
- ip=${BASH_REMATCH[1]}
- [[ $ip =~ fe80 ]] && ipv6="$ip" || ipv4="$ip"
- ip=""
- elif [[ $line =~ port.+\[(.+)\] ]]; then
- port=${BASH_REMATCH[1]}
- elif [[ $line =~ txt.+\[(.+)\] ]]; then
- txt=$(eval echo "${BASH_REMATCH[1]}") # eval to strip single and double quotes
-
- if [[ $txt =~ mf=([^[[:space:]]*]*) ]]; then manufacturer=${BASH_REMATCH[1]}; fi
- if [[ $txt =~ id=([^[[:space:]]*]*) ]]; then mac=${BASH_REMATCH[1]}; fi
- if [[ $txt =~ md=.+[[:space:]]([^[[:space:]]*]*)[[:space:]]id= ]]; then sku=${BASH_REMATCH[1]}; fi
-
- # Get information from the light
- url="http://$ipv4:$port"
-
- declare protocol="--ipv4"
- if [[ $ipv4 == "N/A" ]]; then
- # Workaround: Ignoring ipv6 as Elgato miss-announces addressing and is not accepting requests
- # properly for v6. Will not change to filter only on ipv4 from avahi, as that can cause us to only end
- # up with an ipv6 address even though it was announced as ipv4, which in turn means we cannot communicate.
- continue
- # Remove above and uncomment below if a future update fixes ipv6 announcement and requests
- #protocol="--ipv6"
- #url="http://[$ip]:$port"
- fi
+ device=$(echo "${data[3]}" | sed -e 's/\\032/ /g') # fix avahi output
+ hostname=${data[6]}
+ [[ ${data[7]} =~ fe80 ]] && ipv6=${data[7]} || ipv4=${data[7]}
+ port=${data[8]}
+ txt=$(eval echo "${data[9]}") # eval to strip quotes
+ [[ $txt =~ mf=([^[[:space:]]*]*) ]] && manufacturer=${BASH_REMATCH[1]}
+ [[ $txt =~ id=([^[[:space:]]*]*) ]] && mac=${BASH_REMATCH[1]}
+ [[ $txt =~ md=.+[[:space:]]([^[[:space:]]*]*)[[:space:]]id= ]] && sku=${BASH_REMATCH[1]}
+
+ # Get information from the light
+ url="http://$ipv4:$port"
+
+ declare protocol="--ipv4"
+ if [[ $ipv4 == "N/A" ]]; then
+ # Workaround: Ignoring ipv6 as Elgato miss-announces addressing and is not accepting requests
+ # properly for v6. Will not change to filter only on ipv4 from avahi, as that can cause us to only end
+ # up with an ipv6 address even though it was announced as ipv4, which in turn means we cannot communicate.
+ continue
+ # Remove above and uncomment below if a future update fixes ipv6 announcement and requests
+ #protocol="--ipv6"
+ #url="http://[$ip]:$port"
+ fi
- cfg=$(eval "${call} GET $protocol ${url}${settings}") >/dev/null
- info=$(eval "${call} GET $protocol ${url}${accessory_info}") >/dev/null
- light=$(eval "${call} GET $protocol ${url}${devices}") >/dev/null
-
- # Store the light as json
- lights["$device"]=$(jq -n \
- --arg dev "$device" \
- --arg hn "$hostname" \
- --arg ipv4 "$ipv4" \
- --arg ipv6 "$ipv6" \
- --argjson port "$port" \
- --arg mf "$manufacturer" \
- --arg mac "$mac" \
- --arg sku "$sku" \
- --arg url "$url" \
- --argjson light "$light" \
- --argjson cfg "$cfg" \
- --argjson info "$info" \
- '{device: $dev, manufacturer: $mf, hostname: $hn, url: $url, ipv4: $ipv4, ipv6: $ipv6,
- port: $port, mac: $mac, sku: $sku, light: $light, settings: $cfg, info: $info}')
-
- # Reset for next light as we are processing the last avahi line
- default_light_properties
+ cfg=$(eval "${call} GET $protocol ${url}${settings}") >/dev/null
+ info=$(eval "${call} GET $protocol ${url}${accessory_info}") >/dev/null
+ light=$(eval "${call} GET $protocol ${url}${devices}") >/dev/null
+
+ json=$(jq -n \
+ --arg dev "$device" \
+ --arg hn "$hostname" \
+ --arg ipv4 "$ipv4" \
+ --arg ipv6 "$ipv6" \
+ --argjson port "$port" \
+ --arg mf "$manufacturer" \
+ --arg mac "$mac" \
+ --arg sku "$sku" \
+ --arg url "$url" \
+ --argjson cfg "$cfg" \
+ '{device: $dev, manufacturer: $mf, hostname: $hn, url: $url, ipv4: $ipv4, ipv6: $ipv6,
+ port: $port, mac: $mac, sku: $sku, settings: $cfg}')
+
+ # Store the light as json and merge info + light into base object
+ lights["$device"]=$(echo "$info $light $json" | jq -s '. | add')
+
+ # Reset for next light as we are processing the last avahi line
+ default_light_properties
- fi
- done <"$temp_file"
+ done
}
# Manage user parameters
find_lights
# Fail if we cannot find lights
-[[ ${#lights[@]} -eq 0 ]] && die "No lights found" 2
+[[ ${#lights[@]} -eq 0 ]] && die "No lights found"
produce_json
# Dispatch actions
case $action in
usage) usage ;;
-list) output "${lights_json}" ;;
+list) output ;;
status) status ;;
on) set_state 1 ;;
off) set_state 0 ;;