libubox/sh/jshn.sh
2012-05-14 00:21:12 +02:00

135 lines
2.6 KiB
Bash

# functions for parsing and generating json
jshn_append() {
local var="$1"
local value="$2"
local sep="${3:- }"
eval "export -- \"$var=\${$var:+\${$var}\${value:+\$sep}}\$value\""
}
json_init() {
[ -n "$JSON_UNSET" ] && eval "unset $JSON_UNSET"
export -- JSON_SEQ=0 JSON_STACK= JSON_CUR="JSON_VAR" JSON_UNSET="" KEYS_JSON_VAR= TYPE_JSON_VAR=
}
json_add_generic() {
local type="$1"
local var="$2"
local val="$3"
local cur="${4:-$JSON_CUR}"
if [ "${cur%%[0-9]*}" = "JSON_ARRAY" ]; then
eval "local aseq=\"\${SEQ_$cur}\""
var=$(( ${aseq:-0} + 1 ))
export -- "SEQ_$cur=$var"
else
local name="$(echo -n "$var" | tr -C '[a-zA-Z_]' _)"
[[ "$name" == "$var" ]] || export -- "NAME_${cur}_${name}=$var"
var="$name"
fi
export -- "${cur}_$var=$val"
export -- "TYPE_${cur}_$var=$type"
jshn_append JSON_UNSET "${cur}_$var TYPE_${cur}_$var"
jshn_append "KEYS_${cur}" "$var"
}
json_add_table() {
local TYPE="$1"
JSON_SEQ=$(($JSON_SEQ + 1))
jshn_append JSON_STACK "$JSON_CUR"
local table="JSON_$TYPE$JSON_SEQ"
export -- "UP_$table=$JSON_CUR"
export -- "KEYS_$table="
jshn_append JSON_UNSET "KEYS_$table UP_$table"
[ "$TYPE" = "ARRAY" ] && jshn_append JSON_UNSET "SEQ_$table"
JSON_CUR="$table"
}
json_add_object() {
local cur="$JSON_CUR"
json_add_table TABLE
json_add_generic object "$1" "$JSON_CUR" "$cur"
}
json_close_object() {
local oldstack="$JSON_STACK"
JSON_CUR="${JSON_STACK##* }"
JSON_STACK="${JSON_STACK% *}"
[[ "$oldstack" == "$JSON_STACK" ]] && JSON_STACK=
}
json_add_array() {
local cur="$JSON_CUR"
json_add_table ARRAY
json_add_generic array "$1" "$JSON_CUR" "$cur"
}
json_close_array() {
json_close_object
}
json_add_string() {
json_add_generic string "$1" "$2"
}
json_add_int() {
json_add_generic int "$1" "$2"
}
json_add_boolean() {
json_add_generic boolean "$1" "$2"
}
# functions read access to json variables
json_load() {
eval `jshn -r "$1"`
}
json_dump() {
jshn "$@" -w
}
json_get_type() {
local dest="$1"
local var="$2"
eval "export -- \"$dest=\${TYPE_${JSON_CUR}_$var}\""
}
json_get_var() {
local dest="$1"
local var="$(echo -n "$2" | tr -C '[a-zA-Z_]' _)"
eval "export -- \"$dest=\${${JSON_CUR}_$var}\""
}
json_get_vars() {
while [ "$#" -gt 0 ]; do
local _var="$1"; shift
json_get_var "$_var" "$_var"
done
}
json_select() {
local target="$1"
local type
[ -z "$1" ] && {
JSON_CUR="JSON_VAR"
return
}
[[ "$1" == ".." ]] && {
eval "JSON_CUR=\"\${UP_$JSON_CUR}\""
return;
}
json_get_type type "$target"
case "$type" in
object|array)
json_get_var JSON_CUR "$target"
;;
*)
echo "WARNING: Variable '$target' does not exist or is not an array/object"
;;
esac
}