1 # functions for parsing and generating json
6 eval "$1=\"\$${JSON_PREFIX}$2\""
12 eval "${JSON_PREFIX}$1=\"\$___val\""
20 eval "export -- \"$1=\${$1:+\${$1}\${value:+\$sep}}\$value\""
26 eval "${JSON_PREFIX}$1=\"\${${JSON_PREFIX}$1} \$_a_value\""
45 let "${JSON_PREFIX}$1 += 1" "$2 = ${JSON_PREFIX}$1"
55 if [ "${4%%[0-9]*}" = "J_A" ]; then
58 var
="${2//[^a-zA-Z0-9_]/_}"
59 [[ "$var" == "$2" ]] ||
export -- "${JSON_PREFIX}N_${4}_${var}=$2"
63 "${JSON_PREFIX}${4}_$var=$3" \
64 "${JSON_PREFIX}T_${4}_$var=$1"
65 _jshn_append
"JSON_UNSET" "${4}_$var"
66 _jshn_append
"K_$4" "$var"
75 _json_get_var cur JSON_CUR
76 _json_inc JSON_SEQ
seq
78 local table
="J_$3$seq"
79 _json_set_var
"U_$table" "$cur"
80 export -- "${JSON_PREFIX}K_$table="
81 unset "${JSON_PREFIX}S_$table"
82 _json_set_var JSON_CUR
"$table"
83 _jshn_append
"JSON_UNSET" "$table"
85 _json_add_generic
"$2" "$1" "$table" "$cur"
91 _json_get_var _s_cur JSON_CUR
92 _json_get_var
"${JSON_PREFIX}JSON_CUR" "U_$_s_cur"
93 unset "${JSON_PREFIX}U_$_s_cur"
96 json_set_namespace
() {
100 [ -n "$_old" ] && _set_var
"$_old" "$JSON_PREFIX"
107 _json_get_var
unset JSON_UNSET
108 for tmp
in $unset J_V
; do
110 ${JSON_PREFIX}U_
$tmp \
111 ${JSON_PREFIX}K_
$tmp \
112 ${JSON_PREFIX}S_
$tmp \
113 ${JSON_PREFIX}T_
$tmp \
114 ${JSON_PREFIX}N_
$tmp \
119 ${JSON_PREFIX}JSON_SEQ \
120 ${JSON_PREFIX}JSON_CUR \
121 ${JSON_PREFIX}JSON_UNSET
126 export -n ${JSON_PREFIX}JSON_SEQ
=0
128 ${JSON_PREFIX}JSON_CUR
="J_V" \
133 _json_add_table
"$1" object T
136 json_close_object
() {
141 _json_add_table
"$1" array A
150 _json_get_var cur JSON_CUR
151 _json_add_generic string
"$1" "$2" "$cur"
156 _json_get_var cur JSON_CUR
157 _json_add_generic int
"$1" "$2" "$cur"
162 _json_get_var cur JSON_CUR
163 _json_add_generic boolean
"$1" "$2" "$cur"
168 _json_get_var cur JSON_CUR
169 _json_add_generic double
"$1" "$2" "$cur"
172 # functions read access to json variables
175 eval "`jshn -r "$1"`"
179 jshn
"$@" ${JSON_PREFIX:+-p "$JSON_PREFIX"} -w
186 _json_get_var __cur JSON_CUR
187 local __var
="${JSON_PREFIX}T_${__cur}_${2//[^a-zA-Z0-9_]/_}"
188 eval "export -- \"$__dest=\${$__var}\"; [ -n \"\${$__var+x}\" ]"
196 json_get_var _tbl_cur
"$2"
198 _json_get_var _tbl_cur JSON_CUR
200 local __var
="${JSON_PREFIX}K_${_tbl_cur}"
201 eval "export -- \"$__dest=\${$__var}\"; [ -n \"\${$__var+x}\" ]"
206 local _v_keys _v_val _select
=
207 local _json_no_warning
=1
211 json_select
"$2" ||
return 1
215 json_get_keys _v_keys
217 while [ "$#" -gt 0 ]; do
218 json_get_var _v_val
"$1"
219 __jshn_raw_append
"$_v_dest" "$_v_val"
222 [ -n "$_select" ] && json_select ..
231 _json_get_var __cur JSON_CUR
232 local __var
="${JSON_PREFIX}${__cur}_${2//[^a-zA-Z0-9_]/_}"
233 eval "export -- \"$__dest=\${$__var:-$3}\"; [ -n \"\${$__var+x}\${3+x}\" ]"
237 while [ "$#" -gt 0 ]; do
238 local _var
="$1"; shift
239 if [ "$_var" != "${_var#*:}" ]; then
240 json_get_var
"${_var%%:*}" "${_var%%:*}" "${_var#*:}"
242 json_get_var
"$_var" "$_var"
253 _json_set_var JSON_CUR
"J_V"
256 [[ "$1" == ".." ]] && {
257 _json_get_var cur JSON_CUR
258 _json_get_var cur
"U_$cur"
259 unset "${JSON_PREFIX}U_$cur"
260 _json_set_var JSON_CUR
"$cur"
263 json_get_type
type "$target"
266 json_get_var cur
"$target"
267 _json_get_var
"${JSON_PREFIX}U_$cur" JSON_CUR
268 _json_set_var JSON_CUR
"$cur"
271 [ -n "$_json_no_warning" ] || \
272 echo "WARNING: Variable '$target' does not exist or is not an array/object"
281 json_get_type
type "$1"