diff options
author | Mark Pulford <mark@kyne.com.au> | 2012-01-03 21:30:39 +1030 |
---|---|---|
committer | Mark Pulford <mark@kyne.com.au> | 2012-01-03 21:30:39 +1030 |
commit | 32b57dac838d7cbece250aa8ce42b788750ba857 (patch) | |
tree | e8a3d3a969ae3027da480977e419138da37aa7e7 /tests/lua2json.lua | |
parent | 041a32e52f694b68a881a72b7cb5f62aca449400 (diff) | |
download | lua-cjson-32b57dac838d7cbece250aa8ce42b788750ba857.tar.gz lua-cjson-32b57dac838d7cbece250aa8ce42b788750ba857.tar.bz2 lua-cjson-32b57dac838d7cbece250aa8ce42b788750ba857.zip |
Rename encode/decode scripts to lua2json/json2lua
Diffstat (limited to 'tests/lua2json.lua')
-rwxr-xr-x | tests/lua2json.lua | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/tests/lua2json.lua b/tests/lua2json.lua new file mode 100755 index 0000000..3efd4af --- /dev/null +++ b/tests/lua2json.lua | |||
@@ -0,0 +1,28 @@ | |||
1 | #!/usr/bin/env lua | ||
2 | |||
3 | -- usage: lua2json.lua [lua_file] | ||
4 | -- | ||
5 | -- Eg: | ||
6 | -- echo '{ "testing" }' | ./lua2json.lua | ||
7 | -- ./lua2json.lua lua_data.lua | ||
8 | |||
9 | local json = require "cjson" | ||
10 | local misc = require "cjson-misc" | ||
11 | |||
12 | function get_lua_table(file) | ||
13 | local func = loadstring("data = " .. misc.file_load(file)) | ||
14 | if func == nil then | ||
15 | error("Invalid syntax? Lua table required.") | ||
16 | end | ||
17 | |||
18 | local env = {} | ||
19 | func = setfenv(func, env) | ||
20 | func() | ||
21 | |||
22 | return env.data | ||
23 | end | ||
24 | |||
25 | local t = get_lua_table(arg[1]) | ||
26 | print(json.encode(t)) | ||
27 | |||
28 | -- vi:ai et sw=4 ts=4: | ||