From: John Crispin Date: Wed, 26 Sep 2012 16:27:10 +0000 (+0200) Subject: add lua binding test scripts X-Git-Url: https://git.librecmc.org/?a=commitdiff_plain;h=73380e45c9c73a425b304a9081be62d2aeaa5a3f;p=oweals%2Fubus.git add lua binding test scripts Signed-off-by: John Crispin --- diff --git a/lua/test.lua b/lua/test.lua new file mode 100755 index 0000000..d9ecb45 --- /dev/null +++ b/lua/test.lua @@ -0,0 +1,39 @@ +#!/usr/bin/env lua + +require "ubus" +require "uloop" + +uloop.init() + +local conn = ubus.connect() +if not conn then + error("Failed to connect to ubus") +end + +local my_method = { + broken = { + hello = 1, + hello1 = { + function(req) + end, {id = "fail" } + }, + }, + test = { + hello = { + function(req) + conn:reply(req, {message="foo"}); + print("Call to function 'hello'") + end, {id = ubus.INT32, msg = ubus.STRING } + }, + hello1 = { + function(req) + conn:reply(req, {message="foo1"}); + conn:reply(req, {message="foo2"}); + print("Call to function 'hello1'") + end, {id = ubus.INT32, msg = ubus.STRING } + } + } +} + +conn:add(my_method) +uloop.run() diff --git a/lua/test_client.lua b/lua/test_client.lua new file mode 100755 index 0000000..f55c327 --- /dev/null +++ b/lua/test_client.lua @@ -0,0 +1,39 @@ +#!/usr/bin/env lua + +require "ubus" +require "uloop" + +uloop.init() + +local conn = ubus.connect() +if not conn then + error("Failed to connect to ubusd") +end + +local namespaces = conn:objects() +for i, n in ipairs(namespaces) do + print("namespace=" .. n) + local signatures = conn:signatures(n) + for p, s in pairs(signatures) do + print("\tprocedure=" .. p) + for k, v in pairs(s) do + print("\t\tattribute=" .. k .. " type=" .. v) + end + end +end + +local status = conn:call("test", "hello", { msg = "eth0" }) + +for k, v in pairs(status) do + print("key=" .. k .. " value=" .. tostring(v)) +end + +local status = {conn:call("test", "hello1", { msg = "eth0" })} + +for a = 1, #status do + for k, v in pairs(status[a]) do + print("key=" .. k .. " value=" .. tostring(v)) + end +end + +uloop.run()